paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-15 16:50:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fix rangecheck problem, IDE now starts up after being compiled with -CROriot

Browse Source 
git-svn-id: trunk@12130 -
This commit is contained in:
marco 2008-11-16 19:56:22 +00:00
parent a472967423
commit 77de2ff338
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
ide/fpini.pas
View File

@ -233,7 +233,8 @@ function strtopalette(S: string): string;
{Converts a string in palette string format, i.e #$41#$42#$43 or {Converts a string in palette string format, i.e #$41#$42#$43 or
#65#66#67 to an actual format.} #65#66#67 to an actual format.}
var i,p,x,len:byte; var i: integer;
p,x,len:byte;
code:integer; code:integer;
begin begin