lot of work has been done, but lists are currently broken

[svn/Cll1h/.git] / demos / arguments1.c

#include "cll1.h"

//try to run: ./arguments1 -x xxx yyyy -c cccc

program
{
 Define_str(ptr);
 
 if_args then
 {
  for_args
  {
   ptr=this_arg;
   if (ptr[0]=='-') then
   {
    printf("Command line switch: -%c ",ptr[1]);
    if (next_arg) then
    {
     echo("followed by: ",next_arg);
     skip_one;
    }
    print("");
   }
   else
    print("Standalone argument: ",ptr); 
  }
 }
 else
  print("Bleeeeh, no arguments supplied... :-(");
}