tests:: oceani_test_suite
oceani_test_suite: oceani coverage_oceani
- @./parsergen --report --LR1 --tag Parser oceani.mdc | grep " - no conflicts" > /dev/null || \
- { echo "Grammar container conflicts, please review" ; exit 1; }
+ @echo -n Checking grammar ...
+ @./parsergen --report --LALR --tag Parser oceani.mdc | grep " - no conflicts" > /dev/null || \
+ { echo "Grammar contains conflicts, please review" ; exit 1; }
+ @echo ok
@rm -rf coverage; mkdir -p coverage
@cp *.gcno coverage
@for T in $(oceani_tests); do \
./oceani --noexec --print .tmp.code1 >> .tmp.code2 ;\
if ! cmp -s .tmp.code1 .tmp.code2; then \
echo " Failed"; diff -u .tmp.code1 .tmp.code2; exit 1 ; fi ; \
+ echo -n "extra-newlines.. "; \
+ sed -e 'i\
+ ' .tmp.code1 > .tmp.code1a; \
+ echo '``````' > .tmp.code2a ;\
+ ./oceani --noexec --print .tmp.code1a >> .tmp.code2a;\
+ if ! cmp -s .tmp.code1 .tmp.code2a; then \
+ echo " Failed"; diff -u .tmp.code1 .tmp.code2a; exit 1; fi ; \
echo -n "exec-after-print.. "; \
./oceani .tmp.code1 $${1+"$$@"} > .tmp.have ; \
if ! cmp -s .tmp.want .tmp.have; then \
###### test: consts
const:
- pi ::= 3.1415926
+ pi ::= 3.141 592 653
four ::= 2 + 2 ; five ::= 10/2
const pie ::= "I like Pie";
cake ::= "The cake is"
program:
size::=55
list:[size]number
- list[0] = 1234
+ list[0] = 1_234
for i:=1; then i = i + 1; while i < size:
n := list[i-1] * list[i-1]
list[i] = (n / 100) % 10000
if then else while do
###### output: syn1
- .tmp.code:3:11: error: unhandled parse error: then
- oceani: no program found.
+ .tmp.code:3:11: Syntax error in statement: then
###### test: tokerr
program:
.tmp.code:28:16: error: expected string found Boolean
.tmp.code:29:12: error: have number but need string
.tmp.code:7:8: info: variable 'c' was set as string here.
- .tmp.code:32:8: error: field reference attempted on label, not a struct
+ .tmp.code:32:8: error: variable used but not declared: foo
+ .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
oceani: type error in program - not running.
print a, b, c
###### output: type_err4
- .tmp.code:3:14: error: expected *unknown*type* (labels not permitted) but variable 'b' is label
- .tmp.code:3:14: info: this is where 'b' was set to label
- .tmp.code:3:16: error: expected label found number
- .tmp.code:3:14: info: variable 'b' was set as label here.
- .tmp.code:4:17: error: expected *unknown*type* (labels not permitted) but variable 'b' is label
- .tmp.code:3:14: info: this is where 'b' was set to label
+ .tmp.code:3:14: error: variable used but not declared: b
+ .tmp.code:3:16: error: expected none found number
+ .tmp.code:3:14: info: variable 'b' was set as none here.
oceani: type error in program - not running.
###### test list
print foo, bar
###### output: type_err_const1
- .tmp.code:3:12: error: unhandled parse error: :
- oceani: no program found.
+ .tmp.code:3:12: Syntax error in constant: :
+ .tmp.code:4:12: Syntax error in constant: :
## Test erroneous command line args