This website works better with JavaScript
Página inicial
Explorar
Ajuda
Entrar
pascal
/
freepascal.compiler
mirror de
https://gitlab.com/freepascal.org/fpc/source.git
Observar
2
Favorito
0
Fork
0
Arquivos
Issues
0
Wiki
Ver código fonte
* rte 211 when error at left site
peter
22 anos atrás
pai
0795cf556b
commit
732743c991
1 arquivos alterados
com
10 adições
e
0 exclusões
Visão dividida
Mostrar estatísticas do Diff
10
0
tests/tbf/tb0156.pp
+ 10
- 0
tests/tbf/tb0156.pp
Ver arquivo
@@ -0,0 +1,10 @@
+{ %fail }
+
+var
+ _self : pointer;
+begin
+ ppointer(_self+vmt_pos)^:=0;
+end.
+
+
+