From d65a76d10f4810fecf3727356056ff8b7a828074 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Wed, 25 Jun 2008 15:35:14 -0500 Subject: [PATCH] Fixing builder failures --- extra/io/encodings/8-bit/8-bit.factor | 2 +- extra/peg/ebnf/ebnf.factor | 3 ++- extra/persistent-vectors/persistent-vectors.factor | 2 +- 3 files changed, 4 insertions(+), 3 deletions(-) diff --git a/extra/io/encodings/8-bit/8-bit.factor b/extra/io/encodings/8-bit/8-bit.factor index 30eb745314..16fe052867 100755 --- a/extra/io/encodings/8-bit/8-bit.factor +++ b/extra/io/encodings/8-bit/8-bit.factor @@ -81,7 +81,7 @@ PRIVATE> [ encoding-file parse-file 8-bit boa ] bi* ] assoc-map + [ keys [ define-symbol ] each ] [ 8-bit-encodings set-global ] - [ [ [ ] curry define ] assoc-each ] bi ] with-compilation-unit diff --git a/extra/peg/ebnf/ebnf.factor b/extra/peg/ebnf/ebnf.factor index 0bf07f2687..6812aefee0 100644 --- a/extra/peg/ebnf/ebnf.factor +++ b/extra/peg/ebnf/ebnf.factor @@ -4,7 +4,8 @@ USING: kernel compiler.units words arrays strings math.parser sequences quotations vectors namespaces math assocs continuations peg peg.parsers unicode.categories multiline combinators.lib splitting accessors effects sequences.deep peg.search - combinators.short-circuit ; + combinators.short-circuit lexer io.streams.string inference io + prettyprint combinators parser ; IN: peg.ebnf : rule ( name word -- parser ) diff --git a/extra/persistent-vectors/persistent-vectors.factor b/extra/persistent-vectors/persistent-vectors.factor index c80de3b0cd..691ebfcf4d 100644 --- a/extra/persistent-vectors/persistent-vectors.factor +++ b/extra/persistent-vectors/persistent-vectors.factor @@ -1,7 +1,7 @@ ! Based on Clojure's PersistentVector by Rich Hickey. USING: math accessors kernel sequences.private sequences arrays -combinators combinators.lib parser prettyprint.backend ; +combinators combinators.short-circuit parser prettyprint.backend ; IN: persistent-vectors ERROR: empty-error pvec ;