commit fd652ac3195e155c8c0a4cb8ec104b029f40628e
from: Russ Cox <rsc@swtch.com>
date: Thu Jul 10 15:05:34 2008 UTC

stack: look in core by default

commit - c98946022a1d13840ac648fee0a0eaf58e3e34aa
commit + fd652ac3195e155c8c0a4cb8ec104b029f40628e
blob - 933a6132b5229e8ad6aa9fe16b003beaf01e1e22
blob + 5744cef964dfa5015fe023cb205d4fbe60300d6a
--- bin/stack
+++ bin/stack
@@ -1,8 +1,11 @@
 #!/usr/local/plan9/bin/rc
 
-pid=$1
+if(~ $#* 0)
+	pid=core
+if not
+	pid=$1
 shift
-if(! ~ $pid [0-9] [0-9]*[0-9] */core *.core core.* */core.*){
+if(! ~ $pid [0-9] [0-9]*[0-9] */core *.core core.* */core.* core){
 	name=$pid
 	pid=`{psu|awk '$NF=="'$name'" {print $2}'}
 	if(~ $#pid 0){