Made exception.report a function.

1 files changed, 6 insertions, 6 deletions

diff --git a/stdlib/source/program/aedifex/hash.lux b/stdlib/source/program/aedifex/hash.lux
index 1c853512c..b292f004b 100644
--- a/stdlib/source/program/aedifex/hash.lux
+++ b/stdlib/source/program/aedifex/hash.lux
@@ -84,16 +84,16 @@
   (exception .public (not_a_hash [size Nat
                                   value Text])
     (exception.report
-     "Pseudo hash" (%.text value)
-     "Expected size" (%.nat size)
-     "Actual size" (%.nat (text.size value))))
+     (list ["Pseudo hash" (%.text value)]
+           ["Expected size" (%.nat size)]
+           ["Actual size" (%.nat (text.size value))])))
   
   (with_template [<name> <size>]
     [(exception .public (<name> [data Binary])
        (exception.report
-        "Pseudo hash" (%.text (..encoded data))
-        "Expected size" (%.nat <size>)
-        "Actual size" (%.nat (binary.size data))))]
+        (list ["Pseudo hash" (%.text (..encoded data))]
+              ["Expected size" (%.nat <size>)]
+              ["Actual size" (%.nat (binary.size data))])))]
 
     [not_a_sha-1 ..sha-1::size]
     [not_a_md5 ..md5::size]