[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] 01/03: Fix cast enabling SCM_DEBUG_TYPING_STRICTNESS 2
From: |
Daniel Llorens |
Subject: |
[Guile-commits] 01/03: Fix cast enabling SCM_DEBUG_TYPING_STRICTNESS 2 |
Date: |
Wed, 27 May 2020 12:34:24 -0400 (EDT) |
lloda pushed a commit to branch wip-exception-truncate
in repository guile.
commit e1ac6923f4c00d520754616aa03e9cee426fe8e1
Author: Daniel Llorens <address@hidden>
AuthorDate: Wed May 27 18:32:52 2020 +0200
Fix cast enabling SCM_DEBUG_TYPING_STRICTNESS 2
---
libguile/filesys.c | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/libguile/filesys.c b/libguile/filesys.c
index 4f71153..39bfd38 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