mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-07-08 05:27:35 +02:00
inlining user-information procedure
This commit is contained in:
parent
262522d435
commit
60a1b968c0
1 changed files with 3 additions and 1 deletions
|
@ -10,4 +10,6 @@
|
||||||
set-root-directory!)
|
set-root-directory!)
|
||||||
(import-immutable (scheme))
|
(import-immutable (scheme))
|
||||||
(include-shared "system")
|
(include-shared "system")
|
||||||
(include "system.scm"))
|
(body
|
||||||
|
(define (user-information user)
|
||||||
|
(car (if (string? user) (getpwnam_r user) (getpwuid_r user))))))
|
||||||
|
|
Loading…
Add table
Reference in a new issue