Miroirs/rpn
1
0
Fork 0
mirror of https://github.com/louisrubet/rpn synced 2025-01-29 20:34:21 +01:00
Code Issues Projects Releases Packages Wiki Activity

#3: test string commands

Browse source
This commit is contained in:
Louis Rubet 2017-05-13 12:41:40 +02:00
parent 094ce87af1
commit 0520646388
1 changed files with 48 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

48
test/string.txt
View file

@ -34,3 +34,51 @@ drop
->str
-> stack should be "'toto'"
drop
default
# str-> on real (1)
"1"
str->
-> stack should be 1
drop
# str-> on real (2)
"1 2.345 3 4.9"
str->
-> stack should be 1, 2.345, 3, 4.9
erase
# str-> on real (3)
4 fix
"1 2.345 3 4.9"
str->
-> stack should be 1.0000, 2.3450, 3.0000, 4.9000
erase
default
# str-> on constant (1)
"pi"
str->
-> stack should be 3.141592653589793238462643
erase
# str-> on constant (2)
"'pi' 'e'"
str->
-> stack should be 'pi', 'e'
erase
# str-> on command (1)
"2 dup"
str->
-> stack should be 2, 2
erase
# str-> on command (2)
"3.14 my_pi sto"
str->
-> stack size should be 0
my_pi
-> stack should be 3.14
erase