fileQ
;;; -*- logo -*-
to file? :filename
ignore error
catch "error [openread :filename close :filename]
output emptyp error
end
bury "file?
;;; -*- logo -*-
to file? :filename
ignore error
catch "error [openread :filename close :filename]
output emptyp error
end
bury "file?