From d69f75f37327e291eb649937c35c3333170b61e6 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Sun, 30 Dec 2018 17:05:49 -0600
Subject: [PATCH] unicode.collation: Fix Factor error, the remaining errors are
 unicode spec errors.

---
 basis/unicode/collation/collation.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/basis/unicode/collation/collation.factor b/basis/unicode/collation/collation.factor
index c6998535dd..0a62b745de 100644
--- a/basis/unicode/collation/collation.factor
+++ b/basis/unicode/collation/collation.factor
@@ -84,7 +84,7 @@ ducet get-global insert-helpers
     dup tangut-block? [
         [ tangut-AAAA ] [ tangut-BBBB ] bi 2array
     ] [
-        first dup illegal? [
+        dup illegal? [
             drop { }
         ] [
             [ AAAA ] [ BBBB ] bi 2array