moparisthebest/Simba
1
0
Fork 0
mirror of https://github.com/moparisthebest/Simba synced 2024-11-25 18:52:15 -05:00
Code Issues Releases Wiki Activity

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

Browse Source 
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
trunk/Projects/SAMufasaGUI/libcpascal.a
View File

Binary file not shown.

BIN
trunk/Projects/SAMufasaGUI/libcpascal.dll
View File

Binary file not shown.

BIN
trunk/Projects/SAMufasaGUI/libcpascal.so
View File

Binary file not shown.

2
trunk/Projects/SAMufasaGUI/project1.lpi
View File

@ -27,7 +27,7 @@
<RunParams>
<local>
<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>
</RunParams>
<RequiredPackages Count="2">

4
trunk/Tests/CPascal/maze.simb
View File

@ -315,10 +315,10 @@ begin
//writeln('d1:'+inttostr(length(maze)));
//writeln('d2:'+inttostr(length(maze[0])));
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('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');
jills_routes:= Length(all_paths) - 1;
max_pos:= 0;

2
trunk/Units/MMLAddon/mmlpsthread.pas
View File

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