read-and-compile closes input file after seeing EOF
authorAndy Wingo <wingo@pobox.com>
Mon, 21 Jan 2013 18:07:19 +0000 (19:07 +0100)
committerAndy Wingo <wingo@pobox.com>
Mon, 21 Jan 2013 18:08:39 +0000 (19:08 +0100)
commitb3219085d92f6ab67347f251b651a65c3a7b6c1e
tree027969c793c11534d0616a00a1b899dea6cfaead
parentf6fd2c03a5f8b910e666b91b73e94da9eb6d03a2
read-and-compile closes input file after seeing EOF

* module/system/base/compile.scm (read-and-compile): Close the input
  port after we read all of its data.  Perhaps this cleans up some NFS
  ghosts that David Pirotte was seeing.
module/system/base/compile.scm