r { file vwrite data;fd fd { 390 Lcreat file }(fd < 0)/error r { fd Lwrite data fd { Lclose fd } error: 'Can''t open file: ',file BN 0