;;; Dynamically loaded pie menus (just big regular menus now)
;;; 
;;;(define pie-menu-obj (dynamic-link "draw-pie-menu.so"))

;;;(define construct-pie-menu 
;;;  (dynamic-func "ConstructDynamicMenu" pie-menu-obj))

;;;(set! construct-menu-primitive construct-pie-menu)