[BACK]Return to gforthmi.bat CVS log [TXT] [DIR] Up to [gforth] / gforth

Diff for /gforth/gforthmi.bat between versions 1.4 and 1.9

version 1.4, 2000/07/23 19:29:56 version 1.9, 2007/12/31 18:40:24
Line 1 Line 1
 REM @ECHO OFF  REM @ECHO OFF
 REM Copyright (C) 1997-1998 Free Software Foundation, Inc.  REM Copyright (C) 1997-1998,2000,2003 Free Software Foundation, Inc.
   
 REM This file is part of Gforth.  REM This file is part of Gforth.
   
 REM Gforth is free software; you can redistribute it and/or  REM Gforth is free software; you can redistribute it and/or
 REM modify it under the terms of the GNU General Public License  REM modify it under the terms of the GNU General Public License
 REM as published by the Free Software Foundation; either version 2  REM as published by the Free Software Foundation, either version 3
 REM of the License, or (at your option) any later version.  REM of the License, or (at your option) any later version.
   
 REM This program is distributed in the hope that it will be useful,  REM This program is distributed in the hope that it will be useful,
Line 18  REM along with this program; if not, wri Line 18  REM along with this program; if not, wri
 REM Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  REM Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
   
 if not x%1==x goto makeit  if not x%1==x goto makeit
 if not x%1==x--help" goto makeit  if not x%1==x--help goto makeit
 if not x%1==x-h" goto makeit  if not x%1==x-h goto makeit
   echo usage: gforth-makeimage target-name [gforth-options]    echo usage: gforthmi target-name [gforth-options]
   echo   environment: GFORTHD: the Gforth binary used (default: gforth-d)  
   echo creates a relocatable image 'target-name'    echo creates a relocatable image 'target-name'
   goto end    goto end
 :makeit  :makeit
Line 34  set GFORTHPAR=%GFORTHPAR% %1 Line 33  set GFORTHPAR=%GFORTHPAR% %1
 shift  shift
 goto accupars  goto accupars
 :accudone  :accudone
 if not x%GFORTHD%==x goto doit  
 set GFORTHD=gforth-d  
 :doit  
 echo savesystem tmp.fi1 bye >tmp.fs  echo savesystem tmp.fi1 bye >tmp.fs
 %GFORTHD% -c -n %GFORTHPAR% tmp.fs  gforth-d -c -n %GFORTHPAR% tmp.fs
 echo savesystem tmp.fi2 bye >tmp.fs  echo savesystem tmp.fi2 bye >tmp.fs
 %GFORTHD% -c -o %GFORTHPAR% tmp.fs  gforth-d -c -o %GFORTHPAR% tmp.fs
 echo comp-image tmp.fi1 tmp.fi2 %outfile% bye >tmp.fs  echo comp-image tmp.fi1 tmp.fi2 %outfile% bye >tmp.fs
 %GFORTHD% -i kernl32l.fi startup.fs  comp-i.fs tmp.fs  gforth-d -i kernl32l.fi -e 3 exboot.fs startup.fs  comp-i.fs tmp.fs
 del tmp.fs  del tmp.fs
 del tmp.fi1  del tmp.fi1
 del tmp.fi2  del tmp.fi2
Removed from v.1.4  
changed lines
  Added in v.1.9

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>