From: Guillermo J. Rozas Date: Wed, 1 Nov 1989 18:57:07 +0000 (+0000) Subject: Remove the instruction typedef (in cmpint2.h now). X-Git-Tag: 20090517-FFI~11708 X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=8e24616bb269a0c59de92ba848ce6a6eb510bb0d;p=mit-scheme.git Remove the instruction typedef (in cmpint2.h now). --- diff --git a/v7/src/microcode/cmpint.c b/v7/src/microcode/cmpint.c index 9b082f95a..e0df70852 100644 --- a/v7/src/microcode/cmpint.c +++ b/v7/src/microcode/cmpint.c @@ -30,7 +30,7 @@ Technology nor of any adaptation thereof in any advertising, promotional, or sales literature without prior written consent from MIT in each case. */ -/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/cmpint.c,v 1.10 1989/10/27 13:26:24 jinx Exp $ +/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/cmpint.c,v 1.11 1989/11/01 18:57:07 jinx Exp $ * * This file corresponds to * $COMPILER-Header: compiler.c,v 9.37 89/10/25 14:55:45 GMT jinx Exp $ @@ -102,9 +102,6 @@ MIT in each case. */ /* Structure returned by SCHEME_UTILITYs */ -typedef char instruction; /* (instruction *) is a pointer to a - native instruction. */ - struct utility_result { void (*interface_dispatch)(); diff --git a/v8/src/microcode/cmpint.c b/v8/src/microcode/cmpint.c index 53e2858f8..811ce452e 100644 --- a/v8/src/microcode/cmpint.c +++ b/v8/src/microcode/cmpint.c @@ -30,7 +30,7 @@ Technology nor of any adaptation thereof in any advertising, promotional, or sales literature without prior written consent from MIT in each case. */ -/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/cmpint.c,v 1.10 1989/10/27 13:26:24 jinx Exp $ +/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/cmpint.c,v 1.11 1989/11/01 18:57:07 jinx Exp $ * * This file corresponds to * $COMPILER-Header: compiler.c,v 9.37 89/10/25 14:55:45 GMT jinx Exp $ @@ -102,9 +102,6 @@ MIT in each case. */ /* Structure returned by SCHEME_UTILITYs */ -typedef char instruction; /* (instruction *) is a pointer to a - native instruction. */ - struct utility_result { void (*interface_dispatch)();