aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program/aedifex/dependency/status.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/program/aedifex/dependency/status.lux')
-rw-r--r--stdlib/source/program/aedifex/dependency/status.lux7
1 files changed, 7 insertions, 0 deletions
diff --git a/stdlib/source/program/aedifex/dependency/status.lux b/stdlib/source/program/aedifex/dependency/status.lux
index bedaffdb8..82d99e9aa 100644
--- a/stdlib/source/program/aedifex/dependency/status.lux
+++ b/stdlib/source/program/aedifex/dependency/status.lux
@@ -3,6 +3,7 @@
[abstract
[equivalence (#+ Equivalence)]]
[data
+ [binary (#+ Binary)]
["." sum]
["." product]]]
["." /// #_
@@ -33,3 +34,9 @@
///hash.equivalence
)
))
+
+(def: #export (verified payload)
+ (-> Binary Status)
+ (#Verified
+ (///hash.sha-1 payload)
+ (///hash.md5 payload)))