Muneyuki Noguchi mnogu
mnogu
/ gist:355243
Created
April 4, 2010 08:42
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (require "japanese.scm") | |
| (filter (lambda(lst) | |
| (and (= (length (car lst)) 2) | |
| (= (length (caar lst)) 2) | |
| (string=? (cadar lst) "w") | |
| (string=? (caaar lst) "w") | |
| (string=? (cadaar lst) "w"))) | |
| ja-rk-rule) |
mnogu
/ gist:355398
Created
April 4, 2010 13:30
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (define consonant? | |
| (lambda(c) | |
| (and (char-alphabetic? c) | |
| (not (find (lambda(c2) (char-ci=? c c2)) '(#\a #\e #\i #\o #\u)))))) | |
| ; (consonant? #\a) => #f | |
| ; (consonant? #\E) => #f | |
| ; (consonant? #\-) => #f | |
| ; (consonant? #\r) => #t | |
| ; (consonant? #\S) => #t |
mnogu
/ gist:362447
Created
April 11, 2010 02:22
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| 1) Failure: test default-im-for-debug | |
| /home/noguchi/uim/test//test-im.scm:261: (assert-true (uim-bool '(feature? 'debug))) | |
| expected: <#t> | |
| but was: <#f> | |
| 2) Failure: test find-im-for-locale | |
| /home/noguchi/uim/test//test-im.scm:331: (assert-equal 'm17n-zh-pinyin (uim '(im-name (find-im-for-locale "zh")))) | |
| expected: <m17n-zh-pinyin> | |
| but was: <pyunihan> |
mnogu
/ annotation.patch
Created
April 11, 2010 05:13
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| * qt4/immodule/candidatewindow.cpp | |
| - (CandidateWindow::setPage): Uncomment. | |
| - (CandidateListView::sizeHint): Adjust size. | |
| * scm/Makefile.am | |
| - (SCM_FILES): Add eb.scm. | |
| * scm/eb.scm | |
| - New file. | |
| * scm/im.scm | |
| - (create-context, release-context, get-candidate): Use eb. |
mnogu
/ annotation.patch
Created
April 18, 2010 07:05
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| * qt4/immodule/candidatewindow.cpp | |
| - (CandidateWindow::CandidateWindow): | |
| See value of "enable-annotation?" | |
| instead of "eb-enable-for-annotation?". | |
| - (CandidateWindow::setPage): Uncomment lines. | |
| - (CandidateListView::sizeHint): Adjust size. | |
| * scm/Makefile.am | |
| - (SCM_FILES): Add annotation.scm and annotation-eb.scm. | |
| * scm/annotation.scm | |
| - New file. |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #include <QtGui/QApplication> | |
| #include <QtGui/QWidget> | |
| #include <QtGui/QX11Info> | |
| #include <X11/Xutil.h> | |
| // Qt version of gtk_window_set_accept_focus(). | |
| // Qt 4.7 snapshot has Qt::WA_X11DoNotAcceptFocus. | |
| void qt_window_set_accept_focus(QWidget *window, bool setting) | |
| { |
mnogu
/ libgcroots:.git:config
Created
September 11, 2010 11:37
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| git svn clone https://uim.googlecode.com/svn/ -T trunk -b branches -t tags --ignore-paths '^(r5rs|composer|libgcroots-trunk|sigscheme-trunk|uim-chewing-trunk|vendor|wiki|tags/(gc*|libgcroots-*|openssh-*|sigscheme-*)|branches/(composer|libgcroots-*|r5rs|sigscheme-*))' uim | |
| git svn clone https://uim.googlecode.com/svn/ -T sigscheme-trunk -b branches -t tags --ignore-paths '^(composer|libgcroots-trunk|uim-chewing-trunk|vendor|wiki|tags/(gc*|libgcroots-*|openssh-*)|branches/(composer|libgcroots-*))' sigscheme | |
| git svn clone https://uim.googlecode.com/svn/ -T libgcroots-trunk -b branches -t tags --ignore-paths '^(trunk|r5rs|composer|sigscheme-trunk|uim-chewing-trunk|vendor|wiki|tags/(gc*|openssh-*|sigscheme-*|uim-*|1*)|branches/(0*|1*|composer|r5rs|sigscheme-*|uim-*))' libgcroots |
mnogu
/ gist:707806
Created
November 20, 2010 13:06
mnogu
/ gist:718098
Created
November 27, 2010 17:29
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #include <stdio.h> | |
| void bar(void) | |
| { | |
| printf("in bar\n"); | |
| } | |
| char *foo(int a, void (*func)(void)) | |
| { |
mnogu
/ gist:755183
Created
December 26, 2010 03:08
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #6 0xb2cef6af in push_back_candidate_to_array (ca=<value optimized out>, cand=0x86c2740 "<img SRC=\"\241\375\">") at skk.c:562 | |
| #7 0xb2cefbeb in compose_line_parts (di=0x86857e0, sl=0x85cc940, okuri=0x0, line= | |
| 0x86c2498 "\244\254\244\276\244\246 /\262\350\301\374/?\312\322/<img src=\\\"pic\\\\\\\">/<img src=\\\"\\\">/[[attached(,left)]]/<Img Src=\\\"\\\">/<img SRC=\"\241\375\">/[[attached( )]]/\244\324\244\276\244\246/\244\254\244\276\244\246/\245\254\245\276\245\246/") at skk.c:635 | |
| #8 0xb2cefcb2 in compose_line (di=0x86857e0, word=<value optimized out>, okuri_head=0 '\000', entry= | |
| 0x86c2498 "\244\254\244\276\244\246 /\262\350\301\374/?\312\322/<img src=\\\"pic\\\\\\\">/<img src=\\\"\\\">/[[attached(,left)]]/<Img Src=\\\"\\\">/<img SRC=\"\241\375\">/[[attached( )]]/\244\324\244\276\244\246/\244\254\244\276\244\246/\245\254\245\276\245\246/") at skk.c:706 | |
| #9 0xb2cf2915 in search_line_from_server (di=0x86857e0, s=0x8327598 "\244\254\244\276\244\246", okuri_head=0 '\000') at skk.c:825 | |
| #10 0xb2cf2cb5 i |