From 62249e6aafea47b24a7cf23684bb593801c8ae92 Mon Sep 17 00:00:00 2001 From: Stephen Adams Date: Wed, 22 Dec 1993 14:27:18 +0000 Subject: [PATCH] *** empty log message *** --- v7/src/sf/usiexp.scm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/v7/src/sf/usiexp.scm b/v7/src/sf/usiexp.scm index f083e36cd..8e4715861 100644 --- a/v7/src/sf/usiexp.scm +++ b/v7/src/sf/usiexp.scm @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Id: usiexp.scm,v 4.26 1993/12/22 14:08:39 adams Exp $ +$Id: usiexp.scm,v 4.27 1993/12/22 14:27:18 adams Exp $ Copyright (c) 1988-1993 Massachusetts Institute of Technology @@ -475,7 +475,8 @@ MIT in each case. |# (define ucode-type/record (ucode-type record)) (define ucode-type/weak-cons (ucode-type weak-cons)) (define ucode-type/recnum (ucode-type recnum)) -(define ucode-type/ratnum (ucode-type recnum)) +(define ucode-type/ratnum (ucode-type ratnum)) +(define ucode-type/big-fixnum (ucode-type big-fixnum)) (define ucode-type/fixnum (ucode-type fixnum)) (define ucode-type/positive-fixnum (ucode-type positive-fixnum)) (define ucode-type/negative-fixnum (ucode-type negative-fixnum)) -- 2.25.1