namelist
;;; -*- logo -*-
to namelist :names
if wordp :names [output list [] (list :names)]
output list [] :names
end
bury "namelist
;;; -*- logo -*-
to namelist :names
if wordp :names [output list [] (list :names)]
output list [] :names
end
bury "namelist