new test program
diff --git a/src/libthread/tspawn.c b/src/libthread/tspawn.c
new file mode 100644
index 0000000..97962c5
--- /dev/null
+++ b/src/libthread/tspawn.c
@@ -0,0 +1,41 @@
+#include <lib9.h>
+#include <thread.h>
+extern int _threaddebuglevel;
+
+void
+doexec(void *v)
+{
+ int fd[3];
+ char **argv = v;
+
+ print("exec failed: %r\n");
+ sendp(threadwaitchan(), nil);
+ threadexits(nil);
+}
+
+void
+threadmain(int argc, char **argv)
+{
+ int fd[3];
+ Channel *c;
+ Waitmsg *w;
+
+ ARGBEGIN{
+ case 'D':
+ _threaddebuglevel = ~0;
+ break;
+ }ARGEND
+
+ c = threadwaitchan();
+ fd[0] = dup(0, -1);
+ fd[1] = dup(1, -1);
+ fd[2] = dup(2, -1);
+ if(threadspawn(fd, argv[0], argv) < 0)
+ sysfatal("threadspawn: %r");
+ w = recvp(c);
+ if(w == nil)
+ print("exec/recvp failed: %r\n");
+ else
+ print("%d %lud %lud %lud %s\n", w->pid, w->time[0], w->time[1], w->time[2], w->msg);
+ threadexits(nil);
+}
