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