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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
|
package org.shedlang.compiler.util;
import org.pcollections.*;
import java.util.Arrays;
import java.util.Map;
import java.util.function.Function;
public class P {
private P() {
}
@SafeVarargs
public static <K, V> PMap<K, V> map(Map.Entry<K, V>... entries) {
var map = HashTreePMap.<K, V>empty();
for (var entry : entries) {
map = map.plus(entry.getKey(), entry.getValue());
}
return map;
}
@SafeVarargs
public static <K, V> POrderedMap<K, V> orderedMap(Map.Entry<K, V>... entries) {
var map = POrderedMap.<K, V>empty();
for (var entry : entries) {
map = map.plus(entry.getKey(), entry.getValue());
}
return map;
}
@SafeVarargs
public static <K, V> OrderedPMap<K, V> orderedPMap(Map.Entry<K, V>... entries) {
var map = OrderedPMap.<K, V>empty();
for (var entry : entries) {
map = map.plus(entry.getKey(), entry.getValue());
}
return map;
}
@SafeVarargs
public static <T> OrderedPSet<T> orderedSet(T... values) {
return OrderedPSet.from(Arrays.asList(values));
}
@SafeVarargs
public static <T> PSet<T> set(T... values) {
return HashTreePSet.from(Arrays.asList(values));
}
@SafeVarargs
public static <T> PStack<T> stack(T... values) {
return ConsPStack.from(Arrays.asList(values));
}
public static <T> PStack<T> stackUpdateTop(PStack<T> stack, Function<T, T> update) {
var newElement = update.apply(stack.get(0));
return stack.with(0, newElement);
}
@SafeVarargs
public static <T> PVector<T> vector(T... values) {
return TreePVector.from(Arrays.asList(values));
}
}
|
