From 0af7c344592a0ef6acdae578bcad9235d3453ce3 Mon Sep 17 00:00:00 2001
From: Doug Coleman <erg@vantar1litning.gateway.2wire.net>
Date: Wed, 12 Mar 2008 10:35:50 -0500
Subject: [PATCH] fix all farkup tests!

---
 extra/farkup/farkup.factor | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/extra/farkup/farkup.factor b/extra/farkup/farkup.factor
index ded376b1e4..ac91a77685 100755
--- a/extra/farkup/farkup.factor
+++ b/extra/farkup/farkup.factor
@@ -43,8 +43,13 @@ MEMO: h3 ( -- parser ) "===" "h3" delimited ;
 MEMO: h4 ( -- parser ) "====" "h4" delimited ;
 
 MEMO: eq ( -- parser )
-    h1 ensure-not
-    "=" token 2seq ;
+    [
+        h1 ensure-not ,
+        h2 ensure-not ,
+        h3 ensure-not ,
+        h4 ensure-not ,
+        "=" token ,
+    ] seq* ;
 
 : render-code ( string mode -- string' )
     >r string-lines r>