Lines Matching refs:open
93 instance defer cif-open ( dev$ -- ihandle|0 )
106 " open" find-cif-method to cif-open
190 : open-abort ( file$ -- )
191 cr ." Can't open " type cr abort
194 /buf-len buffer: open-cstr
196 : dev-open ( dev$ -- ih | 0 )
197 \ copy to C string for open
198 0 over open-cstr + c!
199 open-cstr swap move
200 open-cstr cif-open