mirror of
https://github.com/grin-compiler/grin.git
synced 2024-08-17 01:40:40 +03:00
add parser test
This commit is contained in:
parent
7209ba166f
commit
a0a4b61ce7
45
bugs/parser/float-literal.grin
Normal file
45
bugs/parser/float-literal.grin
Normal file
@ -0,0 +1,45 @@
|
||||
grinMain =
|
||||
hin <- _prim_word_add 5643543699801269706u 16226936514204278295u
|
||||
wao <- pure ()
|
||||
ne <- pure (Csoa 8060978406774983327 56.37897 hin 6.9922633)
|
||||
meyu <- do
|
||||
kuri <- _prim_int_add 3133513188 -4020161891
|
||||
n <- pure (Cnii 32.17341)
|
||||
yuhi <- pure hin
|
||||
nisa <- pure ()
|
||||
roya <- pure (Cmu hin kuri hin)
|
||||
noko <- do
|
||||
he <- _prim_float_add -22.266552 34.105877
|
||||
_prim_float_sub he he
|
||||
case 36560 of
|
||||
-61891 -> nasu <- do
|
||||
woo <- _prim_int_print kuri
|
||||
ke <- _prim_int_gt kuri kuri
|
||||
huwa <- pure noko
|
||||
sa <- _prim_int_mul kuri kuri
|
||||
case (Cnii noko) of
|
||||
(Cnii eka) -> case (Co hin) of
|
||||
(Ce muho mumo more nera kama) -> tuka <- pure (Cno kama kuri kama mumo)
|
||||
ti <- pure mumo
|
||||
u <- pure (Ce nera yuhi kama noko kuri)
|
||||
ku <- pure huwa
|
||||
yoa <- pure ti
|
||||
noma <- do
|
||||
rayu <- _prim_int_print kuri
|
||||
se <- _prim_word_sub ti ti
|
||||
ka <- _prim_word_sub se mumo
|
||||
nuwa <- pure hin
|
||||
_prim_word_lt yoa se
|
||||
ro <- pure (Csotu kama)
|
||||
wo <- pure kuri
|
||||
pure kuri
|
||||
(Cmuu eku meyo) -> pure meyo
|
||||
(Cna rere tete noro) -> pure sa
|
||||
(Co hose) -> pure kuri
|
||||
(Cno hiewo raso nihu sena) -> pure nihu
|
||||
(Csotu heha) -> _prim_int_div kuri sa
|
||||
(Cte suwo ka mawi horawa he) -> _prim_int_add horawa sa
|
||||
_prim_int_mul nasu kuri
|
||||
36560 -> pure kuri
|
||||
_prim_int_print meyu
|
||||
|
Loading…
Reference in New Issue
Block a user