aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux.lux
diff options
context:
space:
mode:
authorEduardo Julian2020-12-02 06:42:20 -0400
committerEduardo Julian2020-12-02 06:42:20 -0400
commit34e310622bdeb1d0588c0664c0e78cbaa84f837c (patch)
treeeb7c04185b57c781f45d0ccdb955bc9afc2aa8dc /stdlib/source/lux.lux
parent982a19e0c5d57b53f9726b780fec4c18f0787b4f (diff)
Re-named "::" and ":::" macros to "\" and "\\", to be consistent with the convention that only macros that deal with types may start with a colon.
Diffstat (limited to 'stdlib/source/lux.lux')
-rw-r--r--stdlib/source/lux.lux20
1 files changed, 10 insertions, 10 deletions
diff --git a/stdlib/source/lux.lux b/stdlib/source/lux.lux
index 639d9ab09..a5ee64cab 100644
--- a/stdlib/source/lux.lux
+++ b/stdlib/source/lux.lux
@@ -4375,9 +4375,9 @@
"(open: ''i:.'' number)"
__paragraph
"## Will generate:" ..new-line
- "(def: i:+ (:: number +))" ..new-line
- "(def: i:- (:: number -))" ..new-line
- "(def: i:* (:: number *))" ..new-line
+ "(def: i:+ (\ number +))" ..new-line
+ "(def: i:- (\ number -))" ..new-line
+ "(def: i:* (\ number *))" ..new-line
"..."))}
(case tokens
(^ (list [_ (#Text alias)] struct))
@@ -4586,13 +4586,13 @@
(~ =imports)))]]
(wrap (#Cons =module =refers))))
-(macro: #export (:: tokens)
+(macro: #export (\ tokens)
{#.doc (text$ ($_ "lux text concat"
"## Allows accessing the value of a structure's member." ..new-line
- "(:: codec encode)"
+ "(\ codec encode)"
__paragraph
"## Also allows using that value as a function." ..new-line
- "(:: codec encode +123)"))}
+ "(\ codec encode +123)"))}
(case tokens
(^ (list struct [_ (#Identifier member)]))
(return (list (` (let [(^open ".") (~ struct)] (~ (identifier$ member))))))
@@ -5172,8 +5172,8 @@
(with-expansions
[<tests> (template [<expr> <text> <pattern>]
[(compare <pattern> <expr>)
- (compare <text> (:: Code/encode encode <expr>))
- (compare #1 (:: equivalence = <expr> <expr>))]
+ (compare <text> (\ Code/encode encode <expr>))
+ (compare #1 (\ equivalence = <expr> <expr>))]
[(bit #1) "#1" [_ (#.Bit #1)]]
[(bit #0) "#0" [_ (#.Bit #0)]]
@@ -5281,7 +5281,7 @@
(wrap [meta (#Record =pairs)]))
_
- (:: meta-monad return token)
+ (\ meta-monad return token)
))
(macro: #export (static tokens)
@@ -5468,7 +5468,7 @@
(macro: #export (^@ tokens)
{#.doc (doc "Allows you to simultaneously bind and de-structure a value."
(def: (hash (^@ set [Hash<a> _]))
- (list\fold (function (_ elem acc) (+ (:: Hash<a> hash elem) acc))
+ (list\fold (function (_ elem acc) (+ (\ Hash<a> hash elem) acc))
0
(to-list set))))}
(case tokens