GOOF----LE-8-2.0�= ] � 4 hI
] g guile� � g define-module*� � � g system� g vm� g program� �
g filenameS� f system/vm/program.scm� g importsS�
g base� g pmatch�
� � g instruction� � � g objcode� � � g rnrs� g bytevectors� � � g srfi� g srfi-1� � � g srfi-26� � ! � "! � #g exportsS� $g make-program� %g make-binding� &g binding:name� 'g binding:boxed?� (g
binding:index� )g
binding:start� *g binding:end� +g source:addr� ,g source:line� -g
source:column� .g source:file� /g source:line-for-user� 0g program-sources� 1g program-sources-pre-retire� 2g program-source� 3g program-bindings� 4g program-bindings-by-index� 5g program-bindings-for-ip� 6g program-arities� 7g
program-arity� 8g arity:start� 9g arity:end� :g
arity:nreq� ;g
arity:nopt� <g arity:rest?� =g arity:kw� >g arity:allow-other-keys?� ?g program-arguments-alist� @g program-lambda-list� Ag program-meta� Bg program-objcode� Cg program?� Dg program-objects� Eg program-module� Fg program-base� Gg program-free-variables� Hg program-num-free-variables� Ig program-free-variable-ref� Jg program-free-variable-set!� K$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJ '� Lg set-current-module� ML � NL � Og load-extension� Pg
string-append� Qf libguile-� Rg effective-version� Sf scm_init_programs� Tg list-ref� Ug *bytecode-header-len*� Vg opcode->instruction� Wg load-program� Xg instruction-length� Yg bytecode-instruction-length� Zg objcode->bytecode� [g reverse� \g error� ]f
unexpected� ^g map� _g cdr� `g sort!� ag assv-ref� bg append!� cg collapse-locals� df bad arity� eg required� fg optional� gg keyword� hg allow-other-keys?� ig rest� jg extents� kg arglist->arguments-alist� lg string->symbol� mf _� ng length� og arity->arguments-alist� pg and=>� qg arguments-alist->lambda-list� rg assq-ref� sg keyword->symbol� tg car� ug append� vu � wu � xg optionalS� yg keyS� zg unfold� {g 1+� |g format� }f #<procedure ~a~a>� ~g procedure-name� f ~a at ~a:~a:~a� �g number->string� �g object-address� �f <current input>� �f <unknown port>� �f � �f � �g string-join� �g object->string� �f | � �g
write-program�C 5 hH1 � ]4
"#K5 4N > "