Export the x-graphics operations to the global package. Shouldn't
authorojn <ojn>
Fri, 23 Jun 1989 21:13:06 +0000 (21:13 +0000)
committerojn <ojn>
Fri, 23 Jun 1989 21:13:06 +0000 (21:13 +0000)
have deleted them in the first place.

v7/src/runtime/runtime.pkg
v8/src/runtime/runtime.pkg

index a521f2bbd33b1c37b747f20d9946a5b9fc9854f9..5a3ba5866e537883b5cdc633b5f85103ef644641 100644 (file)
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/runtime.pkg,v 14.40 1989/06/22 23:50:57 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/runtime.pkg,v 14.41 1989/06/23 21:13:06 ojn Rel $
 
 Copyright (c) 1988, 1989 Massachusetts Institute of Technology
 
@@ -1545,7 +1545,9 @@ MIT in each case. |#
          set-graphics-drawing-mode
          set-graphics-line-style
          with-graphics-drawing-mode
-         with-graphics-line-style)
+         with-graphics-line-style
+         x-graphics-available?
+         x-graphics-initialize)
   (initialization (initialize-package!)))
 
 (define-package (runtime state-space)
index 9320a81743a70edb2ae71df7f62bae524a94a8d8..ed78cabfb248f194effdbc372c636925b0cbb10c 100644 (file)
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/runtime/runtime.pkg,v 14.40 1989/06/22 23:50:57 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/runtime/runtime.pkg,v 14.41 1989/06/23 21:13:06 ojn Rel $
 
 Copyright (c) 1988, 1989 Massachusetts Institute of Technology
 
@@ -1545,7 +1545,9 @@ MIT in each case. |#
          set-graphics-drawing-mode
          set-graphics-line-style
          with-graphics-drawing-mode
-         with-graphics-line-style)
+         with-graphics-line-style
+         x-graphics-available?
+         x-graphics-initialize)
   (initialization (initialize-package!)))
 
 (define-package (runtime state-space)