// $Id$ $module "refal.plus.String"; $func String e.Source = s.String; $func StringInit s.String s.Len s.Fill = ; $func StringFill s.String s.Fill = ; $func StringLength s.String = s.Len; $func StringRef s.String s.Index = s.Char; $func StringSet s.String s.Index s.Char = ; $func StringReplace s.String e.Source = ; $func Substring s.String s.Index s.Len = s.NewString; $func SubstringFill s.String s.Index s.Len s.Fill = ;