1 package com.tapina.robe.swi.clib.string;
2
3 import com.tapina.robe.runtime.Environment;
4 import com.tapina.robe.runtime.MemoryMap;
5 import com.tapina.robe.swi.clib.Stub;
6
7 import java.util.Arrays;
8
9 /***
10 * This function sets the first a3 characters of the object pointed to by a1, to the value in a2 (converted to an unsigned char).
11 * Returns: a1
12 */
13 public class MemSet extends Stub {
14 public void executeStub(Environment environment) {
15 final MemoryMap memoryMap = environment.getMemoryMap();
16 final int[] R = environment.getCpu().R;
17 byte[] data = new byte[R[2]];
18 Arrays.fill(data, (byte) R[1]);
19 memoryMap.storeBytes(R[0], data, 0, data.length);
20 }
21 }