HACK for arm64 need to set GetGCValues? FIXME

k-okada · k-okada · commit 23361bbac195 · 2017-01-05T08:51:09.000Z
diff --git a/lisp/xwindow/Xgraphics.l b/lisp/xwindow/Xgraphics.l
@@ -452,6 +452,7 @@
           (setq mask (logior mask mask1))
           (send gcval :set val attr))
        )
+    (GetGCValues *display* gcid mask gcval)
     (ChangeGC *display* gcid mask gcval)
     mask)
  (:get-attributes (&rest attrs)

Original file line number	Diff line number	Diff line change
`@@ -452,6 +452,7 @@`
`452`	`452`	`(setq mask (logior mask mask1))`
`453`	`453`	`(send gcval :set val attr))`
`454`	`454`	`)`
	`455`	`+ (GetGCValues display gcid mask gcval)`
`455`	`456`	`(ChangeGC display gcid mask gcval)`
`456`	`457`	`mask)`
`457`	`458`	`(:get-attributes (&rest attrs)`