* smartlinking fixed for linux (merged)

compiler/aasm.pas

@@ -490,7 +490,7 @@ uses
          typ:=ait_symbol;
          sym:=_sym;
          size:=siz;
-         is_global:=(sym^.bind=AB_GLOBAL);
+         is_global:=(sym^.defbind=AB_GLOBAL);
       end;
 
     constructor tai_symbol.initname(const _name : string;siz:longint);
@@ -744,7 +744,7 @@ uses
         typ:=ait_label;
         l:=_l;
         l^.is_set:=true;
-        is_global:=(l^.bind=AB_GLOBAL);
+        is_global:=(l^.defbind=AB_GLOBAL);
       end;
 
 
@@ -1180,7 +1180,10 @@ uses
 end.
 {
   $Log$
-  Revision 1.9  2000-08-16 18:33:53  peter
+  Revision 1.10  2000-08-20 17:38:21  peter
+    * smartlinking fixed for linux (merged)
+
+  Revision 1.9  2000/08/16 18:33:53  peter
     * splitted namedobjectitem.next into indexnext and listnext so it
       can be used in both lists
     * don't allow "word = word" type definitions (merged)

compiler/ag386att.pas

@@ -658,7 +658,7 @@ unit ag386att;
              begin
                if (pai_label(hp)^.l^.is_used) then
                 begin
-                  if pai_label(hp)^.l^.bind=AB_GLOBAL then
+                  if pai_label(hp)^.l^.defbind=AB_GLOBAL then
                    begin
                      AsmWrite('.globl'#9);
                      AsmWriteLn(pai_label(hp)^.l^.name);
@@ -902,7 +902,10 @@ unit ag386att;
 end.
 {
   $Log$
-  Revision 1.3  2000-07-13 12:08:24  michael
+  Revision 1.4  2000-08-20 17:38:21  peter
+    * smartlinking fixed for linux (merged)
+
+  Revision 1.3  2000/07/13 12:08:24  michael
   + patched to 1.1.0 with former 1.09patch from peter
 
   Revision 1.2  2000/07/13 11:32:28  michael

compiler/ag386int.pas

@@ -594,7 +594,7 @@ ait_stab_function_name : ;
 
     procedure writeexternal(p:pnamedindexobject);{$ifndef FPC}far;{$endif}
       begin
-        if pasmsymbol(p)^.bind=AB_EXTERNAL then
+        if pasmsymbol(p)^.defbind=AB_EXTERNAL then
          currentasmlist^.AsmWriteln(#9'EXTRN'#9+p^.name);
       end;
 
@@ -645,7 +645,10 @@ ait_stab_function_name : ;
 end.
 {
   $Log$
-  Revision 1.3  2000-07-13 12:08:24  michael
+  Revision 1.4  2000-08-20 17:38:21  peter
+    * smartlinking fixed for linux (merged)
+
+  Revision 1.3  2000/07/13 12:08:24  michael
   + patched to 1.1.0 with former 1.09patch from peter
 
   Revision 1.2  2000/07/13 11:32:30  michael

compiler/ag386nsm.pas

@@ -725,7 +725,7 @@ unit ag386nsm;
 
     procedure writeexternal(p:pnamedindexobject);{$ifndef FPC}far;{$endif}
       begin
-        if pasmsymbol(p)^.bind=AB_EXTERNAL then
+        if pasmsymbol(p)^.defbind=AB_EXTERNAL then
          currentasmlist^.AsmWriteln('EXTERN'#9+p^.name);
       end;
 
@@ -774,7 +774,10 @@ unit ag386nsm;
 end.
 {
   $Log$
-  Revision 1.3  2000-07-13 12:08:24  michael
+  Revision 1.4  2000-08-20 17:38:21  peter
+    * smartlinking fixed for linux (merged)
+
+  Revision 1.3  2000/07/13 12:08:24  michael
   + patched to 1.1.0 with former 1.09patch from peter
 
   Revision 1.2  2000/07/13 11:32:30  michael