From 58b2eacf6b53fff92ecad3233073efbd5ca756d2 Mon Sep 17 00:00:00 2001
From: Jack Jansen <jack.jansen@cwi.nl>
Date: Mon, 21 Jun 1999 16:18:51 +0000
Subject: [PATCH] Print something on stderr in case of exceptions in callback
 routines.

---
 Mac/Modules/drag/Dragmodule.c   | 12 +++++++++---
 Mac/Modules/drag/dragsupport.py | 12 +++++++++---
 2 files changed, 18 insertions(+), 6 deletions(-)

diff --git a/Mac/Modules/drag/Dragmodule.c b/Mac/Modules/drag/Dragmodule.c
index b029067b879..0775286046b 100644
--- a/Mac/Modules/drag/Dragmodule.c
+++ b/Mac/Modules/drag/Dragmodule.c
@@ -970,8 +970,10 @@ dragglue_TrackingHandler(DragTrackingMessage theMessage, WindowPtr theWindow,
 		return -1;
 	rv = PyEval_CallObject((PyObject *)handlerRefCon, args);
 	Py_DECREF(args);
-	if ( rv == NULL )
+	if ( rv == NULL ) {
+		fprintf(stderr, "Drag: Exception in TrackingHandler\n");
 		return -1;
+	}
 	i = -1;
 	if ( rv == Py_None )
 		i = 0;
@@ -993,8 +995,10 @@ dragglue_ReceiveHandler(WindowPtr theWindow, void *handlerRefCon,
 		return -1;
 	rv = PyEval_CallObject((PyObject *)handlerRefCon, args);
 	Py_DECREF(args);
-	if ( rv == NULL )
+	if ( rv == NULL ) {
+		fprintf(stderr, "Drag: Exception in ReceiveHandler\n");
 		return -1;
+	}
 	i = -1;
 	if ( rv == Py_None )
 		i = 0;
@@ -1019,8 +1023,10 @@ dragglue_SendData(FlavorType theType, void *dragSendRefCon,
 		return -1;
 	rv = PyEval_CallObject(self->sendproc, args);
 	Py_DECREF(args);
-	if ( rv == NULL )
+	if ( rv == NULL ) {
+		fprintf(stderr, "Drag: Exception in SendDataHandler\n");
 		return -1;
+	}
 	i = -1;
 	if ( rv == Py_None )
 		i = 0;
diff --git a/Mac/Modules/drag/dragsupport.py b/Mac/Modules/drag/dragsupport.py
index 9e25328338c..64274a6fdf7 100644
--- a/Mac/Modules/drag/dragsupport.py
+++ b/Mac/Modules/drag/dragsupport.py
@@ -89,8 +89,10 @@ dragglue_TrackingHandler(DragTrackingMessage theMessage, WindowPtr theWindow,
 		return -1;
 	rv = PyEval_CallObject((PyObject *)handlerRefCon, args);
 	Py_DECREF(args);
-	if ( rv == NULL )
+	if ( rv == NULL ) {
+		fprintf(stderr, "Drag: Exception in TrackingHandler\\n");
 		return -1;
+	}
 	i = -1;
 	if ( rv == Py_None )
 		i = 0;
@@ -112,8 +114,10 @@ dragglue_ReceiveHandler(WindowPtr theWindow, void *handlerRefCon,
 		return -1;
 	rv = PyEval_CallObject((PyObject *)handlerRefCon, args);
 	Py_DECREF(args);
-	if ( rv == NULL )
+	if ( rv == NULL ) {
+		fprintf(stderr, "Drag: Exception in ReceiveHandler\\n");
 		return -1;
+	}
 	i = -1;
 	if ( rv == Py_None )
 		i = 0;
@@ -138,8 +142,10 @@ dragglue_SendData(FlavorType theType, void *dragSendRefCon,
 		return -1;
 	rv = PyEval_CallObject(self->sendproc, args);
 	Py_DECREF(args);
-	if ( rv == NULL )
+	if ( rv == NULL ) {
+		fprintf(stderr, "Drag: Exception in SendDataHandler\\n");
 		return -1;
+	}
 	i = -1;
 	if ( rv == Py_None )
 		i = 0;