This website works better with JavaScript
Home
Esplora
Aiuto
Accedi
pascal
/
freepascal.compiler
mirror da
https://gitlab.com/freepascal.org/fpc/source.git
Segui
2
Vota
0
Forka
0
File
Problemi
0
Wiki
Sfoglia il codice sorgente
* rte 211 when error at left site
peter
22 anni fa
parent
0795cf556b
commit
732743c991
1 ha cambiato i file
con
10 aggiunte
e
0 eliminazioni
Visualizzazione separata
Mostra Diff Stats
10
0
tests/tbf/tb0156.pp
+ 10
- 0
tests/tbf/tb0156.pp
Vedi File
@@ -0,0 +1,10 @@
+{ %fail }
+
+var
+ _self : pointer;
+begin
+ ppointer(_self+vmt_pos)^:=0;
+end.
+
+
+