File: fungetpi.c

package info (click to toggle)
icmake 6.22-2
  • links: PTS
  • area: main
  • in suites: woody
  • size: 2,120 kB
  • ctags: 1,045
  • sloc: ansic: 9,241; makefile: 1,138; asm: 126; sh: 124
file content (28 lines) | stat: -rw-r--r-- 446 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
 
/*
\funcref{fun\_getpid}{void fun\_getpid ()}
    {}
    {}
    {newvar()}
    {}
    {fungetpi.c}
    {

	The process ID number is returned as an {\em e\_int} variable. 
	Under MS-DOS, this number is set to the paragraph of the PSP. Under 
	UNIX, the true process ID number is returned.

    }
*/

#include "icm-exec.h"

void fun_getpid ()
{
    reg.type = e_int;
    reg.vu.intval = (INT16)
#ifndef MSDOS
	getpid ();
#else
	_psp;
#endif	    
}