diff options
Diffstat (limited to 'compiler/m68k/symcpu.pas')
| -rw-r--r-- | compiler/m68k/symcpu.pas | 14 |
1 files changed, 10 insertions, 4 deletions
diff --git a/compiler/m68k/symcpu.pas b/compiler/m68k/symcpu.pas index 93702598cb..cb467ba937 100644 --- a/compiler/m68k/symcpu.pas +++ b/compiler/m68k/symcpu.pas @@ -186,14 +186,16 @@ implementation procedure tcpuprocdef.ppuload_platform(ppufile: tcompilerppufile); begin inherited; - ppufile.getderef(libsymderef); + if po_syscall_has_libsym in procoptions then + ppufile.getderef(libsymderef); end; procedure tcpuprocdef.ppuwrite_platform(ppufile: tcompilerppufile); begin inherited; - ppufile.putderef(libsymderef); + if po_syscall_has_libsym in procoptions then + ppufile.putderef(libsymderef); end; @@ -208,14 +210,18 @@ implementation procedure tcpuprocdef.buildderef; begin inherited; - libsymderef.build(libsym); + if po_syscall_has_libsym in procoptions then + libsymderef.build(libsym); end; procedure tcpuprocdef.deref; begin inherited; - libsym:=tsym(libsymderef.resolve); + if po_syscall_has_libsym in procoptions then + libsym:=tsym(libsymderef.resolve) + else + libsym:=nil; end; begin |