OpenEuphoria

Re: String Type

• Posted by Ralf Nieuwenhuijsen <nieuwen at XS4ALL.NL> Mar 17, 1999
• 437 views

> SUB To_Lower_Str : VVA Address
>
>     IF Address's refence count > 1 THEN
>         decrement Address's refernce count
>         NewAddress = ( copy_str : Address )
>         IF not NewAddress THEN
>             RETURN NewAddress
>         END IF
>         Address = NewAddress
>     END IF
>     ITERATE i IN string
>         Address[i] = lower case Address[i]
>     END ITERATE
> END SUB

What is this ? Basic ?

Ralf