Sfoglia il codice sorgente

* array of char+integer is allowed in delphi

peter 23 anni fa
parent
commit
399ee48ea7
1 ha cambiato i file con 9 aggiunte e 0 eliminazioni
  1. 9 0
      tests/tbs/tb0439.pp

+ 9 - 0
tests/tbs/tb0439.pp

@@ -0,0 +1,9 @@
+{$mode delphi}
+
+var
+  a : array[0..32] of char;
+  p : pchar;
+  i : integer;
+begin
+  p:=a+i;
+end.