src/main/java/org/zwobble/couscous/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

package org.zwobble.couscous.values;

import static java.util.Arrays.asList;

import lombok.Value;
import lombok.val;

@Value
public class StringValue implements InterpreterValue {
    public static final ConcreteType<?> TYPE = ConcreteType.<StringValue>builder("String")
        .method("length", () -> asList(),
            (receiver, arguments) -> new IntegerValue(receiver.value.length()))
        
        .method("substring", () -> asList(IntegerValue.TYPE, IntegerValue.TYPE),
            (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;
    }
}