From e2437a191d1498f12cbb6906dfbe4e79c38271ad Mon Sep 17 00:00:00 2001
From: Guido van Rossum <guido@python.org>
Date: Mon, 23 Mar 1992 18:20:18 +0000
Subject: [PATCH] Added settrace() and setprofile().

---
 Python/sysmodule.c | 43 ++++++++++++++++++++++++++++++-------------
 1 file changed, 30 insertions(+), 13 deletions(-)

diff --git a/Python/sysmodule.c b/Python/sysmodule.c
index 7089fc7a3d8..8b99e2701a3 100644
--- a/Python/sysmodule.c
+++ b/Python/sysmodule.c
@@ -42,20 +42,9 @@ Data members:
 #include "sysmodule.h"
 #include "import.h"
 #include "modsupport.h"
+#include "osdefs.h"
 
-/* Define delimiter used in $PYTHONPATH */
-
-#ifdef macintosh
-#define DELIM ' '
-#endif
-
-#ifdef MSDOS
-#define DELIM ';'
-#endif
-
-#ifndef DELIM
-#define DELIM ':'
-#endif
+object *sys_trace, *sys_profile;
 
 static object *sysdict;
 
@@ -105,8 +94,36 @@ sys_exit(self, args)
 	return NULL;
 }
 
+static object *
+sys_settrace(self, args)
+	object *self;
+	object *args;
+{
+	if (args == None)
+		args = NULL;
+	XINCREF(args);
+	sys_trace = args;
+	INCREF(None);
+	return None;
+}
+
+static object *
+sys_setprofile(self, args)
+	object *self;
+	object *args;
+{
+	if (args == None)
+		args = NULL;
+	XINCREF(args);
+	sys_profile = args;
+	INCREF(None);
+	return None;
+}
+
 static struct methodlist sys_methods[] = {
 	{"exit",	sys_exit},
+	{"setprofile",	sys_setprofile},
+	{"settrace",	sys_settrace},
 	{NULL,		NULL}		/* sentinel */
 };