diff options
author | Daniel Llorens <lloda@sarc.name> | 2020-05-27 18:32:52 +0200 |
---|---|---|
committer | Daniel Llorens <lloda@sarc.name> | 2020-05-28 17:04:14 +0200 |
commit | 4677c12803a9a100bd0bfbde8e2bf44db9eb5ec9 (patch) | |
tree | ac78abf8fcf82c54ba63a0824facfaefbb1f2ee8 /libguile/filesys.c | |
parent | d36b9f0422bc5959ed278c581326ab61566f1af7 (diff) | |
download | guile-4677c12803a9a100bd0bfbde8e2bf44db9eb5ec9.tar.gz |
Fix cast enabling SCM_DEBUG_TYPING_STRICTNESS 2
Diffstat (limited to 'libguile/filesys.c')
-rw-r--r-- | libguile/filesys.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/filesys.c b/libguile/filesys.c index 4f7115397..39bfd38cc 100644 --- a/libguile/filesys.c +++ b/libguile/filesys.c @@ -1762,7 +1762,7 @@ SCM_DEFINE (scm_opendir, "opendir", 1, 0, 0, SCM_SYSERROR; SCM_RETURN_NEWSMOB2 (scm_tc16_dir | (SCM_DIR_FLAG_OPEN << 16), - ds, SCM_PACK_POINTER (mutex)); + ds, SCM_UNPACK (SCM_PACK_POINTER (mutex))); } #undef FUNC_NAME |