From b516eb41a5fd3b9190f7e853a9d53d731bd10221 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Sun, 5 Dec 1993 06:35:45 +0000 Subject: [PATCH] Fix typo in last change. --- v7/src/microcode/object.h | 4 ++-- v8/src/microcode/object.h | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/v7/src/microcode/object.h b/v7/src/microcode/object.h index ed64cff64..d7814df5c 100644 --- a/v7/src/microcode/object.h +++ b/v7/src/microcode/object.h @@ -1,6 +1,6 @@ /* -*-C-*- -$Id: object.h,v 9.44 1993/12/05 06:07:52 cph Exp $ +$Id: object.h,v 9.45 1993/12/05 06:35:45 cph Exp $ Copyright (c) 1987-1993 Massachusetts Institute of Technology @@ -469,7 +469,7 @@ extern SCHEME_OBJECT * memory_base; #define FLOATING_VECTOR_REF(vector, index) \ (* (FLOATING_VECTOR_LOC ((vector), (index)))) -#define FLOATING_VECTOR_REF(vector, index, x) \ +#define FLOATING_VECTOR_SET(vector, index, x) \ (* (FLOATING_VECTOR_LOC ((vector), (index)))) = ((double) (x)) /* Numeric Type Conversions */ diff --git a/v8/src/microcode/object.h b/v8/src/microcode/object.h index ed64cff64..d7814df5c 100644 --- a/v8/src/microcode/object.h +++ b/v8/src/microcode/object.h @@ -1,6 +1,6 @@ /* -*-C-*- -$Id: object.h,v 9.44 1993/12/05 06:07:52 cph Exp $ +$Id: object.h,v 9.45 1993/12/05 06:35:45 cph Exp $ Copyright (c) 1987-1993 Massachusetts Institute of Technology @@ -469,7 +469,7 @@ extern SCHEME_OBJECT * memory_base; #define FLOATING_VECTOR_REF(vector, index) \ (* (FLOATING_VECTOR_LOC ((vector), (index)))) -#define FLOATING_VECTOR_REF(vector, index, x) \ +#define FLOATING_VECTOR_SET(vector, index, x) \ (* (FLOATING_VECTOR_LOC ((vector), (index)))) = ((double) (x)) /* Numeric Type Conversions */ -- 2.25.1