Added DOS related files.

diff --git a/v7/src/edwin/decls.scm b/v7/src/edwin/decls.scm
index 4fdaf9b91c9b9815d89380f233ae8e37cde1b6ad..a3aefaa7bd4a1bc9a1b6dc7fba96c5bac8d048ec 100644 (file)
--- a/v7/src/edwin/decls.scm
+++ b/v7/src/edwin/decls.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/decls.scm,v 1.36 1992/04/22 21:16:09 mhwu Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/decls.scm,v 1.37 1992/05/12 15:45:23 mhwu Exp $
 
 Copyright (c) 1989-92 Massachusetts Institute of Technology
 
@@ -129,6 +129,8 @@ MIT in each case. |#
                "debug"
                "debuge"
                "dired"
+               "dos"
+               "dosproc"
                "ed-ffi"
                "editor"
                "evlcom"

diff --git a/v7/src/edwin/edwin.pkg b/v7/src/edwin/edwin.pkg
index 06963cb0c1b45ddd833f5948b3f6089641359b3f..e5f7adef5676e913d8aaf6758eb6b5620ce989e8 100644 (file)
--- a/v7/src/edwin/edwin.pkg
+++ b/v7/src/edwin/edwin.pkg
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/edwin.pkg,v 1.90 1992/04/22 21:14:39 mhwu Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/edwin.pkg,v 1.91 1992/05/12 15:45:40 mhwu Exp $
 
 Copyright (c) 1989-92 Massachusetts Institute of Technology
 
@@ -37,13 +37,15 @@ MIT in each case. |#
 (global-definitions "../runtime/runtim")
 
 (define-package (edwin)
+  (file-case os-type
+    ((unix) "unix")
+    ((dos)  "dos"))
   (files "utils"
         "nvector"
         "ring"
         "strtab"
         "strpad"
         "class"
-        "unix"
 
         "paths"
         "struct"
@@ -815,7 +817,9 @@ MIT in each case. |#
   (parent (edwin)))
 
 (define-package (edwin process)
-  (files "process")
+  (file-case os-type
+    ((unix) "process")
+    ((dos)  "dosproc"))
   (parent (edwin))
   (export (edwin)
          accept-process-output