[bknr-cvs] manuel changed trunk/thirdparty/cl-gd/gd-uffi.lisp

BKNR Commits bknr at bknr.net
Mon Sep 13 21:06:22 UTC 2010


Revision: 4609
Author: manuel
URL: http://bknr.net/trac/changeset/4609

remove ugly hack
U   trunk/thirdparty/cl-gd/gd-uffi.lisp

Modified: trunk/thirdparty/cl-gd/gd-uffi.lisp
===================================================================
--- trunk/thirdparty/cl-gd/gd-uffi.lisp	2010-09-13 20:58:03 UTC (rev 4608)
+++ trunk/thirdparty/cl-gd/gd-uffi.lisp	2010-09-13 21:06:22 UTC (rev 4609)
@@ -74,12 +74,6 @@
   (cx2 :int)
   (cy2 :int))
 
-;; XXX evil hack
-#+(and :openmcl :64-bit-target)
-(defmethod cffi::foreign-type-alignment ((type uffi-array-type))
-  4)
-
-
 (def-type pixels-array (* (* :unsigned-char)))
 (def-type pixels-row (* :unsigned-char))
 (def-type t-pixels-array (* (* :int)))





More information about the Bknr-cvs mailing list