Done with docs and unit tests.
parent
dedb1d7536
commit
ef5c9844e4
|
@ -74,10 +74,10 @@ M: hashcash string>>
|
|||
|
||||
PRIVATE>
|
||||
|
||||
: mint* ( tuple -- str )
|
||||
: mint* ( tuple -- stamp )
|
||||
0 (mint) string>> ;
|
||||
|
||||
: mint ( resource -- str )
|
||||
: mint ( resource -- stamp )
|
||||
<hashcash>
|
||||
swap >>resource
|
||||
mint* ;
|
||||
|
|
Loading…
Reference in New Issue