@mv *.gcov coverage ; [ -f .gcov ] && mv .gcov coverage || true
@ awk '/NOTEST/ { next } /^ *[1-9]/ {ran+=1} /^ *###/ {skip+=1} \
END {printf "coverage: %6.2f%%\n", ran * 100 / (ran + skip); \
- if (ran < (ran + skip) *0.94) exit(1) }' \
+ if (ran < (ran + skip) *0.9495) exit(1) }' \
coverage/oceani.mdc.gcov
@rm -f .tmp*
print num,", ",
print
+ for i:=0; then i=i+1; while i < 5:
+ switch i:
+ case 0: num:="zero"
+ case 1: num:="one"
+ case 2: num:="two"
+ case 3: num:="three"
+ else num:="many"
+ // re-declare a CondScope variable
+ num := i*i
+ print num,", ",
+ print
+
###### output: varmerge
zero , one , two , three , many ,
+ 0 , 1 , 4 , 9 , 16 ,
## Conditions and Loops
bar:foo
foo.c = 43
print c.foo
+ print bar.c
###### output: type_err3
.tmp.code:8:12: error: expected number but variable 'c' is string
.tmp.code:32:8: error: field reference attempted on none, not a struct
.tmp.code:32:16: error: expected none found number
.tmp.code:33:14: error: field reference attempted on string, not a struct
+ .tmp.code:34:14: error: cannot find requested field in foo
oceani: type error in program - not running.
###### test: type_err4