quinn-os/my-basic
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

*fixed a utf8 token processing bug with class and sub routine.

Browse Source
This commit is contained in:
paladin-t 2016-04-22 20:26:04 +08:00
parent 9ae36da6bf
commit 17deb52838
1 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
core/my_basic.c
View File

@ -4910,7 +4910,11 @@ _end_import:
goto _exit; goto _exit;
} }
_begin_class(s); _begin_class(s);
#ifdef MB_ENABLE_UNICODE_ID
if(!_is_identifier_char(sym[0]) && !mb_uu_ischar(sym)) {
#else /* MB_ENABLE_UNICODE_ID */
if(!_is_identifier_char(sym[0])) { if(!_is_identifier_char(sym[0])) {
#endif /* MB_ENABLE_UNICODE_ID */
result = _DT_NIL; result = _DT_NIL;
goto _exit; goto _exit;
@ -4949,7 +4953,11 @@ _end_import:
if(_IS_FUNC(context->last_symbol, _core_def) || _IS_FUNC(context->last_symbol, _core_call)) { if(_IS_FUNC(context->last_symbol, _core_def) || _IS_FUNC(context->last_symbol, _core_call)) {
if(_IS_FUNC(context->last_symbol, _core_def)) if(_IS_FUNC(context->last_symbol, _core_def))
_begin_routine(s); _begin_routine(s);
#ifdef MB_ENABLE_UNICODE_ID
if(!_is_identifier_char(sym[0]) && !mb_uu_ischar(sym)) {
#else /* MB_ENABLE_UNICODE_ID */
if(!_is_identifier_char(sym[0])) { if(!_is_identifier_char(sym[0])) {
#endif /* MB_ENABLE_UNICODE_ID */
result = _DT_NIL; result = _DT_NIL;
goto _exit; goto _exit;