binary file parse from practical common lisp