GOOF----LE-8-2.0�G ] � 4 h� ] g guile� � g define-module*� � � g language� g glil� � g filenameS�
f language/glil.scm� g importsS� g system�
g base� g syntax�
� � g pmatch�
� � g srfi� g srfi-1� � g selectS� g fold� � � � g exportsS� g <glil-program>� g make-glil-program� g
glil-program?� g glil-program-meta� !g glil-program-body� "g <glil-std-prelude>� #g make-glil-std-prelude� $g glil-std-prelude?� %g glil-std-prelude-nreq� &g glil-std-prelude-nlocs� 'g glil-std-prelude-else-label� (g <glil-opt-prelude>� )g make-glil-opt-prelude� *g glil-opt-prelude?� +g glil-opt-prelude-nreq� ,g glil-opt-prelude-nopt� -g glil-opt-prelude-rest� .g glil-opt-prelude-nlocs� /g glil-opt-prelude-else-label� 0g <glil-kw-prelude>� 1g make-glil-kw-prelude� 2g glil-kw-prelude?� 3g glil-kw-prelude-nreq� 4g glil-kw-prelude-nopt� 5g glil-kw-prelude-kw� 6g !glil-kw-prelude-allow-other-keys?� 7g glil-kw-prelude-rest� 8g glil-kw-prelude-nlocs� 9g glil-kw-prelude-else-label� :g <glil-bind>� ;g make-glil-bind� <g
glil-bind?� =g glil-bind-vars� >g <glil-mv-bind>� ?g make-glil-mv-bind� @g
glil-mv-bind?� Ag glil-mv-bind-vars� Bg glil-mv-bind-rest� Cg
<glil-unbind>� Dg make-glil-unbind� Eg glil-unbind?� Fg
<glil-source>� Gg make-glil-source� Hg glil-source?� Ig glil-source-props� Jg <glil-void>� Kg make-glil-void� Lg
glil-void?� Mg <glil-const>� Ng make-glil-const� Og glil-const?� Pg glil-const-obj� Qg <glil-lexical>� Rg make-glil-lexical� Sg
glil-lexical?� Tg glil-lexical-local?� Ug glil-lexical-boxed?� Vg glil-lexical-op� Wg glil-lexical-index� Xg <glil-toplevel>� Yg make-glil-toplevel� Zg glil-toplevel?� [g glil-toplevel-op� \g glil-toplevel-name� ]g
<glil-module>� ^g make-glil-module� _g glil-module?� `g glil-module-op� ag glil-module-mod� bg glil-module-name� cg glil-module-public?� dg <glil-label>� eg make-glil-label� fg glil-label?� gg glil-label-label� hg
<glil-branch>� ig make-glil-branch� jg glil-branch?� kg glil-branch-inst� lg glil-branch-label� mg <glil-call>� ng make-glil-call� og
glil-call?� pg glil-call-inst� qg glil-call-nargs� rg <glil-mv-call>� sg make-glil-mv-call� tg
glil-mv-call?� ug glil-mv-call-nargs� vg glil-mv-call-ra� wg
<glil-prompt>� xg make-glil-prompt� yg glil-prompt?� zg glil-prompt-label� {g glil-prompt-escape-only?� |g
parse-glil� }g unparse-glil� ~ !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|} a� g set-current-module� � � � � �g format� �f
#<glil ~s>� �g
print-glil� �g make-record-type� �f <glil-program>� �g meta� �g body� ��� � �g record-predicate� �g make-procedure-with-setter� �g record-accessor� �g record-modifier� �f <glil-std-prelude>� �g nreq� �g nlocs� �g
else-label� ���� � �f <glil-opt-prelude>� �g nopt� �g rest� ������ � �f <glil-kw-prelude>� �g kw� �g allow-other-keys?� �������� � �f <glil-bind>� �g vars� �� � �f <glil-mv-bind>� ��� � �f
<glil-unbind>� �f
<glil-source>� �g props� �� � �f <glil-void>� �f <glil-const>� �g obj� �� � �f <glil-lexical>� �g local?� �g boxed?� �g op� �g index� ����� � �f <glil-toplevel>� �g name� ��� � �f
<glil-module>� �g mod� �g public?� ����� � �f <glil-label>� �g label� �� � �f
<glil-branch>� �g inst� ��� � �f <glil-call>� �g nargs� ��� � �f <glil-mv-call>� �g ra� ��� � �f
<glil-prompt>� �g escape-only?� ��� � �g prompt� �g error� �f invalid glil� �g mv-call� �g call� �g branch� �g module� �g private� �g public� �g toplevel� �g lexical� �g const� �g void� �g source� �g unbind� �g mv-bind� �g bind� �g
kw-prelude� �g opt-prelude� �g std-prelude� �g program� �g map� �� � �� � �� � �f unhandled record�C 5 h�4 v ]4
~5 4� > "