Skip to content

Commit 71e7aa9

Browse files
committed
CHANGE: not using _To_Upper_Case and _To_Lower_Case functions in debug buids
1 parent e863106 commit 71e7aa9

File tree

1 file changed

+6
-6
lines changed

1 file changed

+6
-6
lines changed

src/include/sys-core.h

+6-6
Original file line numberDiff line numberDiff line change
@@ -3,7 +3,7 @@
33
** REBOL [R3] Language Interpreter and Run-time Environment
44
**
55
** Copyright 2012 REBOL Technologies
6-
** Copyright 2012-2022 Rebol Open Source Developers
6+
** Copyright 2012-2023 Rebol Open Source Developers
77
** REBOL is a trademark of REBOL Technologies
88
**
99
** Licensed under the Apache License, Version 2.0 (the "License");
@@ -313,13 +313,13 @@ enum {
313313
#define FOR_BLK(b, v, t) for (v = VAL_BLK_DATA(b), t = VAL_BLK_TAIL(b); v != t; v++)
314314
#define FOR_SER(b, v, i, s) for (; v = BLK_SKIP(b, i), i < SERIES_TAIL(b); i += skip)
315315

316-
#ifdef _DEBUG
317-
#define UP_CASE(c) _To_Upper_Case(c)
318-
#define LO_CASE(c) _To_Lower_Case(c)
319-
#else
316+
//#ifdef _DEBUG
317+
//#define UP_CASE(c) _To_Upper_Case(c)
318+
//#define LO_CASE(c) _To_Lower_Case(c)
319+
//#else
320320
#define UP_CASE(c) Upper_Cases[c]
321321
#define LO_CASE(c) Lower_Cases[c]
322-
#endif
322+
//#endif
323323

324324
#define IS_WHITE(c) ((c) <= 32 && (White_Chars[c]&1) != 0)
325325
#define IS_SPACE(c) ((c) <= 32 && (White_Chars[c]&2) != 0)

0 commit comments

Comments
 (0)