windows pointers untraced

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@7205 8c9fc860-2736-0410-a75d-ab315db34111

WinAos/obg/Display.SymW

@@ -150,7 +150,7 @@ TYPE
 		dbch_reserved: LONGINT; 
 	END; 
 
-	DEV_BROADCAST_HDRP = POINTER {UNTRACED} TO DEV_BROADCAST_HDR; 
+	DEV_BROADCAST_HDRP = POINTER TO DEV_BROADCAST_HDR; 
 
 	DEV_BROADCAST_VOLUME = RECORD (DEV_BROADCAST_HDR)
 		dbcv_unitmask: SET; 
@@ -158,7 +158,7 @@ TYPE
 		padding: INTEGER; 
 	END; 
 
-	DEV_BROADCAST_VOLUMEP = POINTER {UNTRACED} TO DEV_BROADCAST_VOLUME; 
+	DEV_BROADCAST_VOLUMEP = POINTER TO DEV_BROADCAST_VOLUME; 
 
 	Inputs = RECORD 
 		keys: SET; 

source/Coop.Win32.Display.Mod

@@ -785,7 +785,7 @@ VAR
 
 	PROCEDURE {WINAPI} WindowProc( hwnd: User32.HWND;  uMsg: LONGINT;  wParam: User32.WParam;
 															    lParam: User32.LParam ): User32.LResult;
-	VAR win {UNTRACED}: Window;  dbh: DEV_BROADCAST_HDRP; dbv : DEV_BROADCAST_VOLUMEP; i: LONGINT;
+	VAR win {UNTRACED}: Window;  dbh {UNTRACED}: DEV_BROADCAST_HDRP; dbv {UNTRACED} : DEV_BROADCAST_VOLUMEP; i: LONGINT;
 	BEGIN {UNCOOPERATIVE, UNCHECKED}
 		win := SYSTEM.VAL( Window, User32.GetWindowLong( hwnd, GWLWindow ) );
 		IF win # NIL THEN SYSTEM.SetActivity (win.processor) END;

source/Win32.Display.Mod

@@ -84,7 +84,7 @@ TYPE
 		dbch_devicetype: LONGINT ;
 		dbch_reserved: LONGINT;
 	END;
-	DEV_BROADCAST_HDRP  = POINTER TO DEV_BROADCAST_HDR;
+	DEV_BROADCAST_HDRP  = POINTER  TO DEV_BROADCAST_HDR;
 
 	DEV_BROADCAST_VOLUME = RECORD   (DEV_BROADCAST_HDR)
 		dbcv_unitmask: SET;
@@ -824,7 +824,7 @@ VAR
 
 	PROCEDURE {WINAPI} WindowProc( hwnd: User32.HWND;  uMsg: LONGINT;  wParam: User32.WParam;
 															    lParam: User32.LParam ): User32.LResult;
-	VAR win: Window;  dbh: DEV_BROADCAST_HDRP; dbv : DEV_BROADCAST_VOLUMEP; i: LONGINT;
+	VAR win {UNTRACED}: Window;  dbh {UNTRACED}: DEV_BROADCAST_HDRP; dbv  {UNTRACED}: DEV_BROADCAST_VOLUMEP; i: LONGINT;
 	BEGIN
 
 		IF uMsg = WM_DEVICECHANGE THEN