We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent c94e6a1 commit b27f476Copy full SHA for b27f476
2 files changed
tests/runtime/cases/read_coercion.bas
@@ -0,0 +1,48 @@
1
+REM Type coercion (promotion) in read DATA
2
+
3
+#include "lib/tst_framework.bas"
4
+INIT("Testing READ, DATA coercing")
5
6
7
+DIM i8 as Byte
8
+DIM u8 as UByte
9
+DIM i16 as Integer
10
+DIM u16 as UInteger
11
+DIM i32 as Long
12
+DIM u32 as ULong
13
+DIM f16 as Fixed
14
+DIM flt as Float
15
16
+RESTORE
17
+READ i8
18
+PRINT i8
19
20
+READ u8
21
+PRINT u8
22
23
24
+READ i16
25
+PRINT i16
26
27
+READ u16
28
+PRINT u16
29
30
31
+READ i32
32
+PRINT i32
33
34
+READ u32
35
+PRINT u32
36
37
38
+READ f16
39
+PRINT f16
40
41
42
+READ flt
43
+PRINT flt
44
45
+DATA 700
46
47
+REPORT_OK
48
tests/runtime/expected/read_coercion.tzx.scr
6.75 KB
0 commit comments