6008
#hash(((def ((lib "embedded-gui/main.rkt") snip-wrapper%)) . ((6152 . 4))) ((meth (((lib "embedded-gui/main.rkt") alignment-parent<%>) add-child)) . ((1423 . 3))) ((def ((lib "embedded-gui/main.rkt") stretchable-width?)) . ((10956 . 3))) ((meth (((lib "embedded-gui/main.rkt") cue-text%) clear-cue-text)) . ((10050 . 2))) ((def ((lib "embedded-gui/main.rkt") hline%)) . ((5957 . 4))) ((def ((lib "embedded-gui/main.rkt") stretchable-editor-snip-mixin)) . ((7972 . 4))) ((def ((lib "embedded-gui/main.rkt") single-line-text-mixin)) . ((9402 . 3))) ((meth (((lib "embedded-gui/main.rkt") tabbable-text<%>) set-caret-owner)) . ((8804 . 2))) ((def ((lib "embedded-gui/main.rkt") button-snip%)) . ((6846 . 3))) ((meth (((lib "embedded-gui/main.rkt") tabbable-text<%>) set-ahead)) . ((8863 . 2))) ((meth (((lib "embedded-gui/main.rkt") alignment-parent<%>) get-pasteboard)) . ((1343 . 3))) ((def ((lib "embedded-gui/main.rkt") for-each-snip)) . ((10637 . 5))) ((def ((lib "embedded-gui/main.rkt") cue-text-mixin)) . ((9509 . 3))) ((def ((lib "embedded-gui/main.rkt") alignment<%>)) . ((100 . 3))) ((def ((lib "embedded-gui/main.rkt") horizontal-alignment%)) . ((2254 . 5))) ((def ((lib "embedded-gui/main.rkt") vline%)) . ((5762 . 4))) ((meth (((lib "embedded-gui/main.rkt") alignment<%>) stretchable-width)) . ((857 . 4))) ((def ((lib "embedded-gui/main.rkt") stretchable-height?)) . ((11037 . 3))) ((meth (((lib "embedded-gui/main.rkt") stretchable-snip<%>) stretchable-width)) . ((1932 . 4))) ((meth (((lib "embedded-gui/main.rkt") dllist<%>) map-to-list)) . ((3677 . 3))) ((def ((lib "embedded-gui/main.rkt") grey-editor-mixin)) . ((9307 . 3))) ((def ((lib "embedded-gui/main.rkt") snip-height)) . ((10173 . 3))) ((constructor ((lib "embedded-gui/main.rkt") embedded-toggle-button%)) . ((4711 . 15))) ((def ((lib "embedded-gui/main.rkt") alignment-parent<%>)) . ((1298 . 2))) ((constructor ((lib "embedded-gui/main.rkt") cue-text%)) . ((9664 . 9))) ((def ((lib "embedded-gui/main.rkt") embedded-message%)) . ((5447 . 3))) ((constructor ((lib "embedded-gui/main.rkt") horizontal-alignment%)) . ((2379 . 9))) ((constructor ((lib "embedded-gui/main.rkt") button-snip%)) . ((6899 . 7))) ((meth (((lib "embedded-gui/main.rkt") alignment-parent<%>) is-shown?)) . ((1630 . 2))) ((def ((lib "embedded-gui/main.rkt") embedded-text-button%)) . ((3786 . 4))) ((meth (((lib "embedded-gui/main.rkt") alignment<%>) show)) . ((1223 . 3))) ((def ((lib "embedded-gui/main.rkt") fold-snip)) . ((10481 . 5))) ((constructor ((lib "embedded-gui/main.rkt") toggle-button-snip%)) . ((7264 . 15))) ((meth (((lib "embedded-gui/main.rkt") alignment<%>) get-parent)) . ((165 . 2))) ((constructor ((lib "embedded-gui/main.rkt") hline%)) . ((6039 . 3))) ((meth (((lib "embedded-gui/main.rkt") dllist<%>) next)) . ((3305 . 4))) ((meth (((lib "embedded-gui/main.rkt") alignment<%>) show/hide)) . ((1143 . 3))) ((meth (((lib "embedded-gui/main.rkt") alignment<%>) get-min-height)) . ((772 . 3))) ((constructor ((lib "embedded-gui/main.rkt") stretchable-editor-snip%)) . ((8267 . 7))) ((def ((lib "embedded-gui/main.rkt") grey-editor-snip-mixin)) . ((9204 . 3))) ((def ((lib "embedded-gui/main.rkt") snip-width)) . ((10103 . 3))) ((constructor ((lib "embedded-gui/main.rkt") embedded-text-button%)) . ((3883 . 7))) ((meth (((lib "embedded-gui/main.rkt") alignment<%>) stretchable-height)) . ((999 . 4))) ((meth (((lib "embedded-gui/main.rkt") dllist<%>) prev)) . ((3443 . 4))) ((def ((lib "embedded-gui/main.rkt") toggle-button-snip%)) . ((7204 . 3))) ((def ((lib "embedded-gui/main.rkt") cue-text%)) . ((9597 . 3))) ((constructor ((lib "embedded-gui/main.rkt") vertical-alignment%)) . ((2891 . 9))) ((constructor ((lib "embedded-gui/main.rkt") snip-wrapper%)) . ((6237 . 6))) ((meth (((lib "embedded-gui/main.rkt") stretchable-snip<%>) get-aligned-min-height)) . ((1833 . 3))) ((def ((lib "embedded-gui/main.rkt") embedded-button%)) . ((4199 . 4))) ((def ((lib "embedded-gui/main.rkt") snip-parent)) . ((10393 . 3))) ((constructor ((lib "embedded-gui/main.rkt") embedded-message%)) . ((5513 . 7))) ((meth (((lib "embedded-gui/main.rkt") alignment-parent<%>) delete-child)) . ((1525 . 3))) ((meth (((lib "embedded-gui/main.rkt") stretchable-snip<%>) get-aligned-min-width)) . ((1735 . 3))) ((def ((lib "embedded-gui/main.rkt") snip-min-height)) . ((10318 . 3))) ((def ((lib "embedded-gui/main.rkt") vertical-alignment%)) . ((2768 . 5))) ((def ((lib "embedded-gui/main.rkt") tabbable-text-mixin)) . ((8968 . 4))) ((meth (((lib "embedded-gui/main.rkt") alignment<%>) set-min-sizes)) . ((241 . 2))) ((meth (((lib "embedded-gui/main.rkt") alignment<%>) align)) . ((295 . 9))) ((meth (((lib "embedded-gui/main.rkt") tabbable-text<%>) set-back)) . ((8916 . 2))) ((meth (((lib "embedded-gui/main.rkt") alignment<%>) get-min-width)) . ((688 . 3))) ((def ((lib "embedded-gui/main.rkt") stretchable-editor-snip%)) . ((8126 . 5))) ((constructor ((lib "embedded-gui/main.rkt") vline%)) . ((5844 . 3))) ((def ((lib "embedded-gui/main.rkt") set-tabbing)) . ((9113 . 3))) ((def ((lib "embedded-gui/main.rkt") tabbable-text<%>)) . ((8762 . 2))) ((def ((lib "embedded-gui/main.rkt") aligned-pasteboard%)) . ((0 . 4))) ((def ((lib "embedded-gui/main.rkt") map-snip)) . ((10799 . 5))) ((def ((lib "embedded-gui/main.rkt") text-button-snip%)) . ((6489 . 3))) ((meth (((lib "embedded-gui/main.rkt") stretchable-snip<%>) stretchable-height)) . ((2092 . 4))) ((meth (((lib "embedded-gui/main.rkt") dllist<%>) for-each)) . ((3581 . 3))) ((def ((lib "embedded-gui/main.rkt") stretchable-snip<%>)) . ((1690 . 2))) ((def ((lib "embedded-gui/main.rkt") dllist<%>)) . ((3270 . 2))) ((def ((lib "embedded-gui/main.rkt") fixed-width-label-snip)) . ((8642 . 3))) ((def ((lib "embedded-gui/main.rkt") embedded-toggle-button%)) . ((4612 . 4))) ((constructor ((lib "embedded-gui/main.rkt") text-button-snip%)) . ((6547 . 7))) ((def ((lib "embedded-gui/main.rkt") snip-min-width)) . ((10244 . 3))) ((constructor ((lib "embedded-gui/main.rkt") embedded-button%)) . ((4291 . 7))))
class
aligned-pasteboard% : class?
  superclass: pasteboard%
  extends: alignment-parent<%>
