5 static const char source
[] =
10 " MyRec = POINTER TO RECORD"
23 static oberon_context_t
* ctx
;
24 static oberon_module_t
* mod
;
27 main(int argc
, char ** argv
)
29 ctx
= oberon_create_context();
30 mod
= oberon_compile_module(ctx
, source
);
32 oberon_generator_dump(ctx
, "dump.txt");
33 oberon_destroy_context(ctx
);