peter %!s(int64=22) %!d(string=hai) anos
pai
achega
b7a19dd847
Modificáronse 1 ficheiros con 13 adicións e 0 borrados
  1. 13 0
      tests/tbs/tb0466.pp

+ 13 - 0
tests/tbs/tb0466.pp

@@ -0,0 +1,13 @@
+var
+  outf : file of byte;
+  w : word;
+begin
+   assign(outf, 'tb0466.tmp');
+   rewrite(outf);
+   {only explicit typecasting helps: byte(10)}
+   write(outf, 10);
+   w:=20;
+   write(outf, w);
+   close(outf);
+end.
+