From a138a2b2921d7fc0329a21d2dbabe4211ff4ef3e Mon Sep 17 00:00:00 2001
From: Matthias Benkard <code@mail.matthias.benkard.de>
Date: Tue, 12 Feb 2008 16:25:03 +0100
Subject: Add a policy for distinguishing between char and BOOL return values.

darcs-hash:09dbdf5e230a28071f1933a48077d562065df71f
---
 Lisp/parameters.lisp | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'Lisp/parameters.lisp')

diff --git a/Lisp/parameters.lisp b/Lisp/parameters.lisp
index 35fae3c..875adb8 100644
--- a/Lisp/parameters.lisp
+++ b/Lisp/parameters.lisp
@@ -20,6 +20,8 @@
 
 (defvar *runtime-initialisation-level* 0)
 
+(defvar *boolean-return-exceptions* (make-hash-table :test #'equal))
+
 (defvar *skip-retaining* nil)
 
 (defvar *in-make-pointer-wrapper-p* nil
-- 
cgit v1.2.3