From e76a13c0caa1c54045a61da32d5f38f957395b1e Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Fri, 24 Feb 1989 09:28:33 +0000 Subject: [PATCH] Add support for X11 graphics on HP machines. --- v7/src/runtime/runtime.pkg | 6 ++++-- v8/src/runtime/runtime.pkg | 6 ++++-- 2 files changed, 8 insertions(+), 4 deletions(-) diff --git a/v7/src/runtime/runtime.pkg b/v7/src/runtime/runtime.pkg index cf4cb1d0d..3c7b62424 100644 --- a/v7/src/runtime/runtime.pkg +++ b/v7/src/runtime/runtime.pkg @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/runtime.pkg,v 14.27 1989/02/09 04:16:28 cph Exp $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/runtime.pkg,v 14.28 1989/02/24 09:28:33 cph Exp $ Copyright (c) 1988 Massachusetts Institute of Technology @@ -1488,7 +1488,9 @@ MIT in each case. |# x-graphics-raise-window x-graphics-start-retain x-graphics-stop-retain - x-graphics-unmap-window) + x-graphics-unmap-window + x11-graphics-initialize + x11-graphics-close) (initialization (initialize-package!))) (define-package (runtime state-space) diff --git a/v8/src/runtime/runtime.pkg b/v8/src/runtime/runtime.pkg index 22c7c1e16..aa6f02910 100644 --- a/v8/src/runtime/runtime.pkg +++ b/v8/src/runtime/runtime.pkg @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/runtime/runtime.pkg,v 14.27 1989/02/09 04:16:28 cph Exp $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/runtime/runtime.pkg,v 14.28 1989/02/24 09:28:33 cph Exp $ Copyright (c) 1988 Massachusetts Institute of Technology @@ -1488,7 +1488,9 @@ MIT in each case. |# x-graphics-raise-window x-graphics-start-retain x-graphics-stop-retain - x-graphics-unmap-window) + x-graphics-unmap-window + x11-graphics-initialize + x11-graphics-close) (initialization (initialize-package!))) (define-package (runtime state-space) -- 2.25.1