summaryrefslogtreecommitdiff
path: root/libguile/validate.h
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2001-01-24 00:02:43 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2001-01-24 00:02:43 +0000
commit30ea841d0cdecb2e879e643726d94ce66bd14ddd (patch)
treeef4cabe23efec5ced667a4d7a0af8831d479fe01 /libguile/validate.h
parent312ae976ad5bba1b62f18a3b7c0df514df563911 (diff)
downloadguile-30ea841d0cdecb2e879e643726d94ce66bd14ddd.tar.gz
* Separate the handling of OPEN flags between ports and directories.
Diffstat (limited to 'libguile/validate.h')
-rw-r--r--libguile/validate.h6
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/validate.h b/libguile/validate.h
index d44d36c5a..2212c273e 100644
--- a/libguile/validate.h
+++ b/libguile/validate.h
@@ -1,4 +1,4 @@
-/* $Id: validate.h,v 1.24 2001-01-08 23:10:06 ghouston Exp $ */
+/* $Id: validate.h,v 1.25 2001-01-24 00:02:43 dirk Exp $ */
/* Copyright (C) 1999, 2000 Free Software Foundation, Inc.
*
* This program is free software; you can redistribute it and/or modify
@@ -337,8 +337,6 @@
#define SCM_VALIDATE_RGXP(pos, a) SCM_MAKE_VALIDATE (pos, a, RGXP)
-#define SCM_VALIDATE_OPDIR(pos, port) SCM_MAKE_VALIDATE (pos, port, OPDIRP)
-
#define SCM_VALIDATE_DIR(pos, port) SCM_MAKE_VALIDATE (pos, port, DIRP)
#define SCM_VALIDATE_PORT(pos, port) SCM_MAKE_VALIDATE (pos, port, PORTP)
@@ -437,6 +435,8 @@
scm_misc_error (FUNC_NAME, "argument is a read-only string", str); \
} while (0)
+#define SCM_VALIDATE_OPDIR(pos, port) SCM_MAKE_VALIDATE (pos, port, OPDIRP)
+
#endif /* SCM_DEBUG_DEPRECATED == 0 */
#endif