rosetta-code.balanced-brackets: adding some tests.

diff --git a/extra/rosetta-code/balanced-brackets/balanced-brackets-tests.factor b/extra/rosetta-code/balanced-brackets/balanced-brackets-tests.factor
new file mode 100644 (file)
index 0000000..2f9e351
--- /dev/null
+++ b/extra/rosetta-code/balanced-brackets/balanced-brackets-tests.factor
@@ -0,0 +1,14 @@
+USING: tools.test ;
+IN: rosetta-code.balanced-brackets
+
+{ t } [ "" balanced? ] unit-test
+{ t } [ "[]" balanced? ] unit-test
+{ t } [ "[][]" balanced? ] unit-test
+{ t } [ "[[][]]" balanced? ] unit-test
+
+{ f } [ "][" balanced? ] unit-test
+{ f } [ "][][" balanced? ] unit-test
+{ f } [ "[]][[]" balanced? ] unit-test
+
+{ t } [ "abc[]def" balanced? ] unit-test
+{ f } [ "abc][def" balanced? ] unit-test