feat: finished declaring all functions from the C ABI
This commit is contained in:
parent
6ca4b1c2fd
commit
2b25f8c4ba
1 changed files with 25 additions and 0 deletions
25
core.lisp
25
core.lisp
|
|
@ -23,3 +23,28 @@
|
|||
(defcfun ("mdict_keylist" %mdict_keylist) (:pointer simple-key-item)
|
||||
(dict :pointer)
|
||||
(len (:pointer :uint64)))
|
||||
|
||||
(defcfun ("free_simple_key_list" %free-simple-key-list) :int
|
||||
(key-items (:pointer simple-key-item))
|
||||
(length :uint64))
|
||||
|
||||
(defcfun ("mdict_filetype" %mdict-filetype) :int
|
||||
(dict :pointer))
|
||||
|
||||
(defcfun ("mdict_suggest" %mdict-suggest) :void
|
||||
(dict :pointer)
|
||||
(word :string)
|
||||
(suggested-words (:pointer :string))
|
||||
(length :int))
|
||||
|
||||
(defcfun ("mdict_stem" %mdict-stem) :void
|
||||
(dict :pointer)
|
||||
(word :string)
|
||||
(suggested-words (:pointer :string))
|
||||
(length :int))
|
||||
|
||||
(defcfun ("mdict_destroy" %mdict-destroy) :int
|
||||
(dict :pointer))
|
||||
|
||||
(defcfun ("c_mime_detect" %c-mime-detect) s-data
|
||||
(filename :string))
|
||||
|
|
|
|||
Loading…
Reference in a new issue