Selaa lähdekoodia

* obsolete test

peter 21 vuotta sitten
vanhempi
commit
698bdc9926
1 muutettua tiedostoa jossa 0 lisäystä ja 18 poistoa
  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.