diff --git a/compiler/jvm/hlcgcpu.pas b/compiler/jvm/hlcgcpu.pas
index f3c15463da..63ef663c5c 100644
--- a/compiler/jvm/hlcgcpu.pas
+++ b/compiler/jvm/hlcgcpu.pas
@@ -248,6 +248,11 @@ implementation
         { records are implemented via classes }
         recorddef:
           result:=R_ADDRESSREGISTER;
+        setdef:
+          if is_smallset(def) then
+            result:=R_INTREGISTER
+          else
+            result:=R_ADDRESSREGISTER;
         else
           result:=inherited;
       end;