math.rectangles: no prettyprint.

locals-and-roots
Doug Coleman 2016-06-07 09:57:53 -07:00
parent 1952db54bc
commit 516073cbd0
4 changed files with 0 additions and 19 deletions

View File

@ -1 +0,0 @@
Slava Pestov

View File

@ -1,11 +0,0 @@
! Copyright (C) 2009, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors math.rectangles kernel prettyprint.custom prettyprint.backend ;
in: math.rectangles.prettyprint
M: rect pprint*
[
\ RECT: [
[ loc>> ] [ dim>> ] bi [ pprint* ] bi@
] pprint-prefix
] check-recursion ;

View File

@ -41,6 +41,3 @@ in: math.rectangles.tests
{ 30 30 }
} rect-containing
] unit-test
! Prettyprint for rect{ didn't do nesting check properly
{ } [ [ rect{ { 1 2 } { 3 4 } } dup >>dim . ] with-string-writer drop ] unit-test

View File

@ -66,7 +66,3 @@ M: rect contains-point?
[ [ loc>> ] dip loc<< ]
[ [ dim>> ] dip dim<< ]
2bi ; inline
use: vocabs.loader
{ "math.rectangles" "prettyprint" } "math.rectangles.prettyprint" require-when