-#define GetControlOwner( control ) (**control).contrlOwner
-#define InvalWindowRgn( window , rgn ) InvalRgn( rgn )
+#define GetControlOwner( control ) ((**control).contrlOwner)
+
+#define GetPortPenMode( p ) (p->pnMode)
+#define SetPortPenMode( p , mode ) (p->pnMode = mode )
+// control manager
+
+#define GetControlReference( control ) ((**control).contrlRfCon)
+
+// list manager
+
+#define SetListSelectionFlags( list , options ) (**list).selFlags = options
+#define GetListRefCon( list ) (**list).refCon
+*/
+#else
+
+// calls not in carbon
+
+