extra/present/present.factor

   1 USING: math math.parser calendar calendar.format strings words
   2 kernel effects ;
   3 IN: present
   4
   5 GENERIC: present ( object -- string )
   6
   7 M: real present number>string ;
   8
   9 M: timestamp present timestamp>string ;
  10
  11 M: string present ;
  12
  13 M: word present word-name ;
  14
  15 M: effect present effect>string ;
  16
  17 M: f present drop "" ;