112 @verb #7165:"preced" this none this rxdo #7165 @program #7165:"preced" this none this {class_heir, object} = args p_lists = {} for x in (class_heir[object]) p_lists = {@p_lists, this:preced(class_heir, x)} endfor return this:merge(class_heir, object, @p_lists) . 0