Revision: 5984 Author: iratqq Date: Mon Aug 17 04:52:25 2009 Log: * scm/wnn.scm (wnn-context-rec-spec): - Oops, add prediction-appendix. (wnn-lib-release-context): - Reorder destroy-close.
http://code.google.com/p/uim/source/detail?r=5984 Modified: /trunk/scm/wnn.scm ======================================= --- /trunk/scm/wnn.scm Mon Aug 17 04:25:12 2009 +++ /trunk/scm/wnn.scm Mon Aug 17 04:52:25 2009 @@ -60,11 +60,10 @@ (wnn-lib-candidate-info wc-ctx #t) (wnn-lib-get-candidate wc-ctx nth))) (define (wnn-lib-release-context wc) -; (let ((wc-ctx (wnn-context-wc-ctx wc))) -; (wnn-lib-close (wnn-context-wnn-buf wc)) -; (wnn-lib-destroy-buffer wc-ctx #t) -; (wnn-context-set-wc-ctx! wc #f))) - #t) + (let ((wc-ctx (wnn-context-wc-ctx wc))) + (wnn-lib-destroy-buffer wc-ctx #t) + (wnn-lib-close (wnn-context-wnn-buf wc)) + (wnn-context-set-wc-ctx! wc #f))) (define (wnn-lib-get-unconv-candidate wc seg-idx) (let ((wc-ctx (wnn-context-wc-ctx wc))) (wnn-move wc-ctx seg-idx) @@ -350,6 +349,7 @@ (list 'prediction-ctx #f) (list 'prediction-word '()) (list 'prediction-candidates '()) + (list 'prediction-appendix '()) (list 'prediction-nr '()) (list 'prediction-window #f) (list 'prediction-index #f)
