anchor.diff:    if s = nil then exit nil;
   
     exit mono_string_from_utf16(^mono_unichar2(s.cStringUsingEncoding(NSStringEncoding.NSUnicodeStringEncoding)));
  +end;
  +
  +class method NSString_Marzipan_Helpers.stringwithMonoString(s: ^MonoString): NSString;
  +begin
  +  if s = nil then exit nil;
  +  exit Foundation.NSString.stringWithCharacters(^unichar(mono_string_chars(^MonoString(s)))) length(mono_string_length(^MonoString(s)));
  +end;
  +
  +method NSString_Marzipan_Helpers.MonoString: ^MonoString;
  +begin
  +  if self = nil then exit nil;
  +  exit mono_string_from_utf16(^mono_unichar2(self.cStringUsingEncoding(NSStringEncoding.NSUnicodeStringEncoding)));
   end;
   
   method MZArray.objectAtIndex(aIndex: Integer): id;
  
positive.code: end;
  
  end.
  
  
negative.code:     method objectAtIndexedSubscript(aIndex: Integer): id;
    end;
  
    NSString_Marzipan_Helpers = public extension class(NSString)
    public
      class method stringwithMonoString(s: ^MonoString): NSString;
      method MonoString: ^MonoString;
    end;
  
  implementation
  
  
  