Author: paultcochrane
Date: Sat Jul 7 04:37:58 2007
New Revision: 19671
Modified:
trunk/src/ops/core.ops
trunk/src/ops/math.ops
trunk/src/ops/object.ops
trunk/src/ops/pic.ops
Log:
[src/ops] Converted more internal_exception()s into real_exception()s
Modified: trunk/src/ops/core.ops
==============================================================================
--- trunk/src/ops/core.ops (original)
+++ trunk/src/ops/core.ops Sat Jul 7 04:37:58 2007
@@ -1234,7 +1234,7 @@
}
inline op compile(out PMC, invar PMC, in STR) {
- internal_exception(1, "don't use compile - just invoke the compiler");
+ real_exception(interp, NULL, 1, "don't use compile - just invoke the
compiler");
goto NEXT();
}
Modified: trunk/src/ops/math.ops
==============================================================================
--- trunk/src/ops/math.ops (original)
+++ trunk/src/ops/math.ops Sat Jul 7 04:37:58 2007
@@ -2,7 +2,7 @@
** math.ops
*/
-#define DEPRECATED internal_exception(UNIMPLEMENTED, "you shouldn't see this")
+#define DEPRECATED real_exception(interp, NULL, UNIMPLEMENTED, "you shouldn't
see this")
VERSION = PARROT_VERSION;
Modified: trunk/src/ops/object.ops
==============================================================================
--- trunk/src/ops/object.ops (original)
+++ trunk/src/ops/object.ops Sat Jul 7 04:37:58 2007
@@ -555,12 +555,12 @@
=cut
op removeattribute(invar PMC, in STR) {
- internal_exception(UNIMPLEMENTED, "removeattribute is not implemented");
+ real_exception(interp, NULL, UNIMPLEMENTED, "removeattribute is not
implemented");
goto NEXT();
}
op removeattribute(invar PMC, in INT) {
- internal_exception(UNIMPLEMENTED, "removeattribute is not implemented");
+ real_exception(interp, NULL, UNIMPLEMENTED, "removeattribute is not
implemented");
goto NEXT();
}
Modified: trunk/src/ops/pic.ops
==============================================================================
--- trunk/src/ops/pic.ops (original)
+++ trunk/src/ops/pic.ops Sat Jul 7 04:37:58 2007
@@ -2,7 +2,7 @@
** pic.ops
*/
-#define DEPRECATED internal_exception(UNIMPLEMENTED, "you shouldn't see this")
+#define DEPRECATED real_exception(interp, NULL, UNIMPLEMENTED, "you shouldn't
see this")
#include "parrot/oplib/ops.h"
