X-Git-Url: https://deadsoftware.ru/gitweb?p=dsw-obn.git;a=blobdiff_plain;f=src%2Fbackends%2Fjvm%2Fgenerator-jvm.c;h=e4c70b1c23d312e580c24f1a2d2348963548ecc1;hp=d986a8e4cbc9af35a1fcf9361c531238c1de3fa8;hb=36c1947b3e98abab25f16a0f1c2679125651fe95;hpb=e6a70a3b694efa5600cfcd0d8110f8d9e8866342 diff --git a/src/backends/jvm/generator-jvm.c b/src/backends/jvm/generator-jvm.c index d986a8e..e4c70b1 100644 --- a/src/backends/jvm/generator-jvm.c +++ b/src/backends/jvm/generator-jvm.c @@ -858,6 +858,7 @@ oberon_generator_init_type(oberon_context_t * ctx, oberon_type_t * type) case OBERON_TYPE_BOOLEAN: case OBERON_TYPE_ARRAY: case OBERON_TYPE_REAL: + case OBERON_TYPE_CHAR: break; case OBERON_TYPE_RECORD: ; @@ -1366,6 +1367,7 @@ push_item(gen_proc_t * p, oberon_item_t * item) } break; case MODE_INTEGER: + case MODE_CHAR: jvm_generate_push_int_size(p, item -> integer, item -> result -> size); break; case MODE_BOOLEAN: