summaryrefslogtreecommitdiff
path: root/libguile/scm_validate.h
diff options
context:
space:
mode:
authorGreg J. Badros <gjb@cs.washington.edu>1999-12-12 19:09:46 +0000
committerGreg J. Badros <gjb@cs.washington.edu>1999-12-12 19:09:46 +0000
commita9967b3dbf03af3e508a5a144056ba57d7bf1be0 (patch)
treecfc4c5ce3f9b6d288816e8784d776c69434dc0c0 /libguile/scm_validate.h
parenta30fd2675363a05bc74d6336ae6f467a361eff8f (diff)
downloadguile-a9967b3dbf03af3e508a5a144056ba57d7bf1be0.tar.gz
* boolean.h: Added SCM_BOOL, SCM_NEGATE_BOOL, SCM_BOOLP to here,
from scm_validate.h. * scm_validate.h: Moved above out into boolean.h, fix typo in SCM_VALIDATE_NIM macro.
Diffstat (limited to 'libguile/scm_validate.h')
-rw-r--r--libguile/scm_validate.h7
1 files changed, 2 insertions, 5 deletions
diff --git a/libguile/scm_validate.h b/libguile/scm_validate.h
index 4c6d3ebac..c74e76e1d 100644
--- a/libguile/scm_validate.h
+++ b/libguile/scm_validate.h
@@ -1,4 +1,4 @@
-/* $Id: scm_validate.h,v 1.3 1999-12-12 18:30:09 gjb Exp $ */
+/* $Id: scm_validate.h,v 1.4 1999-12-12 19:09:46 gjb Exp $ */
/* Copyright (C) 1999 Free Software Foundation, Inc.
*
* This program is free software; you can redistribute it and/or modify
@@ -45,9 +45,6 @@
#ifndef SCM_VALIDATE_H__
#define SCM_VALIDATE_H__
-#define SCM_BOOL(f) ((f)? SCM_BOOL_T : SCM_BOOL_F)
-#define SCM_NEGATE_BOOL(f) ((f)? SCM_BOOL_F : SCM_BOOL_T)
-
#define SCM_FUNC_NAME (scm_makfrom0str(FUNC_NAME))
#define SCM_SYSERROR do { scm_syserror(FUNC_NAME); } while (0)
@@ -88,7 +85,7 @@
#define SCM_MUST_MALLOC(size) (scm_must_malloc((size), FUNC_NAME))
-#define SCM_VALIDATE_NIM (pos,scm) \
+#define SCM_VALIDATE_NIM(pos,scm) \
do { SCM_ASSERT(SCM_NIMP(scm), scm, pos, FUNC_NAME); } while (0)
#define SCM_MAKE_NIM_VALIDATE(pos,var,pred) \