diff --git a/scsh/solaris/waitcodes.scm b/scsh/solaris/waitcodes.scm
index 09c832c..51f43e0 100644
--- a/scsh/solaris/waitcodes.scm
+++ b/scsh/solaris/waitcodes.scm
@@ -36,5 +36,5 @@
 
 
 ;;; Flags.
-(define wait/poll 		1)	; Don't hang if nothing to wait for.
-(define wait/stopped-children	2)	; Report on suspended subprocs, too.
+(define wait/poll 		#o100)	; Don't hang if nothing to wait for.
+(define wait/stopped-children	4)	; Report on suspended subprocs, too.