From e72ff5f9368b2d99241a43f6f2a49229a3c96026 Mon Sep 17 00:00:00 2001 From: daniel Date: Sun, 12 Mar 2000 08:24:03 +0000 Subject: [PATCH] * Modification for new symtable --- compiler/t_linux.pas | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) diff --git a/compiler/t_linux.pas b/compiler/t_linux.pas index 195a8f39e7..e8da6edced 100644 --- a/compiler/t_linux.pas +++ b/compiler/t_linux.pas @@ -80,15 +80,20 @@ begin {$IFDEF NEWST} current_module^.linkothersharedlibs. insert(new(Plinkitem,init(SplitName(module),link_allways))); + { do nothing with the procedure, only set the mangledname } + if name<>'' then + aktprocdef^.setmangledname(name) + else + message(parser_e_empty_import_name); {$ELSE} current_module^.linkothersharedlibs. insert(SplitName(module),link_allways); -{$ENDIF NEWST} { do nothing with the procedure, only set the mangledname } if name<>'' then aktprocsym^.definition^.setmangledname(name) else message(parser_e_empty_import_name); +{$ENDIF NEWST} end; @@ -467,7 +472,10 @@ end; end. { $Log$ - Revision 1.12 2000-03-02 13:12:37 daniel + Revision 1.13 2000-03-12 08:24:03 daniel + * Modification for new symtable + + Revision 1.12 2000/03/02 13:12:37 daniel * Removed a comment to fix gtk. Revision 1.11 2000/02/28 17:23:57 daniel