@BIF
public static EBinary list_to_binary(EObject val) {
EString es;
if ((es = val.testString()) != null) {
return es.asBitString();
}
ECons cons = val.testCons();
if (cons == null) throw ERT.badarg(val);
List<ByteBuffer> out = new ArrayList<ByteBuffer>();