From 30731a5808ce5c86986a63d88d65a1ead039a4f1 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Sat, 24 Nov 2007 18:33:20 -0500 Subject: [PATCH] Fix parser-combinators load issue --- extra/parser-combinators/parser-combinators.factor | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/extra/parser-combinators/parser-combinators.factor b/extra/parser-combinators/parser-combinators.factor index 3e34333a41..6301f778f5 100755 --- a/extra/parser-combinators/parser-combinators.factor +++ b/extra/parser-combinators/parser-combinators.factor @@ -13,11 +13,11 @@ M: promise (parse) ( input parser -- list ) : parse ( input parser -- promise ) (parse) ; +TUPLE: parse-result parsed unparsed ; + : parse-1 ( input parser -- result ) parse car parse-result-parsed ; -TUPLE: parse-result parsed unparsed ; - C: parse-result TUPLE: token-parser string ;