USING: kernel alien alien.syntax alien.c-types io ;

IN: mecab

: load-mecab-library ( -- )
    "mecab" "libmecab.dll" "cdetl" add-library ; parsing

load-mecab-library

LIBRARY: mecab

TYPEDEF: void* mecab_t*
FUNCTION: mecab_t* mecab_new2 ( char* arg ) ;
FUNCTION: char* mecab_sparse_tostr ( mecab_t* m, char* str ) ;
FUNCTION: void mecab_destroy ( mecab_t* m ) ;

"" mecab_new2
dup "「どう書く？org」へようこそ！ このサイトは出されたお題をいかに解くか競い合う、プログラマのためのコロシアムです。 投稿を試してみたい方はテスト、とりあえず眺めてみたい方は言語の一覧 がおすすめです。"
mecab_sparse_tostr
write
mecab_destroy