From a75f032ff219fdd639580455a6d3e83fd05d5592 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sat, 6 Apr 2019 21:14:27 -0400
Subject: Created the "lux/abstract" branch and moved some modules into it.

---
 stdlib/source/lux.lux | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'stdlib/source/lux.lux')

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)]
-- 
cgit v1.2.3