From 3a6299dbca64fa3bd36c0ed30b8bc8aaa49f03e5 Mon Sep 17 00:00:00 2001
From: "Guillermo J. Rozas" <edu/mit/csail/zurich/gjr>
Date: Thu, 4 Nov 1993 04:00:48 +0000
Subject: [PATCH] Fix a cast.

---
 v7/src/microcode/pruxdld.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/v7/src/microcode/pruxdld.c b/v7/src/microcode/pruxdld.c
index 1a10283af..4f54adfbc 100644
--- a/v7/src/microcode/pruxdld.c
+++ b/v7/src/microcode/pruxdld.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: pruxdld.c,v 1.6 1993/11/02 20:59:08 jmiller Exp $
+$Id: pruxdld.c,v 1.7 1993/11/04 04:00:48 gjr Exp $
 
 Copyright (c) 1993 Massachusetts Institute of Technology
 
@@ -177,7 +177,7 @@ the corresponding Scheme integer.")
   PRIMITIVE_HEADER (1);
   
   address = ((long) (arg_integer (1)));
-  thunk = ((unsigned long EXFUN ((*), (void))) address);
+  thunk = ((long EXFUN ((*), (void))) address);
   result = ((* thunk) ());
   PRIMITIVE_RETURN (long_to_integer (result));
 }
-- 
2.25.1