diff options
| author | Eduardo Julian | 2019-04-06 21:14:27 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2019-04-06 21:14:27 -0400 |
| commit | a75f032ff219fdd639580455a6d3e83fd05d5592 (patch) | |
| tree | f02c8e6b9c7c8fd932790b0fc8152fa30be55d7f /stdlib/source/lux.lux | |
| parent | 9a22a2616ad08d4bda9555510aa4aaeced4b69f3 (diff) | |
Created the "lux/abstract" branch and moved some modules into it.
Diffstat (limited to 'stdlib/source/lux.lux')
| -rw-r--r-- | stdlib/source/lux.lux | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/lux.lux b/stdlib/source/lux.lux index 45b190c82..1a3d71480 100644 --- a/stdlib/source/lux.lux +++ b/stdlib/source/lux.lux @@ -3958,7 +3958,7 @@ #None (fail "Wrong syntax for structure:")))) -(def: (identity x) (All [a] (-> a a)) x) +(def: (function@identity x) (All [a] (-> a a)) x) (macro: #export (type: tokens) {#.doc (text$ ($_ "lux text concat" @@ -5289,8 +5289,8 @@ <open> parts-text <close>)])) - ([#Form "(" ")" ..identity] - [#Tuple "[" "]" ..identity] + ([#Form "(" ")" ..function@identity] + [#Tuple "[" "]" ..function@identity] [#Record "{" "}" rejoin-all-pairs]) [new-cursor (#Rev value)] |