mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-12 22:19:18 +02:00
- removed accidently committed testcode
git-svn-id: trunk@4446 -
This commit is contained in:
parent
c4e8a6b79e
commit
692bfa612a
@ -154,6 +154,7 @@ begin
|
|||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
(*
|
||||||
procedure SetPGid(APID, APGID: Integer);
|
procedure SetPGid(APID, APGID: Integer);
|
||||||
var
|
var
|
||||||
sr: SyscallRegs;
|
sr: SyscallRegs;
|
||||||
@ -162,7 +163,8 @@ begin
|
|||||||
sr.reg3 := APGID;
|
sr.reg3 := APGID;
|
||||||
SysCall(Syscall_nr_setpgid, sr);
|
SysCall(Syscall_nr_setpgid, sr);
|
||||||
end;
|
end;
|
||||||
|
*)
|
||||||
|
|
||||||
//////////////////////////////////////////////////
|
//////////////////////////////////////////////////
|
||||||
|
|
||||||
{ TCmdLineDebugger }
|
{ TCmdLineDebugger }
|
||||||
@ -376,11 +378,12 @@ begin
|
|||||||
end;
|
end;
|
||||||
|
|
||||||
initialization
|
initialization
|
||||||
// setpgid(0, 0);
|
|
||||||
|
|
||||||
end.
|
end.
|
||||||
{ =============================================================================
|
{ =============================================================================
|
||||||
$Log$
|
$Log$
|
||||||
|
Revision 1.19 2003/08/02 00:23:08 marc
|
||||||
|
- removed accidently committed testcode
|
||||||
|
|
||||||
Revision 1.18 2003/08/02 00:20:20 marc
|
Revision 1.18 2003/08/02 00:20:20 marc
|
||||||
* fixed environment handling to debuggee
|
* fixed environment handling to debuggee
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user