module definitions for pps
This commit is contained in:
parent
f53bcbc078
commit
08b7071076
|
@ -0,0 +1,17 @@
|
||||||
|
(define-interface pps-interface
|
||||||
|
(export pps
|
||||||
|
|
||||||
|
process-recrod?
|
||||||
|
process-info-pid
|
||||||
|
process-info-ppid
|
||||||
|
process-info-logname
|
||||||
|
process-info-real-uid
|
||||||
|
process-info-effective-uid
|
||||||
|
process-info-saved-set-uid
|
||||||
|
process-info-real-gid
|
||||||
|
process-info-effective-gid
|
||||||
|
process-info-saved-set-gid
|
||||||
|
process-info-time
|
||||||
|
process-info-tty
|
||||||
|
process-info-executable
|
||||||
|
process-info-command-line))
|
|
@ -0,0 +1,5 @@
|
||||||
|
(define-structure pps pps-interface
|
||||||
|
(open scheme-with-scsh
|
||||||
|
(subset srfi-1 (drop take))
|
||||||
|
define-record-types)
|
||||||
|
(files pps))
|
Loading…
Reference in New Issue