#
# string.jako
#
# Copyright (C) 2003-2005, The Perl Foundation.
# This program is free software. Its use is subject to the
# same license as Parrot.
#
# $Id: string.jako 12840 2006-05-30 15:08:05Z coke $
#

module string
{
  sub     concat :op (str dest, str s);
  sub int index  :op (str input, str pattern, int start);
  sub int length :op (str dest);
  sub str substr :op (str s, int i, int l);
}