From 3851f7ab3f37de51f031d89de24a965f03b041f3 Mon Sep 17 00:00:00 2001
From: xchaos <xchaos@4bb87942-c103-4e5a-b51c-0ebff58f8515>
Date: Fri, 5 Sep 2008 16:48:13 +0000
Subject: [PATCH] some work, unfinished

git-svn-id: https://dev.arachne.cz/repos/cll1h/trunk@86 4bb87942-c103-4e5a-b51c-0ebff58f8515
---
 demos/arguments1.c | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

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
-- 
2.30.2