From 533864f86be183cbbb7c11516910acf711d281f4 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Wed, 22 Aug 2018 22:54:59 -0400
Subject: No more escaping of form-feed.

---
 stdlib/source/lux/compiler/default/syntax.lux    | 2 --
 stdlib/test/test/lux/compiler/default/syntax.lux | 2 +-
 2 files changed, 1 insertion(+), 3 deletions(-)

(limited to 'stdlib')

diff --git a/stdlib/source/lux/compiler/default/syntax.lux b/stdlib/source/lux/compiler/default/syntax.lux
index 1d1572859..aa77be1e5 100644
--- a/stdlib/source/lux/compiler/default/syntax.lux
+++ b/stdlib/source/lux/compiler/default/syntax.lux
@@ -143,7 +143,6 @@
                "v" (wrap [2 "\v"])
                "n" (wrap [2 ..new-line])
                "r" (wrap [2 "\r"])
-               "f" (wrap [2 "\f"])
                (^ (static ..text-delimiter)) (wrap [2 ..text-delimiter])
                (^ (static ..escape)) (wrap [2 ..escape])
 
@@ -625,7 +624,6 @@
             (["v" "\v"]
              ["n" (static ..new-line)]
              ["r" "\r"]
-             ["f" "\f"]
              [(~~ (static ..escape)) (static ..escape)])
 
             (^ (char (~~ (static ..text-delimiter))))
diff --git a/stdlib/test/test/lux/compiler/default/syntax.lux b/stdlib/test/test/lux/compiler/default/syntax.lux
index 6a447e9c1..e8b5bb5b4 100644
--- a/stdlib/test/test/lux/compiler/default/syntax.lux
+++ b/stdlib/test/test/lux/compiler/default/syntax.lux
@@ -30,7 +30,7 @@
   (do r.Monad<Random>
     [#let [digits "0123456789"
            delimiters "()[]{}#.\""
-           space "\v \n\r\f"
+           space "\v \n\r"
            invalid-range (format digits delimiters space)
            char-gen (|> r.nat
                         (:: @ map (|>> (n/% 256) (n/max 1)))
-- 
cgit v1.2.3