factor/basis/present/present.factor

20 lines
413 B
Factor

! Copyright (C) 2008 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors math math.parser calendar calendar.format
strings words kernel effects ;
IN: present
GENERIC: present ( object -- string )
M: real present number>string ;
M: timestamp present timestamp>string ;
M: string present ;
M: word present name>> ;
M: effect present effect>string ;
M: f present drop "" ;