Posted: Wed Jul 11, 2007 6:54 pm

http://www.purebasic.com
https://www.purebasic.fr/english/
You mean create user defined constants ?Maxus wrote:How make
constant #KEY=0
in TailBite?
Code: Select all
Procedure.l ipf_bbTurnEntity(e.l,p.f,y.f,r.f,_global.l=0)
ProcedureReturn bbTurnEntity_(e,p,y,r,_global)
EndProcedure
ProcedureDLL.l bbTurnEntity(e.l,p.f,y.f,r.f,_global.l)
ProcedureReturn ipf_bbTurnEntity(e,p,y,r,_global)
EndProcedure
ProcedureDLL.l bbTurnEntity2(e.l,p.f,y.f,r.f)
ProcedureReturn ipf_bbTurnEntity(e,p,y,r)
EndProcedure
Code: Select all
ProcedureDLL.l bbTurnEntity(e.l,p.f,y.f,r.f)
ProcedureReturn ipf_bbTurnEntity(e,p,y,r, 0)
EndProcedure
ProcedureDLL.l bbTurnEntity2(e.l,p.f,y.f,r.f,_global.l)
ProcedureReturn ipf_bbTurnEntity(e,p,y,r,_global)
EndProcedure
Did you update jaPBe V3 ?X wrote:Any chance to update to support 4.10 series? This may be either a jaPBe issue or Tailbite. However, when Tailbiting from jaPBe, it errors out with numerous errors on any code.
jaPBe V3 already comes with a custom tailbite version wich is used if you select Menu:Project->Tailbite.X wrote:I have the newest jaPBe installed, but not the newest Tailbite, which must be causing the problem. I'll install the newest tailbite tonight and see if that fixes things.
Code: Select all
ProcedureDLL TestFunc()
CompilerIf #PB_Compiler_Unicode = #True
ProcedureReturn #True
CompilerElse
ProcedureReturn #False
CompilerEndIf
EndProcedure
Code: Select all
; ProcedureDLL TestFunc()
macro MP0{
_Procedure0:
PUSH ebx
PS0=8
; CompilerIf #PB_Compiler_Unicode = #True
; ProcedureReturn #False
XOR eax,eax
JMP _EndProcedure1
; CompilerEndIf
; EndProcedure
XOR eax,eax
_EndProcedure1:
POP ebx
RET
}
_PB_EOP_NoValue:
PUSH dword 0
_PB_EOP:
CALL _PB_EndFunctions
PUSH dword [PB_MemoryBase]
CALL _HeapDestroy@4
CALL _ExitProcess@4
_PB_EndFunctions:
RET
;
Code: Select all
; ProcedureDLL TestFunc()
macro MP0{
_Procedure0:
PUSH ebx
PS0=8
; CompilerIf #PB_Compiler_Unicode = #True
; ProcedureReturn #True
MOV eax,1
JMP _EndProcedure1
; CompilerElse
; EndProcedure
XOR eax,eax
_EndProcedure1:
POP ebx
RET
}
_PB_EOP_NoValue:
PUSH dword 0
_PB_EOP:
CALL _PB_EndFunctions
PUSH dword [PB_MemoryBase]
CALL _HeapDestroy@4
CALL _ExitProcess@4
_PB_EndFunctions:
RET
;