From 39a180f3d7bfb25e211203fd660b400396d0e60e Mon Sep 17 00:00:00 2001
From: ram <ram>
Date: Sat, 1 Oct 1994 00:04:45 +0000
Subject: [PATCH] Fix to toolkit-write-value to allow it to write either signed
 or unsigned integers.

---
 motif/lisp/conversion.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/motif/lisp/conversion.lisp b/motif/lisp/conversion.lisp
index f2a5e22bf..2706b2d23 100644
--- a/motif/lisp/conversion.lisp
+++ b/motif/lisp/conversion.lisp
@@ -66,7 +66,7 @@
     (xlib:cursor (message-write-xid message (xlib:cursor-id value) :cursor))
     ((unsigned-byte 24)
      (message-put-dblword message (combine-type-and-data :short value)))
-    ((signed-byte 32)
+    ((or (signed-byte 32) (unsigned-byte 32))
      (message-put-dblword message (combine-type-and-data :int 0))
      (message-put-dblword message value))
     ((member t nil)
-- 
GitLab