Procházet zdrojové kódy

* fixed return opcode for enums and smallsets

git-svn-id: branches/jvmbackend@18603 -
Jonas Maebe před 14 roky
rodič
revize
7e6261ff55
1 změnil soubory, kde provedl 7 přidání a 0 odebrání
  1. 7 0
      compiler/jvm/hlcgcpu.pas

+ 7 - 0
compiler/jvm/hlcgcpu.pas

@@ -1324,6 +1324,13 @@ implementation
             else
               opc:=a_ireturn;
           end;
+        enumdef:
+          opc:=a_ireturn;
+        setdef:
+          if is_smallset(retdef) then
+            opc:=a_ireturn
+          else
+            opc:=a_areturn;
         floatdef:
           case tfloatdef(retdef).floattype of
             s32real: