paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-15 18:19:07 +02:00
Code Issues Packages Projects Releases Wiki Activity

- removed accidently committed testcode

Browse Source 
git-svn-id: trunk@4446 -
This commit is contained in:
marc 2003-08-02 00:23:08 +00:00
parent c4e8a6b79e
commit 692bfa612a
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
debugger/cmdlinedebugger.pp
View File

@ -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