be06fc096a
better path going forward to handling upgrades. Old syntax files will stick around for compatibility purposes. Old syntax can be parsed into valid syntax trees via the old syntax (.peg) files, and then old syntax trees should be valid and can be upgraded via the normal code path. This change has lots of improvements to Nomsu codegen too.
23 lines
833 B
Plaintext
23 lines
833 B
Plaintext
#!/usr/bin/env nomsu -V1
|
|
#..
|
|
Tests for the stuff defined in core/control_flow.nom
|
|
|
|
use "core"
|
|
|
|
assume (all of [inf, pi, tau, golden ratio, e]) or barf "math constants failed"
|
|
%nan <- (NaN)
|
|
assume (%nan != %nan) or barf "NaN failed"
|
|
assume (("5" as a number) = 5)
|
|
assume
|
|
all of [..]
|
|
abs 5, |5|, sqrt 5, √(5), sine 5, cosine 5, tangent 5, arc sine 5, arc cosine 5,
|
|
arc tangent 5, arc tangent 5/10, hyperbolic sine 5, hyperbolic cosine 5,
|
|
hyperbolic tangent 5, e^5, ln 5, log base 2 of 5, floor 5, ceiling 5, round 5,
|
|
..or barf "math functions failed"
|
|
assume ((463 to the nearest 100) = 500) or barf "rounding failed"
|
|
assume ((2.6 to the nearest 0.25) = 2.5) or barf "rounding failed"
|
|
assume ((min of [3,-4,1,2] by % = (%*%)) = 1)
|
|
assume ((max of [3,-4,1,2] by % = (%*%)) = -4)
|
|
|
|
say "Math test passed"
|