src/main/java/org/zwobble/couscous/interpreter/values/StringValue.java


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34

package org.zwobble.couscous.interpreter.values;

import org.zwobble.couscous.values.TypeReference;

import static java.util.Arrays.asList;
import static org.zwobble.couscous.values.TypeReference.typeRef;

import lombok.Value;
import lombok.val;

@Value
public class StringValue implements InterpreterValue {
    public static final TypeReference REF = typeRef("java.lang.String");
    
    public static final ConcreteType<?> TYPE = ConcreteType.<StringValue>builder(REF)
        .method("length", asList(),
            (receiver, arguments) -> new IntegerValue(receiver.value.length()))
        
        .method("substring", asList(IntegerValue.REF, IntegerValue.REF),
            (receiver, arguments) -> {
                val startIndex = (IntegerValue)arguments.get(0);
                val endIndex = (IntegerValue)arguments.get(1);
                return new StringValue(receiver.value.substring(startIndex.getValue(), endIndex.getValue()));
            })
        
        .build();
    
    String value;

    @Override
    public ConcreteType<?> getType() {
        return TYPE;
    }
}