]> gitweb.factorcode.org Git - factor.git/blob - basis/present/present.factor
Change a throw to rethrow so that we don't lose the original stack trace
[factor.git] / basis / present / present.factor
1 ! Copyright (C) 2008 Slava Pestov.
2 ! See http://factorcode.org/license.txt for BSD license.
3 USING: accessors math math.parser strings words kernel effects ;
4 IN: present
5
6 GENERIC: present ( object -- string )
7
8 M: real present number>string ;
9
10 M: string present ;
11
12 M: word present name>> ;
13
14 M: effect present effect>string ;
15
16 M: f present drop "" ;