summaryrefslogtreecommitdiff
path: root/modules
diff options
context:
space:
mode:
authorStefan Israelsson Tampe <stefan.itampe@gmail.com>2018-03-29 22:42:32 +0200
committerStefan Israelsson Tampe <stefan.itampe@gmail.com>2018-03-29 22:42:32 +0200
commitb5f2f47ddaf43eff0ce328db4e2ec3bfc276bf86 (patch)
tree7d1536017d51e1ff2db11902bc89337238261d20 /modules
parentc8877ccaf7d6e9021899da2933221b7f276b440c (diff)
debugged os
Diffstat (limited to 'modules')
-rw-r--r--modules/language/python/module/os.scm7
1 files changed, 4 insertions, 3 deletions
diff --git a/modules/language/python/module/os.scm b/modules/language/python/module/os.scm
index 03b0848..a735f13 100644
--- a/modules/language/python/module/os.scm
+++ b/modules/language/python/module/os.scm
@@ -87,7 +87,8 @@
supports_dir_fs support_effective_ids supports_fd
confstr confstr_names cpu_count sysconf sysconf_names
-
+ getloadavg
+
RTLD_LAZY RTLD_NOW RTLD_GLOBAL RTLD_LOCAL RTLD_NODELETE
RTLD_NOLOAD RTLD_DEEPBIND
@@ -2259,14 +2260,14 @@
(let ((id2 (if (number? id) id (pylist-ref sysconf_names id))))
(if id2
(sysconf_ id2)
- (raise KeyError "no confstr for " id))))
+ (raise KeyError "no sysconf str for " id))))
(defineu getloadavg ()
(let ((f (pointer->procedure long
(dynamic-func "getloadavg"
(dynamic-link))
(list '* int))))
- (lambda (id)
+ (lambda ()
(let* ((v (make-bytevector (* 3 8)))
(vp (bytevector->pointer v)))
(rm (f vp 3))