Lines Matching refs:protfile
38 char-to-protfile beiss-ab)
63 (fluid '(oldterminalinputhandler oldterminaloutputhandler protfile
90 (de protfile (u)
93 (when protfile (close protfile))
94 (setq protfile nil)
96 ((stringp u) (setq protfile (open u 'OUTPUT)) u)
97 ((idp u)(setq protfile (open (id2string u) 'OUTPUT)) u)
98 (t (stderror "protfile must be called with string or id"))))
126 (when protfile (when (weq terminaldir 1)
127 (channelterpri protfile)
129 (char-to-protfile c))
150 (when (and protfile (eq ch 1))
152 (channelterpri protfile)
154 (char-to-protfile u))
158 (de char-to-protfile(u)
160 ((weq u (char (cntrl j))) (channelterpri protfile))
161 (t (channelwritechar protfile u))))
281 (flag '(pagelength protfile pagebuffer) 'opfn)