suzanne.soy/gui
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

temporary hack to eliminate bad contract

Browse Source 
original commit: 749012a738181ef7170007c4ee1a81db5807d42c
This commit is contained in:
Robby Findler 2003-11-01 14:32:52 +00:00
parent 884520a7a2
commit a8d5c4997f
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/mrlib/private/aligned-pasteboard/snip-lib.ss
View File

@ -13,7 +13,7 @@
;; a snip to act as the varying argument to a recursive functions
(define linked-snip? (union snip? false?))
;; a function to act on snips being mapped
(define snip-visitor? ((snip?) (listof any?) . ->* . (void)))
(define snip-visitor? any? #;((snip?) (listof any?) . ->* . (void)))
;; the rest of the lists passed to a snip mapping function
(define rest-lists? (listof (listof any?)))
;; a class that contains a snip