Go backward to Valuation Functions Go up to Top Go forward to Collecting Log |
C[[delete]](newfile)
= let (k',p') = isempty(newfile) ->
("error: file is empty", newfile)
[] ("", delete(newfile))
in ("delete" concat k', p')
= let (k',p') = ("error: file is empty", newfile)
in ("delete" concat k', p')
= ("delete" concat "error: file is empty",
newfile)
= ("delete error: file is empty", newfile)
S[[C cr S]]