diff options
author | Eduardo Julian | 2020-10-14 21:48:00 -0400 |
---|---|---|
committer | Eduardo Julian | 2020-10-14 21:48:00 -0400 |
commit | 440608bc32916329c9f3c0f2bd9a8d1152ed5da8 (patch) | |
tree | e27ae0f41a437c24275293b151b23e63bf938392 /stdlib/source/lux.lux | |
parent | 00d5ccbc043960037f644d4ff09b6a46fd0093d0 (diff) |
Gave the Location type its own module.
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/lux.lux | 11 |
1 files changed, 1 insertions, 10 deletions
diff --git a/stdlib/source/lux.lux b/stdlib/source/lux.lux index fa33ac0b4..01401ea29 100644 --- a/stdlib/source/lux.lux +++ b/stdlib/source/lux.lux @@ -1,7 +1,7 @@ ("lux def" dummy-location ["" 0 0] [["" 0 0] (9 #1 (0 #0))] - #1) + #0) ("lux def" double-quote ("lux i64 char" +34) @@ -5856,15 +5856,6 @@ _ (fail (..wrong-syntax-error (name-of ..^code))))) -(def: #export (location-description [file line column]) - (-> Location Text) - (let [separator ", " - fields ($_ "lux text concat" - (text@encode file) separator - (nat@encode line) separator - (nat@encode column))] - ($_ "lux text concat" "[" fields "]"))) - (template [<zero> <one>] [(def: #export <zero> #0) (def: #export <one> #1)] |