Skip to content

Latest commit

 

History

History
13 lines (13 loc) · 334 Bytes

File metadata and controls

13 lines (13 loc) · 334 Bytes
-- elems :: Map k a -> [a]
-- elems :: Set a -> [a]
on elems(x)
    if record is class of x then -- Dict
        tell current application to allValues() ¬
            of dictionaryWithDictionary_(x) ¬
            of its NSDictionary as list
    else -- Set
        (allObjects() of x) as list
    end if
end elems