public static Object[] list_to_vector(Object l) { int n = list_length(l); Object [] r = new Object[n]; for(int i=0 ; l != BNIL ; l = ((pair) l).cdr, i++) r[i] = ((pair) l).car; return(r); }