steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Add a couple of inverses to inverse, fix summary

db4
Slava Pestov 2008-04-12 23:59:11 -05:00
parent d1f381ce3e
commit 68c82f88b1
2 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
extra/inverse/inverse.factor
View File

@ -195,6 +195,10 @@ DEFER: _
\ first3 [ 3array ] define-inverse \ first3 [ 3array ] define-inverse
\ first4 [ 4array ] define-inverse \ first4 [ 4array ] define-inverse
\ prefix [ unclip ] define-inverse
\ unclip [ prefix ] define-inverse
\ suffix [ dup 1 head* swap peek ] define-inverse
! Constructor inverse ! Constructor inverse
: deconstruct-pred ( class -- quot ) : deconstruct-pred ( class -- quot )
"predicate" word-prop [ dupd call assure ] curry ; "predicate" word-prop [ dupd call assure ] curry ;

2
extra/macros/summary.txt
View File

@ -1 +1 @@
Utility for defining compiler transforms, and short-circuiting boolean operators Utility for defining compiler transforms