Changeset 7035 for branches

Timestamp:

Aug 12, 2007, 3:38:22 PM (17 years ago)

Author:

Gary Byers

Message:

suspend_now().

File:

• branches/working-0708/lisp-kernel/ppc-macros.s (modified) (1 diff)

branches/working-0708/lisp-kernel/ppc-macros.s

@@ -826 +826 @@
 define([aligned_bignum_size],[((~(dnode_size-1)&(node_size+(dnode_size-1)+(4*$1))))])
 
-
-                
+define([suspend_now],[
+        uuo_interr(error_propagate_suspend,rzero)
+])