Inicio Explorar Axuda
Iniciar sesión
pascal
/
freepascal.compiler
réplica de https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Ficheiros Incidencias 0 Wiki
Explorar o código

* rte 211 when error at left site

peter %!s(int64=22) %!d(string=hai) anos
pai
0795cf556b
achega
732743c991
Modificáronse 1 ficheiros con 10 adicións e 0 borrados
Dividir vista Mostrar estatísticas de Diff
  1. 10 0
      tests/tbf/tb0156.pp

+ 10 - 0
tests/tbf/tb0156.pp
Ver ficheiro 

@@ -0,0 +1,10 @@
 
+{ %fail }
 
+
 
+var
 
+  _self : pointer;
 
+begin
 
+  ppointer(_self+vmt_pos)^:=0;
 
+end.
 
+
 
+ 
+