@Specialization protected Object castFunction(RFunction f) { if (isNonVectorPreserved()) { return f; } else { return RDataFactory.createList(); } }
@Specialization protected Object castNull(@SuppressWarnings("unused") RNull rnull) { if (isNonVectorPreserved()) { return RNull.instance; } else { return RDataFactory.createList(); } }