Not sure how this ended up being wrong.
(define-simple-c-type char "char" :export t)
(define-simple-c-type (unsigned-char uchar) "unsigned char" :export t)
(define-simple-c-type (signed-char schar) "signed char" :export t)
(define-simple-c-type char "char" :export t)
(define-simple-c-type (unsigned-char uchar) "unsigned char" :export t)
(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 wchar-t "wchar_t" :export t)
(define-simple-c-type (int signed signed-int sint) "int" :export t)
(define-simple-c-type (unsigned unsigned-int uint) "unsigned" :export t)
(define-simple-c-type (int signed signed-int sint) "int" :export t)
(define-simple-c-type (unsigned unsigned-int uint) "unsigned" :export t)