X-Git-Url: https://git.harvie.cz/?a=blobdiff_plain;f=demos%2Farguments1.c;h=552e983b69d7f084926917b1afd7f7f9c803392a;hb=3851f7ab3f37de51f031d89de24a965f03b041f3;hp=609dcdde359621aae8757c72304dbc232933f3b1;hpb=25a3f4304e39dce85a217fd3166df867a5d75b96;p=svn%2FCll1h%2F.git

diff --git a/demos/arguments1.c b/demos/arguments1.c
index 609dcdd..552e983 100644
--- a/demos/arguments1.c
+++ b/demos/arguments1.c
@@ -4,14 +4,11 @@
 
 program
 {
- def_str(ptr);
- 
- if_args then
+ if_args
  {
   for_args
   {
-   ptr=this_arg;
-   if (ptr[0]=='-') then
+   if this_arg[0] == '-')
    {
     printf("Command line switch: -%c ",ptr[1]);
     if (next_arg) then