2
0
Эх сурвалжийг харах

* fixed return opcode for enums and smallsets

git-svn-id: branches/jvmbackend@18603 -
Jonas Maebe 14 жил өмнө
parent
commit
7e6261ff55

+ 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: