X-Git-Url: http://git.harvie.cz/?p=svn%2FCll1h%2F.git;a=blobdiff_plain;f=demos%2Farguments1.c;fp=demos%2Farguments1.c;h=0000000000000000000000000000000000000000;hp=552e983b69d7f084926917b1afd7f7f9c803392a;hb=e63f1bc2438012b5f2f6592a474892501149af18;hpb=6a60bc82e8b8e6cccd0d4c2214a1f291662215f0 diff --git a/demos/arguments1.c b/demos/arguments1.c deleted file mode 100644 index 552e983..0000000 --- a/demos/arguments1.c +++ /dev/null @@ -1,27 +0,0 @@ -#include "cll1.h" - -/* try to run: ./arguments1 -x xxx yyyy -c cccc */ - -program -{ - if_args - { - for_args - { - if this_arg[0] == '-') - { - printf("Command line switch: -%c ",ptr[1]); - if (next_arg) then - { - echo("followed by: ",next_arg); - skip_next; - } - print(""); - } - else - print("Standalone argument: ",ptr); - } - } - else - print("Bleeeeh, no arguments supplied... :-("); -}