From 1ad78b1479f6893c5d025730b2cd9f4fa67d926b Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Fri, 5 Oct 2007 15:26:40 -0400 Subject: [PATCH] Update unit tests --- core/prettyprint/prettyprint-tests.factor | 23 ++++++++++++++++++++++- 1 file changed, 22 insertions(+), 1 deletion(-) diff --git a/core/prettyprint/prettyprint-tests.factor b/core/prettyprint/prettyprint-tests.factor index 12b70f4bc5..8e49a8dda6 100644 --- a/core/prettyprint/prettyprint-tests.factor +++ b/core/prettyprint/prettyprint-tests.factor @@ -1,7 +1,7 @@ USING: arrays definitions io.streams.string io.streams.duplex kernel math namespaces parser prettyprint prettyprint.config prettyprint.sections sequences tools.test vectors words -effects splitting generic.standard ; +effects splitting generic.standard prettyprint.private ; IN: temporary [ "4" ] [ 4 unparse ] unit-test @@ -277,3 +277,24 @@ unit-test ] unit-test [ ] [ \ effect-in synopsis drop ] unit-test + +[ [ + ] ] [ + [ \ + (step-into) ] (remove-breakpoints) +] unit-test + +[ [ (step-into) ] ] [ + [ (step-into) ] (remove-breakpoints) +] unit-test + +[ [ 3 ] ] [ + [ 3 (step-into) ] (remove-breakpoints) +] unit-test + +[ [ 2 2 + . ] ] [ + [ 2 2 \ + (step-into) . ] (remove-breakpoints) +] unit-test + +[ [ 2 2 + . ] ] [ + [ 2 break 2 \ + (step-into) . ] (remove-breakpoints) +] unit-test +