Commit 4f1ba623 authored by csr21's avatar csr21
Browse files

compile-with-*rdff*-double-float

From Stelian Ionescu (fe[nl]ix on #lisp IRC).

darcs-hash:20071123110204-30503-022e7c47f80b14ca3413f5eaacc5710b90b6ab71.gz
parent 658ac8c9
......@@ -436,7 +436,7 @@ invalid."
(defun xfree86-vidmode-set-gamma (dpy scr &key (red 1.0) (green 1.0) (blue 1.0))
(declare (type display dpy)
(type screen scr)
(type (single-float 0.100 10.000) red green blue))
(type (single-float 0.100f0 10.000f0) red green blue))
(with-buffer-request (dpy (vidmode-opcode dpy))
(data +set-gamma+)
(card16 (screen-position scr dpy))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment