Browse Source

* char - integer explicit conversions

peter 25 years ago
parent
commit
50b6aa8440
1 changed files with 8 additions and 0 deletions
  1. 8 0
      tests/tbs/tbs0350.pp

+ 8 - 0
tests/tbs/tbs0350.pp

@@ -0,0 +1,8 @@
+var
+  c : char;
+  i : integer;
+begin
+  i:=integer(c);
+  c:=char(i);
+end.
+