home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / lispmachine / lm3600.tra < prev    next >
Text File  |  2020-01-01  |  2KB  |  59 lines
  1. ;;; -*- Mode: LISP; Base:10; Package: USER -*-
  2.  
  3. ;******************************************************************************
  4. ; Copyright (c) 1984, 1985 by Lisp Machine Inc.
  5. ; Symbolics-specific portions Copyright (c) 1985 by Honeywell, Inc.
  6. ; Permission to copy all or part of this material is granted, provided
  7. ; that the copies are not made or distributed for resale, and the 
  8. ; copyright notices and reference to the source file and the software
  9. ; distribution version appear, and that notice is given that copying is
  10. ; by permission of Lisp Machine Inc.  LMI reserves for itself the 
  11. ; sole commercial right to use any part of this KERMIT/H19-Emulator
  12. ; not covered by any Columbia University copyright.  Inquiries concerning
  13. ; copyright should be directed to Mr. Damon Lawrence at (213) 642-1116.
  14. ;
  15. ; Version Information:
  16. ;      LMKERMIT 1.0     --      Original LMI code, plus edit ;1; for 3600 port
  17. ;
  18. ; Authorship Information:
  19. ;      Mark David (LMI)           Original version, using KERMIT.C as a guide
  20. ;      George Carrette (LMI)      Various enhancements
  21. ;      Mark Ahlstrom (Honeywell)  Port to 3600 (edits marked with ";1;" comments)
  22. ;
  23. ; Author Addresses:
  24. ;      George Carrette     ARPANET: GJC at MIT-MC
  25. ;
  26. ;      Mark Ahlstrom       ARPANET: Ahlstrom at HI-Multics
  27. ;                          PHONE:   (612) 887-4006
  28. ;                          USMAIL:  Honeywell MN09-1400
  29. ;                                   Computer Sciences Center
  30. ;                                   10701 Lyndale Avenue South
  31. ;                                   Bloomington, MN  55420
  32. ;******************************************************************************
  33.  
  34.  
  35. ;;; kermit.translations -- for 3600 only!
  36. ;;; Mark Ahlstrom 3/28/85
  37.  
  38. ;;; After editing file to show your host and directory,
  39. ;;; this file should be renamed and move to become
  40. ;;; the file sys:site;kermit.translations
  41.  
  42. ;;; This will allow make-system to find it properly, so
  43. ;;; (make-system 'kermit :compile) should build the system.
  44.  
  45. (fs:set-logical-pathname-host
  46.   "kermit"
  47.   :physical-host "BALDER"            ;change BALDER to your host name.
  48.   :translations '(("kermit;" ">mark>kermit>")))    ;change the pathname to your kermit
  49.                         ;source directory.
  50.  
  51. #||
  52.  
  53. (fs:set-logical-pathname-host
  54.   "kermit"
  55.   :physical-host "MIT-MC"
  56.   :translations '(("kermit;" "gjc;")))
  57.  
  58. ||#
  59.