Blob   xtlang


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/tests/core/generics.xtm

Implementation

;; deconstructor
(bind-func Blob:[!b,Shape{!a}*,[!b]*,[!b]*]*
  (lambda (s success fail)
    (if (<> (tref s 0) 3)
        (fail)
        (success))))


Back to Index

Similar Entries