summaryrefslogtreecommitdiff
path: root/apps/interpreters/bas/bas.c
diff options
context:
space:
mode:
Diffstat (limited to 'apps/interpreters/bas/bas.c')
-rw-r--r--apps/interpreters/bas/bas.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/apps/interpreters/bas/bas.c b/apps/interpreters/bas/bas.c
index 63f9c69d8..0ab8eaf3d 100644
--- a/apps/interpreters/bas/bas.c
+++ b/apps/interpreters/bas/bas.c
@@ -2468,6 +2468,8 @@ void bas_interpreter(void)
void bas_exit(void)
{
+ /* Release resources */
+
Auto_destroy(&g_stack);
Global_destroy(&g_globals);
Program_destroy(&g_program);
@@ -2477,6 +2479,10 @@ void bas_exit(void)
g_labelstack = (struct labelstack_s *)0;
}
+ /* Close files and devices. NOTE that STDCHANNEL is also close here and
+ * can no longer be use
+ */
+
FS_closefiles();
FS_close(LPCHANNEL);
FS_close(STDCHANNEL);