From 7553b7f9d4dddc2235c137d41de8ce22547bebe3 Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Wed, 1 Jul 2015 17:36:37 +0200
Subject: Initial commit

---
 ostypes.icl | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100644 ostypes.icl

(limited to 'ostypes.icl')

diff --git a/ostypes.icl b/ostypes.icl
new file mode 100644
index 0000000..4fdfb2b
--- /dev/null
+++ b/ostypes.icl
@@ -0,0 +1,24 @@
+implementation module ostypes
+
+::	OSPictContext					// PA: moved from ospicture by DvA
+	:== Int // HDC
+::	HDC								// PA: moved from pictCCall_12
+	:== Int
+::	OSRect							// A OSRect is supposed to be an ordered rectangle with
+	=	{	rleft	:: !Int			// rleft<=rright && rtop<=rbottom
+		,	rtop	:: !Int
+		,	rright	:: !Int
+		,	rbottom	:: !Int
+		}
+::	OSWindowPtr
+	:== Int // HWND
+::	HWND
+	:==	Int
+
+OSNoWindowPtr	:== -1
+
+::	DelayActivationInfo
+	=	DelayActivatedWindow	OSWindowPtr				// the window has become active
+	|	DelayDeactivatedWindow	OSWindowPtr				// the window has become inactive
+	|	DelayActivatedControl	OSWindowPtr OSWindowPtr	// the control (@2) in window (@1) has become active
+	|	DelayDeactivatedControl	OSWindowPtr OSWindowPtr	// the control (@2) in window (@1) has become inactive
-- 
cgit v1.2.3