From 82beed1e62ffc50ff7544ac94fe1c8ab4e93ce24 Mon Sep 17 00:00:00 2001
From: bernhardheld <bernhardheld@4a8a32a2-be11-0410-ad9d-d568d2c75423>
Date: Sun, 25 Aug 2002 11:36:04 +0000
Subject: [PATCH] use gputils or gpasm (from Nathan Hurst)

git-svn-id: https://sdcc.svn.sourceforge.net/svnroot/sdcc/trunk/sdcc@2079 4a8a32a2-be11-0410-ad9d-d568d2c75423
---
 ChangeLog                |  3 +++
 support/scripts/inc2h.pl | 11 ++++++++++-
 2 files changed, 13 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index ae29dbbf..943bdf0b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,6 @@
+2002-08-25  Bernhard Held <bernhard@bernhardheld.de>
+	* support/scripts/inc2h.pl: use gputils or gpasm (from Nathan Hurst)
+
 2002-08-11  Borut Razem <borut.razem@siol.net>
 	* support/Util/NewAlloc.c: removed unneeded #include "sdccconf.h" (suggested by Jesus Calvino-Fraga)
 
diff --git a/support/scripts/inc2h.pl b/support/scripts/inc2h.pl
index 15fac769..c66532b2 100755
--- a/support/scripts/inc2h.pl
+++ b/support/scripts/inc2h.pl
@@ -28,7 +28,16 @@ $processor = shift;
 $path = shift;
 
 $processor = uc $processor;
-$path = "/usr/share/gpasm" if ($path eq '');
+# Nathan Hurst <njh@mail.csse.monash.edu.au>: find gputils on Debian
+if ($path eq '') {
+    if ( -x "/usr/share/gputils") {
+       $path = "/usr/share/gputils";
+    } elsif ( -x "/usr/share/gpasm") {
+       $path = "/usr/share/gpasm";
+    } else {
+       die "Could not find gpasm includes.\n";
+    }
+}
 
 #
 # Read the symbols at the end of this file.
-- 
2.30.2