interface
alignment<%> : interface?
  implements: dllist<%>
method
(send an-alignment get-parent) -> (is-a?/c alignment-parent<%>)
method
(send an-alignment set-min-sizes) -> void?
method
(send an-alignment align x-offset     
                         y-offset     
                         width        
                         height)  -> void?
  x-offset : (and/c real? (not/c negative?))
  y-offset : (and/c real? (not/c negative?))
  width : (and/c real? (not/c negative?))
  height : (and/c real? (not/c negative?))
method
(send an-alignment get-min-width)
 -> (and/c real? (not/c negative?))
method
(send an-alignment get-min-height)
 -> (and/c real? (not/c negative?))
method
(send an-alignment stretchable-width) -> boolean?
(send an-alignment stretchable-width value) -> void?
  value : boolean?
method
(send an-alignment stretchable-height) -> boolean?
(send an-alignment stretchable-height value) -> void?
  value : boolean?
method
(send an-alignment show/hide show?) -> void?
  show? : boolean?
method
(send an-alignment show show?) -> void?
  show? : boolean?
interface
alignment-parent<%> : interface?
method
(send an-alignment-parent get-pasteboard)
 -> (is-a?/c pasteboard%)
method
(send an-alignment-parent add-child child) -> void?
  child : (is-a?/c alignment<%>)
