Index: /trunk/source/level-0/PPC/ppc-utils.lisp
===================================================================
--- /trunk/source/level-0/PPC/ppc-utils.lisp	(revision 12795)
+++ /trunk/source/level-0/PPC/ppc-utils.lisp	(revision 12796)
@@ -596,4 +596,12 @@
   (ba .SPmakeu32))
 
+(defun %watch (uvector)
+  (declare (ignore uvector))
+  (error "watching objects not supported on PPC yet"))
+
+(defun %unwatch (watched)
+  (declare (ignore watched))
+  (error "watching objects not supported on PPC yet"))
+
 ;;; Make a list.  This can be faster than doing so by doing CONS
 ;;; repeatedly, since the latter strategy might triger the GC several