|
@@ -156,6 +156,8 @@ implementation
|
|
|
writer.AsmWriteLn(#9'.globaltype'#9+STACK_POINTER_SYM+', i32');
|
|
|
{ print all global procedures/functions }
|
|
|
WriteImports;
|
|
|
+ if ts_wasm_native_exceptions in current_settings.targetswitches then
|
|
|
+ writer.AsmWriteLn(#9'.tagtype'#9'__FPC_exception');
|
|
|
inherited;
|
|
|
end;
|
|
|
|