Re: [Harbour] BeginEnd Sequence

2009-03-14 Thread Przemyslaw Czerpak
On Sat, 14 Mar 2009, marek.horody...@interia.pl wrote: > When I try compile this code : [...] >b := { |n, x| >y := valtype( n) >// test switch in extendend codeblok >SWITCH y >CASE 'N' > x := Str( n) >Break ^ >CASE 'D' > x := DTOC( n) > BR

[Harbour] BeginEnd Sequence

2009-03-14 Thread marek . horodyski
When I try compile this code : FUNCTION Main() LOCAL b, y, oErr begin sequence ? 'Hello world' InKey( 1) b := { |n, x| y := valtype( n) // test switch in extendend codeblok SWITCH y CASE 'N' x := Str( n) Break CASE 'D' x := DTOC( n) BREAK o