From: xchaos <xchaos@4bb87942-c103-4e5a-b51c-0ebff58f8515>
Date: Fri, 5 Sep 2008 16:48:13 +0000 (+0000)
Subject: some work, unfinished
X-Git-Url: https://git.harvie.cz/?a=commitdiff_plain;h=3851f7ab3f37de51f031d89de24a965f03b041f3;p=svn%2FCll1h%2F.git

some work, unfinished



git-svn-id: https://dev.arachne.cz/repos/cll1h/trunk@86 4bb87942-c103-4e5a-b51c-0ebff58f8515
---

diff --git a/demos/arguments1.c b/demos/arguments1.c
index f92d90d..552e983 100644
--- a/demos/arguments1.c
+++ b/demos/arguments1.c
@@ -4,14 +4,11 @@
 
 program
 {
- 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