fun {FromFile File} Scanner = {New DataScanner init} Parser = {New DataParser init(Scanner)} Entries Status in {Scanner scanFile(File)} {Parser parse(info(Entries) Status)} {Scanner close} if Status then Entries else raise oops end end end