From b8f41d954a8dcbb48cd9ca0cfad07cbf757ddf37 Mon Sep 17 00:00:00 2001
From: nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Wed, 12 May 2004 10:59:52 +0000
Subject: * lib/mkmf.rb (have_type, check_sizeof): replace unusable characters.
   [ruby-talk:99788]

git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@6297 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 lib/mkmf.rb | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lib')

diff --git a/lib/mkmf.rb b/lib/mkmf.rb
index 2b0612d77..ddcb53d52 100644
--- a/lib/mkmf.rb
+++ b/lib/mkmf.rb
@@ -585,7 +585,7 @@ SRC
 /*top*/
 static #{type} *t;
 SRC
-      $defs.push(format("-DHAVE_TYPE_%s", type.upcase))
+      $defs.push(format("-DHAVE_TYPE_%s", type.upcase.tr_s("^A-Z0-9_", "_")))
       true
     else
       false
@@ -599,7 +599,7 @@ def check_sizeof(type, header = nil, &b)
   message "%s", m
   Logging::message "check_sizeof: %s--------------------\n", m
   if size = try_constant(expr, header, &b)
-    $defs.push(format("-DSIZEOF_%s", type.upcase))
+    $defs.push(format("-DSIZEOF_%s", type.upcase.tr_s("^A-Z0-9_", "_")))
   end
   message(a = size ? "#{size}\n" : "failed\n")
   Logging::message "-------------------- %s\n", a
-- 
cgit