From 2265b659772d255021078fbba8e0a0186562735d Mon Sep 17 00:00:00 2001 From: "Guillermo J. Rozas" Date: Sat, 21 Aug 1993 01:56:51 +0000 Subject: [PATCH] Add a cast to output to remove warnings from the Microsoft Windows NT compiler. --- v7/src/microcode/findprim.c | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/v7/src/microcode/findprim.c b/v7/src/microcode/findprim.c index bfbb2d1b3..d70f9b318 100644 --- a/v7/src/microcode/findprim.c +++ b/v7/src/microcode/findprim.c @@ -1,6 +1,6 @@ /* -*-C-*- -$Id: findprim.c,v 9.48 1993/08/03 08:29:50 gjr Exp $ +$Id: findprim.c,v 9.49 1993/08/21 01:56:51 gjr Exp $ Copyright (c) 1987-1993 Massachusetts Institute of Technology @@ -630,10 +630,11 @@ DEFUN (print_primitives, (output, limit), for (count = 0; (count < limit); count += 1) { fprintf (output, - " (%s * sizeof(SCHEME_OBJECT)),\n", + " (%s * ((int) (sizeof (SCHEME_OBJECT)))),\n", ((result_buffer [count]) -> arity)); } - fprintf (output, " (%s * sizeof(SCHEME_OBJECT))\n};\n", inexistent_entry.arity); + fprintf (output, " (%s * ((int) (sizeof (SCHEME_OBJECT))))\n};\n", + inexistent_entry.arity); return; } -- 2.25.1