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

*improved incomplete IF structure error prompting.

Browse Source
This commit is contained in:
Wang Renxin 2020-04-09 17:12:22 +08:00
parent 5bd179b199
commit b55f50e4e5
8 changed files with 15 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
HISTORY
View File

@ -1,3 +1,6 @@
Apr. 9 2020
Improved incomplete IF structure error prompting
Mar. 16 2019
Fixed a memory leak when reassigning an array element with string, thanks to Jacques Diederik for pointing it out

2
LICENSE
View File

@ -1,6 +1,6 @@
The MIT License
Copyright (C) 2011 - 2019 Wang Renxin
Copyright (C) 2011 - 2020 Wang Renxin
Permission is hereby granted, free of charge, to any person obtaining a copy of
this software and associated documentation files (the "Software"), to deal in

2
README.md
View File

@ -5,7 +5,7 @@
|_|_|_| |_| |_____|__|__|_____|_____|_____|
~~~~~~~~~~
**Copyright (C) 2011 - 2019 Wang Renxin**
**Copyright (C) 2011 - 2020 Wang Renxin**
[![Build status](https://travis-ci.org/paladin-t/my_basic.svg?branch=master)](https://travis-ci.org/paladin-t/my_basic)
[![MIT license](http://img.shields.io/badge/license-MIT-brightgreen.svg)](http://opensource.org/licenses/MIT)

6
core/my_basic.c
View File

@ -3,7 +3,7 @@
**
** For the latest info, see https://github.com/paladin-t/my_basic/
**
** Copyright (C) 2011 - 2019 Wang Renxin
** Copyright (C) 2011 - 2020 Wang Renxin
**
** Permission is hereby granted, free of charge, to any person obtaining a copy of
** this software and associated documentation files (the "Software"), to deal in
@ -15807,7 +15807,9 @@ _elseif:
if(ast && ast->next && _IS_EOS(ast->next->data)) {
multi_line = true;
_skip_if_chunk(s, &ast);
result = _skip_if_chunk(s, &ast);
if(result != MB_FUNC_OK)
goto _exit;
}
if(multi_line && ast && _IS_FUNC(ast->data, _core_elseif)) {
ast = ast->next;

2
core/my_basic.h
View File

@ -3,7 +3,7 @@
**
** For the latest info, see https://github.com/paladin-t/my_basic/
**
** Copyright (C) 2011 - 2019 Wang Renxin
** Copyright (C) 2011 - 2020 Wang Renxin
**
** Permission is hereby granted, free of charge, to any person obtaining a copy of
** this software and associated documentation files (the "Software"), to deal in

4
donate.html
View File

@ -1,6 +1,6 @@
<!DOCTYPE html>
<!--
COPYRIGHT 2011 - 2019 WANG RENXIN. ALL RIGHTS REESERVED.
COPYRIGHT 2011 - 2020 WANG RENXIN. ALL RIGHTS REESERVED.
LIST OF DONORS.
-->
<html>
@ -115,6 +115,6 @@ LIST OF DONORS.
<a href="https://github.com/paladin-t/my_basic">BACK TO MY-BASIC</a>
</p>
</div>
<p align="center">Copyright (C) 2011 - 2019 Wang Renxin. All rights reserved.</p>
<p align="center">Copyright (C) 2011 - 2020 Wang Renxin. All rights reserved.</p>
</body>
</html>

2
resource/my_basic.rc
View File

@ -57,7 +57,7 @@
VALUE "FileDescription", "MY-BASIC Interpreter for Windows"
VALUE "FileVersion", "1, 2, 0, 0"
VALUE "InternalName", "my_basic"
VALUE "LegalCopyright", "Copyright (C) 2011 - 2019 Wang Renxin"
VALUE "LegalCopyright", "Copyright (C) 2011 - 2020 Wang Renxin"
VALUE "LegalTrademarks", "MY-BASIC"
VALUE "OriginalFilename", "my_basic.exe"
VALUE "ProductName", "MY-BASIC"

4
shell/main.c
View File

@ -3,7 +3,7 @@
**
** For the latest info, see https://github.com/paladin-t/my_basic/
**
** Copyright (C) 2011 - 2019 Wang Renxin
** Copyright (C) 2011 - 2020 Wang Renxin
**
** Permission is hereby granted, free of charge, to any person obtaining a copy of
** this software and associated documentation files (the "Software"), to deal in
@ -979,7 +979,7 @@ static void _list_directory(const char* path) {
static void _show_tip(void) {
_printf("MY-BASIC Interpreter Shell - %s\n", mb_ver_string());
_printf("Copyright (C) 2011 - 2019 Wang Renxin. All Rights Reserved.\n");
_printf("Copyright (C) 2011 - 2020 Wang Renxin. All Rights Reserved.\n");
_printf("For more information, see https://github.com/paladin-t/my_basic/.\n");
_printf("Input HELP and hint enter to view help information.\n");
}