X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/c5161e0adbe003b215a7fb3a6bc705de1858113e..7aa55c1174f170016d970a3f5e86d5115f02611c:/src/c-types-impl.lisp?ds=sidebyside diff --git a/src/c-types-impl.lisp b/src/c-types-impl.lisp index 255a470..a5969d4 100644 --- a/src/c-types-impl.lisp +++ b/src/c-types-impl.lisp @@ -253,7 +253,8 @@ (define-simple-c-type (signed-char schar) "signed char" :export t) (define-simple-c-type wchar-t "wchar_t" :export t) -(define-simple-c-type (int signed signed-int sint) "int" :export t) +(define-simple-c-type (int signed signed-int sint) + ("int" "signed") :export t) (define-simple-c-type (unsigned unsigned-int uint) "unsigned" :export t) (define-simple-c-type (short signed-short short-int signed-short-int sshort)