Name	Size	Mode	Actions
api-diff.go	8722	0644	editdlrm
autofrisk.go	9960	0644	editdlrm
compile.go	10069	0644	editdlrm
disassemble.go	1148	0644	editdlrm
display-commentary.go	2459	0644	editdlrm
doc-snarf.go	16832	0644	editdlrm
frisk.go	10681	0644	editdlrm
generate-autoload.go	4018	0644	editdlrm
help.go	8641	0644	editdlrm
lint.go	8281	0644	editdlrm
list.go	3924	0644	editdlrm
punify.go	2542	0644	editdlrm
read-rfc822.go	5024	0644	editdlrm
read-scheme-source.go	8968	0644	editdlrm
read-text-outline.go	7135	0644	editdlrm
scan-api.go	10603	0644	editdlrm
snarf-check-and-output-texi.go	18211	0644	editdlrm
snarf-guile-m4-docs.go	3627	0644	editdlrm
summarize-guile-TODO.go	8724	0644	editdlrm
use2dot.go	4047	0644	editdlrm

GOOF----LE-8-2.0�]L4h�]
gguile� 

� gdefine-module*� � � gscripts� gread-rfc822� � gfilenameS� fscripts/read-rfc822.scm� gimportsS� gice-9� gregex�  � 
� grdelim� � 
� � gexportsS� gread-rfc822-silently� � g autoloadsS� gsrfi� gsrfi-13� � gstring-join� 
� � gset-current-module� � � !g%include-in-guild-list� "fValidate an RFC822-style file.� #g%summary� $gmake-regexp� %f^From � &gfrom-line-rx� 'f^([^:]+):[ ]*� (gheader-name-rx� )f^[ ]+� *gheader-cont-rx� +goption� ,geof-object?� -greverse� .g read-line� /gregexp-exec� 0gfor-each� 1gunread-char� 2gstring->list� 3g drain-message� 4gmatch:suffix� 5gstring->symbol� 6gmatch:substring� 7g substring� 8g match:end� 9f
� :gstring-null?� ;gfrom� gbody� ?f
� @gsuffix� Agerror� Bfbad component:� Cg parse-message� Dgformat� EfFrom ~A � Ff~A: ~A � Gf ~A� Hgdisplay-rfc822� Ig open-file� Jg OPEN_READ� Kgmain�C5
h8 
]4  5 4 >
"G!R"#R4$i%5
&R4$i'5
(R4$i)5
*R+R,-.+/&01hb]

L6Zg
c  
gfilenamefscripts/read-rfc822.scm� A �� B ��  
C2 h�C
]"p4

5
$6
"45

�
"���$=4
5$,4O
 44 
5
5
�>"G6
"���"���45

"���;
gport �gline  vgacc   vgfilenamefscripts/read-rfc822.scm� < ��  = ��  > ��  > ��  ? ��  G �� ' G "�� / G �� / > �� 6 @ �� B @ �� C A �� O D �� R D $�� Z D �� [ C �� ` A �� n E �� v = �� w = �� ~ = *��� = �� �
gnameg drain-message�C3R+4/&.-/(56789 hX�
])4
5


�454455
4445
5
�� 5�M�NCy
greversed-hlines  Qghlines Qgfirst   Qg
m   Qgname  ( Qgdata  C Qgfilenamefscripts/read-rfc822.scm� P ��  Q '�� Q ��  R &��  Q ��  S "��  Q ��  T %��  T 5�� ( T %�� ( Q �� + U %�� . V ,�� 3 V =�� ; V ,�� > W ,�� ? V &�� A X &�� C U %�� C Q �� J Y (�� O Y ��  Q
gnamegadd-header!�C:3*-;<=>?@AB hX�] 
�$LC�$MC�$MC�$M


$
C4M5N
M
C 6�g component  Tg
t 1 Lgfilenamefscripts/read-rfc822.scm� g ��  h �� 1 l �� = m &�� C m >�� E m C�� G m &�� I m �� P o �� T o ��  T
Ch�4]A
$4445
55
"

HHHO
Q"�45
$)$4>
"G"45
K"m4 5$45
45
�"���$4>
"G"45

"��r45
"��_4 J5
K
OC,gport �gfrom �g body-lines  #�gbody  &�gheaders  )�gadd-header!  3�gline  <�gcurrent-header  <�g
t  y� gfilenamefscripts/read-rfc822.scm� I ��  J �� K ��  K "��  L /��  K "��  K �� J �� ) O �� ) J �� < [ �� = \ �� G \ �� M ] �� N ] !�� d ^ �� l ^ �� q _ �� y \ ��� a ��� b ��� b ��� a ��� d ��� d !��� e ��� e $��� e ��� [ ��� [ ��� [ ��� f ��� f ��" �
gnameg parse-message�CCRCh�]

6
}gport  
gfilenamefscripts/read-rfc822.scm� q ��  r ��  
gnamegread-rfc822-silently�CR;DE0DFh]

��6wgheader  
gfilenamefscripts/read-rfc822.scm� v ��  w �� w $�� w 1��  w ��  
C=G> hX
] 4
5


$4
>"G"
445
>"G45
6
gparse  Tg
t -gfilenamefscripts/read-rfc822.scm� t ��  u ��  u �� u �� u ��  u )��  u 4��  u )�� . v �� 3 x �� 7 x �� 9 x �� > v �� K y �� L y �� P y �� R y �� T y ��  T
gnamegdisplay-rfc822�CHRIJHh8�-134
4�55

4
>
"G
C�gargs 1gparse  /gfilenamefscripts/read-rfc822.scm� { �� | �� | %��  | 0��  | %��  | ��  | ��  } �� 1 
gnamegread-rfc822�CRiKRC�g
m  0
gfilenamefscripts/read-rfc822.scm�  - �� 4 3 �� 6 4 �� 9 4 �� : 6 �� @ 6 $�� B 6 �� E 6 �� F 7 �� L 7 $�� N 7 �� Q 7 �� R 8 �� X 8 $�� Z 8 �� ] 8 �� a : ��� < �� G I �� � q �� t �� + { �� 2� ��  4 
C6