GOOF----LE-8-2.0¤7]4ht] gguile¤ ¤ gdefine-module*¤ ¤ ¤ grnrs¤ g exceptions¤ ¤ gfilenameS¤ frnrs/exceptions.scm¤ gpureS¤ gversionS¤ ¤ gset-current-module¤ ¤ ¤ gresolve-r6rs-interface¤ ¤ ¤ gbase¤  ¤ gcall-with-deferred-observers¤ ¤ ¤ gmodule-use-interfaces!¤ ¤ ¤ gcurrent-module¤ ¤ ¤ gcontrol¤  ¤ !g conditions¤ "! ¤ #grecords¤ $g procedural¤ %#$ ¤ &g inspection¤ '#& ¤ (gonly¤ )gformat¤ *gnewline¤ +gdisplay¤ ,gfilter¤ -gacons¤ .gassv-ref¤ /gthrow¤ 0gset-exception-printer!¤ 1gwith-throw-handler¤ 2g *unspecified*¤ 3g@@¤ 4()*+,-./0123 ¤ 5gmodule-export!¤ 65¤ 75¤ 8graise-continuable¤ 9gwith-exception-handler¤ :gguard¤ ;89:¤ <¤ ?gmodule-replace!¤ @?¤ A?¤ Bgraise¤ CB¤ D!¤ Egmake-record-type-descriptor¤ FDE¤ GDE¤ Hg&guile¤ Ig &condition¤ Jg list->vector¤ KDJ¤ LDJ¤ Mg immutable¤ Ngkey¤ Ogguile-condition-key¤ PMNO¤ Qgargs¤ Rgguile-condition-args¤ SMQR¤ Tgrecord-constructor¤ UDT¤ VDT¤ Wg"make-record-constructor-descriptor¤ XDW¤ YDW¤ Zgmake-guile-condition¤ [gcondition-predicate¤ \D[¤ ]D[¤ ^gguile-condition?¤ _gcondition-accessor¤ `D_¤ aD_¤ bgrecord-accessor¤ cDb¤ dDb¤ eg condition¤ fgmake-serious-condition¤ ggguile-common-conditions¤ hg!default-guile-condition-converter¤ igmake-who-condition¤ jgmake-message-condition¤ kgmake-irritants-condition¤ lgguile-condition-converters¤ mgconvert-guile-condition¤ n#$¤ og r6rs-raise¤ pno¤ qno¤ rgr6rs-raise-continuable¤ snr¤ tnr¤ ugraise-object-wrapper?¤ vnu¤ wnu¤ xgraise-object-wrapper-obj¤ ynx¤ znx¤ {g!raise-object-wrapper-continuation¤ |n{¤ }n{¤ ~gr6rs:exception¤ gmake-non-continuable-violation¤ €gmake-syntax-transformer¤ €¤ ‚€¤ ƒgguard0¤ „gmacro¤ …g $sc-dispatch¤ †…¤ ‡…¤ ˆgany¤ ‰geach-any¤ Šˆ‰Œ¤ ‹ŠˆŒ¤ Œˆ‹Œ¤ g syntax-object¤ Žgcall/cc¤ gtop¤ ¤ ‘gribcage¤ ’gdummy¤ “gvariable¤ ”g cond-clause¤ •gbody¤ –’“”•¤ —gm-302a4a91bf89d3-3f¤ ˜—¤ ™˜¤ šfl-302a4a91bf89d3-44¤ ›fl-302a4a91bf89d3-45¤ œfl-302a4a91bf89d3-46¤ fl-302a4a91bf89d3-47¤ žš›œ¤ Ÿ‘–™ž¤  ‘¤ ¡gx¤ ¢¡¤ £˜¤ ¤fl-302a4a91bf89d3-41¤ ¥¤¤ ¦‘¢£¥¤ §Ÿ ¦¤ ¨gprivate¤ ©¨¤ ªŽ§©¤ «glambda¤ ¬«§©¤ ­g continuation¤ ®­§©¤ ¯®¤ °9§©¤ ±gcond¤ ²±§©¤ ³gsyntax-violation¤ ´³¤ µ³¤ ¶f-source expression failed to match any pattern¤ ·geach+¤ ¸gfree-id¤ ¹gelse¤ ºgm-302a4a91bf89d3-4d¤ »º¤ ¼»¤ ½fl-302a4a91bf89d3-4f¤ ¾½¤ ¿‘¢¼¾¤ À ¿¤ Á¹À©¤ ¸Á¤ ÉŒ¤ Ää Å·ˆÄ¤ ƈŌ¤ ÇƈŒ¤ Ȉnj¤ Ég else-clause¤ Ê’“”É•¤ Ë»¤ Ìfl-302a4a91bf89d3-52¤ Ífl-302a4a91bf89d3-53¤ Îfl-302a4a91bf89d3-54¤ Ïfl-302a4a91bf89d3-55¤ Ðfl-302a4a91bf89d3-56¤ ÑÌÍÎÏФ Ò‘ÊËѤ ÓÒ ¿¤ ÔƒÓ©¤ Õgappend¤ ÖÕ¤ ×Õ¤ عө¤ Ù»¤ Úfl-302a4a91bf89d3-5f¤ Ûfl-302a4a91bf89d3-60¤ Üfl-302a4a91bf89d3-61¤ Ýfl-302a4a91bf89d3-62¤ ÞÚÛÜݤ ß‘–ÙÞ¤ àß ¿¤ áƒà©¤ â¹à©¤ ãB੤ äglength¤ åg condition?¤ æfERROR: R6RS exception: ¤ çgformat-condition¤ èfERROR: R6RS exception: `~s'¤ égexception-printer¤ êgsimple-conditions¤ ëfEmpty condition object¤ ìf ~a. ¤ ígformat-simple-condition¤ îgrecord-type-name¤ ïg record-rtd¤ ðgrecord-type-field-names¤ ñgrecord-type-parent¤ òg vector-length¤ ógreverse¤ ôf~a¤ õf~a: ~s¤ öf~a: ¤ ÷f ~a: ~s¤ øgmake-syntax-violation¤ ùg guile-syntax-violation-converter¤ úgmake-lexical-violation¤ ûg!guile-lexical-violation-converter¤ ügmake-assertion-violation¤ ýg#guile-assertion-violation-converter¤ þgmake-undefined-violation¤ ÿg#guile-undefined-violation-converter¤ g)make-implementation-restriction-violation¤ g*guile-implementation-restriction-converter¤ g make-error¤ gguile-error-converter¤ gguile-system-error-converter¤ g read-error¤ g syntax-error¤ gunbound-variable¤ gwrong-number-of-args¤  gwrong-type-arg¤  gkeyword-argument-error¤  g out-of-range¤  gregular-expression-syntax¤  g program-error¤ g goops-error¤ gnull-pointer-error¤ g system-error¤ ghost-not-found¤ ggetaddrinfo-error¤ gno-data¤ g no-recovery¤ g try-again¤ gstack-overflow¤ gnumerical-overflow¤ gmemory-allocation-error¤ gset-guile-condition-converter!¤C5h@ª]4     54>"G454hE]45L6=gfilenamefrnrs/exceptions.scmŒ  ŒŒ   CO>"G4 54hE]45L6=gfilenamefrnrs/exceptions.scmŒ  ŒŒ   CO>"G4"54hE]45L6=gfilenamefrnrs/exceptions.scmŒ  ŒŒ   CO>"G4%54hE]45L6=gfilenamefrnrs/exceptions.scmŒ  ŒŒ   CO>"G4'54hE]45L6=gfilenamefrnrs/exceptions.scmŒ  ŒŒ   CO>"G4454hE]45L6=gfilenamefrnrs/exceptions.scmŒ  ŒŒ   CO>"G47;hE]456=gfilenamefrnrs/exceptions.scmŒ  ŒŒ  C>"G4>hE]456=gfilenamefrnrs/exceptions.scmŒ  ŒŒ  C>"G4AChE]456=gfilenamefrnrs/exceptions.scmŒ  ŒŒ  C>"G4GHIi4LPS55HR4V4YHi55ZR4]Hi5^R4aHi4dHi 55OR4aHi4dHi 55RRefgh˜]45456gkey  gargs  gfilenamefrnrs/exceptions.scmŒ 2 ŒŒ   gnameg!default-guile-condition-converterŒChReijkh8z*134545456-13L6rgsubr %gmsg %gmargs  %g_  %g_ . 4 %   . 4 ChŽ]O@†gkey  gargs  gfilenamefrnrs/exceptions.scmŒ 6 ŒŒ  gnamegguile-common-conditionsŒCgR.lehZhH´]45$ 45"$" 45456¬gkey  Hgargs  Hg converter  Hgt  # =gfilenamefrnrs/exceptions.scmŒ ? ŒŒ  H gnamegconvert-guile-conditionŒCmR^/ORqh(j]45$4545@6bgobj  %gfilenamefrnrs/exceptions.scmŒ O ŒŒ  % gnamegraiseŒCBRt8RwuRzxR}{R1~ux{Bmhˆ­-13&N("45$545454L5$6456C454L>"G456¥gkey …gargs …gcargs  + ]gobj  4 ]g continuation  = ]ghandler-return  F ]gobj  h … … Ch’]O6Šghandler  gthunk  gfilenamefrnrs/exceptions.scmŒ ] ŒŒ   gnamegwith-exception-handlerŒC9R4‚ƒ„‡Œª¬¯°®²h0n]ŒŒŒCfgdummy  /gvariable  /g cond-clause   /gbody   /  / Cµ¶h(•] 45$@6gx  "gtmp "  " g macro-typeg syntax-rulesŒgpatternsgvariableg cond-clauseg...gbodyŒC5ƒR4‚:„‡ÈÔ×Øh ‡]4Œ5ŒŒŒCgdummy  gvariable  g cond-clause   g else-clause   gbody      CŒá×âãh(n]45ŒŒŒCfgdummy  "gvariable  "g cond-clause   "gbody   "  " Cµ¶h@õ]45$@45$@6ígx  9gtmp 9gtmp  " 9  9 g macro-typeg syntax-rulesŒgpatternsgvariableg cond-clauseg...gelseg else-clauseg...gbodyŒgvariableg cond-clauseg...gbodyŒC5:Räuxå+æç)è h`Ð] 45‘$K45$;4545$4>"G6 666Ègport  ^gkey  ^gargs   ^gpunt   ^gobj  # Vgfilenamefrnrs/exceptions.scmŒ ŒŒ 5 † ŒŒ R ‰ !ŒŒ  ^ gnamegexception-printerŒCéRê)ëìí*hˆã]45(6"`ˆ$W4>"G4>"GŽˆ$4>"G"—Ž"ÿÿ¢C "ÿÿ•Ûgport  ˆg condition  ˆg components  ˆgi   }g components   }gfilenamefrnrs/exceptions.scmŒ ŒŒ  ŒŒ + “ ŒŒ  ˆ gnamegformat-conditionŒCçRîïðñò,òh2]4Ž5 ‘€C*g rtd.fields     Có)ôõbö÷*hxÝ]Z4455"P$,4545ŒŒ45–"ÿÿÎ4455 †$   6 †$  44  5564  >"G"¹ˆ$°Ž  4 5 "]  •$"W4   £44   55>"G  ™‘$"4>"G — "ÿÿ£  "ÿÿœ   Žˆ$4>"G"Ž"ÿÿIC"ÿÿ?45 "ÿþÕgport  wg condition  wgcondition-name   wgrtd   dgrtd.fields-list   dgn-fields   dg field-names  ! Fgrtd.fields-list  T dglst  £ \g rtd.fields  ­ Zgrtd µ 3g field-names µ 3gn-fields À -gi Æ #gfilenamefrnrs/exceptions.scmŒ ™ ŒŒ d ² %ŒŒ v ³ %ŒŒ ¸ !ŒŒ Ú ž ŒŒ  w gnamegformat-simple-conditionŒCíR40i~éi>"Geøijh8¥*!134545456-13Cgwho 'gwhat 'gwhere  'gform  'gsubform  'gextra  'g_ 0 2 '   0 2 Ch˜]@gkey  gargs  gfilenamefrnrs/exceptions.scmŒ É ŒŒ   gnameg guile-syntax-violation-converterŒCùReúgh™]45456‘gkey  gargs  gfilenamefrnrs/exceptions.scmŒ Ò ŒŒ   gnameg!guile-lexical-violation-converterŒCûReügh›]45456“gkey  gargs  gfilenamefrnrs/exceptions.scmŒ Õ ŒŒ   gnameg#guile-assertion-violation-converterŒCýReþgh›]45456“gkey  gargs  gfilenamefrnrs/exceptions.scmŒ Ø ŒŒ   gnameg#guile-undefined-violation-converterŒCÿRegh¢]45456šgkey  gargs  gfilenamefrnrs/exceptions.scmŒ Û ŒŒ   gnameg*guile-implementation-restriction-converterŒCRegh]45456…gkey  gargs  gfilenamefrnrs/exceptions.scmŒ ß ŒŒ   gnamegguile-error-converterŒCRegh0“*13454LL56-13LL6‹gsubr gmsg gmsg-args  gerrno  grest  g_ ' /    ' / Ch”]O@Œgkey  gargs  gfilenamefrnrs/exceptions.scmŒ â ŒŒ   gnamegguile-system-error-converterŒCRûiŒùiŒÿiŒýiŒ ýiŒ ýiŒ ýiŒ ýiŒ ýiŒýiŒýiŒiŒiŒiŒiŒiŒiŒiŒiŒiŒlRlh–]ŒŒ CŽgkey  gproc  gfilenamefrnrs/exceptions.scmŒ  ŒŒ   gnamegset-guile-condition-converter!ŒCRC¢gm  +giface 2 ²giface ¹ :giface A Âgiface É Jgiface Q Ògiface Ù Zgfilenamefrnrs/exceptions.scmŒ   ŒŒ à - ŒŒ ó 2 ŒŒ q 6 ŒŒ ‡ ? ŒŒ 5 O ŒŒ : S ŒŒ ? V ŒŒ D X ŒŒ I Z ŒŒ U ] ŒŒ  ŒŒ ž ŒŒ x ™ ŒŒ y Á ŒŒ ; É ŒŒ  Ò ŒŒ Î Õ ŒŒ ž Ø ŒŒ v Û ŒŒ 9 ß ŒŒ Ð â ŒŒ  û ŒŒ :  ŒŒ  < C6