Command-line arguments: Difference between revisions

Content added Content deleted
No edit summary
m (→‎{{header|TXR}}: Drop @(do ...))
Line 1,665:
Here is an example program which requires exactly three arguments. Note how <code>ldiff</code> is used to compute the arguments that are processed by TXR (the interpreter name, any special arguments and script name), to print an accurate usage message.
 
<lang txrtxrlisp>@(dotree-case *args*
((a b c) (put-line "got three args, thanks!"))
(tree-case *args*
((a b c)else (put-line "got`usage: three@(ldiff *full-args,* thanks!"*args*) <arg1> <arg2> <arg3>`)))</lang>
(else (put-line `usage: @(ldiff *full-args* *args*) <arg1> <arg2> <arg3>`))))</lang>
{{out}}
<pre>$ txr command-line-args.txr 1 2