Index: /trunk/ccl/level-0/l0-io.lisp
===================================================================
--- /trunk/ccl/level-0/l0-io.lisp	(revision 5981)
+++ /trunk/ccl/level-0/l0-io.lisp	(revision 5982)
@@ -116,5 +116,4 @@
 
 ;;; Yield the CPU, via a platform-specific syscall.
-(defun yield ()
-  (%syscall target::yield-syscall :signed-fullword))
 
+