method
(send an-alignment-parent delete-child child) -> void?
  child : (is-a?/c alignment<%>)
method
(send an-alignment-parent is-shown?) -> boolean?
interface
stretchable-snip<%> : interface?
method
(send a-stretchable-snip get-aligned-min-width)
 -> (and/c real? (not/c negative?))
method
(send a-stretchable-snip get-aligned-min-height)
 -> (and/c real? (not/c negative?))
method
(send a-stretchable-snip stretchable-width) -> boolean?
(send a-stretchable-snip stretchable-width stretch?) -> void?
  stretch? : boolean?
method
(send a-stretchable-snip stretchable-height) -> boolean?
(send a-stretchable-snip stretchable-height stretch?) -> void?
  stretch? : boolean?
class
horizontal-alignment% : class?
  superclass: dllist<%>
  extends: alignment<%>
           alignment-parent<%>
constructor
(new horizontal-alignment%                  
                            [parent parent] 
                           [[show? show?]   
                            [after after]]) 
 -> (is-a?/c horizontal-alignment%)
  parent : (is-a?/c alignment-parent<%>)
  show? : boolean? = #t
  after : (or/c (is-a?/c alignment<%>) false/c) = #f
class
vertical-alignment% : class?
  superclass: dllist<%>
  extends: alignment<%>
           alignment-parent<%>
constructor
(new vertical-alignment%                  
                          [parent parent] 
                         [[show? show?]   
                          [after after]]) 
 -> (is-a?/c vertical-alignment%)
  parent : (is-a?/c alignment-parent<%>)
  show? : boolean? = #t
  after : (or/c (is-a?/c alignment<%>) false/c) = #f
interface
dllist<%> : interface?
method
(send a-dllist next) -> (is-a?/c dllist<%>)
(send a-dllist next new-next) -> void?
  new-next : (is-a?/c dllist<%>)
method
(send a-dllist prev) -> (is-a?/c dllist<%>)
(send a-dllist prev new-prev) -> void?
  new-prev : (is-a?/c dllist<%>)
method
(send a-dllist for-each f) -> void?
  f : ((is-a?/c dllist<%>) . -> . void?)
method
(send a-dllist map-to-list f) -> (listof any/c)
  f : ((is-a?/c dllist<%>) . -> . any/c)
class
embedded-text-button% : class?
  superclass: snip-wrapper%
  extends: alignment<%>
constructor
(new embedded-text-button%                      
                           [label label]        
                           [callback callback]) 
 -> (is-a?/c embedded-text-button%)
  label : string?
  callback : ((is-a?/c text-button-snip%) (is-a?/c event%) . -> . void?)
class
embedded-button% : class?
  superclass: snip-wrapper%
  extends: alignment<%>
constructor
(new embedded-button%                      
                      [images images]      
                      [callback callback]) 
 -> (is-a?/c embedded-button%)
  images : (cons/c path-string? path-string?)
  callback : ((is-a?/c button-snip%) (is-a?/c event%) . -> . void?)
class
embedded-toggle-button% : class?
  superclass: snip-wrapper%
  extends: alignment<%>
constructor
(new embedded-toggle-button%                          
                              [images-off images-off] 
                              [images-on images-on]   
                              [turn-on turn-on]       
                              [turn-off turn-off]     
                             [[state state]])         
 -> (is-a?/c embedded-toggle-button%)
  images-off : (cons/c path-string? path-string?)
  images-on : (cons/c path-string? path-string?)
  turn-on : ((is-a?/c toggle-button-snip%) (is-a?/c event%) . ->
. void?)
  turn-off : ((is-a?/c toggle-button-snip%) (is-a?/c event%) . ->
. void?)
  state : (symbols 'on 'off) = 'on
class
embedded-message% : class?
  superclass: snip-wrapper%
constructor
(new embedded-message%                 
                       [parent parent] 
                       [label label])  
 -> (is-a?/c embedded-message%)
  parent : (is-a?/c alignment-parent<%>)
  label : string?
class
vline% : class?
  superclass: snip-wrapper%
  extends: alignment<%>
constructor
(new vline% [parent parent]) -> (is-a?/c vline%)
  parent : (is-a?/c alignment-parent<%>)
class
hline% : class?
  superclass: snip-wrapper%
  extends: alignment<%>
constructor
(new hline% [parent parent]) -> (is-a?/c hline%)
  parent : (is-a?/c alignment-parent<%>)
class
snip-wrapper% : class?
  superclass: dllist<%>
  extends: alignment<%>
