diff options
Diffstat (limited to 'stdlib/source/program/aedifex/artifact/versioning.lux')
| -rw-r--r-- | stdlib/source/program/aedifex/artifact/versioning.lux | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/program/aedifex/artifact/versioning.lux b/stdlib/source/program/aedifex/artifact/versioning.lux index 44973b54e..9e6ff8244 100644 --- a/stdlib/source/program/aedifex/artifact/versioning.lux +++ b/stdlib/source/program/aedifex/artifact/versioning.lux @@ -30,17 +30,17 @@ ["#." snapshot (#+ Snapshot) ["#/." version (#+ Version)]]]) -(type: #export Versioning +(type: .public Versioning {#snapshot Snapshot #last_updated //time.Time #versions (List Version)}) -(def: #export init +(def: .public init {#snapshot #//snapshot.Local #last_updated //time.epoch #versions (list)}) -(def: #export equivalence +(def: .public equivalence (Equivalence Versioning) ($_ product.equivalence //snapshot.equivalence @@ -61,7 +61,7 @@ (-> //time.Time XML) (|>> //time.format #xml.Text list (#xml.Node ..<last_updated> xml.attributes))) -(def: #export (format (^slots [#snapshot #last_updated #versions])) +(def: .public (format (^slots [#snapshot #last_updated #versions])) (-> Versioning XML) (<| (#xml.Node ..<versioning> xml.attributes) (list (//snapshot.format snapshot) @@ -80,7 +80,7 @@ (<| (<text>.then //time.parser) (..text ..<last_updated>))) -(def: #export parser +(def: .public parser (Parser Versioning) (<| (<xml>.node ..<versioning>) ($_ <>.and |