rmap_helper_lst_sym_transform   scheme


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/libs/core/pattern-language.xtm

Implementation

;; this function is for mananing symbols inside a pattern _ for rest etc..
(define rmap_helper_lst_sym_transform
  (lambda (lst)
    (if (atom? lst) (set! lst (list lst)))
    (if (and (= (length lst) 1) (null? (car lst))) (set! lst `(_)))
    (apply append '()
           (map (lambda (elt next)
                  (cond ((and (vector? elt) (symbol? next))
                         (list elt))
                        ((list? elt)
                         (if (= (length elt) 1)
                             elt
                             (list elt)))
                        (else (list elt))))
                lst
                (append (cdr lst) '(0))))))


Back to Index

Similar Entries

  • Symbol    xtlang
  • Symbol    xtlang
  • Symbol_free    xtlang
  • aiProcess_PreTransformVertices    scheme
  • aiProcess_TransformUVCoords    scheme
  • callback-test2-helper    xtlang
  • cpTransformAxialScale    xtlang
  • cpTransformBB    xtlang
  • cpTransformBoneScale    xtlang
  • cpTransformInverse    xtlang
  • cpTransformMult    xtlang
  • cpTransformNew    xtlang
  • cpTransformNewTranspose    xtlang
  • cpTransformOrtho    xtlang
  • cpTransformPoint    xtlang
  • cpTransformRigid    xtlang
  • cpTransformRigidInverse    xtlang
  • cpTransformRotate    xtlang
  • cpTransformScale    xtlang
  • cpTransformTranslate    xtlang
  • cpTransformVect    xtlang
  • cpTransformWrap    xtlang
  • cpTransformWrapInverse    xtlang
  • global_transform2d    xtlang
  • glwrapper-arg-list-symbols    scheme
  • glwrapper-arg-list-symbols    scheme
  • godot_variant_new_transform    xtlang
  • godot_variant_new_transform2d    xtlang
  • impc:ti:block:check-for-free-syms    scheme
  • impc:ti:first-transform    scheme
  • impc:ti:gather-all-gvars-helper    scheme
  • impc:ti:get-closure-arg-symbols    scheme
  • impc:ti:sym-unify    scheme
  • impc:ti:symbol-check    scheme
  • match-symbol    scheme
  • print-str-sym    xtlang
  • rmap    macro
  • rmap-loop-runner    macro
  • rmap_helper    scheme
  • update-fluid-sym-state    xtlang