GOOF----LE-8-2.0? ] � 4 hp ] g guile� � g define-module*� � � g system� g vm� g
trap-state� �
g filenameS� f system/vm/trap-state.scm� g importsS�
g base� g syntax�
� � g srfi� g srfi-1� � g selectS� g fold� � � � � g traps� � � g trace� � � g frame� ! � "! � #g program� $# � %$ � &"% � 'g exportsS� (g add-trap!� )g
list-traps� *g
trap-enabled?� +g trap-name� ,g enable-trap!� -g
disable-trap!� .g delete-trap!� /g with-default-trap-handler� 0g install-trap-handler!� 1g add-trap-at-procedure-call!� 2g add-trace-at-procedure-call!� 3g add-trap-at-source-location!� 4g #add-ephemeral-trap-at-frame-finish!� 5g add-ephemeral-stepping-trap!� 6()*+,-./012345 � 7g set-current-module� 87 � 97 � :g
make-fluid� ;g %default-trap-handler� <g warn� =f Trap with no handler installed� >g default-trap-handler� ?g make-record-type� @f <trap-wrapper>� Ag index� Bg enabled?� Cg trap� Dg name� EABCD � Fg <trap-wrapper>� Gg make-trap-wrapper� Hg record-predicate� Ig
trap-wrapper?� Jg make-procedure-with-setter� Kg record-accessor� Lg record-modifier� Mg trap-wrapper-index� Ng trap-wrapper-enabled?� Og trap-wrapper-trap� Pg trap-wrapper-name� Qf <trap-state>� Rg handler� Sg next-idx� Tg next-ephemeral-idx� Ug wrappers� VRSTU � Wg <trap-state>� Xg make-trap-state� Yg trap-state?� Zg trap-state-handler� [g trap-state-next-idx� \g trap-state-next-ephemeral-idx� ]g trap-state-wrappers� ^g trap-wrapper<?� _g error� `f Trap already enabled� ag setter� ba � ca � dg enable-trap-wrapper!� ef Trap already disabled� fg disable-trap-wrapper!� gg append� hg add-trap-wrapper!� ig delq� jg remove-trap-wrapper!� kg trap-state->trace-level� lf )no wrapper found with index in trap-state� mg wrapper-at-index� ng next-index!� og next-ephemeral-index!� pg handler-for-index� qg ephemeral-handler-for-index� rg make-weak-key-hash-table� sg
*trap-states*� tg hashq-ref� ug
hashq-set!� vg trap-state-for-vm� wg the-vm� xg the-trap-state� yg set-vm-trace-level!� zg map� {g and=>� |g trap-at-procedure-call� }g format� ~f Breakpoint at ~a� g trace-calls-to-procedure� �g prefixS� �f Trap ~a: � �f Tracepoint at ~a� �g trap-at-source-location� �f Breakpoint at ~a:~a� �g trap-frame-finish� �f Return from ~a� �f ~a:~a:~a� �g source:file� �f unknown file� �g source:line-for-user� �g
source:column� �f unknown source location� �g
source-string� �g into?S� �� �� �g instruction?S� �� �� ��� � �g frame-next-source� �g trap-matching-instructions� �g
frame-address� �f Step to different instruction� �f #Step to different instruction in ~a� �f Step into ~a� �f Step out of ~a�C 5 hX0 � ]4
&'65 49 > "