From 42596fd20ef552955af738e80491cb00086242ba Mon Sep 17 00:00:00 2001
From: jjgarcia <jjgarcia>
Date: Tue, 28 Jun 2005 13:50:01 +0000
Subject: [PATCH] Fixed typo

---
 src/c/ffi.d | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/c/ffi.d b/src/c/ffi.d
index 67f532982..5545e450f 100644
--- a/src/c/ffi.d
+++ b/src/c/ffi.d
@@ -49,7 +49,7 @@ ecl_string_pointer_safe(cl_object f)
 
 	if (type_of(f) != t_string)
 		FEwrong_type_argument(@'string', f);
-#ifdef USE_BOEHM
+#ifdef GBC_BOEHM
 	/* This function is only used in CMPFFI.LSP as to convert lisp objects
 	 * to a null terminated string. This code is safe with the
 	 * Boehm-Weiser garbage collector because the pointer is stored in the