Widget_find_preorder   xtlang


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/libs/external/gui.xtm

Implementation

;; returns the first widget for which pred returns true
(bind-func Widget_find_preorder
  (lambda (widget:Widget* pred:[i1,Widget*]*)
    (if (and (not (null? widget)) (pred widget))
        widget
        (if (not (null? widget))
            (begin
              (let ((left:Widget* (Widget_find_preorder (Widget_left_child widget) pred)))
                (if (not (null? left))
                  left
                  (Widget_find_preorder (Widget_right_child widget) pred))))
            null))))


Back to Index

Similar Entries

  • BTree_walk_preorder    xtlang
  • Widget_button    xtlang
  • Widget_button    xtlang
  • Widget_button_c    xtlang
  • Widget_cb    xtlang
  • Widget_checkbox    xtlang
  • Widget_checkbox    xtlang
  • Widget_checkbox_c    xtlang
  • Widget_child_p    xtlang
  • Widget_find_inorder    xtlang
  • Widget_find_postorder    xtlang
  • Widget_free    xtlang
  • Widget_id    xtlang
  • Widget_internal_p    xtlang
  • Widget_leaf_p    xtlang
  • Widget_left_child    xtlang
  • Widget_parent    xtlang
  • Widget_parent_p    xtlang
  • Widget_radio    xtlang
  • Widget_radio    xtlang
  • Widget_radio_c    xtlang
  • Widget_right_child    xtlang
  • Widget_set_cb    xtlang
  • Widget_set_left_child    xtlang
  • Widget_set_parent    xtlang
  • Widget_set_right_child    xtlang
  • Widget_set_split    xtlang
  • Widget_set_type    xtlang
  • Widget_slider    xtlang
  • Widget_slider    xtlang
  • Widget_slider2D    xtlang
  • Widget_slider2D    xtlang
  • Widget_slider2D_c    xtlang
  • Widget_slider_c    xtlang
  • Widget_split    xtlang
  • Widget_split_horizontal_p    xtlang
  • Widget_split_vertical_p    xtlang
  • Widget_swap_children    xtlang
  • Widget_swap_split_orientation    xtlang
  • Widget_type    xtlang
  • Widget_type_add_flags    xtlang
  • Widget_type_remove_flags    xtlang
  • Widget_walk_inorder    xtlang
  • Widget_walk_postorder    xtlang
  • Widget_walk_preorder    xtlang
  • Widget_with_cb    xtlang
  • aiProcess_FindDegenerates    scheme
  • aiProcess_FindInstances    scheme
  • aiProcess_FindInvalidData    scheme
  • ai_find_matching_node    xtlang
  • cl:find-if    scheme
  • find_node    xtlang
  • find_peaks    xtlang
  • find_peaks_log    xtlang
  • find_previous_peak    xtlang
  • find_sexprs    xtlang
  • find_sqr_exprs    xtlang
  • get_find_handler    xtlang
  • gui_add_widget    xtlang
  • gui_add_widget    xtlang
  • gui_find_leaf_inorder    xtlang
  • gui_find_leaf_postorder    xtlang
  • gui_find_leaf_preorder    xtlang
  • gui_find_next_id    xtlang
  • gui_find_parent    xtlang
  • gui_find_widget_with_id    xtlang
  • iffchunk_find_dumb    xtlang
  • iffchunk_find_smart    xtlang
  • impc:compiler:print-could-not-resolve-types_find-expr    scheme
  • impc:ti:find-all-vars    scheme
  • impc:ti:find-unresolved-simple-types    scheme
  • instrument_find_note    xtlang
  • pc:find-closest    scheme
  • xtm_find_bone    xtlang