aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/lux/debug.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/test/lux/debug.lux')
-rw-r--r--stdlib/source/test/lux/debug.lux10
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/test/lux/debug.lux b/stdlib/source/test/lux/debug.lux
index d422caa8d..3ad2747e8 100644
--- a/stdlib/source/test/lux/debug.lux
+++ b/stdlib/source/test/lux/debug.lux
@@ -36,7 +36,6 @@
["$[0]" // "_"
["[1][0]" type]
[data
- ["[1][0]" name]
[format
["[1][0]" json]
["[1][0]" xml]]]
@@ -46,7 +45,8 @@
[number
["[1][0]" ratio]]]
[meta
- ["[1][0]" location]]])
+ ["[1][0]" location]
+ ["[1][0]" symbol]]])
(def: can_represent_simple_types
(Random Bit)
@@ -107,7 +107,7 @@
(Random Bit)
(do random.monad
[sample_ratio $//ratio.random
- sample_name ($//name.random 5 5)
+ sample_symbol ($//symbol.random 5 5)
sample_location $//location.random
sample_type ($//type.random 0)
sample_code $//code.random
@@ -119,7 +119,7 @@
(try.else false))]
[Ratio %.ratio sample_ratio]
- [Name %.name sample_name]
+ [Symbol %.symbol sample_symbol]
[Location %.location sample_location]
[Code %.code sample_code]
[Type %.type sample_type]
@@ -262,7 +262,7 @@
true))
(_.cover [/.log!]
(exec
- (/.log! (format (%.name (name_of /.log!))
+ (/.log! (format (%.symbol (name_of /.log!))
" works: " (%.text message)))
true))
))))