TailBite 1.0 Preview, soon in PureProject and PureArea

El_Choni · Post by **El_Choni** » Sun May 21, 2006 3:24 am

I'm on it, be patient, plz

va!n · Post by **va!n** » Sun May 21, 2006 3:29 am

ok, np - thanks! i only want try to help you to find and solve bugs

btw, i found another possible bug ^^ Seems when having procedures where the user can use strings as argument (like for a windowtitle) for example, this sting will not correctly pasted internaly of the procedure. It returns always only the first char ^^

one other point i noticed and i am not sure if its correct or not - but i think we can change following ASM output generated by talibite:

Code: Select all

... code ...
JMP   _EndProcedure9
; EndProcedure
XOR    eax,eax       ; <<< this will never be called, so we can save the JMP
_EndProcedure9:
RET    4

what about changing to...

Code: Select all

... code ...
; JMP   _EndProcedure9
; EndProcedure
; XOR    eax,eax
; _EndProcedure9:
RET    4

btw, please dont kill me

El_Choni · Post by **El_Choni** » Sun May 21, 2006 3:48 am

I can't. I don't control what happens inside the procedure. TailBite doesn't optimize it -remi_meier's code does-.

But thank you for your help, anyway. Your reports do help me

gnozal · Post by **gnozal** » Mon May 22, 2006 8:54 am

A bug with optional parameters. I still use the old method, I think the new one isn't supported yet ?

Code: Select all

ProcedureDLL.l PureSMTP_SendMail(MailTo.s, MailFrom.s, Subject.s, MsgBody.s) ; Send mail : returns #PureSMTP_Ok if success (else is error code)
  ProcedureReturn PureSMTP_SendMailEx(MailTo, MailFrom, Subject, MsgBody, "", "", "", "")
EndProcedure
ProcedureDLL.l PureSMTP_SendMail2(MailTo.s, MailFrom.s, Subject.s, MsgBody.s, Attachments.s) ; Send mail : returns #PureSMTP_Ok if success (else is error code)
  ProcedureReturn PureSMTP_SendMailEx(MailTo, MailFrom, Subject, MsgBody, Attachments, "", "", "")
EndProcedure
ProcedureDLL.l PureSMTP_SendMail3(MailTo.s, MailFrom.s, Subject.s, MsgBody.s, Attachments.s, UserName.s) ; Send mail : returns #PureSMTP_Ok if success (else is error code)
  ProcedureReturn PureSMTP_SendMailEx(MailTo, MailFrom, Subject, MsgBody, Attachments, UserName, "", "")
EndProcedure
ProcedureDLL.l PureSMTP_SendMail4(MailTo.s, MailFrom.s, Subject.s, MsgBody.s, Attachments.s, UserName.s, Password.s) ; Send mail : returns #PureSMTP_Ok if success (else is error code)
  ProcedureReturn PureSMTP_SendMailEx(MailTo, MailFrom, Subject, MsgBody, Attachments, UserName, Password, "")
EndProcedure
ProcedureDLL.l PureSMTP_SendMail5(MailTo.s, MailFrom.s, Subject.s, MsgBody.s, Attachments.s, UserName.s, Password.s, HeaderAddon.s) ; Send mail : returns #PureSMTP_Ok if success (else is error code)
  ProcedureReturn PureSMTP_SendMailEx(MailTo, MailFrom, Subject, MsgBody, Attachments, UserName, Password, HeaderAddon)
EndProcedure

In the created library, the help string is like this :

PureSMTP_SendMail @@@@€ ([ilTo.s, MailFrom.s, Subject.s, MsgBody.s [, Attachments.s [, UserName.s [, Password.s [, HeaderAddon.s]]]]) - Send mail : returns #PureSMTP_Ok if success (else is error code)

Note the '[ilTo.s' instead of 'MailTo.s'

gnozal · Post by **gnozal** » Tue May 23, 2006 2:37 pm

TailBite 1.3 PR 1.4/1.6

Code: Select all

; TailbiteTest.pb
ProcedureDLL GetFileDate(Filename.s)
  Protected searchData.WIN32_FIND_DATA, *FT.FILETIME, FT.FILETIME
  #DateBaseHigh = 27111902   ; 64 bit value to subtract 
  #DateBaseLow = -717324288  ; from FILETIME for PBdate 
  #Stamp = 2 ; 0:created, 1:access, 2:write, 
  hFind = FindFirstFile_(Filename, searchData)
  If hFind = #INVALID_HANDLE_VALUE
    ProcedureReturn 0
  EndIf 
  *FT.FILETIME = @searchData\ftCreationTime + SizeOf(FILETIME) * #Stamp
  FileTimeToLocalFileTime_(*FT, FT)
  FindClose_(hFind)
  MOV Eax,FT\dwLowDateTime
  MOV Edx,FT\dwHighDateTime
  SUB Eax,#DateBaseLow 
  SBB Edx,#DateBaseHigh 
  MOV Ebx,10000000
  DIV Ebx   
  ProcedureReturn
EndProcedure

FAsm error : TailbiteTest_DIV Ebx illegal instruction

IceSoft · Post by **IceSoft** » Tue May 23, 2006 2:51 pm

PR1.6 is the newest.

gnozal · Post by **gnozal** » Tue May 23, 2006 3:01 pm

IceSoft wrote:PR1.6 is the newest.

Thanks, but same error with PR1.6

El_Choni · Post by **El_Choni** » Tue May 23, 2006 3:31 pm

Thx, I'm on it.

Flype · Post by **Flype** » Tue May 23, 2006 9:41 pm

does the Import and ImportC keywords are supported in the last version of tailbite ?

El_Choni · Post by **El_Choni** » Tue May 23, 2006 11:40 pm

gnozal · Post by **gnozal** » Wed May 24, 2006 7:41 am

Flype wrote:does the Import and ImportC keywords are supported in the last version of tailbite ?

Yes, I use it.

El_Choni wrote:Thx, I'm on it.

No more FAsm error with Tailbite 1.3 PR 1.7. Thanks!

Flype · Post by **Flype** » Wed May 24, 2006 8:09 am

@EL_Choni:

so it doesn't work for me, i will send you a PM.
In my case, while compiling with TBManager one lib which makes use of ImportC the GUI stay 'grayed'. I've to kill the program in the taskmanager.

gnozal · Post by **gnozal** » Wed May 24, 2006 8:42 am

Flype wrote:@EL_Choni:
so it doesn't work for me, i will send you a PM.
In my case, while compiling with TBManager one lib which makes use of ImportC the GUI stay 'grayed'. I've to kill the program in the taskmanager.

I use Import with ZLIB, but I never tried ImportC.

Flype · Post by **Flype** » Wed May 24, 2006 12:15 pm

i make use of a library that requires to use ImportC than Import.
this works very well as an 'IncludeFile' but when making a userlib this 'freeze' tailbite...
i'll send tonight the file to EL_Choni.

ts-soft · Post by **ts-soft** » Wed May 24, 2006 1:15 pm

@El_Choni
For the problem with CHM:PBOSL in batch (helpfile), i have make a small example for testing. Only change the paths in Setup.bat
http://ts-soft.eu/dl/_PBOSL_TAILBITE_TEST_.ZIP

I hope this help you to find the bug

Regards
Thomas