Re: [fpc-pascal] CASE

2005-11-08 Thread Marco van de Voort
> >>># [735] case l3o3.FormType of > >>> // Select 3o3 processor > >>> lwz r2,160(r1) > >>> cmplwi cr0,r2,0 > >>> beq cr0,L1051 > >>> cmplwi cr0,r2,1 > >>> beq cr0,L1052 > >>> cmplwi cr0,r2,2 > >>> beq cr0,L1053 > >>>

Re: [fpc-pascal] CASE

2005-11-08 Thread Anton Tichawa
Paul Davidson wrote: On Nov 8, 2005, at 12:11, Peter Vreman wrote: # [735] case l3o3.FormType of // Select 3o3 processor lwz r2,160(r1) cmplwi cr0,r2,0 beq cr0,L1051 cmplwi cr0,r2,1 beq cr0,L1052 cmplwi cr0,r2,2 beq

Re: [fpc-pascal] Compiling for DOS

2005-11-08 Thread Tomas Hajny
Date sent: Tue, 8 Nov 2005 20:16:47 -0200 From: Felipe Monteiro de Carvalho <[EMAIL PROTECTED]> To: FPC-Pascal users discussions Subject:[fpc-pascal] Compiling for DOS Send reply to: FPC-Pascal users discussions

[fpc-pascal] Compiling for DOS

2005-11-08 Thread Felipe Monteiro de Carvalho
Hello, I am trying to compile a very simple app (hello world kind) for DOS or even for the Windows 98 rescue disk. My first attempts ended up with a "This program cannot be run in DOS mode". On the FP IDE I see many targets, but I don“t know witch one to compile against. I see a few possible tar

Re: [fpc-pascal] CASE

2005-11-08 Thread Peter Vreman
# [735] case l3o3.FormType of // Select 3o3 processor lwz r2,160(r1) cmplwi cr0,r2,0 beq cr0,L1051 cmplwi cr0,r2,1 beq cr0,L1052 cmplwi cr0,r2,2 beq cr0,L1053 cmplwi cr0,r2,3 beq cr0,L1054 etc. An

Re: [fpc-pascal] CASE

2005-11-08 Thread Eduardo
At 18:22 08/11/2005, you wrote: Any hints? Use 2.1.1 Peter version 2.1.1 [2005/11/08] for powerpc Same result, Peter :| P Davidson Perhaps this code can do the trick, but don't know if is easily integrable in fpc ppc codegenerator, you can adapt it a bit if you want ** IN r3 Value to

Re: [fpc-pascal] CASE

2005-11-08 Thread Eduardo
At 18:07 08/11/2005, you wrote: Jump by offset label number? I don't understand it. ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal Sorry Eduardo, am not knowledgeable of compiler i

Re: [fpc-pascal] CASE

2005-11-08 Thread Paul Davidson
On Nov 8, 2005, at 12:11, Peter Vreman wrote: # [735] case l3o3.FormType of // Select 3o3 processor lwz r2,160(r1) cmplwi cr0,r2,0 beq cr0,L1051 cmplwi cr0,r2,1 beq cr0,L1052 cmplwi cr0,r2,2 beq cr0,L1053 cmplw

Re: [fpc-pascal] CASE

2005-11-08 Thread Peter Vreman
At 04:42 8-11-2005, you wrote: May be having case statement problem. App has case statement with 146 sequential labels. They are in order, from a defined type. The assembler output is scanning each label, where it seems a jump would be more efficient. ppc 32, Darwin /usr/local/bin/ppcppc cape

Re: [fpc-pascal] CASE

2005-11-08 Thread Paul Davidson
Jump by offset label number? I don't understand it. ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal Sorry Eduardo, am not knowledgeable of compiler internals. There is (?) an optimi

Re: [fpc-pascal] CASE

2005-11-08 Thread Eduardo
May be having case statement problem. App has case statement with 146 sequential labels. They are in order, from a defined type. The assembler output is scanning each label, where it seems a jump would be more efficient. This :) case L3o3.FormType of 1 : begin end 2 : begin end

Re: [fpc-pascal] CASE

2005-11-08 Thread Paul Davidson
On Nov 8, 2005, at 11:39, Eduardo wrote: At 04:42 08/11/2005, you wrote: May be having case statement problem. App has case statement with 146 sequential labels. They are in order, from a defined type. The assembler output is scanning each label, where it seems a jump would be more efficient

Re: [fpc-pascal] CASE

2005-11-08 Thread Eduardo
At 04:42 08/11/2005, you wrote: May be having case statement problem. App has case statement with 146 sequential labels. They are in order, from a defined type. The assembler output is scanning each label, where it seems a jump would be more efficient. I don't understand well what you have: