diff options
| author | Duncan Coutts <duncan@well-typed.com> | 2011-05-26 18:44:41 +0100 |
|---|---|---|
| committer | Duncan Coutts <duncan@well-typed.com> | 2011-05-26 18:47:38 +0100 |
| commit | e8832eb9f05ca46d9315250c3baf7010eb0630a4 (patch) | |
| tree | be08e88284b463362f14673175aedca35bcfcb8c /rts/RtsStartup.c | |
| parent | 43c7d555c8d7eea6ba0d76bce33be8d25a01c6fd (diff) | |
| download | haskell-e8832eb9f05ca46d9315250c3baf7010eb0630a4.tar.gz | |
Emit various bits of OS process info into the eventlog
The process ID, parent process ID, rts name and version
The program arguments and environment.
Diffstat (limited to 'rts/RtsStartup.c')
| -rw-r--r-- | rts/RtsStartup.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/rts/RtsStartup.c b/rts/RtsStartup.c index 0dacd61984..c115701d6c 100644 --- a/rts/RtsStartup.c +++ b/rts/RtsStartup.c @@ -153,6 +153,9 @@ hs_init(int *argc, char **argv[]) */ initScheduler(); + /* Trace some basic information about the process */ + traceOSProcessInfo(); + /* initialize the storage manager */ initStorage(); |