Bläddra i källkod

Fixed typo

git-svn-id: trunk@30238 -
Jeppe Johansen 10 år sedan
förälder
incheckning
60f24739fc
1 ändrade filer med 1 tillägg och 1 borttagningar
  1. 1 1
      compiler/assemble.pas

+ 1 - 1
compiler/assemble.pas

@@ -1549,7 +1549,7 @@ Implementation
                end;
                end;
              ait_symbolpair:
              ait_symbolpair:
                begin
                begin
-                 if tai_symbolpair(hp).kind<>spk_set then
+                 if tai_symbolpair(hp).kind=spk_set then
                    begin
                    begin
                      objsym:=ObjData.symbolref(tai_symbolpair(hp).sym^);
                      objsym:=ObjData.symbolref(tai_symbolpair(hp).sym^);
                      ref:=objdata.symbolref(tai_symbolpair(hp).value^);
                      ref:=objdata.symbolref(tai_symbolpair(hp).value^);