| Ast.TopInit(init) -> initialiser init
| Ast.Include(inc,s) ->
mcode print_string inc; print_string " "; mcode inc_file s
+ | Ast.Undef(def,id) ->
+ mcode print_string def; print_string " "; ident id
| Ast.DefineHeader(def,id,params) ->
mcode print_string def; print_string " "; ident id;
print_define_parameters params