~ chicken-core (chicken-5) 095509cc76f60f4e3554ee5b4202c1e64f1f4f8d
commit 095509cc76f60f4e3554ee5b4202c1e64f1f4f8d Author: felix <felix@call-with-current-continuation.org> AuthorDate: Thu Feb 25 19:38:12 2010 +0100 Commit: felix <felix@call-with-current-continuation.org> CommitDate: Thu Feb 25 19:38:12 2010 +0100 C_text casts to char* in C++ mode (groan) diff --git a/chicken.h b/chicken.h index 9022454a..4a89c719 100644 --- a/chicken.h +++ b/chicken.h @@ -529,7 +529,12 @@ typedef unsigned __int64 uint64_t; #define C_byte char #define C_uword unsigned C_word #define C_header C_uword -#define C_text(x) x + +#ifdef __cplusplus +# define C_text(x) ((char *)(x)) +#else +# define C_text(x) (x) +#endif #define C_TIMER_INTERRUPT_NUMBER 255Trap