Browse Source

+ bug with Rintel

carl 27 years ago
parent
commit
7538fd49d4
1 changed files with 11 additions and 0 deletions
  1. 11 0
      bugs/bug0124.pp

+ 11 - 0
bugs/bug0124.pp

@@ -0,0 +1,11 @@
+{ Compile with -Rintel switch }
+var
+ l : longint;
+begin
+ { problem here is that l is replaced by BP-offset     }
+ { relative to stack, and the parser thinks all wrong  }
+ { because of this.                                    }
+ asm
+   mov eax, [eax*4+l]    
+ end;
+end.