Strings in rom are initialized with usage count 9999.

decstr does not touch these at all.

diff --git a/lang/basic/lib/string.c b/lang/basic/lib/string.c
index 5f7d2fa..0aa8fde 100644 (file)
--- a/lang/basic/lib/string.c
+++ b/lang/basic/lib/string.c
@@ -36,6 +36,8 @@ _decstr(str)
 String *str;
 {
        ok(str);
+       /* Strings in ROM are initialized with this count */
+       if ( str->strcount==9999 ) return ;
        str->strcount--;
        if(str->strcount<=0) _delstr(str);
 }