Lines Matching refs:protfile
38 char-to-protfile)
61 (fluid '(oldterminalinputhandler oldterminaloutputhandler protfile
83 (de protfile (u)
84 (when protfile (close protfile))
85 (setq protfile nil)
87 ((stringp u) (setq protfile (open u 'OUTPUT)) u)
88 ((idp u)(setq protfile (open (id2string u) 'OUTPUT)) u)
89 (t (stderror "protfile must be called with string or id"))))
118 (when protfile (when (weq terminaldir 1)
119 (channelterpri protfile)
121 (char-to-protfile c))
142 (when (and protfile (eq ch 1))
144 (channelterpri protfile)
146 (char-to-protfile u))
150 (de char-to-protfile(u)
152 ((weq u (char (cntrl j))) (channelterpri protfile))
153 (t (channelwritechar protfile u))))
266 (flag '(pagelength protfile pagebuffer) 'opfn)