From 72aee6fbc1bab2f9c3ffd90078636b6cd9934b0b Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Beno=C3=AEt=20Minisini?= Date: Tue, 21 Dec 2010 17:29:39 +0000 Subject: [PATCH] [INTERPRETER] * NEW: IsInteger(), IsLong(), IsFloat(), IsDate() and IsNumber() argument now must be a string. There is no automatic conversion anymore. git-svn-id: svn://localhost/gambas/trunk@3390 867c0c6c-44f3-4631-809d-bfa615b0a4ec --- main/gbx/gbx_event.c | 4 ++-- main/gbx/gbx_subr_conv.c | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/main/gbx/gbx_event.c b/main/gbx/gbx_event.c index 2842253e0..f4c9bd44e 100644 --- a/main/gbx/gbx_event.c +++ b/main/gbx/gbx_event.c @@ -246,12 +246,12 @@ char *EVENT_enter_name(const char *name) { char *save = EVENT_PreviousName; EVENT_PreviousName = EVENT_Name; - EVENT_Name = name; + EVENT_Name = (char *)name; return save; } void EVENT_leave_name(const char *save) { EVENT_Name = EVENT_PreviousName; - EVENT_PreviousName = save; + EVENT_PreviousName = (char *)save; } diff --git a/main/gbx/gbx_subr_conv.c b/main/gbx/gbx_subr_conv.c index 1550b0071..9f686d427 100644 --- a/main/gbx/gbx_subr_conv.c +++ b/main/gbx/gbx_subr_conv.c @@ -51,8 +51,8 @@ void SUBR_is_type(ushort code) if (code == T_NULL) goto __NULL; - VALUE_conv_string(PARAM); - VALUE_get_string(PARAM, &addr, &len); + //VALUE_conv_string(PARAM); + SUBR_get_string_len(PARAM, &addr, &len); VALUE_from_string(&temp, addr, len); goto *jump[code];