steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity
factor/basis/specialized-arrays/prettyprint/prettyprint.factor

16 lines
506 B
Factor
Raw Normal View History

specialized-arrays.direct is no more; instead, every specialized-array.<foo> vocabulary has a <direct-T-array> constructor
2009-09-04 23:01:55 -04:00
! Copyright (C) 2009 Joe Groff.
! See http://factorcode.org/license.txt for BSD license.
specialized-arrays: performed some cleanup. Specifically, • Created >c-array to be replacement for >T-array. • Created cast-array to be generic replacement for all T-array-cast words. • Created c-array@ to be generic replacement for T-array@ words. • Replaced usages of <T-array> with T <c-array> • Replaced usages of <direct-T-array> with T <c-direct-array> • Replaced usages of >T-array with T >c-array • Replaced usages of T-array-cast with T cast-array • Replaced usages of malloc-T-array with T malloc-array. • Removed malloc-T-array. • Removed T-array-cast. • Removed T-array@. • Removed >T-array. I also added (but didn't change any code to use): • T c-array-type, returns T-array • T c-array?, returns T-array? • c-array{ T ... }, returns T-array{ ... } Bootstraps just find on Mac OS X. Also `load-all test-all` works for me.
2011-09-25 14:49:27 -04:00
USING: accessors alien.data kernel prettyprint.backend
specialized-arrays.direct is no more; instead, every specialized-array.<foo> vocabulary has a <direct-T-array> constructor
2009-09-04 23:01:55 -04:00
prettyprint.sections prettyprint.custom
specialized-arrays ;
IN: specialized-arrays.prettyprint
: pprint-direct-array ( direct-array -- )
specialized-arrays: performed some cleanup. Specifically, • Created >c-array to be replacement for >T-array. • Created cast-array to be generic replacement for all T-array-cast words. • Created c-array@ to be generic replacement for T-array@ words. • Replaced usages of <T-array> with T <c-array> • Replaced usages of <direct-T-array> with T <c-direct-array> • Replaced usages of >T-array with T >c-array • Replaced usages of T-array-cast with T cast-array • Replaced usages of malloc-T-array with T malloc-array. • Removed malloc-T-array. • Removed T-array-cast. • Removed T-array@. • Removed >T-array. I also added (but didn't change any code to use): • T c-array-type, returns T-array • T c-array?, returns T-array? • c-array{ T ... }, returns T-array{ ... } Bootstraps just find on Mac OS X. Also `load-all test-all` works for me.
2011-09-25 14:49:27 -04:00
\ c-array@ [
[ underlying-type ] [ underlying>> ] [ length>> ] tri
[ pprint* ] tri@
] pprint-prefix ;
specialized-arrays.direct is no more; instead, every specialized-array.<foo> vocabulary has a <direct-T-array> constructor
2009-09-04 23:01:55 -04:00
M: specialized-array pprint*
[ pprint-object ] [ pprint-direct-array ] pprint-c-object ;