[Turn off line numbering]1: arg obj; 2: var methods, types, m, t, out; 3: 4: types = #[]; 5: for m in (obj.methods().sort(obj.methods().mmap('to_string))) 6: types = types.add_elem(obj.method_access(m), [m] + obj.method_info(m)); 7: 8: // hard-listing the types guarantee's their order 9: out = []; 10: for t in (['root, 'driver, 'frob, 'public, 'protected, 'private]) { 11: if (!types.contains(t)) 12: continue; 13: out += [tostr(t).capitalize() + " methods:"]; 14: for m in (types[t]) 15: out += [strfmt("%5l %4r " + ._make_method_href([obj, m[1], m[2]]), $object_lib.parse_method_flags(m[7]), m[5])]; 16: } 17: return out;
// Brad Roberts
// Bruce Mitchener, Jr.
// Created 16-May-1997 as a part of ColdCore, see: @help Credit