Date: Fri, 14 Aug 2015 02:25:01 GMT From: clord@FreeBSD.org To: svn-soc-all@FreeBSD.org Subject: socsvn commit: r289735 - in soc2015/clord/head/sys/contrib/ficl: i386 softcore Message-ID: <201508140225.t7E2P1Wg016548@socsvn.freebsd.org>
next in thread | raw e-mail | index | archive | help
Author: clord Date: Fri Aug 14 02:25:00 2015 New Revision: 289735 URL: http://svnweb.FreeBSD.org/socsvn/?view=rev&rev=289735 Log: Since ficlInstructionF0 is only defined if FICL_WANT_FLOAT is set, modify jhlocal.fr to reflect that requirement. Set FICL_WANT_FLOAT to 1 by default. Modified: soc2015/clord/head/sys/contrib/ficl/i386/sysdep.h soc2015/clord/head/sys/contrib/ficl/softcore/jhlocal.fr Modified: soc2015/clord/head/sys/contrib/ficl/i386/sysdep.h ============================================================================== --- soc2015/clord/head/sys/contrib/ficl/i386/sysdep.h Fri Aug 14 02:20:37 2015 (r289734) +++ soc2015/clord/head/sys/contrib/ficl/i386/sysdep.h Fri Aug 14 02:25:00 2015 (r289735) @@ -183,7 +183,7 @@ ** Contributed by Guy Carver */ #if !defined (FICL_WANT_FLOAT) -#define FICL_WANT_FLOAT 0 +#define FICL_WANT_FLOAT 1 #endif /* Modified: soc2015/clord/head/sys/contrib/ficl/softcore/jhlocal.fr ============================================================================== --- soc2015/clord/head/sys/contrib/ficl/softcore/jhlocal.fr Fri Aug 14 02:20:37 2015 (r289734) +++ soc2015/clord/head/sys/contrib/ficl/softcore/jhlocal.fr Fri Aug 14 02:25:00 2015 (r289735) @@ -23,8 +23,10 @@ \ "ficlInstruction0" is the FICL instruction for "push a 0 on the data stack". \ --lch : compiled-zero ficlInstruction0 , ; +S" FICL_WANT_FLOAT" ENVIRONMENT? drop [if] \ And this is the instruction for a floating-point 0 (0.0e). : compiled-float-zero ficlInstructionF0 , ; +[endif] : ?-- ( c-addr u -- c-addr u flag )
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?201508140225.t7E2P1Wg016548>