Re: [Harbour] Classes - A Bug

2008-10-27 Thread Przemyslaw Czerpak
On Sun, 26 Oct 2008, Pritpal Bedi wrote: Hi Pritpal, #include hbclass.ch #command BEGINMENU [oMenu] = WITH OBJECT oMenu := MyMenu():New() CREATE CLASS TThread VAR a ENDCLASS Generates this error: ERRCLASS.prg(7) Error E0030 Syntax error: syntax error at 'ALWAYS' 1 error Harbour code

Re: [Harbour] Classes - A Bug

2008-10-27 Thread Przemyslaw Czerpak
On Mon, 27 Oct 2008, Przemyslaw Czerpak wrote: Hi Pritpal, Harbour code is correct and the problem is only with this line: #command BEGINMENU [oMenu] = WITH OBJECT oMenu := MyMenu():New() It converts all lines starting with BEGI letters so damage BEGIN SEQUENCE and other PP commands which

Re: [Harbour] Classes - A Bug

2008-10-27 Thread Pritpal Bedi
Got it Przemyslaw Czerpak-2 wrote: On Sun, 26 Oct 2008, Pritpal Bedi wrote: Harbour code is correct and the problem is only with this line: #command BEGINMENU [oMenu] = WITH OBJECT oMenu := MyMenu():New() It converts all lines starting with BEGI letters so damage BEGIN SEQUENCE

Re: [Harbour] Classes - A Bug

2008-10-27 Thread Przemyslaw Czerpak
On Mon, 27 Oct 2008, Pritpal Bedi wrote: Hi Pritpal, But why the same code was working OK till few days back? May be issue relates to Harbour compile time switches. Few days ago BEGIN SEQUENCE was not used in class declaration code. Now it is because I introduced few lines inside ALWAYS

[Harbour] Classes - A Bug

2008-10-26 Thread Pritpal Bedi
Hello #include hbclass.ch #command BEGINMENU [oMenu] = WITH OBJECT oMenu := MyMenu():New() CREATE CLASS TThread VAR a ENDCLASS Generates this error: ERRCLASS.prg(7) Error E0030 Syntax error: syntax error at 'ALWAYS' 1 error No code generated Regards Pritpal Bedi -- View this message