GOOF----LE-8-2.0Ç]L4h] gguile¤ ¤ gdefine-module*¤ ¤ ¤ gscripts¤ gread-text-outline¤ ¤ gfilenameS¤ fscripts/read-text-outline.scm¤ gimportsS¤ gice-9¤ gregex¤   ¤ ¤ ¤ gexportsS¤ gread-text-outline-silently¤ gmake-text-outline-reader¤ ¤ g autoloadsS¤ grdelim¤  ¤ g read-line¤ ¤ g getopt-long¤  ¤ ¤ ¤ gset-current-module¤ ¤ ¤ !g%include-in-guild-list¤ "f*Convert textual outlines to s-expressions.¤ #g%summary¤ $gsymbol->string¤ %gstring=?¤ &f?¤ 'g substring¤ (g string-length¤ )g??¤ *gmatch:substring¤ +gmsub¤ ,f¤ -g ??-predicates¤ .g make-regexp¤ /f^¤ 0g string-append¤ 1gassq-ref¤ 2glevel-submatch-number¤ 3g compute-level¤ 4glevel-substring-divisor¤ 5gbody-submatch-number¤ 6g match:suffix¤ 7g extra-fields¤ 8gmap¤ 9gfor-each¤ :gset-object-property!¤ ;g regexp-exec¤ gstart¤ ?>¤ @g eof-object?¤ Agobject-property¤ Bgerror¤ Cfunhandled diff not 1:¤ Df(([ ][ ])*)- *¤ E4 Œ¤ FE¤ Ggwrite¤ Hg open-file¤ Ifr¤ Jgnewline¤ Kgmain¤C5hPå]4   5 4 >"G!R"#R$%&'(h Ä] 45445™56¼gsymbol  gname gfilenamefscripts/read-text-outline.scmŒ { ŒŒ  | ŒŒ | ŒŒ  } ŒŒ  } ŒŒ  } &ŒŒ  } "ŒŒ  } ŒŒ } ŒŒ  gnameg??ŒC)R*hj]L6bgm  gfilenamefscripts/read-text-outline.scmŒ € ŒŒ ŒŒ  Chp]OChgn  gfilenamefscripts/read-text-outline.scmŒ  ŒŒ  gnamegmsubŒC+R)%,*h ]44LŽ55€C˜gm  gfilenamefscripts/read-text-outline.scmŒ † ŒŒ  ‡ ŒŒ  ‡ ŒŒ  ‡ ŒŒ  ‡ 3ŒŒ  ‡ ŒŒ  ‡ ŒŒ  ‡ ŒŒ   C+h(Î]45$ O"4Ž5ŒCÆgpair  &gfilenamefscripts/read-text-outline.scmŒ ƒ ŒŒ  „ ŒŒ  … ŒŒ … ŒŒ … ŒŒ  … ŒŒ  ˆ ŒŒ " ˆ ŒŒ $ ˆ ŒŒ % „ ŒŒ  & gnameg ??-predicatesŒC-R'.%/0+123hj]L6bgm  gfilenamefscripts/read-text-outline.scmŒ ” $ŒŒ  • &ŒŒ   C4(h…]44L55L›C}gm  gfilenamefscripts/read-text-outline.scmŒ ˜ $ŒŒ  ™ )ŒŒ  ™ 8ŒŒ  ™ )ŒŒ  ™ &ŒŒ   C(hs]4L56kgm  gfilenamefscripts/read-text-outline.scmŒ œ ŒŒ  0ŒŒ !ŒŒ  C56hj]6bgm  gfilenamefscripts/read-text-outline.scmŒ ¡ ŒŒ  ¡ *ŒŒ   C78-9:h‘]L4ŽL56‰gpair  gfilenamefscripts/read-text-outline.scmŒ § 'ŒŒ © .ŒŒ ª *ŒŒ ª +ŒŒ  ª *ŒŒ  ¨ )ŒŒ   Ch{]OL6sgobj  gm  gfilenamefscripts/read-text-outline.scmŒ ¥ $ŒŒ  ¦ &ŒŒ   Chr]Cjgobj  gm  gfilenamefscripts/read-text-outline.scmŒ ­ ŒŒ   C;:<hXè]4L5$?4L54L54>"G4L>"GCCàgline  Tgt Tglevel  ! Rgbody  ! Rgfilenamefscripts/read-text-outline.scmŒ ¯ ŒŒ  ° ŒŒ ° ŒŒ  ² ŒŒ  ³ ŒŒ ! ² ŒŒ & ´ ŒŒ , ´ /ŒŒ 3 ´ ŒŒ < µ ŒŒ  T Ch]24 5445$" 455445$" 54 5$  O"(4 5$  O" O45$ 45"45$45O"OCøgre  gspecs  gfc  1grx  1 gt  ? Qglevel-substring  S gt  ^ œgt  z ™g extract-level  œ gt  § ¿g extract-body  ¿ gt  Ê ðgnew  Û çg misc-props!  ð gfilenamefscripts/read-text-outline.scmŒ Š ŒŒ  ‹ ŒŒ ‹ ŒŒ  Œ ŒŒ  Œ ŒŒ  Œ *ŒŒ  Œ ŒŒ  Œ ŒŒ $ Ž ŒŒ ( Ž /ŒŒ , Ž ŒŒ . Œ ŒŒ 1 ‹ ŒŒ 4 ‘ ŒŒ 7 ŒŒ = ‘ +ŒŒ ? ŒŒ ? ‘ ŒŒ S ‘ ŒŒ S ‹ ŒŒ V ŒŒ \ ’ &ŒŒ ^ ŒŒ ^ ’ ŒŒ r ŒŒ x – &ŒŒ z ŒŒ z ’ ŒŒ œ ‹ ŒŒ Ÿ ŒŒ ¥ ž %ŒŒ § ŒŒ § ž ŒŒ ¿ ‹ ŒŒ  ŒŒ È ¢ $ŒŒ Ê ŒŒ Ê ¢ ŒŒ Ó ¤ -ŒŒ Û ¤ "ŒŒ ð ‹ ŒŒ*   gnamegmake-line-parserŒC=R=?@A<BC:> h`«]QHH"%45$"'4L5$è45˜  ‘$ "  ”$S  ‘  $"4 >"G 4>"GJŒKŒ"E ’$=""4 5‘$ K" Ž "ÿÿÞJ "ÿÿÖJJŽK"45"ÿþÿ 45"ÿþá45 ÿJ"ÿþÆJK J&CJŽC£gport  \gall  \gpchain  \gline   4g prev-level   4gtp   4gt   4gt  ) 1gwords  6 glevel  A gdiff H gt g Œgp  ä gfilenamefscripts/read-text-outline.scmŒ ¼ ŒŒ  ½ ŒŒ  ½ ŒŒ ¾ ŒŒ ½ ŒŒ  ¿ ŒŒ  È ŒŒ  È ŒŒ # É ŒŒ ) É ŒŒ 6 Ë (ŒŒ 6 Ë ŒŒ 9 Ì (ŒŒ ? Ì ;ŒŒ A Ì (ŒŒ A Ë ŒŒ H Í 'ŒŒ H Ë ŒŒ M Ñ ŒŒ R Î ŒŒ W Ó ŒŒ ^ Ö ŒŒ c Î ŒŒ g × "ŒŒ g × ŒŒ t Ø "ŒŒ x Ø )ŒŒ Ø "ŒŒ Û ŒŒ “ Û 7ŒŒ š Û ŒŒ § Ü +ŒŒ © Ü ŒŒ ® Þ 1ŒŒ ± Þ +ŒŒ ² Þ ŒŒ ¹ á ŒŒ ¾ Î ŒŒ  ã ŒŒ Å ä ,ŒŒ Ê ä =ŒŒ Ì ä EŒŒ Î ä ,ŒŒ Ï ä #ŒŒ Ó ã ŒŒ × å #ŒŒ Þ ã -ŒŒ ä ã ŒŒ ï ç (ŒŒ ò ç ŒŒ õ è +ŒŒ ÷ è ŒŒ ü ê "ŒŒ  ê ŒŒ  ë ŒŒ . ë ŒŒ 4 ¿ ŒŒ 5 ¿ ŒŒ I ¿ ŒŒ L ì ŒŒ N ì ŒŒ P í ŒŒ V í ŒŒ W î ŒŒ [ ï ŒŒB  \ ChÃ] 45OC»gre  gspecs  g parse-line  gfilenamefscripts/read-text-outline.scmŒ ¹ ŒŒ  º ŒŒ º ŒŒ   gnamegmake-text-outline-readerŒCR4iDF5RGHIJh@Ô-1344455>"G4>"GCÌgargs :gfilenamefscripts/read-text-outline.scmŒ õ ŒŒ ö ŒŒ ö ŒŒ  ö %ŒŒ  ö 0ŒŒ  ö ;ŒŒ  ö %ŒŒ  ö ŒŒ ö ŒŒ ) ÷ ŒŒ : gnamegread-text-outlineŒCRiKRCÝgm  0gfilenamefscripts/read-text-outline.scmŒ  p ŒŒ 4 x ŒŒ 6 y ŒŒ 9 y ŒŒ 7 { ŒŒ S  ŒŒ 1 ƒ ŒŒ ë Š ŒŒ  ¹ ŒŒ  ò ŒŒ  ò ŒŒ  ó ŒŒ  ò ŒŒ  ñ ŒŒ G õ ŒŒ N ú ŒŒ  P C6