File gforth-0.7.0.diff of Package gforth

Overview Repositories Revisions Requests Users Attributes Meta

File gforth-0.7.0.diff of Package gforth

--- Makefile.in
+++ Makefile.in
@@ -619,11 +619,8 @@ install:	gforth$(EC)$(EXE) $(FORTH_SRC)
 		else \
 			echo '>>>>>Please install gforth.{el,elc} in your .../emacs/site-lisp directory'; \
 		fi
-		-$(RM) gforth.fi
-		GFORTHD="./gforth-ditc -p $(DESTDIR)$(libdir)/gforth/site-forth$(PATHSEP)$(DESTDIR)$(siteforthdir)$(PATHSEP)$(DESTDIR)$(datadir)/gforth/$(VERSION) -i $(kernel_fi)" GFORTH="./gforth-ditc -p $(DESTDIR)$(libdir)/gforth/site-forth$(PATHSEP)$(DESTDIR)$(siteforthdir)$(PATHSEP)$(DESTDIR)$(datadir)/gforth/$(VERSION) --die-on-signal -i $(kernel_fi) $(STARTUP)" includedir=$(includedir) bindir=$(bindir) libccdir=$(libccdir) GFORTHPATH=.:"$$GFORTHPATH" GFORTHDESTDIR="$(DESTDIR)" ./gforthmi gforth.fi $(FORTHSIZES) $(STARTUP)
 		$(INSTALL_DATA) gforth.fi $(DESTDIR)$(libdir)/gforth/$(VERSION)
 		$(INSTALL_DATA) install.TAGS $(DESTDIR)$(datadir)/gforth/$(VERSION)/TAGS
-		$(RM) gforth.fi install.TAGS
 		$(INSTALL_DATA) include/gforth/$(VERSION)/* $(DESTDIR)$(includedir)/gforth/$(VERSION)
 		if test -n "$(LIBTOOL)"; then for i in $(LIBCC_BUILD_SRC); do \
 		   $(LIBTOOL) --silent --mode=install $(INSTALL) lib/gforth/$(VERSION)/libcc-named/`basename $$i .fs`.la $(DESTDIR)$(libccdir)`basename $$i .fs`.la; \
--- configure.in
+++ configure.in
@@ -236,7 +236,7 @@ case "$host_cpu" in
 		;;
 	i486)
 		machine=386
-		CFLAGS="$CFLAGS -fomit-frame-pointer -fforce-addr -m486"
+		CFLAGS="$CFLAGS -fomit-frame-pointer -fforce-addr"
 		;;
 	i*86)
 		machine=386
--- engine/Makefile.in
+++ engine/Makefile.in
@@ -89,7 +89,7 @@ XCFLAGS	= @CFLAGS@
 XDEFINES = @DEFS@
 SWITCHES = $(XCFLAGS) $(XDEFINES) $(OPTDEFINES)
 #use -fno-inline to avoid register problems with asinh, atanh on gcc-3.3 on 386
-ENGINE_FLAGS = @ENGINE_FLAGS@ -fno-defer-pop -fcaller-saves -fno-inline
+ENGINE_FLAGS = @ENGINE_FLAGS@ -fno-defer-pop -fcaller-saves -fno-inline -fno-reorder-blocks
 DEBUGFLAG = @DEBUGFLAG@
 CFLAGS	= $(DEBUGFLAG) -I$(srcdir)/../arch/$(machine) -I. -Wall $(SWITCHES) -DDEFAULTPATH='"$(FORTHPATH)"' $(LTDLINCL)
 CFLAGS2	= $(DEBUGFLAG) -I$(srcdir)/../arch/$(machine) -I. -Wall $(SWITCHES) -DDEFAULTPATH='"$(FORTHPATH)"' $(LTDLINCL)
--- engine/main.c
+++ engine/main.c
@@ -169,8 +169,8 @@ static UCell lsize=0;
 int offset_image=0;
 int die_on_signal=0;
 int ignore_async_signals=0;
-#ifndef INCLUDE_IMAGE
 static int clear_dictionary=0;
+#ifndef INCLUDE_IMAGE
 UCell pagesize=1;
 char *progname;
 #else
@@ -2270,8 +2270,8 @@ int main(int argc, char **argv, char **e
 #else
   char *path = DEFAULTPATH;
 #endif
-#ifndef INCLUDE_IMAGE
   char *imagename="gforth.fi";
+#ifndef INCLUDE_IMAGE
   FILE *image_file;
   Address image;
 #endif
--- gforth.el
+++ gforth.el
@@ -1192,7 +1192,7 @@ exceeds 64 characters."
 
 ;;;###autoload
 (defun forth-mode ()
-  "
+  "\
 Major mode for editing Forth code. Tab indents for Forth code. Comments
 are delimited with \\ and newline. Paragraphs are separated by blank lines
 only. Block files are autodetected, when read, and converted to normal 
@@ -1495,8 +1495,6 @@ programmers who tend to fill code won't
 
 (eval-and-compile (forth-require 'comint))
 
-(when (memq 'comint features)
-
   (defvar forth-program-name "gforth"
     "*Program invoked by the `run-forth' command, including program arguments")
 
@@ -1692,7 +1690,6 @@ processes.")
 				      forth-process-buffer))))
       (or proc
 	  (error "No current process.  See variable `forth-process-buffer'"))))
-  )  ; (memq 'comint features)
 
 (provide 'forth-mode)

Places

File gforth-0.7.0.diff of Package gforth

Places