Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-07-08 05:27:35 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

inlining user-information procedure

Browse source
This commit is contained in:
Alex Shinn 2011-04-04 23:40:56 +09:00
parent 262522d435
commit 60a1b968c0
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lib/chibi/system.module
View file

@ -10,4 +10,6 @@
set-root-directory!)
(import-immutable (scheme))
(include-shared "system")
(include "system.scm"))
(body
(define (user-information user)
(car (if (string? user) (getpwnam_r user) (getpwuid_r user))))))