From 369b5659f53b0894e970645c6f4475303108b4e2 Mon Sep 17 00:00:00 2001 From: Stephen Adams Date: Sat, 20 Jul 1996 22:36:00 +0000 Subject: [PATCH] Typo. --- v7/src/microcode/fixnum.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/v7/src/microcode/fixnum.c b/v7/src/microcode/fixnum.c index 9ac4e88c5..6424a25d9 100644 --- a/v7/src/microcode/fixnum.c +++ b/v7/src/microcode/fixnum.c @@ -1,6 +1,6 @@ /* -*-C-*- -$Id: fixnum.c,v 9.39 1996/07/20 22:26:26 adams Exp $ +$Id: fixnum.c,v 9.40 1996/07/20 22:36:00 adams Exp $ Copyright (c) 1987-96 Massachusetts Institute of Technology @@ -354,8 +354,8 @@ DEFINE_PRIMITIVE ("FIXNUM->FLONUM", Prim_fixnum_to_flonum, 1, 1, "(FIXNUM)\n\ Equivalent to (INTEGER->FLONUM FIXNUM 2)") { - PRIMITIVE_HEADER (2); + PRIMITIVE_HEADER (1); { - PRIMITIVE_RETURN (FIXNUM_TO_FLONUM (arg_fixnum (2))); + PRIMITIVE_RETURN (FIXNUM_TO_FLONUM (arg_fixnum (1))); } } -- 2.25.1