summaryrefslogtreecommitdiff
path: root/compiler/agjasmin.pas
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/agjasmin.pas')
-rw-r--r--compiler/agjasmin.pas4
1 files changed, 4 insertions, 0 deletions
diff --git a/compiler/agjasmin.pas b/compiler/agjasmin.pas
index c33747f422..10fee0677a 100644
--- a/compiler/agjasmin.pas
+++ b/compiler/agjasmin.pas
@@ -526,6 +526,8 @@ implementation
i: longint;
toplevelowner: tsymtable;
begin
+ superclass:=nil;
+
{ JVM 1.5+ }
AsmWriteLn('.bytecode 49.0');
// include files are not support by Java, and the directory of the main
@@ -763,6 +765,8 @@ implementation
2:result:=tostr(smallint(csym.value.valueord.svalue));
4:result:=tostr(longint(csym.value.valueord.svalue));
8:result:=tostr(csym.value.valueord.svalue);
+ else
+ internalerror(2014082050);
end;
conststring:
result:=constastr(pchar(csym.value.valueptr),csym.value.len);