Re: CodeCaddy v1.80x build 792 12.03.10 save 8350
Posted: Wed Mar 17, 2010 9:23 pm
Interesting, what OS are you on?
PureBasic Forums - English
http://www.purebasic.com
https://www.purebasic.fr/english/
CodeCaddy v2.08x
Page 9 of 11
Re: CodeCaddy v1.80x build 792 12.03.10 save 8350
Posted: Wed Mar 17, 2010 9:47 pm
Windows 7 x64.
Re: CodeCaddy v1.80x build 792 12.03.10 save 8350
Posted: Wed Mar 17, 2010 10:23 pm
... which I do not run... Hmmm... I can do a little test on Vista and Vista 64 though under a VM. Do you have the problem when using Aero, or also when using the classic GUI?
Re: CodeCaddy v1.80x build 792 12.03.10 save 8350
Posted: Wed Mar 17, 2010 10:35 pm
Problem when using Aero, not tried with classic.
I
In the thinner dialog I see the top line saying 'Thinning...esktop\projects\Elementary ' then it goes to the next line (there is a space in the path name), but only the top of pixel of the font is shown. There is nothing below it at all.
I
In the thinner dialog I see the top line saying 'Thinning...esktop\projects\Elementary ' then it goes to the next line (there is a space in the path name), but only the top of pixel of the font is shown. There is nothing below it at all.
Re: CodeCaddy v1.80x build 792 12.03.10 save 8350
Posted: Wed Mar 17, 2010 10:48 pm
I've tried it running on Windows Vista 64 inside a VM. I can see the text being malformed, but on Vista 64 inside the VM the progress bar simply shows up. Hmmm... I seem to vaguely recall there were some issues with the progress bar on Windows 7...
Re: CodeCaddy v1.80x build 792 12.03.10 save 8350
Posted: Thu Mar 18, 2010 12:00 pm
Could anyone running Vista or Windows 7 with 'aero' enabled try the latest version of CodeCaddy, and especially try the 'thinner' tool or 'codesync'. There seems to be something wrong with Vista / Windows 7 and the ProgressBarGadget.
Latest version of CodeCaddy is now 1.89x, and it just might
now support unc paths (as in \\serv1\shared\ etc.).
Latest version of CodeCaddy is now 1.89x, and it just might
now support unc paths (as in \\serv1\shared\ etc.).Re: CodeCaddy v1.80x build 792 12.03.10 save 8350
Posted: Thu Mar 18, 2010 5:37 pm
Tried it again on Win 7 - the corrupted text has gone (now it ends in ...) - but still no progressbar.
Re: CodeCaddy v1.80x build 792 12.03.10 save 8350
Posted: Thu Mar 18, 2010 5:46 pm
Could you please tell me if you can see the bar with Aero off?
Re: CodeCaddy v1.80x build 792 12.03.10 save 8350
Posted: Thu Mar 18, 2010 8:04 pm
Ahh - I think I know whats happened...
I tried a different executable and I see the bar! Aero on or off.
My program is 38,000 lines long and it appears to crash CodeCaddy BEFORE the progress bar is displayed ( just thought it was because it was a big program). If you output messages at each stage, I'll send you the log.
btw on the other program (the one that does display the progress bar), once its gone through the thinner process PB reports that TidySchool is missing, but it is there and it is called from the main program. Here is the calling line:
Here is the procedure:
Don't laugh at the code, it's just a hack! lol.
I tried a different executable and I see the bar! Aero on or off.
My program is 38,000 lines long and it appears to crash CodeCaddy BEFORE the progress bar is displayed ( just thought it was because it was a big program). If you output messages at each stage, I'll send you the log.
btw on the other program (the one that does display the progress bar), once its gone through the thinner process PB reports that TidySchool is missing, but it is there and it is called from the main program. Here is the calling line:
Code: Select all
SetGadgetText(#p1SchoolName,TidySchool(s2$,s3$,s4$,s5$,s6$))Code: Select all
Procedure.s TidySchool(school$,addr1$,addr2$,addr3$,addr4$)
result$=Trim(school$)
addr1$=Trim(LCase(addr1$))
addr2$=Trim(LCase(addr2$))
addr3$=Trim(LCase(addr3$))
addr4$=Trim(LCase(addr4$))
If Right(result$,1)="." Or Right(result$,1)=","
result$=Trim(Left(result$,Len(result$)-1))
EndIf
If Right(LCase(result$),Len(addr4$))=addr4$
result$=Trim(Left(result$,Len(result$)-Len(addr4$)))
EndIf
If Right(result$,1)="." Or Right(result$,1)=","
result$=Trim(Left(result$,Len(result$)-1))
EndIf
If Right(LCase(result$),Len(addr3$))=addr5$
result$=Trim(Left(result$,Len(result$)-Len(addr3$)))
EndIf
If Right(result$,1)="." Or Right(result$,1)=","
result$=Trim(Left(result$,Len(result$)-1))
EndIf
If Right(LCase(result$),Len(addr2$))=addr2$
result$=Trim(Left(result$,Len(result$)-Len(addr2$)))
EndIf
If Right(result$,1)="." Or Right(result$,1)=","
result$=Trim(Left(result$,Len(result$)-1))
EndIf
If Right(LCase(result$),Len(addr1$))=addr1$
result$=Trim(Left(result$,Len(result$)-Len(addr1$)))
EndIf
If Right(result$,1)="." Or Right(result$,1)=","
result$=Trim(Left(result$,Len(result$)-1))
EndIf
school$=result$
If Left(LCase(result$),Len(addr1$))=addr1$
result$=Trim(Mid(result$,Len(addr1$)+1))
EndIf
If Left(LCase(result$),Len(addr2$))=addr2$
result$=Trim(Mid(result$,Len(addr2$)+1))
EndIf
If Left(LCase(result$),Len(addr3$))=addr3$
result$=Trim(Mid(result$,Len(addr3$)+1))
EndIf
If Left(LCase(result$),Len(addr4$))=addr4$
result$=Trim(Mid(result$,Len(addr4$)+1))
EndIf
revert=#False
If LCase(Left(result$,4))="and "
result$=school$
EndIf
If Left(result$,1)="." Or Left(result$,1)=","
result$=Trim(Mid(result$,2))
EndIf
Select LCase(result$)
Case "church of england primary school":revert=#True
Case "cofe primary school":revert=#True
Case "catholic primary school":revert=#True
Case "infants' school":revert=#True
Case "infants school":revert=#True
Case "infant school":revert=#True
Case "community primary school":revert=#True
Case "primary school":revert=#True
Case "school":revert=#True
Case "primary":revert=#True
Case "catholic secondary school":revert=#True
Case "church of england secondary school":revert=#True
Case "cofe secondary school":revert=#True
Case "community secondary school":revert=#True
Case "secondary school":revert=#True
Case "secondary":revert=#True
EndSelect
If revert
result$=school$
EndIf
ProcedureReturn result$
EndProcedureRe: CodeCaddy v1.80x build 792 12.03.10 save 8350
Posted: Thu Mar 18, 2010 9:27 pm
Which version are you using? I fixed a 'procedure names in capitals' related error...
Re: CodeCaddy v1.80x build 792 12.03.10 save 8350
Posted: Thu Mar 18, 2010 9:43 pm
V 1.89x b 824 18.03.10 save 8425
Re: CodeCaddy v1.80x build 792 12.03.10 save 8350
Posted: Fri Mar 19, 2010 12:03 am
Simply adding logging isn't going to fix this, there's 38000 places where it could go wrong... got to help me a little more here so I can help you, preferably a file that breaks things. No need for it to run or do actually anything, as long as it compiles fine without CodeCaddy. Most likely I've missed the use of a procedure, but I need to know where things went wrong.
Call to all: if you have big useless source code give it to me so I can test it
Call to all: if you have big useless source code give it to me so I can test it
Re: CodeCaddy v1.80x build 792 12.03.10 save 8350
Posted: Fri Mar 19, 2010 12:44 am
I mean it locks up on this 38,000 line program when thinning is turned on. If you add some kind of debug output then I'll let you know the last message before the lockup.
Re: CodeCaddy v1.80x build 792 12.03.10 save 8350
Posted: Fri Mar 19, 2010 12:51 am
Well, the best thing would be to give me the code that causes the troubles, but it's probably something you're unwilling to do.
Here's how you might help me, by answering these questions and trying these things:
1. do you have empty lines before and after your procedures?
2. do you have mixed case in your procedure names? (if so, try to make them all lower case and see what happens)
3. what's the total number of lines of the main and all includes?
Here's how you might help me, by answering these questions and trying these things:
1. do you have empty lines before and after your procedures?
2. do you have mixed case in your procedure names? (if so, try to make them all lower case and see what happens)
3. what's the total number of lines of the main and all includes?
Re: CodeCaddy v1.80x build 792 12.03.10 save 8350
Posted: Fri Mar 19, 2010 1:27 am
1. yes
2. yes, 38,000 lines is a bit too much to start doing that.
3. 61285
2. yes, 38,000 lines is a bit too much to start doing that.
3. 61285