Skip to content
Snippets Groups Projects
Commit cd6be7ac authored by Gary King's avatar Gary King
Browse files

cleaned defsystem grammar in manual

parent a91af098
No related branches found
No related tags found
No related merge requests found
...@@ -115,7 +115,7 @@ slightly convoluted example: ...@@ -115,7 +115,7 @@ slightly convoluted example:
:components :components
((:module "foo" ((:module "foo"
:components ((:file "bar") :components ((:file "bar")
(:file"baz") (:file "baz")
(:file "quux")) (:file "quux"))
:perform (compile-op :after (op c) (do-something c)) :perform (compile-op :after (op c) (do-something c))
:explain (compile-op :after (op c) (explain-something c))) :explain (compile-op :after (op c) (explain-something c)))
...@@ -147,38 +147,42 @@ before the component in question has been compiled."} ...@@ -147,38 +147,42 @@ before the component in question has been compiled."}
system-definition := ( defsystem system-designator {option}* ) system-definition := ( defsystem system-designator {option}* )
option := :components component-list option := :components component-list
| :pathname pathname | :pathname pathname
| :default-component-class | :default-component-class
| :perform method-form | :perform method-form
| :explain method-form | :explain method-form
| :output-files method-form | :output-files method-form
| :operation-done-p method-form | :operation-done-p method-form
| :depends-on ( {dependency-def}* ) | :depends-on ( {dependency-def}* )
| :serial [ t | nil ] | :serial [ t | nil ]
| :in-order-to ( {dependency}+ ) | :in-order-to ( {dependency}+ )
component-list := ( {component-def}* ) component-list := ( {component-def}* )
component-def := simple-component-name component-def := component-name
| ( component-type name {option}* ) | ( component-type name {option}* )
component-type := :module | :file component-type := :module | :file
| :system | other-component-type | :system | other-component-type
dependency-def := simple-component-name dependency-def := component-name
| ( :feature name ) | ( :feature feature-name )
| ( :version simple-component-name version-specifier) | ( :version component-name version-specifier)
dependency := (dependent-op {requirement}+) dependency := ( dependent-op {requirement}+ )
requirement := (required-op {required-component}+) requirement := ( required-op {required-component}+ )
| (feature feature-name) | ( feature feature-name )
dependent-op := operation-name dependent-op := operation-name
required-op := operation-name | feature required-op := operation-name
simple-component-name := string component-name := string
| symbol | symbol
operation-name := symbol
feature-name := symbol
version-specifier := number[.number]*
#### Serial dependencies #### Serial dependencies
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment