uint8 = 2
uint16 = 4
uint32 = 8
uint64 = 16

arrMake(size, bytesize) = malloc(size*bytesize)

arrGet(arr, index, bytesize) =
    reduce(
        (x, y) = x + (y<<8),
        slice(arr, index*bytesize, index*bytesize+bytesize)
    )

arrSet(arr, index, bytesize, value) =
    index=index*bytesize;
    map(
        (x) = set(arr, index+x, value >> (x<<3) & 0xff),
        range(0, bytesize)
    );
    0
arrMap(arr, func, bytesize) =
    map(
        (x) = func(arrGet(arr, x, bytesize)),
        range(0, len(arr)//bytesize)
    );
    0

mem = arrMake(4, 4)
arrSet(mem, 0, 4, 32754)
arrSet(mem, 1, 4, 167)
arrSet(mem, 3, 4, 12765)
println(mem)
println(arrGet(mem, 0, 4))
arrMap(mem, (x)=print(x, " "), 4)
println()