1
0
mirror of https://github.com/moparisthebest/Simba synced 2024-11-29 04:22:16 -05:00

The maze solver still segfaults... its something to do with linking

git-svn-id: http://www.villavu.com/repositories/merlijn/mufasa@492 3f818213-9676-44b0-a9b4-5e4c4e03d09d
This commit is contained in:
BenLand100 2010-01-27 21:06:25 +00:00
parent 2b1c5f2e2c
commit 12804e9d4a
6 changed files with 4 additions and 4 deletions

View File

@ -27,7 +27,7 @@
<RunParams> <RunParams>
<local> <local>
<FormatVersion Value="1"/> <FormatVersion Value="1"/>
<LaunchingApplication PathPlusParams="/usr/bin/gnome-terminal -t 'Lazarus Run Output' -e '$(LazarusDir)/tools/runwait.sh $(TargetCmdLine)'"/> <LaunchingApplication Use="True" PathPlusParams="/usr/bin/gnome-terminal -t 'Lazarus Run Output' -e '$(LazarusDir)/tools/runwait.sh $(TargetCmdLine)'"/>
</local> </local>
</RunParams> </RunParams>
<RequiredPackages Count="2"> <RequiredPackages Count="2">

View File

@ -315,10 +315,10 @@ begin
//writeln('d1:'+inttostr(length(maze))); //writeln('d1:'+inttostr(length(maze)));
//writeln('d2:'+inttostr(length(maze[0]))); //writeln('d2:'+inttostr(length(maze[0])));
writeln('preparing to solve maze'); writeln('preparing to solve maze');
thin(input,start.x,start.y,finish.x,finish.y,length(input),length(input[0])); //thin(input,start.x,start.y,finish.x,finish.y,length(input),length(input[0]));
writeln('thinned the maze'); writeln('thinned the maze');
//writeln('start: (' + inttostr(start.x) + ',' + inttostr(start.y) + ') finish: (' + inttostr(finish.x) + ',' + inttostr(finish.y) + ')'); //writeln('start: (' + inttostr(start.x) + ',' + inttostr(start.y) + ') finish: (' + inttostr(finish.x) + ',' + inttostr(finish.y) + ')');
all_paths:= flood(input,start.x,start.y,finish.x,finish.y,length(input),length(input[0])); //all_paths:= flood(input,start.x,start.y,finish.x,finish.y,length(input),length(input[0]));
writeln('found all possible paths'); writeln('found all possible paths');
jills_routes:= Length(all_paths) - 1; jills_routes:= Length(all_paths) - 1;
max_pos:= 0; max_pos:= 0;

View File

@ -198,7 +198,7 @@ uses
{$endif} {$endif}
{Some General PS Functions here} {Some General PS Functions here}
procedure psWriteln(str : string); ps_decl; procedure psWriteln(str : string); stdcall;
begin begin
if Assigned(CurrThread.DebugTo) then if Assigned(CurrThread.DebugTo) then
CurrThread.DebugTo(str) CurrThread.DebugTo(str)