constructor
(new snip-wrapper%                     
                   [parent parent]     
                   [snip snip])    -> (is-a?/c snip-wrapper%)
  parent : (is-a?/c alignment-parent<%>)
  snip : (is-a?/c snip%)
class
text-button-snip% : class?
  superclass: snip%
constructor
(new text-button-snip%                      
                       [label label]        
                       [callback callback]) 
 -> (is-a?/c text-button-snip%)
  label : string?
  callback : ((is-a?/c text-button-snip%) (is-a?/c event%) . -> . void)
class
button-snip% : class?
  superclass: snip%
constructor
(new button-snip%                      
                  [images images]      
                  [callback callback]) 
 -> (is-a?/c button-snip%)
  images : (cons/c path-string? path-string?)
  callback : ((is-a?/c button-snip%) (is-a?/c event%) . -> . void?)
class
toggle-button-snip% : class?
  superclass: snip%
constructor
(new toggle-button-snip%                          
                          [images-off images-off] 
                          [images-on images-on]   
                          [turn-on turn-on]       
                          [turn-off turn-off]     
                         [[state state]])         
 -> (is-a?/c toggle-button-snip%)
  images-off : (cons/c path-string? path-string?)
  images-on : (cons/c path-string? path-string?)
  turn-on : ((is-a?/c toggle-button-snip%) (is-a?/c event%) . ->
. void?)
  turn-off : ((is-a?/c toggle-button-snip%) (is-a?/c event%) . ->
. void?)
  state : (symbols 'on 'off) = 'on
mixin
stretchable-editor-snip-mixin : (class? . -> . class?)
  argument extends/implements: editor-snip%
  result implements: stretchable-snip<%>
class
stretchable-editor-snip% : class?
  superclass: editor-snip%
  extends: stretchable-editor-snip-mixin
           editor-snip%
constructor
(new stretchable-editor-snip%                                            
                              [[stretchable-width stretchable-width]     
                               [stretchable-height stretchable-height]]) 
 -> (is-a?/c stretchable-editor-snip%)
  stretchable-width : boolean? = #t
  stretchable-height : boolean? = #t
procedure
(fixed-width-label-snip possible-labels) -> (subclass?/c snip%)
  possible-labels : (listof string?)
interface
tabbable-text<%> : interface?
method
(send a-tabbable-text set-caret-owner) -> void?
method
(send a-tabbable-text set-ahead) -> void?
method
(send a-tabbable-text set-back) -> void?
mixin
tabbable-text-mixin : (class? . -> . class?)
  argument extends/implements: editor:keymap<%>
  result implements: tabbable-text<%>
procedure
(set-tabbing a-text ...) -> void?
  a-text : (is-a?/c tabbable-text<%>)
mixin
grey-editor-snip-mixin : (class? . -> . class?)
  argument extends/implements: editor-snip%
mixin
grey-editor-mixin : (class? . -> . class?)
  argument extends/implements: editor<%>
mixin
single-line-text-mixin : (class? . -> . class?)
  argument extends/implements: editor:keymap<%>
mixin
cue-text-mixin : (class? . -> . class?)
  argument extends/implements: text%
class
cue-text% : class?
  superclass: (cue-text-mixin text%)
constructor
(new cue-text%                            
               [[cue-text cue-text]       
                [color color]             
                [behavior behavior]]) -> (is-a?/c cue-text%)
  cue-text : string? = ""
  color : string? = "gray"
  behavior : (listof (one-of/c 'on-focus 'on-char))
           = '(on-focus)
method
(send a-cue-text clear-cue-text) -> void?
procedure
(snip-width snip) -> real?
  snip : (is-a?/c snip%)
procedure
(snip-height snip) -> real?
  snip : (is-a?/c snip%)
procedure
(snip-min-width snip) -> real?
  snip : (is-a?/c snip%)
procedure
(snip-min-height snip) -> real?
  snip : (is-a?/c snip%)
procedure
(snip-parent snip) -> (is-a?/c pasteboard%)
  snip : (is-a?/c snip%)
procedure
(fold-snip f init-acc snip) -> any/c
  f : ((is-a?/c snip%) any/c . -> . any/c)
  init-acc : any/c
  snip : (is-a?/c snip%)
procedure
(for-each-snip f first-snip more ...) -> void?
  f : ((is-a?/c snip%) . -> . any/c)
  first-snip : (is-a?/c snip%)
  more : list?
procedure
(map-snip f first-snip more ...) -> void?
  f : ((is-a?/c snip%) . -> . any/c)
  first-snip : (is-a?/c snip%)
  more : list?
procedure
(stretchable-width? snip) -> boolean?
  snip : (is-a?/c snip%)
procedure
(stretchable-height? snip) -> boolean?
  snip : (is-a?/c snip%)
