From 1b4048232a22641e58ca2216c247837f80480540 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Tue, 21 Jul 2015 11:22:13 -0700 Subject: [PATCH] code-arrays: move to unmaintained --- extra/code-arrays/authors.txt | 1 - extra/code-arrays/code-arrays-tests.factor | 13 ----------- extra/code-arrays/code-arrays.factor | 25 ---------------------- 3 files changed, 39 deletions(-) delete mode 100644 extra/code-arrays/authors.txt delete mode 100644 extra/code-arrays/code-arrays-tests.factor delete mode 100644 extra/code-arrays/code-arrays.factor diff --git a/extra/code-arrays/authors.txt b/extra/code-arrays/authors.txt deleted file mode 100644 index 7c1b2f2279..0000000000 --- a/extra/code-arrays/authors.txt +++ /dev/null @@ -1 +0,0 @@ -Doug Coleman diff --git a/extra/code-arrays/code-arrays-tests.factor b/extra/code-arrays/code-arrays-tests.factor deleted file mode 100644 index c19db136b1..0000000000 --- a/extra/code-arrays/code-arrays-tests.factor +++ /dev/null @@ -1,13 +0,0 @@ -! Copyright (C) 2011 Doug Coleman. -! See http://factorcode.org/license.txt for BSD license. -USING: code-arrays locals math tools.test ; -IN: code-arrays.tests - -{ { 1 2 9 } } [ {{ 1 2 3 sq }} ] unit-test -{ { 1 2 { 9 } } } [ {{ 1 2 {{ 3 sq }} }} ] unit-test - -{ H{ { 9 3 } { 4 1 } } } [ H{{ {{ 3 sq 3 }} {{ 2 sq 1 }} }} ] unit-test - -:: local-code-arrays ( -- seq ) {{ 1 2 3 + }} ; - -{ { 1 5 } } [ local-code-arrays ] unit-test diff --git a/extra/code-arrays/code-arrays.factor b/extra/code-arrays/code-arrays.factor deleted file mode 100644 index 080f3b5424..0000000000 --- a/extra/code-arrays/code-arrays.factor +++ /dev/null @@ -1,25 +0,0 @@ -! Copyright (C) 2011 Doug Coleman. -! See http://factorcode.org/license.txt for BSD license. -USING: combinators.smart hashtables kernel parser quotations -sequences vectors ; -IN: code-arrays - -: parse-code-array ( delimiter quot stack -- seq ) - [ parse-until >quotation ] dip curry append! ; - -DEFER: }} -DEFER: ]] - -SYNTAX: {{ \ }} [ output>array ] parse-code-array ; - -SYNTAX: [[ \ ]] [ [ ] output>sequence ] parse-code-array ; - -SYNTAX: H{{ \ }} [ output>array >hashtable ] parse-code-array ; - -SYNTAX: V{{ \ }} [ V{ } output>sequence ] parse-code-array ; - -: vector ( seq -- vector ) >vector ; - -: hashtable ( seq -- hashtable ) >hashtable ; - -: quotation ( seq -- vector ) >quotation ;