mirror of
https://codeberg.org/scip/rpnc.git
synced 2025-12-18 04:51:03 +01:00
added commandline and stdin tests using testscript
This commit is contained in:
2
t/cmdline-command.txtar
Normal file
2
t/cmdline-command.txtar
Normal file
@@ -0,0 +1,2 @@
|
||||
exec testrpn 1 2 dump
|
||||
stdout 'Stack revision 2 .0x'
|
||||
2
t/cmdline-invalidcommand.txtar
Normal file
2
t/cmdline-invalidcommand.txtar
Normal file
@@ -0,0 +1,2 @@
|
||||
exec testrpn 1 2 dumb
|
||||
stdout 'unknown command or operator'
|
||||
2
t/cmdline-short-stack.txtar
Normal file
2
t/cmdline-short-stack.txtar
Normal file
@@ -0,0 +1,2 @@
|
||||
exec testrpn 4 +
|
||||
stdout 'stack doesn''t provide enough arguments'
|
||||
2
t/cmdlinecalc-debug.txtar
Normal file
2
t/cmdlinecalc-debug.txtar
Normal file
@@ -0,0 +1,2 @@
|
||||
exec testrpn -d 44 55 *
|
||||
stdout 'push to stack: 2420.00\n'
|
||||
2
t/cmdlinecalc-divzero.txtar
Normal file
2
t/cmdlinecalc-divzero.txtar
Normal file
@@ -0,0 +1,2 @@
|
||||
exec testrpn 100 50 50 - /
|
||||
stdout 'division by null\n'
|
||||
16
t/cmdlinecalc-lua.txtar
Normal file
16
t/cmdlinecalc-lua.txtar
Normal file
@@ -0,0 +1,16 @@
|
||||
exec testrpn -d -c test.lua 3 5 lower
|
||||
stdout '3\n'
|
||||
|
||||
-- test.lua --
|
||||
function lower(a,b)
|
||||
if a < b then
|
||||
return a
|
||||
else
|
||||
return b
|
||||
end
|
||||
end
|
||||
|
||||
function init()
|
||||
-- expects 2 args
|
||||
register("lower", 2, "lower")
|
||||
end
|
||||
2
t/cmdlinecalc.txtar
Normal file
2
t/cmdlinecalc.txtar
Normal file
@@ -0,0 +1,2 @@
|
||||
exec testrpn 44 55 *
|
||||
stdout '2420\n'
|
||||
2
t/getman.txtar
Normal file
2
t/getman.txtar
Normal file
@@ -0,0 +1,2 @@
|
||||
exec testrpn -m
|
||||
stdout 'This software is licensed under the GNU GENERAL PUBLIC LICENSE'
|
||||
2
t/getusage.txtar
Normal file
2
t/getusage.txtar
Normal file
@@ -0,0 +1,2 @@
|
||||
exec testrpn -h
|
||||
stdout 'This is rpn'
|
||||
2
t/getversion.txtar
Normal file
2
t/getversion.txtar
Normal file
@@ -0,0 +1,2 @@
|
||||
exec testrpn -v
|
||||
stdout 'This is rpn version'
|
||||
4
t/stdin-batch-cmd.txtar
Normal file
4
t/stdin-batch-cmd.txtar
Normal file
@@ -0,0 +1,4 @@
|
||||
exec echo 1 2 3 4 5 batch median
|
||||
stdin stdout
|
||||
exec testrpn
|
||||
stdout '3\n'
|
||||
4
t/stdin-batch.txtar
Normal file
4
t/stdin-batch.txtar
Normal file
@@ -0,0 +1,4 @@
|
||||
exec echo 1 2 3 4 5
|
||||
stdin stdout
|
||||
exec testrpn median
|
||||
stdout '3\n'
|
||||
4
t/stdin-calc.txtar
Normal file
4
t/stdin-calc.txtar
Normal file
@@ -0,0 +1,4 @@
|
||||
exec echo 10 10 +
|
||||
stdin stdout
|
||||
exec testrpn
|
||||
stdout '20\n'
|
||||
6
t/stdin-help.txtar
Normal file
6
t/stdin-help.txtar
Normal file
@@ -0,0 +1,6 @@
|
||||
stdin input.txt
|
||||
exec testrpn
|
||||
stdout 'Available configuration commands'
|
||||
|
||||
-- input.txt --
|
||||
?
|
||||
13
t/stdin-use-vars.txtar
Normal file
13
t/stdin-use-vars.txtar
Normal file
@@ -0,0 +1,13 @@
|
||||
stdin input.txt
|
||||
exec testrpn
|
||||
stdout '28\n'
|
||||
|
||||
-- input.txt --
|
||||
10
|
||||
10
|
||||
+
|
||||
>SUM
|
||||
clear
|
||||
8
|
||||
<SUM
|
||||
+
|
||||
4
t/stdint-explicit-batch.txtar
Normal file
4
t/stdint-explicit-batch.txtar
Normal file
@@ -0,0 +1,4 @@
|
||||
exec echo 1 2 3 4 5 median
|
||||
stdin stdout
|
||||
exec testrpn -b
|
||||
stdout '3\n'
|
||||
13
t/test.lua
Normal file
13
t/test.lua
Normal file
@@ -0,0 +1,13 @@
|
||||
-- simple function, return the lower number of the two operands
|
||||
function lower(a,b)
|
||||
if a < b then
|
||||
return a
|
||||
else
|
||||
return b
|
||||
end
|
||||
end
|
||||
|
||||
function init()
|
||||
-- expects 2 args
|
||||
register("lower", 2, "lower")
|
||||
end
|
||||
Reference in New Issue
Block a user