QB64/QB64-PE
QB64/QB64-PE
1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-01 15:00:38 +00:00
Code Issues Releases Wiki Activity

Update _ROL & _ROR test and output

Browse source
This commit is contained in:
Samuel Gomes 2022-09-01 18:09:47 +05:30
parent a7a4d837ea
commit adf838cd81
2 changed files with 40 additions and 16 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

28
tests/compile_tests/rotations/test.bas
View file

@ -11,18 +11,30 @@ b = &B1111111100000000
c = &B11111111111111110000000000000000
d = &B1111111111111111111111111111111100000000000000000000000000000000
PRINT a, b, c, d
PRINT _BIN$(a), _BIN$(b), _BIN$(c), _BIN$(d)
PRINT a; ":"; _BIN$(a)
PRINT b; ":"; _BIN$(b)
PRINT c; ":"; _BIN$(c)
PRINT d; ":"; _BIN$(d)
PRINT _ROL(a, 1), _ROL(b, 1), _ROL(c, 1), _ROL(d, 1)
PRINT _BIN$(_ROL(a, 1)), _BIN$(_ROL(b, 1)), _BIN$(_ROL(c, 1)), _BIN$(_ROL(d, 1))
PRINT _ROL(a, 1); ":"; _BIN$(_ROL(a, 1))
PRINT _ROL(b, 1); ":"; _BIN$(_ROL(b, 1))
PRINT _ROL(c, 1); ":"; _BIN$(_ROL(c, 1))
PRINT _ROL(d, 1); ":"; _BIN$(_ROL(d, 1))
PRINT _ROR(a, 1), _ROR(b, 1), _ROR(c, 1), _ROR(d, 1)
PRINT _BIN$(_ROR(a, 1)), _BIN$(_ROR(b, 1)), _BIN$(_ROR(c, 1)), _BIN$(_ROR(d, 1))
PRINT _ROR(a, 1); ":"; _BIN$(_ROR(a, 1))
PRINT _ROR(b, 1); ":"; _BIN$(_ROR(b, 1))
PRINT _ROR(c, 1); ":"; _BIN$(_ROR(c, 1))
PRINT _ROR(d, 1); ":"; _BIN$(_ROR(d, 1))
PRINT _BIN$(_ROL(240~%%, 5)), _BIN$(_ROL(65280~%, 5)), _BIN$(_ROL(4294901760~&, 5)), _BIN$(_ROL(18446744069414584320~&&, 5))
PRINT a; ":"; _BIN$(_ROL(240~%%, 5))
PRINT b; ":"; _BIN$(_ROL(65280~%, 5))
PRINT c; ":"; _BIN$(_ROL(4294901760~&, 5))
PRINT d; ":"; _BIN$(_ROL(18446744069414584320~&&, 5))
PRINT _BIN$(_ROR(240~%%, 5)), _BIN$(_ROR(65280~%, 5)), _BIN$(_ROR(4294901760~&, 5)), _BIN$(_ROR(18446744069414584320~&&, 5))
PRINT a; ":"; _BIN$(_ROR(240~%%, 5))
PRINT b; ":"; _BIN$(_ROR(65280~%, 5))
PRINT c; ":"; _BIN$(_ROR(4294901760~&, 5))
PRINT d; ":"; _BIN$(_ROR(18446744069414584320~&&, 5))
SYSTEM

28
tests/compile_tests/rotations/test.output
View file

@ -1,8 +1,20 @@
240 65280 4294901760 18446744069414584320
11110000 1111111100000000 11111111111111110000000000000000 1111111111111111111111111111111100000000000000000000000000000000
225 65025 4294836225 18446744065119617025
11100001 1111111000000001 11111111111111100000000000000001 1111111111111111111111111111111000000000000000000000000000000001
120 32640 2147450880 9223372034707292160
1111000 111111110000000 1111111111111111000000000000000 111111111111111111111111111111110000000000000000000000000000000
11110 1110000000011111 11111111111000000000000000011111 1111111111111111111111111110000000000000000000000000000000011111
10000111 11111111000 111111111111111100000000000 11111111111111111111111111111111000000000000000000000000000
240 :11110000
65280 :1111111100000000
4294901760 :11111111111111110000000000000000
18446744069414584320 :1111111111111111111111111111111100000000000000000000000000000000
225 :11100001
65025 :1111111000000001
4294836225 :11111111111111100000000000000001
18446744065119617025 :1111111111111111111111111111111000000000000000000000000000000001
120 :1111000
32640 :111111110000000
2147450880 :1111111111111111000000000000000
9223372034707292160 :111111111111111111111111111111110000000000000000000000000000000
240 :11110
65280 :1110000000011111
4294901760 :11111111111000000000000000011111
18446744069414584320 :1111111111111111111111111110000000000000000000000000000000011111
240 :10000111
65280 :11111111000
4294901760 :111111111111111100000000000
18446744069414584320 :11111111111111111111111111111111000000000000000000000000000