(FILECREATED " 1-Aug-85 21:59:48" ("compiled on " {ERIS}LIBRARY>CMLSTREAMS.;2) "28-Jul-85 01:39:50" recompiled ALL in "INTERLISP-D 28-Jul-85 ..." dated "28-Jul-85 01:53:53") (FILECREATED " 1-Aug-85 21:57:50" {ERIS}LIBRARY>CMLSTREAMS.;2 1233 changes to: (FNS WRITE-STRING WRITE-STRING*) (VARS CMLSTREAMSCOMS *STANDARD-OUTPUT*) previous date: "31-Jul-85 04:48:46" {ERIS}LIBRARY>CMLSTREAMS.;1) WRITE-STRING D1 (L (0 \CL:LAMBDA.ARGCNT) P 10Q END P 5 START P 2 STREAM P 1 STRING F 11Q *STANDARD-OUTPUT*) q e@alHñ’W€AºHl¼»LdKó–¿hµj°agð”LkØ°òLlÔ\°åa½Hl_¿¾OdNó™¿hµI °agð•OkØ°îOlÔ_°ßaIJMO (156Q WRITE-STRING* 113Q CL:LENGTH) (121Q :END 46Q :START) () WRITE-STRING* D1 (L (0 \CL:LAMBDA.ARGCNT) P 4 END P 3 START P 2 STREAM P 1 STRING F 5 *STANDARD-OUTPUT*) 6e@!lHñ‘U€AºlHñ‘j€B»lHñ”I €CIKkØL J (63Q PRIN3 57Q SUBSTRING 42Q CL:LENGTH) NIL () (PRETTYCOMPRINT CMLSTREAMSCOMS) (RPAQQ CMLSTREAMSCOMS ((VARS *STANDARD-OUTPUT*) (FNS WRITE-STRING WRITE-STRING*) (DECLARE: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) (NLAML) (LAMA WRITE-STRING* WRITE-STRING))))) (RPAQQ *STANDARD-OUTPUT* T) (PUTPROPS CMLSTREAMS COPYRIGHT ("Xerox Corporation" 1985)) NIL