factor/extra/present/present.factor

16 lines
271 B
Factor
Raw Normal View History

USING: math math.parser calendar calendar.format strings words
kernel ;
IN: present
GENERIC: present ( object -- string )
M: real present number>string ;
M: timestamp present timestamp>string ;
M: string present ;
M: word present word-name ;
M: f present drop "" ;