فهرست منبع

- m68k assembler reader: removed Oper.InitRef which was causing failure of tbs/tb0142.pp and, in general, making impossible calls/jumps to non-alias procedure names.

git-svn-id: trunk@28173 -
sergei 11 سال پیش
والد
کامیت
1678fcdc2d
1فایلهای تغییر یافته به همراه0 افزوده شده و 1 حذف شده
  1. 0 1
      compiler/m68k/ra68kmot.pas

+ 0 - 1
compiler/m68k/ra68kmot.pas

@@ -1343,7 +1343,6 @@ const
                    end;
                    end;
    { // A constant expression, or a Variable ref. // }
    { // A constant expression, or a Variable ref. // }
      AS_ID:  begin
      AS_ID:  begin
-              Oper.InitRef;
               if actasmpattern[1] = '@' then
               if actasmpattern[1] = '@' then
               { // Label or Special symbol reference // }
               { // Label or Special symbol reference // }
               begin
               begin