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