[uim-commit] r1971 - branches/r5rs/sigscheme

[kzk at freedesktop.org]

Author: kzk
Date: 2005-11-03 05:01:04 -0800 (Thu, 03 Nov 2005)
New Revision: 1971

Modified:
   branches/r5rs/sigscheme/sigschemeinternal.h
Log:
* sigscheme/sigschemeinternal.h
  - (CHECK_1_ARG, CHECK_2_ARG, CHECK_3_ARG,
     CHECK_4_ARG, CHECK_5_ARG): removed


Modified: branches/r5rs/sigscheme/sigschemeinternal.h
===================================================================
--- branches/r5rs/sigscheme/sigschemeinternal.h	2005-11-03 12:59:14 UTC (rev 1970)
+++ branches/r5rs/sigscheme/sigschemeinternal.h	2005-11-03 13:01:04 UTC (rev 1971)
@@ -181,20 +181,7 @@
  * SCM_UNDEF
  */
 
-/* Macros For Argnument Number Checking */
 /*
- * TODO: rename appropriately
- * Since 'CHECK' sounds a positive check as like as 'ASSERT', its opposite
- * meaning may confuse users. So I suggest another name such as 'UNFILLED'.
- *   -- YamaKen 2005-09-05
- */
-#define CHECK_1_ARG(arg)  (NULLP(arg))
-#define CHECK_2_ARGS(arg) (CHECK_1_ARG(arg)  || NULLP(CDR(arg)))
-#define CHECK_3_ARGS(arg) (CHECK_2_ARGS(arg) || NULLP(CDDR(arg)))
-#define CHECK_4_ARGS(arg) (CHECK_3_ARGS(arg) || NULLP(CDR(CDDR(arg))))
-#define CHECK_5_ARGS(arg) (CHECK_4_ARGS(arg) || NULLP(CDDR(CDDR(arg))))
-
-/*
  * Macros For List Element Extraction With Safety Check
  *
  * SCM_SHIFT_*() safely and efficiently extracts elements of a list into