DEADSOFTWARE

Исправлено падение при использовании процедурного типа
[dsw-obn.git] / src / backends / jvm / generator-jvm-abi.c
index 8d966cbe4877ac404487fbd308d8bc2d5a359deb..1d634a5ea0ddfcbaad19f707f4521202389ebec6 100644 (file)
@@ -257,12 +257,17 @@ jvm_generate_var(gen_var_t * v)
                case JVM_STORAGE_REGISTER:
                case JVM_STORAGE_PARAM:
                case JVM_STORAGE_PARAM_VAR:
+               case JVM_STORAGE_FRAME:
+               case JVM_STORAGE_FRAME_VAR:
+               case JVM_STORAGE_FRAME_PARAM:
+               case JVM_STORAGE_FRAME_PARAM_VAR:
                        jvm_generate(p, 0, 0, ".var %i is %s %s from start to end", reg, name, desc);
                        break;
                case JVM_STORAGE_REGISTER_VAR:
                        jvm_generate(p, 0, 0, ".var %i is %s [%s from start to end", reg, name, desc);
                        break;
                case JVM_STORAGE_PARAM_VARPTR:
+               case JVM_STORAGE_FRAME_PARAM_VARPTR:
                        jvm_generate(p, 0, 0, ".var %i is %s [%s from start to end", reg, name, desc);
                        jvm_generate(p, 0, 0, ".var %i is %s$offset I from start to end", reg + 1, name);
                        break;
@@ -278,13 +283,6 @@ jvm_generate_var(gen_var_t * v)
                case JVM_STORAGE_FIELD_VAR:
                        fprintf(v -> class -> fp, ".field public %s [%s\n\n", name, desc);
                        break;
-               case JVM_STORAGE_FRAME:
-               case JVM_STORAGE_FRAME_VAR:
-               case JVM_STORAGE_FRAME_PARAM:
-               case JVM_STORAGE_FRAME_PARAM_VAR:
-               case JVM_STORAGE_FRAME_PARAM_VARPTR:
-                       /* См. ниже jvm_generate_frame_class() */
-                       break;
                default:
                        gen_error("jvm_generate_var: invalid storage %i", storage);
                        break;