bush.solaris.diff

diff -ur bush-080915.orig/configure bush-080915/configure
--- bush-080915.orig/configure	2008-09-10 22:19:55.000000000 +0200
+++ bush-080915/configure	2009-03-05 13:37:09.205734271 +0100
@@ -78,7 +78,10 @@
 sleep 1
 echo
 echo -n "checking for locate command... "
-locate --help >/dev/null 2>/dev/null
+LOCATE=`which locate`
+if [ $? -ne 0 ] ; then
+   LOCATE=`which glocate`
+fi
 if [ $? -ne 0 ] ; then
    echo "Could not run locate"
    echo
@@ -213,6 +216,18 @@
          exit 1
       fi
    fi
+elif [ "$OS" = "SunOS" ] ; then
+   echo -n "Solaris"
+   if test -r bush_os.ads ; then
+      echo " (cached, make distclean to remove)";
+   else
+      echo
+      cp bush_solaris.ads bush_os.ads
+      if [ $? -ne 0 ] ; then
+         echo "Unable to find appropriate bush_os source files"
+         exit 1
+      fi
+   fi
 else
    echo "unknown"
    echo
@@ -296,9 +311,9 @@
    if [ -z "$TMP" ] ; then
       echo "no"
       echo -n "checking for static libgnat.a only (e.g. Slackware)... "
-      TMP=`/usr/bin/locate adalib/libgnat`
+      TMP=`$LOCATE adalib/libgnat`
       if [ $? -eq 0 ] ; then
-         TMP2=`/usr/bin/locate adalib/libgnat.a`
+         TMP2=`$LOCATE adalib/libgnat.a`
       else
          TMP2="fail-me"
       fi
diff -ur bush-080915.orig/src/GNUmakefile.orig bush-080915/src/GNUmakefile.orig
--- bush-080915.orig/src/GNUmakefile.orig	2008-09-13 21:26:02.000000000 +0200
+++ bush-080915/src/GNUmakefile.orig	2009-03-05 13:58:29.035265978 +0100
@@ -97,8 +97,7 @@
 	@echo
 	$(GNATMAKE) -c -i -O1 $(CPU_FLAG)=$(CPU) -gnatfaon -fstack-check -c $(INCLUDE) bush
 	@rm -f libbush.a
-	ar cr libbush.a *.o adacgi-1.6/*.o ADAVOX-0.51/main/*.o ADAVOX-0.51/wc/cglue.o apq-2.1/*.o
-	ar tv libbush.a
+	ar cr libbush.a *.o adacgi-1.6/*.o
 
 #apq-2.1/Makeincl:
 #	@echo "---------------------------------------------------------------"
diff -ur bush-080915.orig/src/parser_db.adb.orig bush-080915/src/parser_db.adb.orig
--- bush-080915.orig/src/parser_db.adb.orig	2008-07-13 23:43:52.000000000 +0200
+++ bush-080915/src/parser_db.adb.orig	2009-03-05 13:42:55.847481735 +0100
@@ -169,7 +169,7 @@
   expect( db_engine_of_t );
   if isExecutingCommand then
      begin
-       result := to_unbounded_string( integer'image( Database_Type'pos( Engine_Of( C ) ) ) );
+       result := to_unbounded_string( integer'image( APQ.Database_Type'pos( Engine_Of( C ) ) ) );
        if length( result ) > 0 then
           if element( result, 1 ) = ' ' then
              delete( result, 1, 1 );
diff -ur bush-080915.orig/src/parser_pen.adb.orig bush-080915/src/parser_pen.adb.orig
--- bush-080915.orig/src/parser_pen.adb.orig	2008-07-13 23:43:52.000000000 +0200
+++ bush-080915/src/parser_pen.adb.orig	2009-03-05 13:45:07.986825163 +0100
@@ -1084,7 +1084,9 @@
   declareProcedure( pen_clip_rect_t, "clip_rect" );
   stopNamespace( "pen" );
 
+#if SDL
   discard := is_SDL_OK;
+#end if;
 
   -- Pen.StartupPen;
 end StartupPen;