VERSION,FREEMEM,RIGHT$実装

2015-08-27 21:35:15 +09:00
parent 7eabb17a22
commit f149ce596f
4 changed files with 30 additions and 5 deletions
--- a/SMILEBASIC/builtinfunctions.d
+++ b/SMILEBASIC/builtinfunctions.d
@@ -327,6 +327,10 @@ class BuiltinFunction
    {
        return str[0..len];
    }
+    static wstring RIGHT(wstring str, int len)
+    {
+        return str[$ - len..$];
+    }
    static wstring SUBST(wstring str, int i, Value alen, DefaultValue!(Value,false) areplace)
    {
        int len = 1;