bonkmaykr/otyaSMILEBASIC
1
0
Fork 0
Code Activity

Implement FILL

Browse Source
This commit is contained in:
otya128
2016-12-18 19:35:37 +09:00
parent c5b0905b42
commit 77811703f9
2 changed files with 48 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

38
SMILEBASIC/builtinfunctions.d
View File

@@ -2703,6 +2703,44 @@ class BuiltinFunction
//TODO:=== Press ENTER ===
}
}
static void FILL(Value array, Value value)
{
if (array.isString || !array.isArray)
throw new TypeMismatch("FILL", 1);
FILL(array, value, 0, array.length);
}
static void FILL(Value array, Value value, int offset)
{
if (array.isString || !array.isArray)
throw new TypeMismatch("FILL", 1);
FILL(array, value, offset, array.length - offset);
}
static void FILL(Value array, Value value, int offset, int len)
{
if (array.isString || !array.isArray)
throw new TypeMismatch("FILL", 1);
if (!value.canCast(array.elementType))
throw new TypeMismatch("FILL"/*no argument number*/);
if (offset < 0)
throw new OutOfRange("FILL", 3);
if (array.length < offset + len)
throw new OutOfRange("FILL", 4);
if (array.type == ValueType.StringArray)
{
for (int i = 0; i < len; i++)
{
array.stringArray.array[offset + i] = value.castString.dup/*copy*/;
}
}
if (array.type == ValueType.IntegerArray)
{
array.integerArray.array[offset..offset + len] = value.castInteger;
}
if (array.type == ValueType.DoubleArray)
{
array.doubleArray.array[offset..offset + len] = value.castDouble;
}
}
//alias void function(PetitComputer, Value[], Value[]) BuiltinFunc;
static BuiltinFunctions[wstring] builtinFunctions;
static wstring getBasicName(BFD)(const wstring def)

10
SMILEBASIC/type.d
View File

@@ -517,6 +517,16 @@ class Array(T)
array = array[0..index] ~ ary.array ~ array[index + 1..$];
dim[0] = cast(int)array.length;
}
protected this(Array!T a)
{
this.dim = a.dim;
this.dimCount = a.dimCount;
this.array = a.array.dup;
}
Array!T dup()
{
return new Array!T(this);
}
}
struct ArrayReference(T)