X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fbackends%2Fjvm%2Fgenerator-jvm-basic.c;h=44046a1506ab27c99e6b78e7178309c684f5e7dd;hb=51a1ab2543ec5c221d4a3a9ab89968ae7dd39981;hp=24c28b057429313018bf1529c64154c1e2a27825;hpb=ee7fd939ac99201466900fb3983aa90b980da5c3;p=dsw-obn.git diff --git a/src/backends/jvm/generator-jvm-basic.c b/src/backends/jvm/generator-jvm-basic.c index 24c28b0..44046a1 100644 --- a/src/backends/jvm/generator-jvm-basic.c +++ b/src/backends/jvm/generator-jvm-basic.c @@ -146,7 +146,7 @@ jvm_get_descriptor_safe(oberon_type_t * type) return jvm_get_class_full_name(type); break; case OBERON_TYPE_ARRAY: - return new_string("A%sX", jvm_get_descriptor_safe(type -> base)); + return new_string("A%s", jvm_get_descriptor_safe(type -> base)); break; default: return jvm_get_descriptor(type); @@ -365,6 +365,10 @@ jvm_cell_size_for_type(oberon_type_t * type) return 2; } } + else if(type -> class == OBERON_TYPE_VOID) + { + return 0; + } return 1; }