Explorar el Código

* comment links to test now

git-svn-id: trunk@38204 -
florian hace 7 años
padre
commit
092223f400
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  1. 1 1
      compiler/x86/cgx86.pas

+ 1 - 1
compiler/x86/cgx86.pas

@@ -2677,7 +2677,7 @@ unit cgx86;
             getcpuregister(list,REGSI);
 {$ifdef i8086}
             { at this point, si and di are allocated, so no register is available as index =>
-              compiler will hang/ie during spilling, so avoid that srcref has base and index }
+              compiler will hang/ie during spilling, so avoid that srcref has base and index, see also tests/tbs/tb0637.pp }
             if (srcref.base<>NR_NO) and (srcref.index<>NR_NO) then
               begin
                 r:=getaddressregister(list);