diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/lux.lux | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/stdlib/source/lux.lux b/stdlib/source/lux.lux index d3a0f1825..b7de70c5d 100644 --- a/stdlib/source/lux.lux +++ b/stdlib/source/lux.lux @@ -3985,10 +3985,7 @@ #None (fail "Wrong syntax for structure:")))) -(def: #export (id x) - {#.doc "Identity function. Does nothing to it's argument and just returns it."} - (All [a] (-> a a)) - x) +(def: (identity x) (All [a] (-> a a)) x) (macro: #export (type: tokens) {#.doc (text$ ($_ "lux text concat" @@ -5302,8 +5299,8 @@ <open> parts-text <close>)])) - ([#Form "(" ")" id] - [#Tuple "[" "]" id] + ([#Form "(" ")" ..identity] + [#Tuple "[" "]" ..identity] [#Record "{" "}" rejoin-all-pairs]) [new-cursor (#Rev value)] |