From 3e9593d3c00b73aecdd278468a4febab43c07317 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Wed, 28 Oct 2009 16:12:43 -0500 Subject: [PATCH 1/3] add a unit test for accumulate! --- core/sequences/sequences-tests.factor | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/core/sequences/sequences-tests.factor b/core/sequences/sequences-tests.factor index 58e61cc94c..dc99542da8 100644 --- a/core/sequences/sequences-tests.factor +++ b/core/sequences/sequences-tests.factor @@ -24,6 +24,12 @@ IN: sequences.tests [ 5040 { 1 1 2 6 24 120 720 } ] [ { 1 2 3 4 5 6 7 } 1 [ * ] accumulate ] unit-test +[ 5040 { 1 1 2 6 24 120 720 } ] +[ { 1 2 3 4 5 6 7 } 1 [ * ] accumulate! ] unit-test + +[ t ] +[ { 1 2 3 4 5 6 7 } dup 1 [ * ] accumulate! nip eq? ] unit-test + [ f f ] [ [ ] [ ] find ] unit-test [ 0 1 ] [ [ 1 ] [ ] find ] unit-test [ 1 "world" ] [ [ "hello" "world" ] [ "world" = ] find ] unit-test From 1738fb7c5e13e566ad46269d48d24b2fe05ff78b Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Wed, 28 Oct 2009 16:17:08 -0500 Subject: [PATCH 2/3] link a word in docs --- core/sequences/sequences-docs.factor | 1 + 1 file changed, 1 insertion(+) diff --git a/core/sequences/sequences-docs.factor b/core/sequences/sequences-docs.factor index 97679821ea..8851628b21 100755 --- a/core/sequences/sequences-docs.factor +++ b/core/sequences/sequences-docs.factor @@ -1630,6 +1630,7 @@ ARTICLE: "sequences-destructive" "Destructive operations" "Other destructive words:" { $subsections reverse! + append! push-all move exchange From bb0921ef42560cf3ca2c11960be447ff2ac29c36 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Wed, 28 Oct 2009 16:18:47 -0500 Subject: [PATCH 3/3] oops, cpu.arm was not loaded by default --- basis/cpu/arm/assembler/tags.txt | 1 - 1 file changed, 1 deletion(-) delete mode 100644 basis/cpu/arm/assembler/tags.txt diff --git a/basis/cpu/arm/assembler/tags.txt b/basis/cpu/arm/assembler/tags.txt deleted file mode 100644 index 6bf68304bb..0000000000 --- a/basis/cpu/arm/assembler/tags.txt +++ /dev/null @@ -1 +0,0 @@ -unportable