GOOF----LE-8-2.0�1 ] l 4 ho ] g guile� � g define-module*� � � g sxml� g ssax� g input-parse� �
g filenameS� f sxml/ssax/input-parse.scm� g importsS�
g ice-9� g rdelim�
� � � g exportsS� g peek-next-char� g assert-curr-char� g
skip-until� g
skip-while� g
next-token� g
next-token-of� g read-text-line� g read-string� g find-string-from-port?� � g set-current-module� � � g
integer->char� !g ascii->char� "g
char->integer� #g char->ascii� $g char-newline� %g char-return� &g 1+� 'g inc� (g 1-� )g dec� *g make-syntax-transformer� +* � ,* � -g
define-opt� .g macro� /g $sc-dispatch� 0/ � 1/ � 2g _� 3g any� 423�� 5g
syntax->datum� 65 � 75 � 8g
datum->syntax� 98 � :8 � ;g reverse� <g optional� =g define*� >g append� ?g optionalS� @g syntax-violation� A@ � B@ � Cf -source expression failed to match any pattern� Dg throw� Eg parser-error� Fg current-input-port� Gg read-char� Hg peek-char� Ig memv� Jf Wrong character � Kf (0x� Lg eof-object?� Mf *eof*� Ng number->string� Of ) � Pf . � Qf expected� Rg number?� Sf Unexpected EOF while skipping � Tf characters� Ug memq� Vg *eof*� Wf $Unexpected EOF while skipping until � Xg make-string� Yg input-parse:init-buffer� Zf � [g
string-length� \g substring� ]f EOF while reading a token � ^g
string-append� _g string-set!� `g next-token-old� ag string-concatenate-reverse� bg
procedure?� cg *read-line-breaks*� df reading a line� eg list->string� fg delete� gg read-delimited� hg peek� ig read-line� jg char=?� kg
string-ref�C 5 hP( � ]4
5 4 > "