emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/xelb c6b1b5f 2/2: Sync with upstream protocol


From: Chris Feng
Subject: [elpa] externals/xelb c6b1b5f 2/2: Sync with upstream protocol
Date: Wed, 28 Oct 2015 10:59:28 +0000

branch: externals/xelb
commit c6b1b5fa34175b92971e7e5e2241a7ca48838e17
Author: Chris Feng <address@hidden>
Commit: Chris Feng <address@hidden>

    Sync with upstream protocol
    
    ; Add explicit paddings.
---
 xcb-sync.el     |    3 ++-
 xcb-xprint.el   |    6 ++++--
 xcb-xproto.el   |    3 ++-
 xcb-xselinux.el |    3 ++-
 xcb-xv.el       |    6 ++++--
 5 files changed, 14 insertions(+), 7 deletions(-)

diff --git a/xcb-sync.el b/xcb-sync.el
index 467097f..c317319 100644
--- a/xcb-sync.el
+++ b/xcb-sync.el
@@ -72,7 +72,8 @@
    (name~ :initform
          '(name name type xcb:char size
                 (xcb:-fieldref 'name-len))
-         :type xcb:-list)))
+         :type xcb:-list)
+   (pad~0 :initform 4 :type xcb:-pad-align)))
 
 (defclass xcb:sync:TRIGGER
   (xcb:-struct)
diff --git a/xcb-xprint.el b/xcb-xprint.el
index edc12dc..abf6574 100644
--- a/xcb-xprint.el
+++ b/xcb-xprint.el
@@ -49,7 +49,8 @@
    (description~ :initform
                 '(name description type xcb:xprint:STRING8 size
                        (xcb:-fieldref 'descLen))
-                :type xcb:-list)))
+                :type xcb:-list)
+   (pad~1 :initform 4 :type xcb:-pad-align)))
 
 (xcb:deftypealias 'xcb:xprint:PCONTEXT 'xcb:-u4)
 
@@ -245,7 +246,8 @@
    (context :initarg :context :type xcb:xprint:PCONTEXT)))
 (defclass xcb:xprint:PrintInputSelected~reply
   (xcb:-reply)
-  ((event-mask :initarg :event-mask :type xcb:CARD32)
+  ((pad~0 :initform 1 :type xcb:-pad)
+   (event-mask :initarg :event-mask :type xcb:CARD32)
    (all-events-mask :initarg :all-events-mask :type xcb:CARD32)))
 
 (defclass xcb:xprint:PrintGetAttributes
diff --git a/xcb-xproto.el b/xcb-xproto.el
index 957b6d9..a0438e3 100644
--- a/xcb-xproto.el
+++ b/xcb-xproto.el
@@ -2680,7 +2680,8 @@
    (address~ :initform
             '(name address type xcb:BYTE size
                    (xcb:-fieldref 'address-len))
-            :type xcb:-list)))
+            :type xcb:-list)
+   (pad~1 :initform 4 :type xcb:-pad-align)))
 
 (defclass xcb:ListHosts
   (xcb:-request)
diff --git a/xcb-xselinux.el b/xcb-xselinux.el
index 3eb9f1e..58b6799 100644
--- a/xcb-xselinux.el
+++ b/xcb-xselinux.el
@@ -148,7 +148,8 @@
    (data-context~ :initform
                  '(name data-context type xcb:char size
                         (xcb:-fieldref 'data-context-len))
-                 :type xcb:-list)))
+                 :type xcb:-list)
+   (pad~1 :initform 4 :type xcb:-pad-align)))
 
 (defclass xcb:xselinux:SetPropertyCreateContext
   (xcb:-request)
diff --git a/xcb-xv.el b/xcb-xv.el
index 8adc411..7de5b0a 100644
--- a/xcb-xv.el
+++ b/xcb-xv.el
@@ -113,7 +113,8 @@
    (name~ :initform
          '(name name type xcb:char size
                 (xcb:-fieldref 'name-size))
-         :type xcb:-list)))
+         :type xcb:-list)
+   (pad~1 :initform 4 :type xcb:-pad-align)))
 
 (defclass xcb:xv:Image
   (xcb:-struct)
@@ -150,7 +151,8 @@
    (name~ :initform
          '(name name type xcb:char size
                 (xcb:-fieldref 'size))
-         :type xcb:-list)))
+         :type xcb:-list)
+   (pad~0 :initform 4 :type xcb:-pad-align)))
 
 (defclass xcb:xv:ImageFormatInfo
   (xcb:-struct)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]