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