[Sbcl-commits] CVS: sbcl/src/code unix.lisp,1.30,1.30.10.1

[Daniel B. <da...@us...>]

Update of /cvsroot/sbcl/sbcl/src/code
In directory sc8-pr-cvs1:/tmp/cvs-serv32046/src/code

Modified Files:
      Tag: dan_native_threads_2_branch
	unix.lisp 
Log Message:
0.7.11.10.thread.6
	TTY handling.  An awful lot of effort for the exciting reward
	of being able to press ^C without the GC thread getting killed

	Add some useful syscalls for manipulating terminal stuff for 
	braver people than I who want to open new terminals and have
	signal handling _continue_ to work properly in them

	Comment in purify.c noting that it's broken if >1 thread exists


Index: unix.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/code/unix.lisp,v
retrieving revision 1.30
retrieving revision 1.30.10.1
diff -u -d -r1.30 -r1.30.10.1
--- unix.lisp	7 Jun 2002 01:54:42 -0000	1.30
+++ unix.lisp	24 Jan 2003 20:36:57 -0000	1.30.10.1
@@ -390,6 +390,18 @@
 (defun unix-fsync (fd)
   (declare (type unix-fd fd))
   (void-syscall ("fsync" int) fd))
+
+(defun unix-setpgid (pid pgid)
+  (void-syscall ("setpgid" int int) pid pgid))
+
+(defun unix-tcsetpgrp (fd pgrpid)
+  (void-syscall ("tcsetpgrp" int int) fd pgrpid))
+
+(defun unix-setsid ()
+  (int-syscall ("setsid")))
+
+
+
 
 ;;;; sys/ioctl.h