From a06febb1b232bbd1f6442522d791e0d4f06aa50c Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Niels=20M=C3=B6ller?= <nisse@lysator.liu.se>
Date: Mon, 12 Jan 1998 02:53:37 +0100
Subject: [PATCH] * Requests.pmod (ClearArea): New class.
Rev: lib/modules/Protocols.pmod/X.pmod/Requests.pmod:1.14
---
.../Protocols.pmod/X.pmod/Requests.pmod | 18 ++++++++++++++++++
1 file changed, 18 insertions(+)
diff --git a/lib/modules/Protocols.pmod/X.pmod/Requests.pmod b/lib/modules/Protocols.pmod/X.pmod/Requests.pmod
index 03b6d288d4..6170db2920 100644
--- a/lib/modules/Protocols.pmod/X.pmod/Requests.pmod
+++ b/lib/modules/Protocols.pmod/X.pmod/Requests.pmod
@@ -501,6 +501,24 @@ class ChangeGC
}
}
+class ClearArea
+{
+ inherit request;
+ constant reqType = 61;
+
+ int exposures;
+ int window;
+ int x, y;
+ int width, height;
+
+ string to_string()
+ {
+ return build_request(sprintf("%4c%2c%2c%2c%2c",
+ window, x, y, width, height),
+ exposures);
+ }
+}
+
class PolyPoint
{
inherit request;
--
GitLab