Reads an asd file and returns the first defsystem declaration with default values
for missing properties. Since we don't want to screw around with evaling
in-package forms, etc. we look for the defsystem using string=.
| find-defsystem < pathname > |
| find-defsystem < stream > |
| find-defsystem < string > |