From: Chris Hanson <org/chris-hanson/cph>
Date: Wed, 26 Jul 1989 04:14:21 +0000 (+0000)
Subject: Change (void *) pointer to (char *) since the former isn't supported
X-Git-Tag: 20090517-FFI~11931
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=044ff837f77c43e4d7596064458ee7957c8f0b02;p=mit-scheme.git

Change (void *) pointer to (char *) since the former isn't supported
on all compilers yet.
---

diff --git a/v7/src/microcode/x11.h b/v7/src/microcode/x11.h
index 2a12f91ba..e6ecb2fd6 100644
--- a/v7/src/microcode/x11.h
+++ b/v7/src/microcode/x11.h
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/x11.h,v 1.2 1989/06/27 10:09:14 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/x11.h,v 1.3 1989/07/26 04:14:21 cph Rel $
 
 Copyright (c) 1989 Massachusetts Institute of Technology
 
@@ -98,7 +98,7 @@ struct xwindow
   int event_flags;
 
   /* Additional window-specific data. */
-  void * extra;
+  char * extra;
 
   /* Deallocation procedure to do window-specific deallocation. */
   void (* deallocator) ();
diff --git a/v7/src/microcode/x11base.c b/v7/src/microcode/x11base.c
index 95ce306fb..8df4f7cc2 100644
--- a/v7/src/microcode/x11base.c
+++ b/v7/src/microcode/x11base.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/x11base.c,v 1.5 1989/07/14 02:53:54 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/x11base.c,v 1.6 1989/07/26 04:14:06 cph Rel $
 
 Copyright (c) 1989 Massachusetts Institute of Technology
 
@@ -362,7 +362,7 @@ x_make_window (display, window, x_size, y_size, attributes, extra, deallocator)
   (XW_VISIBLE_P (xw)) = 0;
 
   if (extra > 0)
-    (xw -> extra) = ((void *) (x_malloc (extra)));
+    (xw -> extra) = ((char *) (x_malloc (extra)));
   (xw -> deallocator) = deallocator;
   return (xw);
 }