Commit f577eda6 authored by Raymond Toy's avatar Raymond Toy
Browse files

Fix #244: Add c-call:signed-char

parent d5c23293
Loading
Loading
Loading
Loading
+3 −1
Original line number Diff line number Diff line
@@ -19,7 +19,7 @@

(intl:textdomain "cmucl")

(export '(char short int long long-long unsigned-char unsigned-short unsigned-int
(export '(char short int long long-long signed-char unsigned-char unsigned-short unsigned-int
	  unsigned-long unsigned-long-long float double c-string void))
	       

@@ -30,6 +30,8 @@
(def-alien-type int (integer 32))
(def-alien-type long (integer #-alpha 32 #+alpha 64))
(def-alien-type long-long (integer 64))
;; The same as c-call:char, for convenience with C signed-char.
(def-alien-type signed-char (integer 8))

(def-alien-type unsigned-char (unsigned 8))
(def-alien-type unsigned-short (unsigned 16))
+1 −0
Original line number Diff line number Diff line
@@ -25,6 +25,7 @@ public domain.
    * ~~#154~~ piglatin translation does not work anymore
	* ~~#171~~ Readably print `(make-pathname :name :unspecfic)`
	* ~~#242~~ Fix bug in `alien-funcall` with `c-call:char` as result type
    * ~~#244~~ Add `c-call:signed-char`
    * ~~#248~~ Print MOVS instruction with correct case
  * Other changes:
  * Improvements to the PCL implementation of CLOS: