GOOF----LE-8-2.0� ] � 4 h�
] g guile� � g define-module*� � � g ice-9� g control� � g filenameS�
f ice-9/control.scm� g exportsS� g %�
g abort� g shift� g reset� g shift*� g reset*� g call-with-escape-continuation� g call/ec� g let-escape-continuation� g let/ec�
� g
re-exportsS� g call-with-prompt� g abort-to-prompt� g default-prompt-tag� g make-prompt-tag� � g set-current-module� � � g make-syntax-transformer� ! � " � #g macro� $g $sc-dispatch� %$ � &$ � 'g any� ('' � )g
syntax-object� *g top� +* � ,g ribcage� -g dummy� .g expr� /-. � 0g m-3d0776c508-76� 10* � 21+ � 3f l-3d0776c508-7b� 4f l-3d0776c508-7c� 534 � 6,/25 � 7, � 8g x� 98 � :1 � ;f l-3d0776c508-78� <; � =,9:< � >+67= � ?g hygiene� @? � A)>@ � B)>@ � CB � Dg lambda� E)D>@ � Fg default-prompt-handler� G)F>@ � HG � I''' � Jg handler� K-.J � L1++ � Mf l-3d0776c508-80� Nf l-3d0776c508-81� Of l-3d0776c508-82� PMNO � Q,KLP � R+Q7= � S)R@ � T)R@ � UT � V)DR@ � W'''' � Xg tag� Y-X.J � Z1+++ � [f l-3d0776c508-87� \f l-3d0776c508-88� ]f l-3d0776c508-89� ^f l-3d0776c508-8a� _[\]^ � `,YZ_ � a+`7= � b)a@ � c)Da@ � dg syntax-violation� ed � fd � gf -source expression failed to match any pattern� h''�� ig body� j-i � kg m-3d0776c508-95� lk* � ml+ � nf l-3d0776c508-9a� of l-3d0776c508-9b� pno � q,jmp � rl � sf l-3d0776c508-97� ts � u,9rt � v+q7u � w)v@ � x)v@ � yx � z)Dv@ � {g cont� |){v@ � }g f� ~)}v@ � |~ � �~| � �z� � �� � �'h�� �g var� �-�i � �g m-3d0776c508-9f� ��* � ��++ � �f l-3d0776c508-a4� �f l-3d0776c508-a5� �f l-3d0776c508-a6� ���� � �,��� � �� � �f l-3d0776c508-a1� �� � �,9�� � �+�7� � �)�@ � �)�@ � �� � �)D�@ � �){�@ � �� � �)�@ � �g vals� �)��@ � �g apply� �)��@ � ���� � ��� � ���� � �� � �g each-any� �'��� �'��� �g let� �g k� �-�i � �g m-3d0776c508-cf� ��* � ��++ � �f l-3d0776c508-d4� �f l-3d0776c508-d5� �f l-3d0776c508-d6� ���� � �,��� � �� � �f l-3d0776c508-d1� �� � �,9�� � �+�7� � �)��@ � �)X�@ � �g list� �)��@ � �g quote� �)��@ � �)�@ � ��� � ��� � ��� � �� � �)�@ � �)D�@ � �g args� �)��@ � �)��@ � �)�@ � ����� � ���� � �� � �g _� �)��@ � �g results� �)��@ � ��̌� �g values� �)��@ � ���� � ���� � �� � �g m-3d0776c508-dc� ��* � ��++ � �f l-3d0776c508-e1� �f l-3d0776c508-e2� �f l-3d0776c508-e3� ���� � �,��� � �� � �f l-3d0776c508-de� �� � �,9�� � �+�7� � �)�@ �C 5 h` � ]4
5 4 > " G h z - 1 3 45 @ r g args
g filenamef ice-9/control.scm�
�� �� ��
g nameg abort� C
R4" #&(ACEH h ? ] ���C 7 g dummy
g expr CISUV h T ] C L g dummy
g expr g handler CWbc h e ] C ] g dummy
g tag g expr g handler Cfg
hP � ]4 5 $ @4 5 $ @4 5 $ @ 6� g x
P g tmp P g tmp " P g tmp 9 P g filenamef ice-9/control.scm�
�� P g
macro-typeg syntax-rules�g patternsg expr g exprg handler g tagg exprg handler C5 RF h E ] LL 6= g filenamef ice-9/control.scm� 8 ��
C h0 � ] 45 U 4 O > XCXFG @ � g k
. g proc . g handler . g args # . g filenamef ice-9/control.scm�
6
�� 7 �� 7 �� 7 �� . g nameg default-prompt-handler� CFR4"#&hwyz� h ? ]�����C 7 g dummy
g body Cfg h( � ] 4 5 $ @ 6 � g x
" g tmp " g filenamef ice-9/control.scm�
@
�� " g
macro-typeg syntax-rules�g patternsg body C5R4"#&������� h( P ] � � C H g dummy
# g var # g body # # Cfg h( � ] 4 5 $ @ 6 � g x
" g tmp " g filenamef ice-9/control.scm�
E
�� " g
macro-typeg syntax-rules�g patternsg varg body� C5R h E ] L 6 = g filenamef ice-9/control.scm� L ��
C h0 � ]45 U 4 O > XCXFG 6 � g thunk
* g cont * g f * g filenamef ice-9/control.scm�
K
�� L �� * g nameg reset*� CR h E ] LL @= g filenamef ice-9/control.scm� O ��
C h8 y - 1 3 45 U 4 L O > XCXFG 6 q g vals
3 g cont & 3 g f & 3 g filenamef ice-9/control.scm�
O �� 3
C h E ] LL O 6 = g filenamef ice-9/control.scm�
O ��
C h0 w ]45 U 4 L O > XCXFG 6 o g cont
, g cont , g f , g filenamef ice-9/control.scm�
O �� , C h o ]45 O WF g g fc
g filenamef ice-9/control.scm�
N
�� O �� g nameg shift*� CR h a - 1 3 L @ Y g args
g filenamef ice-9/control.scm�
V �� W ��
C h0 % ] U 4 O > XCXFG E g proc
. g tag . g _ # . g args # . g filenamef ice-9/control.scm�
Q
�� S �� S
�� S �� T �� V �� & T �� . Y �� . g nameg call-with-escape-continuation�g
documentationf &Call PROC with an escape continuation.� CRiR4"#&�������� h( N ]� �� ��� C F g dummy
' g k ' g body ' ' Cfg h( ] 4 5 $ @ 6 � g x
" g tmp " g filenamef ice-9/control.scm�
]
�� " g
documentationf CBind K to an escape continuation within the lexical extent of BODY.�g
macro-typeg syntax-rules�g patternsg kg bodyg ... C5R4"#&�� h N ]��C F g dummy
g k g body Cfg h( � ] 4 5 $ @ 6 � g x
" g tmp " g filenamef ice-9/control.scm�
h
�� " g
macro-typeg syntax-rules�g patternsg kg bodyg ... C5RC } g m
, g filenamef ice-9/control.scm�
�� �
�� * 6
�� 5 K
�� N
�� Q
�� [
�� _
C6