GOOF----LE-8-2.0 ]H4hñ] gguile¤ ¤ gdefine-module*¤ ¤ ¤ gice-9¤ g documentation¤ ¤ gfilenameS¤ fice-9/documentation.scm¤ gimportsS¤ grdelim¤  ¤  ¤ ¤ gexportsS¤ gfile-commentary¤ gdocumentation-files¤ gsearch-documentation-files¤ gobject-documentation¤ ¤ g autoloadsS¤ gregex¤ ¤ g match:suffix¤ ¤ ¤ gset-current-module¤ ¤ ¤ g make-regexp¤ f^;;; Commentary:¤ !f ^;;; Code:¤ "f^;+¤ #g regexp-exec¤ $glength¤ %gregexp?¤ &gstring?¤ 'g procedure?¤ (gcall-with-input-file¤ )g eof-object?¤ *gafter¤ +gin¤ ,gread-delimited¤ -f ¤ .g string-append¤ /f¤ 0gbefore¤ 1gmap¤ 2g in-vicinity¤ 3fguile-procedures.txt¤ 4g %library-dir¤ 5g%package-data-dir¤ 6g %site-dir¤ 7f.¤ 8f ¤ 9gentry-delimiter¤ :g file-exists?¤ ;gsymbol->string¤ g substring¤ ?g string-ref¤ @gfind-documentation-in-file¤ Agor-map¤ Bgprocedure-documentation¤ Cgobject-property¤ Dgmacro?¤ Egmacro-transformer¤ Fgprocedure-name¤ Ggset-procedure-property!¤C5hð¸]4   5 4>"G !"#h ‹] 4L5$6Cƒgline  gm gfilenamefice-9/documentation.scmŒ g ŒŒ  h %ŒŒ h ŒŒ  i ŒŒ  i $ŒŒ   C$%&'()*#+,-./0 h¸ú]!"™45$"‚$C4L5$"4L5$"&C45&"&44L55"""ÿÿg45 "ÿÿPògport  ¶gline  Ÿgdoc   Ÿg parse-state   Ÿgt  "g new-state  Q Ÿgfilenamefice-9/documentation.scmŒ ~ ŒŒ   ŒŒ  ‚ ŒŒ ‚ ŒŒ  ‚ *ŒŒ  ‚ %ŒŒ & ‚ ŒŒ * … ŒŒ 6 … ŒŒ 8 … :ŒŒ = † ŒŒ I … ŒŒ K † =ŒŒ Q „ ŒŒ U ˆ ŒŒ [ ˆ ŒŒ _ Š ŒŒ c Š *ŒŒ g Š ŒŒ i ‹ (ŒŒ o ‹ ŒŒ q ‹ <ŒŒ w ‹ ŒŒ x Œ ŒŒ } Œ 1ŒŒ … Œ >ŒŒ ‡ Œ ŒŒ Ÿ Š ŒŒ Ÿ  ŒŒ    ŒŒ ¤  )ŒŒ ¨  ŒŒ ª € ŒŒ ¬ ŒŒ ¶  ŒŒ$  ¶ C hÍ-13HHH45K45K45OK 45”$J"145$"45$ 45"J 45”$J"2Ž45$"45$ 45"J 45”$J"ŽŽ4 5$"J  O6Ågfilename  gcust  gdefault-in-line-re   gdefault-after-line-re   g default-scrub   gdirt  + 7gv  O }gv  • Ãgv  Ü ôg in-line-re  ô  g after-line-re  ô  gscrub  ô   gfilenamefice-9/documentation.scmŒ ] ŒŒ  d ŒŒ  d *ŒŒ  d ŒŒ  e ŒŒ e -ŒŒ " e ŒŒ % f $ŒŒ ) f 1ŒŒ + f $ŒŒ + f ŒŒ ; l ŒŒ B l ŒŒ F l ŒŒ O n !ŒŒ O n ŒŒ R o !ŒŒ \ o ŒŒ c p !ŒŒ m o ŒŒ n p -ŒŒ € r ŒŒ ‡ r ŒŒ ‹ r ŒŒ ” t $ŒŒ • t ŒŒ ˜ u $ŒŒ ¢ u ŒŒ © v $ŒŒ ³ u ŒŒ ´ v 0ŒŒ Æ x ŒŒ Í x ŒŒ Ñ x ŒŒ Ú z ŒŒ Ü z ŒŒ ß { ŒŒ é { ŒŒ ô l ŒŒ  } ŒŒ)  gnamegfile-commentaryŒCR41i23h}]456ugvicinity  gfilenamefice-9/documentation.scmŒ – ŒŒ  — ŒŒ — !ŒŒ — ŒŒ  C4i5i6i7hT]CLgfilenamefice-9/documentation.scmŒ › ŒŒ  › ŒŒ   C5R89R:(;<,9)=>? h¸¬]!4L5454>"G"{45$C"45"ÿÿà45•$I44 55$045 ‚$ –45 ˜6"ÿÿž"ÿÿš"ÿÿ–45"ÿÿv¤gport  ¶gname ¶glen   ¶gentry  , §gt  x ‚gfilenamefice-9/documentation.scmŒ ¢ ŒŒ  £ ŒŒ £ ŒŒ ¤ ŒŒ  ¤ ŒŒ  ¥ ŒŒ , ¦ ŒŒ - § ŒŒ 7 § ŒŒ > ± #ŒŒ L ± ŒŒ L § ŒŒ M ª ŒŒ V ª ŒŒ Z § ŒŒ [ ¬ ŒŒ ^ ¬ #ŒŒ k ¬ ŒŒ o © ŒŒ p ® ŒŒ x ® ŒŒ † © ŒŒ ° )ŒŒ ° 6ŒŒ ™ ° 3ŒŒ › ° ŒŒ § ¦ ŒŒ ¨ ¦ !ŒŒ ¶ ¦ ŒŒ  ¶ Ch ±]45$ O6C©gname  gfile  gfilenamefice-9/documentation.scmŒ Ÿ ŒŒ    ŒŒ   ŒŒ  ¡ ŒŒ   gnamegfind-documentation-in-fileŒC@RA@hg]L6_gfile  gfilenamefice-9/documentation.scmŒ ´ ŒŒ µ ŒŒ  Ch(ª-13O("6¢gname "gfiles "gfilenamefice-9/documentation.scmŒ ³ ŒŒ  ¶ ŒŒ " ´ ŒŒ " gnamegsearch-documentation-filesŒCR'BCDEFG h°G] 45$ 45"$C45$C45$4455"$C45$>45$14 455$4 >"G"CCC?gobject  ªgt  ªgt - ªgt T ªg docstring ¦gfilenamefice-9/documentation.scmŒ ¹ ŒŒ  ½ ŒŒ ½ ŒŒ  ¾ ŒŒ  ½ ŒŒ % ¿ ŒŒ + ¿ ŒŒ - ¿ ŒŒ - ½ ŒŒ 9 À ŒŒ C À ŒŒ D Á ŒŒ G Á !ŒŒ O Á ŒŒ T ½ ŒŒ `  ŒŒ j  ŒŒ k à ŒŒ u  ŒŒ v Ä ŒŒ y Å ŒŒ Ä ŒŒ Ä ŒŒ ‰ Æ ŒŒ Š Ç ŒŒ Ç 1ŒŒ — Ç ŒŒ  ª gnamegobject-documentationŒg documentationfzReturn the docstring for OBJECT. OBJECT can be a procedure, macro or any object that has its `documentation' property set.ŒCRC°gm  0gfilenamefice-9/documentation.scmŒ  P ŒŒ È ] ŒŒ É – ŒŒ ç ˜ ŒŒ é – ŒŒ ì • ŒŒ î ŒŒ ñ ŒŒ \ Ÿ ŒŒ Í ³ ŒŒ ê ¹ ŒŒ  ì C6