Hello Przemek

Przemysław Czerpak wrote:
> 
>    proc main()
>       p1( "a", "b", "c", 10, 20, 30, .t. )
>    return
> 
>    proc p1( ... )
>       local v
>       p2( "Original parameters:", ... )
>       for each v in { ... }
>          switch valtype( v )
>             case "N"; v += 1000        ; exit
>             case "C"; v = upper( v )   ; exit
>             case "L"; v := !v          ; exit
>          endswitch
>          hb_pvalue( v:__enumIndex(), v )
>       next
>       p2( "Modified parameters:", ... )
>    return
> 
>    proc p2( msg, ... )
>       ? msg, ...
>    return
> 

Perfect. Will be replacing with it shortly.

Regards
Pritpal Bedi

-- 
View this message in context: 
http://old.nabble.com/SF.net-SVN%3A-harbour-project%3A-13275--trunk-harbour-tp26826400p26852880.html
Sent from the Harbour - Dev mailing list archive at Nabble.com.

_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to