From f2d1c591814a055b48dab3a72b3cddef0d1b0974 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 3 Dec 2017 16:16:50 -0400
Subject: - Fixed some small issues uncovered by new-luxc.

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

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

diff --git a/stdlib/source/lux.lux b/stdlib/source/lux.lux
index ebac83f40..cdfe0e313 100644
--- a/stdlib/source/lux.lux
+++ b/stdlib/source/lux.lux
@@ -1031,8 +1031,8 @@
 (macro:' #export (comment tokens)
          (#Cons [(tag$ ["lux" "doc"])
                  (text$ "## Throws away any code given to it.
-                  ## Great for commenting-out code, while retaining syntax high-lighting and formatting in your text editor.
-                  (comment 1 2 3 4)")]
+                         ## Great for commenting-out code, while retaining syntax high-lighting and formatting in your text editor.
+                         (comment 1 2 3 4)")]
                 #Nil)
          (return #Nil))
 
@@ -1309,9 +1309,9 @@
 (macro:' #export (-> tokens)
          (#Cons [(tag$ ["lux" "doc"])
                  (text$ "## Function types:
-                  (-> Int Int Int)
+                         (-> Int Int Int)
 
-                  ## This is the type of a function that takes 2 Ints and returns an Int.")]
+                         ## This is the type of a function that takes 2 Ints and returns an Int.")]
                 #Nil)
          ("lux case" (list/reverse tokens)
           {(#Cons output inputs)
@@ -1327,7 +1327,7 @@
 (macro:' #export (list xs)
          (#Cons [(tag$ ["lux" "doc"])
                  (text$ "## List-construction macro.
-                  (list 1 2 3)")]
+                         (list 1 2 3)")]
                 #Nil)
          (return (#Cons (list/fold (function'' [head tail]
                                                (form$ (#Cons (tag$ ["lux" "Cons"])
@@ -1340,8 +1340,8 @@
 (macro:' #export (list& xs)
          (#Cons [(tag$ ["lux" "doc"])
                  (text$ "## List-construction macro, with the last element being a tail-list.
-                  ## In other words, this macro prepends elements to another list.
-                  (list& 1 2 3 (list 4 5 6))")]
+                         ## In other words, this macro prepends elements to another list.
+                         (list& 1 2 3 (list 4 5 6))")]
                 #Nil)
          ("lux case" (list/reverse xs)
           {(#Cons last init)
-- 
cgit v1.2.3