root/lang/scheme/gauche/bindings/cabocha/trunk/cabocha.scm @ 143

Revision 89, 1.8 kB (checked in by naoya_t, 16 years ago)

cabocha: +tree +token +chunk

Line 
1;;;
2;;; cabocha
3;;;
4;;;  2009.3.15 by naoya_t
5;;;
6
7(define-module cabocha
8  (export <cabocha>
9                  cabocha?
10                  cabocha-do
11                  cabocha-new cabocha-new2
12                  cabocha-sparse-tostr cabocha-sparse-tostr2
13                  cabocha-strerror
14                  cabocha-destroy cabocha-destroyed?
15                  cabocha-sparse-totree cabocha-sparse-totree2
16
17                  cabocha-tree-new
18                  cabocha-tree-destroy
19                  cabocha-tree-empty
20                  cabocha-tree-clear
21                  cabocha-tree-clear-chunk
22                  cabocha-tree-size
23                  cabocha-tree-chunk-size
24                  cabocha-tree-token-size
25                  cabocha-tree-sentence
26                  cabocha-tree-sentence-size
27                  cabocha-tree-set-sentence
28                  cabocha-tree-read
29                  cabocha-tree-read-from-mecab-node
30                  cabocha-tree-token
31                  cabocha-tree-chunk
32                  cabocha-tree-add-token
33                  cabocha-tree-add-chunk
34                  cabocha-tree-strdup
35                  cabocha-tree-alloc
36                  cabocha-tree-tostr
37                  cabocha-tree-set-charset cabocha-tree-charset
38                  cabocha-tree-set-posset cabocha-tree-posset
39                  cabocha-tree-set-output-layer cabocha-tree-output-layer
40
41                  cabocha-learn
42                  cabocha-system-eval
43                  cabocha-model-index
44
45                  cabocha-chunk-link
46                  cabocha-chunk-head-pos cabocha-chunk-func-pos
47                  cabocha-chunk-token-size cabocha-chunk-token-pos
48                  cabocha-chunk-score
49                  cabocha-chunk-feature-list cabocha-chunk-feature-list-size
50
51                  cabocha-token-surface
52                  cabocha-token-normalized-surface
53                  cabocha-token-feature
54                  cabocha-token-feature-list
55                  cabocha-token-feature-list-size
56                  cabocha-token-ne
57                  cabocha-token-chunk
58          ))
59
60(select-module cabocha)
61
62;; Loads extension
63(dynamic-load "cabocha")
64
65;;
66;; Put your Scheme definitions here
67;;
68(define-macro (cabocha? obj) `(is-a? ,obj <cabocha>))
69
70(define-method write-object ((m <cabocha>) out)
71  (format out "#<cabocha>"))
72
73(define-reader-ctor '<cabocha>
74  (lambda args (apply cabocha-new args)))
75
76
77;; Epilogue
78(provide "cabocha")
79
80
Note: See TracBrowser for help on using the browser.