X-Git-Url: https://git.ucc.asn.au/?a=blobdiff_plain;ds=inline;f=KernelLand%2FKernel%2Fthreads.c;h=636717246908ac352f4a75cd9a0ac7d38d86e902;hb=533ed3e53b3b16da86c4e792eb52e0570e2cd21f;hp=5e60c4617307ec5b318fad993809e580b900dcf5;hpb=934d0f535e1929fd90ae0606e77794484aa55284;p=tpg%2Facess2.git

diff --git a/KernelLand/Kernel/threads.c b/KernelLand/Kernel/threads.c
index 5e60c461..63671724 100644
--- a/KernelLand/Kernel/threads.c
+++ b/KernelLand/Kernel/threads.c
@@ -313,6 +313,10 @@ tThread *Threads_CloneTCB(Uint Flags)
 		new->Process = malloc( sizeof(struct sProcess) );
 		newproc = new->Process;
 		newproc->PID = new->TID;
+		if( Flags & CLONE_PGID )
+			newproc->PGID = oldproc->PGID;
+		else
+			newproc->PGID = newproc->PID;
 		newproc->UID = oldproc->UID;
 		newproc->GID = oldproc->GID;
 		newproc->MaxFD = oldproc->MaxFD;
@@ -1001,6 +1005,10 @@ void Threads_SegFault(tVAddr Addr)
 }
 
 // --- Process Structure Access Functions ---
+tPGID Threads_GetPGID(void)
+{
+	return Proc_GetCurThread()->Process->PGID;
+}
 tPID Threads_GetPID(void)
 {
 	return Proc_GetCurThread()->Process->PID;