GOOF----LE-8-2.0�+ ] � 4 h ] g guile� � g define-module*� � � g language� g assembly� g disassemble� �
g filenameS� f !language/assembly/disassemble.scm� g importsS�
g ice-9� g format�
� � g srfi� g srfi-1� � � g system� g vm� g instruction� � � g program� � � g base� g pmatch� � � ! � "! � #g compile� $# � %$ � & "% � 'g exportsS� ( � )g set-current-module� *) � +) � ,f Disassembly of ~A:
� -g disassemble-load-program� .g decompile� /g fromS� 0g value� 1g toS� 2g load-program� 3g assq-ref� 4g objects� 5g free-vars� 6g meta� 7g blocs� 8g sources� 9g newline� :g for-each� ;f Embedded program ~A:
� <g reverse!� =g byte-length� >g nop� ?g
print-info� @g code-annotation� Ag and=>� Bg assq� Cg source->string� Dg gensym� Ef � Fg disassemble-free-vars� Gg disassemble-meta� Hg program?� Ig display� Jf )----------------------------------------
� Kg vector->list� Lg error� Mf bad load-program form� Nf Free variables:
� Og fold� Pg make-syntax-transformer� QP � RP � Sg unless� Tg macro� Ug $sc-dispatch� VU � WU � Xg _� Yg any� ZXY�� [g
syntax->datum� \[ � ][ � ^g
datum->syntax� _^ � `^ � ag if� bg not� cg begin� dg syntax-violation� ed � fd � gf -source expression failed to match any pattern� hg name� ih � jg *uninteresting-props*� kg filter� lg memq� mf
Properties:
� nf ~a:~a:~a� og source:file� pf (unknown file)� qg source:line-for-user� rg
source:column� sg
make-int16� tg assembly-unpack� ug list� vg vector� wf
~a element~:p� xg br� yg br-if� zg br-if-eq� {g br-if-not� |g br-if-not-eq� }g br-if-not-null� ~g
br-if-null� f -> ~A� �g br-if-nargs-ne� �g br-if-nargs-lt� �g br-if-nargs-gt� �g bind-optionals/shuffle-or-br� �g last-pair� �g
object-ref� �f ~s� �g local-ref� �g local-boxed-ref� �g local-set� �g local-boxed-set� �g
binding:start� �g binding:end� �f `~a'~@[ (arg)~]� �g binding:name� �g
binding:index� �g list-ref� �g assert-nargs-ee/locals� �g assert-nargs-ge/locals� �f ~a arg~:p, ~a local~:p� �g free-ref� �g free-boxed-ref� �g free-boxed-set� �f (closure variable)� �g toplevel-ref� �g toplevel-set� �f `~s'� �g variable?� �g mv-call� �f MV -> ~A� �g prompt� �f H -> ~A� �g assembly->object� �f ,~4@S ~32S~@[;; ~1{~@?~}~]~@[~61t at ~a~]
�C 5 h � ]4
&'(5 4+ > "