comparison guess.scm @ 3:70e2c306231e

- implemented dfa utility functions. - added dfa.c. - rewrote guess functions for ar, gr, hw and tr scripts with dfa utilities. - guess functions for cjk scripts too.
author Yoshiki Yazawa <yaz@cc.rim.or.jp>
date Thu, 12 Jun 2008 20:20:43 +0900
parents 754a4550c64e
children
comparison
equal deleted inserted replaced
2:754a4550c64e 3:70e2c306231e
154 (error "usage: ~a <outout-file.c>" (car args))) 154 (error "usage: ~a <outout-file.c>" (car args)))
155 (with-output-to-file (cadr args) 155 (with-output-to-file (cadr args)
156 (lambda () 156 (lambda ()
157 (print "/* State transition table for character code guessing */") 157 (print "/* State transition table for character code guessing */")
158 (print "/* This file is automatically generated by guess.scm */") 158 (print "/* This file is automatically generated by guess.scm */")
159 (print "")
160 (print "#include \"dfa.h\"")
159 (newline) 161 (newline)
160 (for-each emit-dfa-table (all-dfas)))) 162 (for-each emit-dfa-table (all-dfas))))
161 0) 163 0)
162 164
163 ;;;============================================================ 165 ;;;============================================================