@Test
public void testParseLiteralArray() {
final ArrayLiteralNode _node;
_node =
((ArrayLiteralNode)
Parser.factory
.source_("#(#foo foo \'foo\' 1 (a b c) #( a b c) ((x)) () #[1 2 3])")
.parseExpression());
assertTrue(
st.gravel.support.jvm.ObjectExtensions.equals_(_node.factory(), ArrayLiteralNode.factory));
assertEquals(
(String) "#(#foo #foo \'foo\' 1 #(#a #b #c) #(#a #b #c) #(#(#x)) #() #[1 2 3])",
(String) _node.prettySourceString());
assertTrue(st.gravel.support.jvm.IntegerExtensions.equals_(_node.value().length, 9));
}
@Override
public Reference superclassReference() {
final st.gravel.core.Symbol[] _path;
if (_superclassPath == null) {
return null;
}
_path =
st.gravel.support.jvm.ArrayExtensions.collect_(
st.gravel.support.jvm.StringExtensions.tokensBasedOn_(_superclassPath, '.'),
((st.gravel.support.jvm.Block1<st.gravel.core.Symbol, String>)
(new st.gravel.support.jvm.Block1<st.gravel.core.Symbol, String>() {
@Override
public st.gravel.core.Symbol value_(final String _str) {
return (st.gravel.core.Symbol) st.gravel.core.Symbol.value(_str);
}
})));
if (st.gravel.support.jvm.IntegerExtensions.equals_(_path.length, 1)) {
return AbsoluteReference.factory.path_(
st.gravel.support.jvm.ArrayExtensions.copyWith_(_namespace, _path[0]));
}
return AbsoluteReference.factory.path_(_path);
}