1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42
|
letref intdec
(lst:string list) (whitespace:string)(prev:string)
(result_list:ella list list)
(FIRST_CHARS:string list) (CHARS:string list) (expected:string) =
(fail:ella list,fail:ella list list,fail:string,fail:string list);;
letref int
(lst:string list) (whitespace:string)(prev:string)
(result_list:ella list list)
(FIRST_CHARS:string list) (CHARS:string list) (expected:string) =
(fail:ella list,fail:ella list list,fail:string,fail:string list);;
letref formula
(lst:string list) (whitespace:string)(prev:string)
(result_list:ella list list)
(FIRST_CHARS:string list) (CHARS:string list) (expected:string) =
(fail:ella list,fail:ella list list,fail:string,fail:string list);;
letref formula1
(lst:string list) (whitespace:string)(prev:string)
(result_list:ella list list)
(FIRST_CHARS:string list) (CHARS:string list) (expected:string) =
(fail:ella list,fail:ella list list,fail:string,fail:string list);;
letref poss_ibinop
(lst:string list) (whitespace:string)(prev:string)
(result_list:ella list list)
(FIRST_CHARS:string list) (CHARS:string list) (expected:string) =
(fail:ella list,fail:ella list list,fail:string,fail:string list);;
letref formula2
(lst:string list) (whitespace:string)(prev:string)
(result_list:ella list list)
(FIRST_CHARS:string list) (CHARS:string list) (expected:string) =
(fail:ella list,fail:ella list list,fail:string,fail:string list);;
letref boolean
(lst:string list) (whitespace:string)(prev:string)
(result_list:ella list list)
(FIRST_CHARS:string list) (CHARS:string list) (expected:string) =
(fail:ella list,fail:ella list list,fail:string,fail:string list);;
|