Skip to content

Commit 778e33e

Browse files
committed
tests: add 2 new runtime tests (norm bool)
1 parent 0b8dc9f commit 778e33e

2 files changed

Lines changed: 21 additions & 0 deletions

File tree

tests/runtime/cases/norm_bool.bas

Lines changed: 21 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,21 @@
1+
#include "lib/tst_framework.bas"
2+
3+
INIT("Test BOOL Normalization")
4+
5+
DIM a as UByte
6+
7+
PRINT "PRINT: "; a = a
8+
PRINT "SHL: "; (a = a) SHL 1; " "; 1 SHL (a = a); " "; (a = a) SHL (a = a)
9+
PRINT "SHR: "; (a = a) SHR 1; " "; 1 SHR (a = a); " "; (a = a) SHR (a = a)
10+
PRINT "ADD: "; (a = a) + (a = a)
11+
PRINT "SUB: "; (a = a) - (a = a)
12+
PRINT "MUL: "; (a = a) * (a = a)
13+
PRINT "DIV: "; (a = a) / (a = a)
14+
PRINT "LET: ";: LET a = (a = a): PRINT a
15+
PRINT "OR: "; (a = a) OR (a = a)
16+
PRINT "AND: "; (a = a) AND (a = a)
17+
PRINT "XOR: "; (a = a) XOR (a = a)
18+
19+
20+
FINISH
21+
6.75 KB
Binary file not shown.

0 commit comments

Comments
 (0)