Explorar el Código

* obsolete test

peter hace 21 años
padre
commit
698bdc9926
Se han modificado 1 ficheros con 0 adiciones y 18 borrados
  1. 0 18
      tests/test/tcg2.pp

+ 0 - 18
tests/test/tcg2.pp

@@ -1,18 +0,0 @@
-{ %CPU=i386 }
-
-function x : longint;saveregisters;
-begin
-  x:=34;
-end;
-
-var
-  y : longint;
-begin
-  asm
-    movl $15,%eax
-  end;
-  y:=x;
-  Writeln(y);
-  if y<>34 then
-    halt(1);
-end.