modules/ime.lisp

   1
   2 (cl:in-package w32apimod)
   3
   4 (define-w32api-module ime :ime)
   5
   6 (cl:in-package cl-w32api.module.ime)
   7
   8
   9 (defconstant-exported WM_CONVERTREQUESTEX #x108)
  10
  11 (defconstant-exported WM_IME_STARTCOMPOSITION #x10D)
  12
  13 (defconstant-exported WM_IME_ENDCOMPOSITION #x10E)
  14
  15 (defconstant-exported WM_IME_COMPOSITION #x10F)
  16
  17 (defconstant-exported WM_IME_KEYLAST #x10F)
  18
  19 (defconstant-exported WM_IME_SETCONTEXT #x281)
  20
  21 (defconstant-exported WM_IME_NOTIFY #x282)
  22
  23 (defconstant-exported WM_IME_CONTROL #x283)
  24
  25 (defconstant-exported WM_IME_COMPOSITIONFULL #x284)
  26
  27 (defconstant-exported WM_IME_SELECT #x285)
  28
  29 (defconstant-exported WM_IME_CHAR #x286)
  30
  31 (defconstant-exported WM_IME_KEYDOWN #x290)
  32
  33 (defconstant-exported WM_IME_KEYUP #x291)
  34
  35 (defconstant-exported IMC_GETCANDIDATEPOS 7)
  36
  37 (defconstant-exported IMC_SETCANDIDATEPOS 8)
  38
  39 (defconstant-exported IMC_GETCOMPOSITIONFONT 9)
  40
  41 (defconstant-exported IMC_SETCOMPOSITIONFONT 10)
  42
  43 (defconstant-exported IMC_GETCOMPOSITIONWINDOW 11)
  44
  45 (defconstant-exported IMC_SETCOMPOSITIONWINDOW 12)
  46
  47 (defconstant-exported IMC_GETSTATUSWINDOWPOS 15)
  48
  49 (defconstant-exported IMC_SETSTATUSWINDOWPOS 16)
  50
  51 (defconstant-exported IMC_CLOSESTATUSWINDOW #x21)
  52
  53 (defconstant-exported IMC_OPENSTATUSWINDOW #x22)
  54
  55 (defconstant-exported IMN_CLOSESTATUSWINDOW 1)
  56
  57 (defconstant-exported IMN_OPENSTATUSWINDOW 2)
  58
  59 (defconstant-exported IMN_CHANGECANDIDATE 3)
  60
  61 (defconstant-exported IMN_CLOSECANDIDATE 4)
  62
  63 (defconstant-exported IMN_OPENCANDIDATE 5)
  64
  65 (defconstant-exported IMN_SETCONVERSIONMODE 6)
  66
  67 (defconstant-exported IMN_SETSENTENCEMODE 7)
  68
  69 (defconstant-exported IMN_SETOPENSTATUS 8)
  70
  71 (defconstant-exported IMN_SETCANDIDATEPOS 9)
  72
  73 (defconstant-exported IMN_SETCOMPOSITIONFONT 10)
  74
  75 (defconstant-exported IMN_SETCOMPOSITIONWINDOW 11)
  76
  77 (defconstant-exported IMN_SETSTATUSWINDOWPOS 12)
  78
  79 (defconstant-exported IMN_GUIDELINE 13)
  80
  81 (defconstant-exported IMN_PRIVATE 14)
  82
  83 (defconstant-exported NI_OPENCANDIDATE 16)
  84
  85 (defconstant-exported NI_CLOSECANDIDATE 17)
  86
  87 (defconstant-exported NI_SELECTCANDIDATESTR 18)
  88
  89 (defconstant-exported NI_CHANGECANDIDATELIST 19)
  90
  91 (defconstant-exported NI_FINALIZECONVERSIONRESULT 20)
  92
  93 (defconstant-exported NI_COMPOSITIONSTR 21)
  94
  95 (defconstant-exported NI_SETCANDIDATE_PAGESTART 22)
  96
  97 (defconstant-exported NI_SETCANDIDATE_PAGESIZE 23)
  98
  99 (defconstant-exported NI_IMEMENUSELECTED 24)
 100
 101 (defconstant-exported ISC_SHOWUICANDIDATEWINDOW 1)
 102
 103 (defconstant-exported ISC_SHOWUICOMPOSITIONWINDOW #x80000000)
 104
 105 (defconstant-exported ISC_SHOWUIGUIDELINE #x40000000)
 106
 107 (defconstant-exported ISC_SHOWUIALLCANDIDATEWINDOW 15)
 108
 109 (defconstant-exported ISC_SHOWUIALL #xC000000F)
 110
 111 (defconstant-exported CPS_COMPLETE 1)
 112
 113 (defconstant-exported CPS_CONVERT 2)
 114
 115 (defconstant-exported CPS_REVERT 3)
 116
 117 (defconstant-exported CPS_CANCEL 4)
 118
 119 (defconstant-exported IME_CHOTKEY_IME_NONIME_TOGGLE 16)
 120
 121 (defconstant-exported IME_CHOTKEY_SHAPE_TOGGLE 17)
 122
 123 (defconstant-exported IME_CHOTKEY_SYMBOL_TOGGLE 18)
 124
 125 (defconstant-exported IME_JHOTKEY_CLOSE_OPEN #x30)
 126
 127 (defconstant-exported IME_KHOTKEY_SHAPE_TOGGLE #x50)
 128
 129 (defconstant-exported IME_KHOTKEY_HANJACONVERT #x51)
 130
 131 (defconstant-exported IME_KHOTKEY_ENGLISH #x52)
 132
 133 (defconstant-exported IME_THOTKEY_IME_NONIME_TOGGLE #x70)
 134
 135 (defconstant-exported IME_THOTKEY_SHAPE_TOGGLE #x71)
 136
 137 (defconstant-exported IME_THOTKEY_SYMBOL_TOGGLE #x72)
 138
 139 (defconstant-exported IME_HOTKEY_DSWITCH_FIRST 256)
 140
 141 (defconstant-exported IME_HOTKEY_DSWITCH_LAST #x11F)
 142
 143 (defconstant-exported IME_ITHOTKEY_RESEND_RESULTSTR 512)
 144
 145 (defconstant-exported IME_ITHOTKEY_PREVIOUS_COMPOSITION 513)
 146
 147 (defconstant-exported IME_ITHOTKEY_UISTYLE_TOGGLE 514)
 148
 149 (defconstant-exported GCS_COMPREADSTR 1)
 150
 151 (defconstant-exported GCS_COMPREADATTR 2)
 152
 153 (defconstant-exported GCS_COMPREADCLAUSE 4)
 154
 155 (defconstant-exported GCS_COMPSTR 8)
 156
 157 (defconstant-exported GCS_COMPATTR 16)
 158
 159 (defconstant-exported GCS_COMPCLAUSE 32)
 160
 161 (defconstant-exported GCS_CURSORPOS 128)
 162
 163 (defconstant-exported GCS_DELTASTART 256)
 164
 165 (defconstant-exported GCS_RESULTREADSTR 512)
 166
 167 (defconstant-exported GCS_RESULTREADCLAUSE 1024)
 168
 169 (defconstant-exported GCS_RESULTSTR 2048)
 170
 171 (defconstant-exported GCS_RESULTCLAUSE 4096)
 172
 173 (defconstant-exported CS_INSERTCHAR #x2000)
 174
 175 (defconstant-exported CS_NOMOVECARET #x4000)
 176
 177 (defconstant-exported IMEVER_0310 #x3000A)
 178
 179 (defconstant-exported IMEVER_0400 #x40000)
 180
 181 (defconstant-exported IME_PROP_AT_CARET #x10000)
 182
 183 (defconstant-exported IME_PROP_SPECIAL_UI #x20000)
 184
 185 (defconstant-exported IME_PROP_CANDLIST_START_FROM_1 #x40000)
 186
 187 (defconstant-exported IME_PROP_UNICODE #x80000)
 188
 189 (defconstant-exported UI_CAP_2700 1)
 190
 191 (defconstant-exported UI_CAP_ROT90 2)
 192
 193 (defconstant-exported UI_CAP_ROTANY 4)
 194
 195 (defconstant-exported SCS_CAP_COMPSTR 1)
 196
 197 (defconstant-exported SCS_CAP_MAKEREAD 2)
 198
 199 (defconstant-exported SELECT_CAP_CONVERSION 1)
 200
 201 (defconstant-exported SELECT_CAP_SENTENCE 2)
 202
 203 (defconstant-exported GGL_LEVEL 1)
 204
 205 (defconstant-exported GGL_INDEX 2)
 206
 207 (defconstant-exported GGL_STRING 3)
 208
 209 (defconstant-exported GGL_PRIVATE 4)
 210
 211 (defconstant-exported GL_LEVEL_NOGUIDELINE 0)
 212
 213 (defconstant-exported GL_LEVEL_FATAL 1)
 214
 215 (defconstant-exported GL_LEVEL_ERROR 2)
 216
 217 (defconstant-exported GL_LEVEL_WARNING 3)
 218
 219 (defconstant-exported GL_LEVEL_INFORMATION 4)
 220
 221 (defconstant-exported GL_ID_UNKNOWN 0)
 222
 223 (defconstant-exported GL_ID_NOMODULE 1)
 224
 225 (defconstant-exported GL_ID_NODICTIONARY 16)
 226
 227 (defconstant-exported GL_ID_CANNOTSAVE 17)
 228
 229 (defconstant-exported GL_ID_NOCONVERT 32)
 230
 231 (defconstant-exported GL_ID_TYPINGERROR 33)
 232
 233 (defconstant-exported GL_ID_TOOMANYSTROKE 34)
 234
 235 (defconstant-exported GL_ID_READINGCONFLICT 35)
 236
 237 (defconstant-exported GL_ID_INPUTREADING 36)
 238
 239 (defconstant-exported GL_ID_INPUTRADICAL 37)
 240
 241 (defconstant-exported GL_ID_INPUTCODE 38)
 242
 243 (defconstant-exported GL_ID_INPUTSYMBOL 39)
 244
 245 (defconstant-exported GL_ID_CHOOSECANDIDATE 40)
 246
 247 (defconstant-exported GL_ID_REVERSECONVERSION 41)
 248
 249 (defconstant-exported GL_ID_PRIVATE_FIRST #x8000)
 250
 251 (defconstant-exported GL_ID_PRIVATE_LAST #xFFFF)
 252
 253 (defconstant-exported IGP_PROPERTY 4)
 254
 255 (defconstant-exported IGP_CONVERSION 8)
 256
 257 (defconstant-exported IGP_SENTENCE 12)
 258
 259 (defconstant-exported IGP_UI 16)
 260
 261 (defconstant-exported IGP_SETCOMPSTR #x14)
 262
 263 (defconstant-exported IGP_SELECT #x18)
 264
 265 (defconstant-exported SCS_SETSTR (cl:logior 1 8))
 266
 267 (defconstant-exported SCS_CHANGEATTR (cl:logior 2 16))
 268
 269 (defconstant-exported SCS_CHANGECLAUSE (cl:logior 4 32))
 270
 271 (defconstant-exported ATTR_INPUT 0)
 272
 273 (defconstant-exported ATTR_TARGET_CONVERTED 1)
 274
 275 (defconstant-exported ATTR_CONVERTED 2)
 276
 277 (defconstant-exported ATTR_TARGET_NOTCONVERTED 3)
 278
 279 (defconstant-exported ATTR_INPUT_ERROR 4)
 280
 281 (defconstant-exported ATTR_FIXEDCONVERTED 5)
 282
 283 (defconstant-exported CFS_DEFAULT 0)
 284
 285 (defconstant-exported CFS_RECT 1)
 286
 287 (defconstant-exported CFS_POINT 2)
 288
 289 (defconstant-exported CFS_SCREEN 4)
 290
 291 (defconstant-exported CFS_FORCE_POSITION 32)
 292
 293 (defconstant-exported CFS_CANDIDATEPOS 64)
 294
 295 (defconstant-exported CFS_EXCLUDE 128)
 296
 297 (defconstant-exported GCL_CONVERSION 1)
 298
 299 (defconstant-exported GCL_REVERSECONVERSION 2)
 300
 301 (defconstant-exported GCL_REVERSE_LENGTH 3)
 302
 303 (defconstant-exported IME_CMODE_ALPHANUMERIC 0)
 304
 305 (defconstant-exported IME_CMODE_NATIVE 1)
 306
 307 (defconstant-exported IME_CMODE_CHINESE 1)
 308
 309 (defconstant-exported IME_CMODE_HANGEUL 1)
 310
 311 (defconstant-exported IME_CMODE_HANGUL 1)
 312
 313 (defconstant-exported IME_CMODE_JAPANESE 1)
 314
 315 (defconstant-exported IME_CMODE_KATAKANA 2)
 316
 317 (defconstant-exported IME_CMODE_LANGUAGE 3)
 318
 319 (defconstant-exported IME_CMODE_FULLSHAPE 8)
 320
 321 (defconstant-exported IME_CMODE_ROMAN 16)
 322
 323 (defconstant-exported IME_CMODE_CHARCODE 32)
 324
 325 (defconstant-exported IME_CMODE_HANJACONVERT 64)
 326
 327 (defconstant-exported IME_CMODE_SOFTKBD 128)
 328
 329 (defconstant-exported IME_CMODE_NOCONVERSION 256)
 330
 331 (defconstant-exported IME_CMODE_EUDC 512)
 332
 333 (defconstant-exported IME_CMODE_SYMBOL 1024)
 334
 335 (defconstant-exported IME_CMODE_FIXED 2048)
 336
 337 (defconstant-exported IME_SMODE_NONE 0)
 338
 339 (defconstant-exported IME_SMODE_PLAURALCLAUSE 1)
 340
 341 (defconstant-exported IME_SMODE_SINGLECONVERT 2)
 342
 343 (defconstant-exported IME_SMODE_AUTOMATIC 4)
 344
 345 (defconstant-exported IME_SMODE_PHRASEPREDICT 8)
 346
 347 (defconstant-exported IME_CAND_UNKNOWN 0)
 348
 349 (defconstant-exported IME_CAND_READ 1)
 350
 351 (defconstant-exported IME_CAND_CODE 2)
 352
 353 (defconstant-exported IME_CAND_MEANING 3)
 354
 355 (defconstant-exported IME_CAND_RADICAL 4)
 356
 357 (defconstant-exported IME_CAND_STROKE 5)
 358
 359 (defconstant-exported IMM_ERROR_NODATA -1)
 360
 361 (defconstant-exported IMM_ERROR_GENERAL -2)
 362
 363 (defconstant-exported IME_CONFIG_GENERAL 1)
 364
 365 (defconstant-exported IME_CONFIG_REGISTERWORD 2)
 366
 367 (defconstant-exported IME_CONFIG_SELECTDICTIONARY 3)
 368
 369 (defconstant-exported IME_ESC_QUERY_SUPPORT 3)
 370
 371 (defconstant-exported IME_ESC_RESERVED_FIRST 4)
 372
 373 (defconstant-exported IME_ESC_RESERVED_LAST #x7FF)
 374
 375 (defconstant-exported IME_ESC_PRIVATE_FIRST #x800)
 376
 377 (defconstant-exported IME_ESC_PRIVATE_LAST #xFFF)
 378
 379 (defconstant-exported IME_ESC_SEQUENCE_TO_INTERNAL #x1001)
 380
 381 (defconstant-exported IME_ESC_GET_EUDC_DICTIONARY #x1003)
 382
 383 (defconstant-exported IME_ESC_SET_EUDC_DICTIONARY #x1004)
 384
 385 (defconstant-exported IME_ESC_MAX_KEY #x1005)
 386
 387 (defconstant-exported IME_ESC_IME_NAME #x1006)
 388
 389 (defconstant-exported IME_ESC_SYNC_HOTKEY #x1007)
 390
 391 (defconstant-exported IME_ESC_HANJA_MODE #x1008)
 392
 393 (defconstant-exported IME_ESC_AUTOMATA #x1009)
 394
 395 (defconstant-exported IME_REGWORD_STYLE_EUDC 1)
 396
 397 (defconstant-exported IME_REGWORD_STYLE_USER_FIRST #x80000000)
 398
 399 (defconstant-exported IME_REGWORD_STYLE_USER_LAST #xFFFFFFFF)
 400
 401 (defconstant-exported SOFTKEYBOARD_TYPE_T1 1)
 402
 403 (defconstant-exported SOFTKEYBOARD_TYPE_C1 2)
 404
 405 (defconstant-exported IMEMENUITEM_STRING_SIZE 80)
 406
 407 (defconstant-exported IACE_CHILDREN 1)
 408
 409 (defconstant-exported IACE_DEFAULT 16)
 410
 411 (defconstant-exported IACE_IGNORENOCONTEXT 32)
 412
 413 (defconstant-exported IGIMIF_RIGHTMENU 1)
 414
 415 (defconstant-exported IGIMII_CMODE 1)
 416
 417 (defconstant-exported IGIMII_SMODE 2)
 418
 419 (defconstant-exported IGIMII_CONFIGURE 4)
 420
 421 (defconstant-exported IGIMII_TOOLS 8)
 422
 423 (defconstant-exported IGIMII_HELP 16)
 424
 425 (defconstant-exported IGIMII_OTHER 32)
 426
 427 (defconstant-exported IGIMII_INPUTTOOLS 64)
 428
 429 (defconstant-exported IMFT_RADIOCHECK 1)
 430
 431 (defconstant-exported IMFT_SEPARATOR 2)
 432
 433 (defconstant-exported IMFT_SUBMENU 4)
 434
 435 (defconstant-exported IMFS_GRAYED 3)
 436
 437 (defconstant-exported IMFS_DISABLED 3)
 438
 439 (defconstant-exported IMFS_CHECKED 8)
 440
 441 (defconstant-exported IMFS_HILITE 128)
 442
 443 (defconstant-exported IMFS_ENABLED 0)
 444
 445 (defconstant-exported IMFS_UNCHECKED 0)
 446
 447 (defconstant-exported IMFS_UNHILITE 0)
 448
 449 (defconstant-exported IMFS_DEFAULT 4096)
 450
 451 (defconstant-exported STYLE_DESCRIPTION_SIZE 32)
 452
 453
 454
 455
 456
 457
 458
 459 (defcstructex-exported COMPOSITIONFORM
 460         (dwStyle :unsigned-long)
 461         (ptCurrentPos (:inline POINT))
 462         (rcArea (:inline RECT)))
 463
 464
 465
 466
 467
 468
 469
 470 (defcstructex-exported CANDIDATEFORM
 471         (dwIndex :unsigned-long)
 472         (dwStyle :unsigned-long)
 473         (ptCurrentPos (:inline POINT))
 474         (rcArea (:inline RECT)))
 475
 476
 477
 478
 479
 480
 481
 482 (defcstructex-exported CANDIDATELIST
 483         (dwSize :unsigned-long)
 484         (dwStyle :unsigned-long)
 485         (dwCount :unsigned-long)
 486         (dwSelection :unsigned-long)
 487         (dwPageStart :unsigned-long)
 488         (dwPageSize :unsigned-long)
 489         (dwOffset :pointer))
 490
 491
 492
 493
 494
 495
 496
 497 (defcstructex-exported REGISTERWORDA
 498         (lpReading :string)
 499         (lpWord :string))
 500
 501
 502
 503
 504
 505
 506
 507 (defcstructex-exported REGISTERWORDW
 508         (lpReading :pointer)
 509         (lpWord :pointer))
 510
 511
 512
 513
 514
 515
 516
 517 (defcstructex-exported STYLEBUFA
 518         (dwStyle :unsigned-long)
 519         (szDescription :pointer))
 520
 521
 522
 523
 524
 525
 526
 527 (defcstructex-exported STYLEBUFW
 528         (dwStyle :unsigned-long)
 529         (szDescription :pointer))
 530
 531
 532
 533
 534
 535
 536
 537 (defcstructex-exported IMEMENUITEMINFOA
 538         (cbSize :unsigned-int)
 539         (fType :unsigned-int)
 540         (fState :unsigned-int)
 541         (wID :unsigned-int)
 542         (hbmpChecked :pointer)
 543         (hbmpUnchecked :pointer)
 544         (dwItemData :unsigned-long)
 545         (szString :pointer)
 546         (hbmpItem :pointer))
 547
 548
 549
 550
 551
 552
 553
 554 (defcstructex-exported IMEMENUITEMINFOW
 555         (cbSize :unsigned-int)
 556         (fType :unsigned-int)
 557         (fState :unsigned-int)
 558         (wID :unsigned-int)
 559         (hbmpChecked :pointer)
 560         (hbmpUnchecked :pointer)
 561         (dwItemData :unsigned-long)
 562         (szString :pointer)
 563         (hbmpItem :pointer))
 564
 565
 566
 567
 568
 569
 570
 571
 572
 573
 574
 575
 576
 577
 578
 579
 580
 581
 582
 583
 584
 585
 586
 587
 588
 589
 590
 591
 592
 593 (defcfunex-exported ("ImmInstallIMEA" ImmInstallIMEA :convention :stdcall) :pointer
 594   (arg0 :string)
 595   (arg1 :string))
 596
 597 (defcfunex-exported ("ImmInstallIMEW" ImmInstallIMEW :convention :stdcall) :pointer
 598   (arg0 :pointer)
 599   (arg1 :pointer))
 600
 601 (defcfunex-exported ("ImmGetDefaultIMEWnd" ImmGetDefaultIMEWnd :convention :stdcall) :pointer
 602   (arg0 :pointer))
 603
 604 (defcfunex-exported ("ImmGetDescriptionA" ImmGetDescriptionA :convention :stdcall) :unsigned-int
 605   (arg0 :pointer)
 606   (arg1 :string)
 607   (arg2 :unsigned-int))
 608
 609 (defcfunex-exported ("ImmGetDescriptionW" ImmGetDescriptionW :convention :stdcall) :unsigned-int
 610   (arg0 :pointer)
 611   (arg1 :pointer)
 612   (arg2 :unsigned-int))
 613
 614 (defcfunex-exported ("ImmGetIMEFileNameA" ImmGetIMEFileNameA :convention :stdcall) :unsigned-int
 615   (arg0 :pointer)
 616   (arg1 :string)
 617   (arg2 :unsigned-int))
 618
 619 (defcfunex-exported ("ImmGetIMEFileNameW" ImmGetIMEFileNameW :convention :stdcall) :unsigned-int
 620   (arg0 :pointer)
 621   (arg1 :pointer)
 622   (arg2 :unsigned-int))
 623
 624 (defcfunex-exported ("ImmGetProperty" ImmGetProperty :convention :stdcall) :unsigned-long
 625   (arg0 :pointer)
 626   (arg1 :unsigned-long))
 627
 628 (defcfunex-exported ("ImmIsIME" ImmIsIME :convention :stdcall) :int
 629   (arg0 :pointer))
 630
 631 (defcfunex-exported ("ImmSimulateHotKey" ImmSimulateHotKey :convention :stdcall) :int
 632   (arg0 :pointer)
 633   (arg1 :unsigned-long))
 634
 635 (defcfunex-exported ("ImmCreateContext" ImmCreateContext :convention :stdcall) :unsigned-long)
 636
 637 (defcfunex-exported ("ImmDestroyContext" ImmDestroyContext :convention :stdcall) :int
 638   (arg0 :unsigned-long))
 639
 640 (defcfunex-exported ("ImmGetContext" ImmGetContext :convention :stdcall) :unsigned-long
 641   (arg0 :pointer))
 642
 643 (defcfunex-exported ("ImmReleaseContext" ImmReleaseContext :convention :stdcall) :int
 644   (arg0 :pointer)
 645   (arg1 :unsigned-long))
 646
 647 (defcfunex-exported ("ImmAssociateContext" ImmAssociateContext :convention :stdcall) :unsigned-long
 648   (arg0 :pointer)
 649   (arg1 :unsigned-long))
 650
 651 (defcfunex-exported ("ImmGetCompositionStringA" ImmGetCompositionStringA :convention :stdcall) :int32
 652   (arg0 :unsigned-long)
 653   (arg1 :unsigned-long)
 654   (arg2 :pointer)
 655   (arg3 :unsigned-long))
 656
 657 (defcfunex-exported ("ImmGetCompositionStringW" ImmGetCompositionStringW :convention :stdcall) :int32
 658   (arg0 :unsigned-long)
 659   (arg1 :unsigned-long)
 660   (arg2 :pointer)
 661   (arg3 :unsigned-long))
 662
 663 (defcfunex-exported ("ImmSetCompositionStringA" ImmSetCompositionStringA :convention :stdcall) :int
 664   (arg0 :unsigned-long)
 665   (arg1 :unsigned-long)
 666   (arg2 :pointer)
 667   (arg3 :unsigned-long)
 668   (arg4 :pointer)
 669   (arg5 :unsigned-long))
 670
 671 (defcfunex-exported ("ImmSetCompositionStringW" ImmSetCompositionStringW :convention :stdcall) :int
 672   (arg0 :unsigned-long)
 673   (arg1 :unsigned-long)
 674   (arg2 :pointer)
 675   (arg3 :unsigned-long)
 676   (arg4 :pointer)
 677   (arg5 :unsigned-long))
 678
 679 (defcfunex-exported ("ImmGetCandidateListCountA" ImmGetCandidateListCountA :convention :stdcall) :unsigned-long
 680   (arg0 :unsigned-long)
 681   (arg1 :pointer))
 682
 683 (defcfunex-exported ("ImmGetCandidateListCountW" ImmGetCandidateListCountW :convention :stdcall) :unsigned-long
 684   (arg0 :unsigned-long)
 685   (arg1 :pointer))
 686
 687 (defcfunex-exported ("ImmGetCandidateListA" ImmGetCandidateListA :convention :stdcall) :unsigned-long
 688   (arg0 :unsigned-long)
 689   (arg1 :unsigned-long)
 690   (arg2 :pointer)
 691   (arg3 :unsigned-long))
 692
 693 (defcfunex-exported ("ImmGetCandidateListW" ImmGetCandidateListW :convention :stdcall) :unsigned-long
 694   (arg0 :unsigned-long)
 695   (arg1 :unsigned-long)
 696   (arg2 :pointer)
 697   (arg3 :unsigned-long))
 698
 699 (defcfunex-exported ("ImmGetGuideLineA" ImmGetGuideLineA :convention :stdcall) :unsigned-long
 700   (arg0 :unsigned-long)
 701   (arg1 :unsigned-long)
 702   (arg2 :string)
 703   (arg3 :unsigned-long))
 704
 705 (defcfunex-exported ("ImmGetGuideLineW" ImmGetGuideLineW :convention :stdcall) :unsigned-long
 706   (arg0 :unsigned-long)
 707   (arg1 :unsigned-long)
 708   (arg2 :pointer)
 709   (arg3 :unsigned-long))
 710
 711 (defcfunex-exported ("ImmGetConversionStatus" ImmGetConversionStatus :convention :stdcall) :int
 712   (arg0 :unsigned-long)
 713   (arg1 :pointer)
 714   (arg2 :pointer))
 715
 716 (defcfunex-exported ("ImmSetConversionStatus" ImmSetConversionStatus :convention :stdcall) :int
 717   (arg0 :unsigned-long)
 718   (arg1 :unsigned-long)
 719   (arg2 :unsigned-long))
 720
 721 (defcfunex-exported ("ImmGetOpenStatus" ImmGetOpenStatus :convention :stdcall) :int
 722   (arg0 :unsigned-long))
 723
 724 (defcfunex-exported ("ImmSetOpenStatus" ImmSetOpenStatus :convention :stdcall) :int
 725   (arg0 :unsigned-long)
 726   (arg1 :int))
 727
 728 (defcfunex-exported ("ImmGetCompositionFontA" ImmGetCompositionFontA :convention :stdcall) :int
 729   (arg0 :unsigned-long)
 730   (arg1 :pointer))
 731
 732 (defcfunex-exported ("ImmGetCompositionFontW" ImmGetCompositionFontW :convention :stdcall) :int
 733   (arg0 :unsigned-long)
 734   (arg1 :pointer))
 735
 736 (defcfunex-exported ("ImmSetCompositionFontA" ImmSetCompositionFontA :convention :stdcall) :int
 737   (arg0 :unsigned-long)
 738   (arg1 :pointer))
 739
 740 (defcfunex-exported ("ImmSetCompositionFontW" ImmSetCompositionFontW :convention :stdcall) :int
 741   (arg0 :unsigned-long)
 742   (arg1 :pointer))
 743
 744 (defcfunex-exported ("ImmConfigureIMEA" ImmConfigureIMEA :convention :stdcall) :int
 745   (arg0 :pointer)
 746   (arg1 :pointer)
 747   (arg2 :unsigned-long)
 748   (arg3 :pointer))
 749
 750 (defcfunex-exported ("ImmConfigureIMEW" ImmConfigureIMEW :convention :stdcall) :int
 751   (arg0 :pointer)
 752   (arg1 :pointer)
 753   (arg2 :unsigned-long)
 754   (arg3 :pointer))
 755
 756 (defcfunex-exported ("ImmEscapeA" ImmEscapeA :convention :stdcall) :int32
 757   (arg0 :pointer)
 758   (arg1 :unsigned-long)
 759   (arg2 :unsigned-int)
 760   (arg3 :pointer))
 761
 762 (defcfunex-exported ("ImmEscapeW" ImmEscapeW :convention :stdcall) :int32
 763   (arg0 :pointer)
 764   (arg1 :unsigned-long)
 765   (arg2 :unsigned-int)
 766   (arg3 :pointer))
 767
 768 (defcfunex-exported ("ImmGetConversionListA" ImmGetConversionListA :convention :stdcall) :unsigned-long
 769   (arg0 :pointer)
 770   (arg1 :unsigned-long)
 771   (arg2 :string)
 772   (arg3 :pointer)
 773   (arg4 :unsigned-long)
 774   (arg5 :unsigned-int))
 775
 776 (defcfunex-exported ("ImmGetConversionListW" ImmGetConversionListW :convention :stdcall) :unsigned-long
 777   (arg0 :pointer)
 778   (arg1 :unsigned-long)
 779   (arg2 :pointer)
 780   (arg3 :pointer)
 781   (arg4 :unsigned-long)
 782   (arg5 :unsigned-int))
 783
 784 (defcfunex-exported ("ImmNotifyIME" ImmNotifyIME :convention :stdcall) :int
 785   (arg0 :unsigned-long)
 786   (arg1 :unsigned-long)
 787   (arg2 :unsigned-long)
 788   (arg3 :unsigned-long))
 789
 790 (defcfunex-exported ("ImmGetStatusWindowPos" ImmGetStatusWindowPos :convention :stdcall) :int
 791   (arg0 :unsigned-long)
 792   (arg1 :pointer))
 793
 794 (defcfunex-exported ("ImmSetStatusWindowPos" ImmSetStatusWindowPos :convention :stdcall) :int
 795   (arg0 :unsigned-long)
 796   (arg1 :pointer))
 797
 798 (defcfunex-exported ("ImmGetCompositionWindow" ImmGetCompositionWindow :convention :stdcall) :int
 799   (arg0 :unsigned-long)
 800   (arg1 :pointer))
 801
 802 (defcfunex-exported ("ImmSetCompositionWindow" ImmSetCompositionWindow :convention :stdcall) :int
 803   (arg0 :unsigned-long)
 804   (arg1 :pointer))
 805
 806 (defcfunex-exported ("ImmGetCandidateWindow" ImmGetCandidateWindow :convention :stdcall) :int
 807   (arg0 :unsigned-long)
 808   (arg1 :unsigned-long)
 809   (arg2 :pointer))
 810
 811 (defcfunex-exported ("ImmSetCandidateWindow" ImmSetCandidateWindow :convention :stdcall) :int
 812   (arg0 :unsigned-long)
 813   (arg1 :pointer))
 814
 815 (defcfunex-exported ("ImmIsUIMessageA" ImmIsUIMessageA :convention :stdcall) :int
 816   (arg0 :pointer)
 817   (arg1 :unsigned-int)
 818   (arg2 :unsigned-int)
 819   (arg3 :int32))
 820
 821 (defcfunex-exported ("ImmIsUIMessageW" ImmIsUIMessageW :convention :stdcall) :int
 822   (arg0 :pointer)
 823   (arg1 :unsigned-int)
 824   (arg2 :unsigned-int)
 825   (arg3 :int32))
 826
 827 (defcfunex-exported ("ImmGetVirtualKey" ImmGetVirtualKey :convention :stdcall) :unsigned-int
 828   (arg0 :pointer))
 829
 830 (defcfunex-exported ("ImmRegisterWordA" ImmRegisterWordA :convention :stdcall) :int
 831   (arg0 :pointer)
 832   (arg1 :string)
 833   (arg2 :unsigned-long)
 834   (arg3 :string))
 835
 836 (defcfunex-exported ("ImmRegisterWordW" ImmRegisterWordW :convention :stdcall) :int
 837   (arg0 :pointer)
 838   (arg1 :pointer)
 839   (arg2 :unsigned-long)
 840   (arg3 :pointer))
 841
 842 (defcfunex-exported ("ImmUnregisterWordA" ImmUnregisterWordA :convention :stdcall) :int
 843   (arg0 :pointer)
 844   (arg1 :string)
 845   (arg2 :unsigned-long)
 846   (arg3 :string))
 847
 848 (defcfunex-exported ("ImmUnregisterWordW" ImmUnregisterWordW :convention :stdcall) :int
 849   (arg0 :pointer)
 850   (arg1 :pointer)
 851   (arg2 :unsigned-long)
 852   (arg3 :pointer))
 853
 854 (defcfunex-exported ("ImmGetRegisterWordStyleA" ImmGetRegisterWordStyleA :convention :stdcall) :unsigned-int
 855   (arg0 :pointer)
 856   (arg1 :unsigned-int)
 857   (arg2 :pointer))
 858
 859 (defcfunex-exported ("ImmGetRegisterWordStyleW" ImmGetRegisterWordStyleW :convention :stdcall) :unsigned-int
 860   (arg0 :pointer)
 861   (arg1 :unsigned-int)
 862   (arg2 :pointer))
 863
 864 (defcfunex-exported ("ImmEnumRegisterWordA" ImmEnumRegisterWordA :convention :stdcall) :unsigned-int
 865   (arg0 :pointer)
 866   (arg1 :pointer)
 867   (arg2 :string)
 868   (arg3 :unsigned-long)
 869   (arg4 :string)
 870   (arg5 :pointer))
 871
 872 (defcfunex-exported ("ImmEnumRegisterWordW" ImmEnumRegisterWordW :convention :stdcall) :unsigned-int
 873   (arg0 :pointer)
 874   (arg1 :pointer)
 875   (arg2 :pointer)
 876   (arg3 :unsigned-long)
 877   (arg4 :pointer)
 878   (arg5 :pointer))
 879
 880 (defcfunex-exported ("EnableEUDC" EnableEUDC :convention :stdcall) :int
 881   (arg0 :int))
 882
 883 (defcfunex-exported ("ImmDisableIME" ImmDisableIME :convention :stdcall) :int
 884   (arg0 :unsigned-long))
 885
 886 (defcfunex-exported ("ImmGetImeMenuItemsA" ImmGetImeMenuItemsA :convention :stdcall) :unsigned-long
 887   (arg0 :unsigned-long)
 888   (arg1 :unsigned-long)
 889   (arg2 :unsigned-long)
 890   (arg3 :pointer)
 891   (arg4 :pointer)
 892   (arg5 :unsigned-long))
 893
 894 (defcfunex-exported ("ImmGetImeMenuItemsW" ImmGetImeMenuItemsW :convention :stdcall) :unsigned-long
 895   (arg0 :unsigned-long)
 896   (arg1 :unsigned-long)
 897   (arg2 :unsigned-long)
 898   (arg3 :pointer)
 899   (arg4 :pointer)
 900   (arg5 :unsigned-long))