backward_slide   xtlang


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

Implementation

(bind-func backward_slide
  (lambda ()
    (set! slide_idx (- slide_idx 1))
    (if (< slide_idx 0) (set! slide_idx (i64toi32 0)))
    (printf "slide: %d\n" slide_idx)
    slide_idx))


Back to Index

Similar Entries