basis/math/rectangles/prettyprint/prettyprint.factor

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