Slava,
We've talked about a 'to-string' word before (such as from 'builder.util').
Using this, ppm-header would be:
: ppm-header ( data -- data )
{ "P6\n" width " " height "\n255\n" } to-string append! ; inline
Assuming that the byte vector is on the stack.
Ed
-------------------------------------------------------------------------
This SF.Net email is sponsored by the Moblin Your Move Developer's challenge
Build the coolest Linux based applications with Moblin SDK & win great prizes
Grand prize is a trip for two to an Open Source event anywhere in the world
http://moblin-contest.org/redirect.php?banner_id=100&url=/
_______________________________________________
Factor-talk mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/factor-talk
