chunk_80211   xtlang


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/examples/contrib/80211.xtm

Implementation

(bind-func chunk_80211
  (let ((pop 1) (push 1))
    (lambda (input output)
      (let ((bpsk_mod:|2,i64|* (alloc)))
        (afill! bpsk_mod 741343 -741343)
        (lambda ()
          (let ((in:i64 (qbuf_pop input)))
            (qbuf_push output (aref bpsk_mod in)))
          void)))))


Back to Index

Similar Entries