Graybyt3 Was Here
Linux premium295.web-hosting.com 4.18.0-513.24.1.lve.2.el8.x86_64 #1 SMP Fri May 24 12:42:50 UTC 2024 x86_64
LiteSpeed
66.29.137.177
/
lib64
/
guile
/
2.0
/
ccache
/
scripts
[ HOME ]
Exec
Submit
File Name : read-rfc822.go
GOOF----LE-8-2.0� ] L 4 h� ] g guile� � g define-module*� � � g scripts� g read-rfc822� � g filenameS� f scripts/read-rfc822.scm� g importsS� g ice-9� g regex� � � g rdelim� � � � g exportsS� g read-rfc822-silently� � g autoloadsS� g srfi� g srfi-13� � g string-join� � � g set-current-module� � � !g %include-in-guild-list� "f Validate an RFC822-style file.� #g %summary� $g make-regexp� %f ^From � &g from-line-rx� 'f ^([^:]+):[ ]*� (g header-name-rx� )f ^[ ]+� *g header-cont-rx� +g option� ,g eof-object?� -g reverse� .g read-line� /g regexp-exec� 0g for-each� 1g unread-char� 2g string->list� 3g drain-message� 4g match:suffix� 5g string->symbol� 6g match:substring� 7g substring� 8g match:end� 9f � :g string-null?� ;g from� <g body-lines� =g headers� >g body� ?f � @g suffix� Ag error� Bf bad component:� Cg parse-message� Dg format� Ef From ~A � Ff ~A: ~A � Gf ~A� Hg display-rfc822� Ig open-file� Jg OPEN_READ� Kg main�C 5 h8 ]4 5 4 > "