[project @ 1999-03-16 13:20:07 by simonm]
[ghc-hetmet.git] / ghc / rts / HeapStackCheck.hc
index 2584c68..ff31c74 100644 (file)
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: HeapStackCheck.hc,v 1.3 1999/02/05 16:02:43 simonm Exp $
+ * $Id: HeapStackCheck.hc,v 1.4 1999/03/16 13:20:15 simonm Exp $
  *
  * (c) The GHC Team, 1998-1999
  *
@@ -806,6 +806,13 @@ FN_(stg_gen_yield)
   FE_
 }
 
+FN_(stg_yield_noregs)
+{
+  FB_
+  YIELD_GENERIC  
+  FE_
+}
+
 FN_(stg_yield_to_Hugs)
 {
   FB_