GOOF----LE-8-2.0ù%]4h$] gguile¤ ¤ gdefine-module*¤ ¤ ¤ grnrs¤ g conditions¤ ¤ gfilenameS¤ frnrs/conditions.scm¤ gpureS¤ gversionS¤ ¤ gset-current-module¤ ¤ ¤ gresolve-r6rs-interface¤ ¤ ¤ gonly¤ gand=>¤ g@@¤ ¤ gcall-with-deferred-observers¤ ¤ ¤ gmodule-use-interfaces!¤ ¤ ¤ gcurrent-module¤ ¤ ¤ !gbase¤ "! ¤ #glists¤ $# ¤ %grecords¤ &g procedural¤ '%& ¤ (gmodule-export!¤ )(¤ *(¤ +gundefined-violation?¤ ,gmake-undefined-violation¤ -g &undefined¤ .gsyntax-violation-subform¤ /gsyntax-violation-form¤ 0gsyntax-violation?¤ 1gmake-syntax-violation¤ 2g&syntax¤ 3glexical-violation?¤ 4gmake-lexical-violation¤ 5g&lexical¤ 6g%implementation-restriction-violation?¤ 7g)make-implementation-restriction-violation¤ 8g&implementation-restriction¤ 9gnon-continuable-violation?¤ :gmake-non-continuable-violation¤ ;g&non-continuable¤ gmake-who-condition¤ ?g&who¤ @gcondition-irritants¤ Agirritants-condition?¤ Bgmake-irritants-condition¤ Cg &irritants¤ Dgassertion-violation?¤ Egmake-assertion-violation¤ Fg &assertion¤ Gg violation?¤ Hgmake-violation¤ Ig &violation¤ Jgerror?¤ Kg make-error¤ Lg&error¤ Mgserious-condition?¤ Ngmake-serious-condition¤ Og&serious¤ Pgwarning?¤ Qg make-warning¤ Rg&warning¤ Sgcondition-message¤ Tgmessage-condition?¤ Ugmake-message-condition¤ Vg&message¤ Wgdefine-condition-type¤ Xgcondition-accessor¤ Ygcondition-predicate¤ Zg condition?¤ [gsimple-conditions¤ \g condition¤ ]g &condition¤ ^+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]3¤ _gmodule-re-export!¤ `_¤ a_¤ bgmodule-replace!¤ cb¤ db¤ egmake-record-type-descriptor¤ fg&compound-condition¤ gg immutable¤ hg components¤ igh¤ ji¤ kgrecord-predicate¤ lgcompound-condition?¤ mgrecord-constructor¤ ng"make-record-constructor-descriptor¤ ogmake-compound-condition¤ pgrecord-accessor¤ qgcondition-internal?¤ rgassertion-violation¤ sfnot a condition¤ tgfor-all¤ ufnon-condition argument¤ vglength¤ wgappend¤ xgmap¤ ygmake-syntax-transformer¤ zy¤ {y¤ |gmacro¤ }g $sc-dispatch¤ ~}¤ }¤ €gany¤ geach¤ ‚€€¤ ƒ‚¤ „€ƒŒ¤ …€„Œ¤ †€…Œ¤ ‡€†Œ¤ ˆ€‡Œ¤ ‰g syntax-object¤ Šg letrec-syntax¤ ‹gtop¤ Œ‹¤ gribcage¤ Žgdummy¤ gcondition-type¤ g supertype¤ ‘g constructor¤ ’g predicate¤ “gfield¤ ”gaccessor¤ •Ž‘’“”¤ –gm-2f221686982dd3-f¤ —–‹¤ ˜—ŒŒŒŒŒŒ¤ ™fl-2f221686982dd3-14¤ šfl-2f221686982dd3-15¤ ›fl-2f221686982dd3-16¤ œfl-2f221686982dd3-17¤ fl-2f221686982dd3-18¤ žfl-2f221686982dd3-19¤ Ÿfl-2f221686982dd3-1a¤  ™š›œžŸ¤ ¡•˜ ¤ ¢¤ £gx¤ ¤£¤ ¥—¤ ¦fl-2f221686982dd3-11¤ §¦¤ ¨¤¥§¤ ©Œ¡¢¨¤ ªgprivate¤ «ª¤ ¬‰Š©«¤ ­gtransform-fields¤ ®‰­©«¤ ¯g syntax-rules¤ °‰¯©«¤ ±g_¤ ²‰±©«¤ ³gf¤ ´‰³©«¤ µga¤ ¶‰µ©«¤ ·´¶¤ ¸grest¤ ¹‰¸©«¤ º·¹Œ¤ »²ºŒ¤ ¼gcons¤ ½‰¼©«¤ ¾gquote¤ ¿‰¾©«¤ À‰g©«¤ ÁÀ´¶¤ ¿Á¤ ¤ ĽÂä ŻĤ Ʋ¤ Ç¿¤ ÈÆǤ É°ÅȤ ʮɤ Ëggenerate-accessors¤ ̉˩«¤ Ígcounter¤ Ήͩ«¤ ÏκŒ¤ вό¤ Ñgbegin¤ ҉ѩ«¤ Ógdefine¤ Ô‰Ó©«¤ Õ‰X©«¤ Ö‰p©«¤ ×Τ Øg+¤ ىة«¤ Ú‰ ©«¤ ÛÙÎÚ¤ ÜÛ¹Œ¤ ÝÌÜŒ¤ Þݤ ߲Τ àÒ¤ áßठâᤠã‰e©«¤ 䉩«¤ åg list->vector¤ æ‰å©«¤ çx¤ èx¤ églist¤ ê‰m©«¤ ë‰n©«¤ ìää¤ í‰Y©«¤ î‰ ©«¤ ïgsyntax-violation¤ ðï¤ ñï¤ òf-source expression failed to match any pattern¤ ó%&¤ ôó]¤ õó]¤ ög!&condition-constructor-descriptor¤ ÷gexists¤ øgfind¤ ùgmessage¤ úgùS¤ ûóO¤ üóO¤ ýóN¤ þóN¤ ÿóI¤ óI¤ óH¤ óH¤ óF¤ óF¤ óE¤ óE¤ g irritants¤ g@¤  gwho¤  g <¤  gform¤  g /¤  gsubform¤ g .¤C5h°ç]4     54>"G454 hE]45L6=gfilenamefrnrs/conditions.scmŒ  ŒŒ   CO>"G4"54 hE]45L6=gfilenamefrnrs/conditions.scmŒ  ŒŒ   CO>"G4$54 hE]45L6=gfilenamefrnrs/conditions.scmŒ  ŒŒ   CO>"G4'54 hE]45L6=gfilenamefrnrs/conditions.scmŒ  ŒŒ   CO>"G4* ^hE]456=gfilenamefrnrs/conditions.scmŒ  ŒŒ  C>"G4a hE]456=gfilenamefrnrs/conditions.scmŒ  ŒŒ  C>"G4d hE]456=gfilenamefrnrs/conditions.scmŒ  ŒŒ  C>"G4eifj5fR4kifi5lR4mi4nifi55oR4pifi 5lqr[sh0_]45$L645$C6Wg condition  .gfilenamefrnrs/conditions.scmŒ * j $ŒŒ  . CO[Rlqh }] 45$C6ugobj  gt gfilenamefrnrs/conditions.scmŒ m ŒŒ   gnameg condition?ŒCZRtZr\uvowxl[h @]45$6C8gcond     gnamegflattenŒC hh†-1345$"4>"G(" 45 ”$44  5?6C~g conditions egt  7gfilenamefrnrs/conditions.scmŒ % u *ŒŒ e gnameg conditionŒC\R4{W|ˆ¬ÊÌ°ÐÒÔ¶ÕÖ×Þâã¿äæ®èéêëìíîh¨Á]   ŒŒ ŒŒ ŒŒŒ45ŒŒŒ45ŒŒC¹gdummy  ¡gcondition-type  ¡g supertype   ¡g constructor   ¡g predicate   ¡gfield   ¡gaccessor   ¡  ¡ Cñòh(Ä] 45$@6¼gx  "gtmp "  " g macro-typeg syntax-rulesŒgpatternsgcondition-typeg supertypeg constructorg predicategfieldgaccessorg...C5WRõ]R4ni]i5öR4ki]i5qRkl÷[qh0+]45$ L45645$L6C#gobj  -  - Ch“] 45OC‹grtd  g rtd-predicate gfilenamefrnrs/conditions.scmŒ ž ŒŒ   gnamegcondition-predicateŒCYRklø[h8+]4L5$L645$4L455L6C#gobj  4  4 Ch¥] 45OCgrtd  gproc  g rtd-predicate  gfilenamefrnrs/conditions.scmŒ ¦ ŒŒ   gnamegcondition-accessorŒCXR4eiV]i4åiú55VR4mi4niVi55UR4YiVi5TR4XiVi4piVi 55SR4eiR]i4åi55RR4mi4niRi55QR4YiRi5PRüORþNR4YiOi5MR4eiLOi4åi55LR4mi4niLi55KR4YiLi5JRIRHR4YiIi5GRFRER4YiFi5DR4eiC]i4åi55CR4mi4niCi55BR4YiCi5AR4XiCi4piCi 55@R4ei?]i4åi 55?R4mi4ni?i55>R4Yi?i5=R4Xi?i4pi?i 55