(# records-in file-name '/' flags (@ r +- 
                                      (attach prices (# parse-record r))
                                  )
- 
    (+PARSE_FILE+PARSE_ALL+READ_ANYWAY .flags)
)