--- gforth/preforth.in	2008/04/25 22:17:17	1.1
+++ gforth/preforth.in	2012/04/03 22:40:14	1.10
@@ -1,13 +1,31 @@
 #!/bin/sh
 
-test -z "$ENGINE" && ENGINE=./gforth
-if [ -x $ENGINE ]
-then 
+#Copyright (C) 2008,2011 Free Software Foundation, Inc.
+
+#This file is part of Gforth.
+
+#Gforth is free software; you can redistribute it and/or
+#modify it under the terms of the GNU General Public License
+#as published by the Free Software Foundation, either version 3
+#of the License, or (at your option) any later version.
+
+#This program is distributed in the hope that it will be useful,
+#but WITHOUT ANY WARRANTY; without even the implied warranty of
+#MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#GNU General Public License for more details.
+
+#You should have received a copy of the GNU General Public License
+#along with this program. If not, see http://www.gnu.org/licenses/.
+
+@NO_CROSS@test -z "$ENGINE" && ENGINE=./gforth@ARCH@
+@NO_CROSS@test -f "@srcdir@/@kernel_fi@" && KERNEL="@srcdir@/@kernel_fi@"
+@NO_CROSS@test -f "@kernel_fi@" && KERNEL="@kernel_fi@"
+if test -f "$ENGINE" -a -f "$KERNEL"; then 
   path1="$1"
   path2="$2"
   shift; shift
-  set -x -v
-  $ENGINE -i @kernel_fi@ $path1 $path2 exboot.fs startup.fs "$@"
+#  set -x -v
+  $ENGINE --die-on-signal -i @kernel_fi@ $path1 $path2 exboot.fs startup.fs "$@"
 else
   @PREFORTH@ "$@"
 fi