hyung-hwan/hcl
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

updated testers with updated syntax
All checks were successful
continuous-integration/drone/push Build is passing
Details

Browse Source
This commit is contained in:
hyung-hwan
2024-01-15 00:47:01 +09:00
parent 48a54d61c1
commit 656af796ed
6 changed files with 59 additions and 61 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
t/insta-01.hcl
View File

@ -35,19 +35,17 @@ else { printf "OK %d\n" a; };
set b (B:newInstance 2 3 4);
set a (b:get-a);
(if (/= a 4) (printf "ERROR: a must be 4\n")
else (printf "OK %d\n" a))
if (/= a 4) {printf "ERROR: a must be 4\n" }
else { printf "OK %d\n" a };
set a (b:get-b);
(if (/= a 6) (printf "ERROR: a must be 6\n")
else (printf "OK %d\n" a))
if (/= a 6) { printf "ERROR: a must be 6\n" }
else { printf "OK %d\n" a };
set a (b:get-c);
(if (/= a 8) (printf "ERROR: a must be 8\n")
else (printf "OK %d\n" a))
if (/= a 8) { printf "ERROR: a must be 8\n" }
else {printf "OK %d\n" a };
set a (b:sum);
(if (/= a 27) (printf "ERROR: a must be 27\n")
else (printf "OK %d\n" a))
if (/= a 27) { printf "ERROR: a must be 27\n" }
else { printf "OK %d\n" a };