GOOF----LE-8-2.0�! ] } 4 h� ] g debug-enable� g backtrace� g guile� � g define-module*� � � g scripts� g summarize-guile-TODO�
� g filenameS� f scripts/summarize-guile-TODO.scm�
g importsS� g read-text-outline� � � g ice-9� g getopt-long� � � � g exportsS� � g autoloadsS� g srfi� g srfi-13� � g string-tokenize� � g srfi-14� � g char-set� ! � "g common-list� #" � $g
remove-if-not� %$ � &!#% � 'g set-current-module� (' � )' � *g %include-in-guild-list� +f A quaint relic of the past.� ,g %summary� -g set-object-property!� .g put� /g object-property� 0g get� 1g who� 2g map� 3g string->symbol� 4g pct-done� 5g string->number� 6g as-leaf� 7g parent� 8g for-each� 9g hang-by-the-leaves� :g make-text-outline-reader� ;f =(([ ][ ])*)([-+])(D*)(R*)(X*)(([0-9]+)%)* *([^[]*)(\[(.*)\])*� <g level-substring-divisor� =< �� >g body-submatch-number� ?> �� @g extra-fields� Ag status� BA �� Cg design?� DC �� Eg review?� FE �� Gg extblock?� HG �� I4 �� J1 �� K@BDFHIJ � L=?K � Mg open-file� Nf r� Og read-TODO� Pg
option-ref� Qg involved� Rg memq� Sg personal� Tg reverse� Ug todo� Vg string=?� Wf -� Xg done� Yf +� Zg review� [g select-items� \g format� ]f ~A� ^f � _f
under : ~A~A
� `g make-string� af status: ~A~A~A~A~A~A
item : ~A
� bf D� cf R� df X� ef ~A%� fg make-display-item� gg no-parent� hg
display-items� if summarize-guile-TODO� jg single-char� kjw � l1k � mjn � ngm � oji � pg value� qp � rQoq � sjp � tSsq � ujt � vUu � wjd � xXw � yjr � zZy � {lnrtvxz � |g main�C 5h� � ]4i> "