Using defrecord as I want to see what's happening with out defining print-method