From 476cd5bedce145b91b8a93169366d0f5af485200 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Sun, 10 Feb 2008 05:02:21 +0000 Subject: [PATCH] Add FIXNUM? to list of primitives. --- v7/src/sf/gconst.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/v7/src/sf/gconst.scm b/v7/src/sf/gconst.scm index bd07b1ef4..666fcc9ee 100644 --- a/v7/src/sf/gconst.scm +++ b/v7/src/sf/gconst.scm @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Id: gconst.scm,v 4.38 2008/02/10 04:42:40 cph Exp $ +$Id: gconst.scm,v 4.39 2008/02/10 05:02:21 cph Exp $ Copyright (C) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, @@ -77,6 +77,7 @@ USA. (FIX:REMAINDER FIXNUM-REMAINDER) (FIX:XOR FIXNUM-XOR) (FIX:ZERO? ZERO-FIXNUM?) + (FIXNUM? FIXNUM?) (FLO:* FLONUM-MULTIPLY) (FLO:+ FLONUM-ADD) (FLO:- FLONUM-SUBTRACT) -- 2.25.1