git-svn-id: branches/jvmbackend@18542 -
@@ -129,6 +129,19 @@ unit tgcpu;
result:=true;
{$endif}
end;
+ stringdef:
+ begin
+ if is_shortstring(def) then
+{$ifndef nounsupported}
+ gettemp(list,java_jlobject.size,java_jlobject.alignment,temptype,ref);
+ result:=true;
+{$else}
+ internalerror(2011051701);
+{$endif}
+
+ end;