(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE (DEFPACKAGE "NATIVE-TRANSLATOR" (USE "IL"))) (FILECREATED "15-Jun-90 18:46:45"  {DSK}local>lde>lispcore>internal>library>NATIVE-TRANSLATOR-PACKAGE.;2 1706 changes to%: (VARS NATIVE-TRANSLATOR-PACKAGECOMS) previous date%: "10-Jun-88 11:23:35" {DSK}local>lde>lispcore>internal>library>NATIVE-TRANSLATOR-PACKAGE.;1) (* ; " Copyright (c) 1988, 1990 by Venue & Xerox Corporation. All rights reserved. ") (PRETTYCOMPRINT NATIVE-TRANSLATOR-PACKAGECOMS) (RPAQQ NATIVE-TRANSLATOR-PACKAGECOMS ( (* ;;; "Setting up the TRANSLATOR package.") (P (DEFPACKAGE "NATIVE-TRANSLATOR" (:NICKNAMES "NT") (:USE "IL"))) (* ;; "Arrange for the correct makefile environment") (PROP MAKEFILE-ENVIRONMENT NATIVE-TRANSLATOR-PACKAGE))) (* ;;; "Setting up the TRANSLATOR package.") (DEFPACKAGE "NATIVE-TRANSLATOR" (:NICKNAMES "NT") (:USE "IL")) (* ;; "Arrange for the correct makefile environment") (PUTPROPS NATIVE-TRANSLATOR-PACKAGE MAKEFILE-ENVIRONMENT (:READTABLE "INTERLISP" :PACKAGE (DEFPACKAGE "NATIVE-TRANSLATOR" (:USE "IL")))) (PUTPROPS NATIVE-TRANSLATOR-PACKAGE COPYRIGHT ("Venue & Xerox Corporation" 1988 1990)) (DECLARE%: DONTCOPY (FILEMAP (NIL))) STOP