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