On 2-Apr-07, at 8:48 AM, Anton Rolls wrote: > : stream-callback ( -- object ) "char" { "void*" "void*" "int" > "void*" } > "stdcall" [ > "callbacked" . > ! drop "len: " write . 2drop > 1 ! return TRUE to continue the stream > ] alien-callback ;
This doesn't print anything; try "callbacked" print flush Slava ------------------------------------------------------------------------- Take Surveys. Earn Cash. Influence the Future of IT Join SourceForge.net's Techsay panel and you'll get the chance to share your opinions on IT & business topics through brief surveys-and earn cash http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV _______________________________________________ Factor-talk mailing list Factor-talk@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/factor-talk