@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.944) exit(1) }' \
+ if (ran < (ran + skip) *0.948) exit(1) }' \
coverage/oceani.mdc.gcov
@rm -f .tmp*
foo.c = 43
print c.foo
print bar.c
+ print bar.b + 42
+
+
+ // trigger 'labels not permitted' error message
+ while 1 if True else False:
+ print
+ case 2: print "two"
###### output: type_err3
.tmp.code:8:12: error: expected number but variable 'c' is string
.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
+ .tmp.code:35:17: error: have string but need number
+ .tmp.code:39:29: error: expected number (labels not permitted) found Boolean
oceani: type error in program - not running.
###### test: type_err4
foo := 4
print foo, bar
+ // trigger duplicate-main error
+ func main()
+ foo := 6
+ print bar, foo
+
###### output: type_err_const
.tmp.code:4:16: error: expected number found string
.tmp.code:6:8: error: name already declared: bar
.tmp.code:4:8: info: this is where 'bar' was first declared
.tmp.code:8:8: error: variable 'foo' redeclared
.tmp.code:3:8: info: this is where 'foo' was first declared
+ .tmp.code:13:8: error: variable 'foo' redeclared
+ .tmp.code:3:8: info: this is where 'foo' was first declared
+ .tmp.code:13:8: "main" defined a second time
###### test: type_err_const1
const