ÿØÿà JFIF      ÿÛ „ 	 ( %!1!%)+//.383,7(-.+



-%%-////---/-.+/--+------/------/--0+--/-/-----.-----ÿÀ  ¥2" ÿÄ               ÿÄ J  	     ! 1AQ"aq2‘#BR‚¡ÁÑ3br’¢±Âð$CSƒ²á4c“%DsÓñÿÄ              ÿÄ *        !1AQa‘"2q3±ð#b¡ÿÚ   ? ¼QxJQaÍuò¸Zö Úü8,ÐÚú
"SSn<rçù–´âE—^ªBÖ9À\†¸ÔÁT­ÃÛ5
ëd´³Í#Ý;Þ38œî ¶H£M:wÎ3…³…âpÔF&‚FK¸9„â4àGEõªfÿ ‘ñ(ßw­pŽF|È¥ù®häðÍÑ¶¹‘[ÒinÙW¶ùñY˜Q{›K"išÒ[Ú8žë\F¹@-?v"ÔU”,ìöžkÿ {I‡£šÍ?e
ríV
..............................................................................................................................................................................
.............................................................................                                                  
                                                                                                                                                                                     ÿØÿà JFIF      ÿÛ „ 	 ( %!1!%)+//.383,7(-.+



-%%-////---/-.+/--+------/------/--0+--/-/-----.-----ÿÀ  ¥2" ÿÄ               ÿÄ J  	     ! 1AQ"aq2‘#BR‚¡ÁÑ3br’¢±Âð$CSƒ²á4c“%DsÓñÿÄ              ÿÄ *        !1AQa‘"2q3±ð#b¡ÿÚ   ? ¼QxJQaÍuò¸Zö Úü8,ÐÚú
"SSn<rçù–´âE—^ªBÖ9À\†¸ÔÁT­ÃÛ5
ëd´³Í#Ý;Þ38œî ¶H£M:wÎ3…³…âpÔF&‚FK¸9„â4àGEõªfÿ ‘ñ(ßw­pŽF|È¥ù®häðÍÑ¶¹‘[ÒinÙW¶ùñY˜Q{›K"išÒ[Ú8žë\F¹@-?v"ÔU”,ìöžkÿ {I‡£šÍ?e
ríV
..............................................................................................................................................................................
.............................................................................                                                  
                                                                                                                                                                                     ccache/rnrs.go                                                                                      0000644                 00000052471 15154557173 0007313 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0!U      ] 4 h,D      ] g  guile	 	g  define-module*	 	 	g  rnrs	 	g  filenameS		f  rnrs.scm	
g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  
arithmetic	g  bitwise	 	g  call-with-deferred-observers	 	 	g  module-use-interfaces!	 	 	g  current-module	 	 	g  fixnums	  	!g  flonums	"! 	#g  base	$# 	%g  bytevectors	&% 	'g  
conditions	(' 	)g  control	*) 	+g  enums	,+ 	-g  
exceptions	.- 	/g  files	0/ 	1g  
hashtables	21 	3g  io	4g  ports	534 	6g  simple	736 	8g  lists	98 	:g  programs	;: 	<g  records	=g  
inspection	><= 	?g  
procedural	@<? 	Ag  	syntactic	B<A 	Cg  sorting	DC 	Eg  rename	Fg  syntax-case	GF 	Hg  syntax-case-hack	IFH 	JEGI 	Kg  unicode	LK 	Mg  module-export!	NM 	OM 	Pg  module-re-export!	QP 	RP 	Sg  string-normalize-nfkc	Tg  string-normalize-nfc	Ug  string-normalize-nfkd	Vg  string-normalize-nfd	Wg  string-ci>=?	Xg  string-ci<=?	Yg  string-ci>?	Zg  string-ci<?	[g  string-ci=?	\g  string-foldcase	]g  string-titlecase	^g  string-downcase	_g  string-upcase	`g  char-general-category	ag  char-title-case?	bg  char-lower-case?	cg  char-upper-case?	dg  char-whitespace?	eg  char-numeric?	fg  char-alphabetic?	gg  
char-ci>=?	hg  
char-ci<=?	ig  	char-ci>?	jg  	char-ci<?	kg  	char-ci=?	lg  char-foldcase	mg  char-titlecase	ng  char-downcase	og  char-upcase	pg  syntax-violation	qg  unsyntax-splicing	rg  unsyntax	sg  quasisyntax	tg  with-syntax	ug  generate-temporaries	vg  datum->syntax	wg  syntax->datum	xg  free-identifier=?	yg  bound-identifier=?	zg  identifier?	{HF	|g  syntax	}g  make-variable-transformer	~g  vector-sort!	g  vector-sort g  	list-sort g  record-constructor-descriptor g  record-type-descriptor g  define-record-type g  record-mutator g  record-accessor g  record-predicate g  record-constructor g  "make-record-constructor-descriptor g  record-type-descriptor? g  make-record-type-descriptor g  record-field-mutable? g  record-type-field-names g  record-type-opaque? g  record-type-sealed? g  record-type-generative? g  record-type-uid g  record-type-parent g  record-type-name g  
record-rtd g  record? g  exit g  command-line g  cons* g  assq g  assv g  assoc g  assp g  memq g  memv g  member g  memp g  remq g  remv g  remove g  remp g  
fold-right g  	fold-left g  	partition g  filter g  exists g  for-all g  find g  write g  display g  newline g  
write-char g  read g  	peek-char g  	read-char g  close-output-port g  close-input-port g  open-output-file g  open-input-file g  with-output-to-file g  with-input-from-file g  current-error-port g  current-output-port g  current-input-port g  call-with-output-file g  call-with-input-file g  standard-error-port g  standard-output-port g  standard-input-port g  
put-string g  	put-datum g  put-char g  lookahead-char g  get-string-n! g  get-string-n g  get-string-all g  get-line g  	get-datum g  get-char g  flush-output-port g  call-with-string-output-port g  make-custom-textual-output-port g  open-file-input/output-port g  open-file-output-port g  open-file-input-port g  utf-16-codec g  utf-8-codec g  latin-1-codec g   call-with-bytevector-output-port g  open-string-output-port g  open-string-input-port g  put-bytevector g  put-u8 g  make-custom-binary-output-port g  open-bytevector-output-port g  get-bytevector-all g  get-bytevector-some g  get-bytevector-n! g  get-bytevector-n g  lookahead-u8 g  get-u8 g  make-custom-binary-input-port g  open-bytevector-input-port g  call-with-port g  
close-port g  port-has-set-port-position!? g  port-has-port-position? g  set-port-position! g  port-position g  transcoded-port g  textual-port? g  binary-port? g  port-transcoder g  	port-eof? g  
eof-object g  output-port? g  input-port? g  port? g  eof-object? g  native-transcoder g  transcoder-error-handling-mode g  transcoder-eol-style g  transcoder-codec g  make-transcoder g  error-handling-mode g  native-eol-style g  	eol-style g  buffer-mode? g  buffer-mode g  file-options g  symbol-hash g  string-ci-hash g  string-hash g  
equal-hashg  hashtable-mutable?g  hashtable-hash-functiong  hashtable-equivalence-functiong  hashtable-entriesg  hashtable-keysg  hashtable-clear!g  hashtable-copyg  hashtable-update!	g  hashtable-contains?
g  hashtable-delete!g  hashtable-set!g  hashtable-refg  hashtable-sizeg  
hashtable?g  make-hashtableg  make-eqv-hashtableg  make-eq-hashtableg  i/o-error-portg  i/o-port-error?g  make-i/o-port-errorg  	&i/o-portg  i/o-file-does-not-exist-error?g  "make-i/o-file-does-not-exist-errorg  &i/o-file-does-not-existg  i/o-file-already-exists-error?g  "make-i/o-file-already-exists-errorg  &i/o-file-already-existsg  i/o-file-is-read-only-error?g   make-i/o-file-is-read-only-errorg  &i/o-file-is-read-onlyg  i/o-file-protection-error? g  make-i/o-file-protection-error!g  &i/o-file-protection"g  i/o-error-filename#g  i/o-filename-error?$g  make-i/o-filename-error%g  &i/o-filename&g  i/o-error-position'g  i/o-invalid-position-error?(g  make-i/o-invalid-position-error)g  &i/o-invalid-position*g  i/o-write-error?+g  make-i/o-write-error,g  
&i/o-write-g  i/o-read-error?.g  make-i/o-read-error/g  	&i/o-read0g  
i/o-error?1g  make-i/o-error2g  &i/o3g  delete-file4g  file-exists?5g  raise-continuable6g  raise7g  with-exception-handler8g  guard9g  define-enumeration:g  enum-set-projection;g  enum-set-complement<g  enum-set-difference=g  enum-set-intersection>g  enum-set-union?g  
enum-set=?@g  enum-set-subset?Ag  enum-set-member?Bg  enum-set->listCg  enum-set-constructorDg  enum-set-indexerEg  enum-set-universeFg  make-enumerationGg  case-lambdaHg  doIg  unlessJg  whenKg  undefined-violation?Lg  make-undefined-violationMg  
&undefinedNg  syntax-violation-subformOg  syntax-violation-formPg  syntax-violation?Qg  make-syntax-violationRg  &syntaxSg  lexical-violation?Tg  make-lexical-violationUg  &lexicalVg  %implementation-restriction-violation?Wg  )make-implementation-restriction-violationXg  &implementation-restrictionYg  non-continuable-violation?Zg  make-non-continuable-violation[g  &non-continuable\g  condition-who]g  who-condition?^g  make-who-condition_g  &who`g  condition-irritantsag  irritants-condition?bg  make-irritants-conditioncg  
&irritantsdg  assertion-violation?eg  make-assertion-violationfg  
&assertiongg  
violation?hg  make-violationig  
&violationjg  error?kg  
make-errorlg  &errormg  serious-condition?ng  make-serious-conditionog  &seriouspg  warning?qg  make-warningrg  &warningsg  condition-messagetg  message-condition?ug  make-message-conditionvg  &messagewg  define-condition-typexg  condition-accessoryg  condition-predicatezg  
condition?{g  simple-conditions|g  	condition}g  
&condition~g  utf32->stringg  utf16->stringg  utf8->stringg  string->utf32g  string->utf16g  string->utf8g  "bytevector-ieee-double-native-set!g  !bytevector-ieee-double-native-refg  bytevector-ieee-double-set!g  bytevector-ieee-double-refg  "bytevector-ieee-single-native-set!g  !bytevector-ieee-single-native-refg  bytevector-ieee-single-set!g  bytevector-ieee-single-refg  bytevector-s64-native-set!g  bytevector-u64-native-set!g  bytevector-s64-native-refg  bytevector-u64-native-refg  bytevector-s64-set!g  bytevector-u64-set!g  bytevector-s64-refg  bytevector-u64-refg  bytevector-s32-native-set!g  bytevector-u32-native-set!g  bytevector-s32-native-refg  bytevector-u32-native-refg  bytevector-s32-set!g  bytevector-u32-set!g  bytevector-s32-refg  bytevector-u32-refg  bytevector-s16-native-set!g  bytevector-u16-native-set!g  bytevector-s16-native-refg  bytevector-u16-native-refg  bytevector-s16-set!g  bytevector-u16-set!g  bytevector-s16-refg  bytevector-u16-refg  sint-list->bytevectorg  uint-list->bytevectorg  bytevector->uint-listg  bytevector->sint-listg  bytevector-sint-set!g  bytevector-sint-refg  bytevector-uint-set!g  bytevector-uint-refg  u8-list->bytevectorg  bytevector->u8-listg  bytevector-s8-set!g  bytevector-u8-set!g  bytevector-s8-refg  bytevector-u8-refg  uniform-array->bytevectorg  bytevector-copyg  bytevector-copy!g  bytevector-fill!g  bytevector=?g  bytevector-lengthg  make-bytevectorg  bytevector?g  native-endiannessg  
endiannessg  identifier-syntaxg  syntax-rulesg  letrec-syntaxg  
let-syntaxg  unquote-splicingg  unquoteg  
quasiquoteg  applyg  valuesg  dynamic-windg  call-with-valuesg  call/ccg  call-with-current-continuationg  assertg  assertion-violationg  errorg  vector-for-eachg  
vector-mapg  vector-fill!g  list->vectorg  vector->listg  vector-set!g  
vector-refg  vector-lengthg  vectorg  make-vectorg  vector?g  string-copyg  string-for-eachg  list->stringg  string->listg  string-appendg  	substringg  	string>=?g  	string<=?g  string>?g  string<?g  string=?g  
string-refg  string-lengthg  stringg  make-stringg  char>=?g  char<=?g  char>?g  char<?g  char=?g  integer->charg  char->integerg  symbol=?g  string->symbolg  symbol->stringg  for-eachg  mapg  list-refg  	list-tailg  reverseg  appendg  lengthg  listg  list?g  cddddrg  cdddarg  cddadrg  cdaddrg  cadddrg  caddarg  caaddr g  cadadrg  cdaadrg  cdadarg  cddaarg  cdaaarg  cadaarg  caadarg  caaadrg  caaaar	g  cdddr
g  cddarg  cdadrg  caddrg  cdaarg  cadarg  caadrg  caaarg  cddrg  cdarg  cadrg  caarg  cdrg  carg  consg  	boolean=?g  string->numberg  number->stringg  >=g  <=g  >g  <g  = g  inexact!g  exact"g  	infinite?#g  finite?$g  nan?%g  even?&g  odd?'g  	negative?(g  	positive?)g  zero?*g  integer-valued?+g  rational-valued?,g  real-valued?-g  inexact?.g  exact?/g  integer?0g  	rational?1g  real?2g  complex?3g  angle4g  	magnitude5g  
make-polar6g  atan7g  acos8g  asin9g  tan:g  cos;g  sin<g  log=g  exp>g  sqrt?g  exact-integer-sqrt@g  exptAg  div0-and-mod0Bg  mod0Cg  div0Dg  div-and-modEg  modFg  divGg  make-rectangularHg  	imag-partIg  	real-partJg  rationalizeKg  roundLg  truncateMg  ceilingNg  floorOg  lcmPg  gcdQg  denominatorRg  	numeratorSg  absTg  minUg  maxVg  /Wg  *Xg  -Yg  +Zg  eq?[g  equal?\g  eqv?]g  not^g  and_g  or`g  caseag  condbg  set!cg  ifdg  lambdaeg  quotefg  begingg  letrec*hg  letrecig  let*-valuesjg  
let-valueskg  let*lg  letmg  define-syntaxng  defineog  
procedure?pg  string?qg  number?rg  pair?sg  null?tg  char?ug  symbol?vg  boolean?wg  fixnum->flonumxg  no-nans-violation?yg  make-no-nans-violationzg  &no-nans{g  no-infinities-violation?|g  make-no-infinities-violation}g  &no-infinities~g  flexptg  flsqrtg  flatang  flasing  flacosg  fltang  flcosg  flsing  fllogg  flexpg  flroundg  
fltruncateg  	flceilingg  flfloorg  fldenominatorg  flnumeratorg  flmod0g  fldiv0g  fldiv0-and-mod0g  flmodg  fldivg  fldiv-and-modg  flabsg  fl/g  fl-g  fl*g  fl+g  flming  flmaxg  flnan?g  flinfinite?g  	flfinite?g  fleven?g  flodd?g  flnegative?g  flpositive?g  flzero?g  
flinteger?g  fl>=?g  fl>?g  fl<=?g  fl<?g  fl=?g  real->flonumg  flonum?g  fxreverse-bit-fieldg  fxrotate-bit-fieldg  fxarithmetic-shift-rightg  fxarithmetic-shift-leftg  fxarithmetic-shiftg  fxcopy-bit-fieldg  fxbit-fieldg  
fxcopy-bitg  
fxbit-set?g  fxfirst-bit-setg  fxlengthg  fxbit-countg  fxifg  fxxorg  fxiorg  fxandg  fxnotg  	fx*/carryg  	fx-/carryg  	fx+/carryg  fxmod0g  fxdiv0g  fxdiv0-and-mod0g  fxmodg  fxdivg  fxdiv-and-modg  fx-g  fx*g  fx+g  fxming  fxmaxg  fxeven?g  fxodd?g  fxnegative?g  fxpositive?g  fxzero?g  fx<=?g  fx>=?g  fx<?g  fx>?g  fx=?g  greatest-fixnumg  least-fixnumg  fixnum-widthg  fixnum?g  bitwise-reverse-bit-fieldg  bitwise-rotate-bit-fieldg  bitwise-arithmetic-shift-rightg  bitwise-arithmetic-shift-leftg  bitwise-arithmetic-shiftg  bitwise-copy-bit-fieldg  bitwise-bit-fieldg  bitwise-copy-bitg  bitwise-bit-set?g  bitwise-first-bit-setg  bitwise-lengthg  bitwise-bit-countg  
bitwise-ifg  bitwise-xorg  bitwise-iorg  bitwise-andg  bitwise-notSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~ 	
 !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~ 	
 !"#$%&'()*+,-./0123456789:;<=>?@ABCDEF3GHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijkldmnopqrstuvwxyz{|}~g  module-replace!  C 5       h    ]4	
5 4 >  "  G   45 4 h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   4 5 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   4"5 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   4$5 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   4&5 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   4(5 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   4*5 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   4,5 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   4.5 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   405 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   425 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   455 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   475 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   495 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   4;5 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   4>5 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   4@5 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   4B5 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   4D5 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   4J5 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   4L5 4     h   :   ] 45 L  62       g  filenamef  rnrs.scm
	
 		
   C O >  "  G   4O      h   :   ] 45 6    2       g  filenamef  rnrs.scm
	
 		
   C>  "  G  4R   h   :   ] 45 6   2       g  filenamef  rnrs.scm
	
 		
   C>  "  G        h   :   ] 45 6    2       g  filenamef  rnrs.scm
	
 		
   C6          g  m
		+ g  iface
	2  g  iface
 ' g  iface
. g  iface
' g  iface
. g  iface
' g  iface
. g  iface
' g  iface
. g  iface
' g  iface
. g  iface
' g  iface
. g  iface
' g  iface
. g  iface
' g  iface
. g  iface
	' g  iface
	.	 g  iface
	
' g  iface

.
  g  filenamef  rnrs.scm		
 	
   C6                                                                                                                                                                                                        ccache/oop/goops.go                                                                                 0000644                 00000314760 15154557173 0010255 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0ؙ     ] 4 hc      ] g  guile	 	g  define-module*	 	 	g  oop	g  goops	 		g  filenameS	
f  oop/goops.scm	g  importsS	g  srfi	g  srfi-1	 	 	g  ice-9	g  match	 	 	g  util	 	 	 	g  exportsS	g  define-class	g  class	g  standard-define-class	g  define-generic	g  define-accessor	g  define-method	g  define-extended-generic	 g  define-extended-generics	!g  method	"g  is-a?	#g  class-of	$g  ensure-metaclass	%g  ensure-metaclass-with-supers	&g  
make-class	'g  make-generic	(g  ensure-generic	)g  make-extended-generic	*g  make-accessor	+g  ensure-accessor	,g  add-method!	-g  class-slot-ref	.g  class-slot-set!	/g  slot-unbound	0g  slot-missing	1g  slot-definition-name	2g  slot-definition-options	3g  slot-definition-allocation	4g  slot-definition-getter	5g  slot-definition-setter	6g  slot-definition-accessor	7g  slot-definition-init-value	8g  slot-definition-init-form	9g  slot-definition-init-thunk	:g  slot-definition-init-keyword	;g  slot-init-function	<g  class-slot-definition	=g  method-source	>g  compute-cpl	?g  compute-std-cpl	@g  compute-get-n-set	Ag  compute-slots	Bg  compute-getter-method	Cg  compute-setter-method	Dg  allocate-instance	Eg  
initialize	Fg  make-instance	Gg  make	Hg  no-next-method	Ig  no-applicable-method	Jg  	no-method	Kg  change-class	Lg  #update-instance-for-different-class	Mg  shallow-clone	Ng  
deep-clone	Og  class-redefinition	Pg  apply-generic	Qg  apply-method	Rg  apply-methods	Sg  compute-applicable-methods	Tg  %compute-applicable-methods	Ug  method-more-specific?	Vg  sort-applicable-methods	Wg  class-subclasses	Xg  class-methods	Yg  goops-error	Zg  
min-fixnum	[g  
max-fixnum	\g  	instance?	]g  slot-ref-using-class	^g  slot-set-using-class!	_g  slot-bound-using-class?	`g  slot-exists-using-class?	ag  slot-ref	bg  	slot-set!	cg  slot-bound?	dg  
class-name	eg  class-direct-supers	fg  class-direct-subclasses	gg  class-direct-methods	hg  class-direct-slots	ig  class-precedence-list	jg  class-slots	kg  generic-function-name	lg  generic-function-methods	mg  method-generic-function	ng  method-specializers	og  method-formals	pg  primitive-generic-generic	qg  enable-primitive-generic!	rg  method-procedure	sg  accessor-method-slot-definition	tg  slot-exists?	ug  find-method	vg  get-keyword	w !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstGuv _	xg  set-current-module	yx 	zx 	{g  current-module	|g  *goops-module*	}g  %init-goops-builtins	~g  process-use-modules	~  ~  g  language g  tree-il g  
primitives   g  selectS g  add-interesting-primitive!   g  dispatch     g  make-procedure g  compute-cmethod g  error     f  no matching pattern g  expt g  	scm-error g  memq g  assoc g  <class> g  dsupersS g  slotsS g  nameS g  gensym f  	metaclass g  map g  
append-map g  for-each g  member g  append g  keyword? f  malformed keyword arguments: ~a g  	kw-do-map g  make-unbound g  or-map g  <object> g  	metaclassS g  find-duplicate f  3make-class: super class ~S is duplicate in class ~S f  ,make-class: slot ~S is duplicate in class ~S g  make-syntax-transformer     g  macro g  $sc-dispatch     g  _ g  any  g  syntax->datum     g  datum->syntax     f  malformed superclass list: ~S g  
take-while g  	find-tail g  list g  quote g  	init-formS g  
init-thunkS g  lambda g  syntax-violation     f  -source expression failed to match any pattern g  define-class-pre-definition g  each-any ǌ Ȍ ǌ ʌ ǌ ̌ g  syntax-object g  begin g  top   g  ribcage g  out     f  l-bdc1916-ed       g  x   f  l-bdc1916-d0       g  hygiene     g  getterS g  setterS g  key   g  m-bdc1916-e3     f  l-bdc1916-e4     g  k g  arg g  rest     f  l-bdc1916-db f  l-bdc1916-dc f  l-bdc1916-dd f  l-bdc1916-de             g  if   g  or   g  not  g  defined?  " g  	<generic>  	g  toplevel-define!
	 (   g  accessorSg  
<accessor>  + g  define-class-pre-definitionsf  l-bdc1916-f4  f  l-bdc1916-f1    ǌǌ g  slotname!g  slotopt" ! #f  l-bdc1916-115$f  l-bdc1916-116%f  l-bdc1916-117&f  l-bdc1916-118'#$%& ("' )( *) +) ,g  identifier?-g  slot.- / 0f  l-bdc1916-10c1f  l-bdc1916-10d2f  l-bdc1916-10e3012 4./3 54 65 7f  l-bdc1916-fe8f  l-bdc1916-ff9f  l-bdc1916-100:789 ;./: <; =< >Ɍ?g  dummy@g  nameAg  supersB?@A- Cg  m-bdc1916-121DC ED Ff  l-bdc1916-126Gf  l-bdc1916-127Hf  l-bdc1916-128If  l-bdc1916-129JFGHI KBEJ LD Mf  l-bdc1916-123NM OLN PKO QP RP SP Tg  andUTP VP WP X"P YP ZY [P \P ]iP ^OP _P `P a	P b? cg  m-bdc1916-132dc ed ff  l-bdc1916-137gf  l-bdc1916-138hfg ibeh jd kf  l-bdc1916-134lk mjl nim on pf  bad generic function name: ~Sqg  definer s tg  prefixSug  symbol-appendvf  no prefixes suppliedwg  <generic-with-setter>xg  make-setter-nameyg  setterzg  <extended-generic-with-setter>{g  extendsS|g  <extended-generic>}g  extended-by!~g  extended-byg  invalidate-method-cache!g  delq!g  not-extended-by!g  procedure-with-setter?g  defaultSg  	procedureg  
procedure?g  generic-capability? ?@ g  m-bdc1916-19d  f  l-bdc1916-1a2f  l-bdc1916-1a3   f  l-bdc1916-19f   q g  cond     +  "   G  g  else g  string->symbolg  string-appendf  setter:g  symbol->stringg  upgrade-accessorg  methodsg  extended-bySg  extendsg  generic-functiong  module-define!g  free-idg  m-bdc1916-1c5  f  l-bdc1916-1c7   y   ǌg  argsg  body?@  f  l-bdc1916-1caf  l-bdc1916-1cbf  l-bdc1916-1ccf  l-bdc1916-1cd          "   	 +   , y ! ǌ،f  l-bdc1916-1d4f  l-bdc1916-1d5f  l-bdc1916-1d6f  l-bdc1916-1d7          	 G   , ! g  free-identifier=?  f  l-bdc1916-26f  g  compute-proceduresg  compute-make-procedureg  ->properg  compute-procedureg  find-free-idg  
parse-args  f  l-bdc1916-1e9f  l-bdc1916-1e7f  l-bdc1916-1e5f  l-bdc1916-1e3f  l-bdc1916-1e1 f  l-bdc1916-1df   f  l-bdc1916-1de   !  	 
		 
 Ɍg  reverseg  lpg  lsg  formalsg  specializers f  l-bdc1916-1edf  l-bdc1916-1eef  l-bdc1916-1eff  l-bdc1916-1f0  f  l-bdc1916-1ec      g  <top>!g  tail"! #f  l-bdc1916-212$# %"$ &% ' & (g  f)( * +f  l-bdc1916-20a,f  l-bdc1916-20b-+, .)*- /. 0 / 1 2g  next-method3g  id43 5f  l-bdc1916-26b65 746 8 9f  l-bdc1916-269:f  l-bdc1916-26a;9: <8*; =7< >= ?g  formal@? Af  l-bdc1916-259BA C@B D2 Ef  l-bdc1916-255FE GDF H If  l-bdc1916-251JI KHJ L2 Mf  l-bdc1916-24cNf  l-bdc1916-24dOf  l-bdc1916-24ePMNO QL/P RCGKQ 	SR Tg  real-next-methodUTR VU Wg  letXWR YR ZR [g  null?\[R ]\Y ^g  apply_^R `_UY a` bf  l-bdc1916-263cb d@c e ff  l-bdc1916-25egf heg idhGKQ ji kTi lk mWi ni oi p[i qpn r^i srkn ts uf  l-bdc1916-235vu wev xg  body0yx zf  l-bdc1916-231{z |y{ }f  l-bdc1916-22d~f  l-bdc1916-22e}~ 8* w|   f  l-bdc1916-287f  l-bdc1916-288 * f  l-bdc1916-282f  l-bdc1916-283 * g  specializer f  l-bdc1916-27bf  l-bdc1916-27c * g  body1x f  l-bdc1916-272f  l-bdc1916-273f  l-bdc1916-274 /  G g  <method> g  specializersS g  cons* g  formalsS  g  bodyS g  make-procedureS g  	procedureS g  	for-each*g  direct-methodsg  add-method-in-classes!g  delv!g  remove-method-in-classes!g  compute-new-list-of-methodsg  length*g  method-n-specializersg  foldg  maxg  calculate-n-specializedg  %invalidate-method-cache!g  n-specializedg  gfg  m  b   b   g  *unspecified* g  internal-add-method!g  <procedure>g  proc  q ,  2   g  <primitive-generic>g  pg p ,  g  obj f  "~S is not a valid generic functionY   g  let*g  specg  map* a d  g  srcg  procedure-source a    g  cadr  g  cddr   g  cons!    W T    a  g  carg  cdrg  
allocationSg  instanceSg  
init-valueS g  init-keywordSg  assqg  getters-n-settersg  slot-definitiong  equal?g  g-equal?g  y g  set-primitive-generic!	g  display
g  number->stringg  object-addressg  display-addressg  writeg  og  file f  #<instance 	  	>  g  write-object#   @ c f  #<	 d 	  	  !  "! #W" $# % &g  meta'# (&' )( *c& +T* ,d& -	, . /-  . 0+/ 1W)0 21 3 4# 5&4 65 7c 8T*7 9k :@9 ;: <	@ = < >@= ?W;> @f   (A	@ Bg  lengthCl DBC E	D Ff  )>G	F H-?AEG I8H JW6I KJ L& ML Nc OT*N P Qc Ra SQR TPS Un VTU W	V X- W  YOX ZWMY [Z \ ]\ ^g  merge-generics_g  <module>`g  <symbol>ag  modulebg  int1cg  val1dg  int2eg  val2fg  vargg  valha@bcdefg ig  	<boolean>jg  eq?kjce l k mg  make-variablenec o)n@ pmo qTlp rq sa@bcdef t uat veu w v xeu yex zbty {~ |ae{ }| ~} be{~ zf Tw  g  duplicate-handlersg  merge-accessors^a@bcdefg 	 g  slotsg  classSg  each-subclassS g  class-slot-g-n-sg  unbound?g  cg  s f  !Slot `~S' is unbound in object ~SY   f   Slot `~S' is unbound in class ~SY   f  Unbound slot in object ~SY  f  #No slot with name `~S' in object ~SY  f  (No class slot with name `~S' in class ~SY  g  value 0   f  0No next method when calling ~S
with arguments ~SY  f  &No applicable method for ~S in call ~S9 Y  f  No method defined for ~SY  g  self g  cloneg  %allocate-instance#    j 1   - c- a- b-    W    \ N  W b-    W  g  oldg  new g  remove-class-accessors! g   g  update-direct-method!    g  b W g  set-car!g  cpl a   g  direct-subclasses f  b  e    b  e  g  %modify-class g  update-direct-subclass!  f  g  	redefined b  g  %invalidate-class   
g  <accessor-method>" a   g  delq1!	a 
	 b
  W   g    g  loopg  ln   g  pair? g  eqv?      !  "! #" $W# %$ & 'e (h )d *# +&'()* ,O+ -, .g  compute-slot-accessors/g  g-n-s0/ 1g  
init-thunk2/ 312 4/ 5/4 635 7 8/ 9g  make-generic-bound-check-getter:/ ;9: <8; =g  standard-get>=/ ?1> @g  bound-check-getA@/ BA C<?B Dg  slot-definitionSEG7CD/ FW6E GF H  Ig  standard-setJI/ K82J LGHKD/ MW6L NM Og  assert-boundPg  num-standard-pre-cacheQg  define-standard-accessor-methodRg  cacheSg  vectorTg  
struct-refUg  struct-set!Vg  iotaWg  nXW Yg  <Zg  
vector-ref[ZRW \g  nfields]g  integer?^f  -Bad getter and setter for slot `~S' in ~S: ~S_f  *Bad getter closure for slot `~S' in ~S: ~S`f  *Bad setter closure for slot `~S' in ~S: ~Saf  /Class-allocated slots should not reserve fieldsbg  thunk?cf  &Bad init-thunk for slot `~S' in ~S: ~Sdg  compute-getters-n-setterse f?e gf hg  filterig  only-non-nulljg  merge-listskg  everylg  reverse!mf  *merge-lists: Inconsistent precedence graphng  top-sortog  build-transitive-closurepg  build-constraintsqg  std-tie-breakerrg  compute-clos-cplsf  top-sort: Invalid constraintstf  std-tie-breaker: Nothing validu vg  class-slot-init-valuewv xg  thunky9 zxy {z |x }7 ~x|} W{~ qw g  case3  g  already-allocated\ a   g  + b W   1 @  h 1 @ g  make-closure-variablew i    g  r a @    ! W W  W    g  virtualS g  getg  slot-refS2 v  g  setg  	slot-set!Sv   T   f  4You must supply a #:slot-ref and a #:slot-set! in ~SY   W      f  Allocation "~S" is unknownY  g  %compute-slots  g  objectg  initargs g  %initialize-object   g  dslotsv  v A  g  ??? v b g  direct-supers bA g  direct-slots b b b > b b A    b b
 d b . W  a  b  A g  %prep-layout! g  %inherit-magic!A W  g  initialize-object-procedureg  <applicable-struct>g  applicable-struct    g  generic  g  previous-definitionv  v @  " 	^ 
!	 
  b  g  set-procedure-property! @ @ W  	 g  gws g  %set-object-setter!v   g  eg v{ bt  g  dummy-procedure ! !g  generic-functionS"v! #b!" $v %b!$ &v 'b!& (v )b!( * +v ,b!*+ - .v /b!-. 0#%'),/ 1g  %modify-instance2g  change-object-class3g  old-instance4g  new-instance534 64 7g  	new-class837 9#3 :2397 ;: < =< >Ɍ?g  instance@D A?@ BA CE? DWBC? ED F[	 GJ HFG IS JI KJ LV MRL NI OMN PWKO QHP Rg  %%compute-applicable-methodsST TS U Vg  targsW# XVW YX Zg  sort[g  m1\g  m2][\ ^U[\V _]^ `Z_ aWY` ba c# d# e[\V fg  %method-more-specific?gf[\V hg ig  
build-nextji k lrk m nim o^ln po qg  <list>r sg  letrectg  nextug  procsvu wg  new-argsxg  ay[w zyw {xz |{ }[u ~Hx Qutx }~ W| w v t  Qt s  g  system-procedureg  list2setg  	mapappendg  %goops-loadedC 5     h"   ]4	
w5 4z >  "  G   4{i5 |R4}i>   "  G  4  >  "  G  4i#>  "  G  4 >  "  G  aHm      h   e   -  1  3 4L 5 6  ]       g  args
			  g  filenamef  oop/goops.scm
	q			r	"		r	 			


   Cr 	     hX     ] $  ?  45$  (  O "  	45664 56          g  methods
		U g  types		U g  w			H g  x			H g  make-procedure			H  g  filenamef  oop/goops.scm
	j
		k			m			m	,		m			m		$	n		,	p		8	s		B	o		H	t		I	k	 		U	  g  nameg  compute-cmethod CR
4i		5ZR4i		5[RY        h      - 1 3  6          g  format-string
			 g  args			  g  filenamef  oop/goops.scm
	~
						0			 			
  g  nameg  goops-error CYRi       h       ]44 55$  CC              g  obj
		 g  class		  g  filenamef  oop/goops.scm
 
	 		 		 	*	 		 		 	 			  g  nameg  is-a? C"RH G 	h@      ]4 M 5$  C4 455 M N C          g  meta-supers
		= g  entry		= g  new		.	=  g  filenamef  oop/goops.scm
 		 		 		 		 		 		# 	/	& 	.	* 	6	, 	.	. 		. 		5 	)	8 	#	: 	 		=   C O  %R  h   Z   ] C  R       g  x
		  g  filenamef  oop/goops.scm
 		 	) 		   Ci      h   c   ]4 5C     [       g  m
		  g  filenamef  oop/goops.scm
 	$	 	+	
 	& 		   C   h8      ]4 L5$  "  
4 M 5$  4M   5N CC           g  meta
		4  g  filenamef  oop/goops.scm
 			 		 		 		 		" 		# 	 	, 	5	. 	 	0 	 		4   C% 	     hP   $  ] (  C4 545H4O >  "  G  J(  JCJ6      g  supers
		P g  	all-metas		P g  all-cpls			P g  needed-metas		"	P  g  filenamef  oop/goops.scm
 
	 		 		 		 		 		" 		" 		% 		B 		F 		I 		P 	 		P  g  nameg  ensure-metaclass C$RY      hH     ]	 (  C $  "  	4 5$  L 6 4L 5C             g  l
		A g  t		'  g  filenamef  oop/goops.scm
 		 			 		 		 	
	 		 		! 	)	# 		$ 		+ 		/ 		3 		6 		7 		< 	#	? 		@ 	 		A  g  nameg  keywords C h       ] (  C 4L  5C              g  l
		  g  filenamef  oop/goops.scm
 		 			 		 		 	%	 	+	 	%	 	 			  g  nameg  args C    h@     ]#O O Q Q 4545 6            g  mapper
		; g  f		; g  kwargs			; g  keywords			; g  args			; g  k		&	; g  a		/	;  g  filenamef  oop/goops.scm
 
	  		& 		) 		/ 		; 	 		;	  g  nameg  	kw-do-map CRvi h   g   ]4 56 _       g  class
		  g  filenamef  oop/goops.scm
 	"	 	*	 	$ 		   C$1YG    h     - 1 3 445 54 5$   "  4  545$  "  4	54
54
455$  4>  "  G  "   $  4>  "  G  "   @	             g  supers
		  g  slots		  g  options			  g  name		  g  supers		8  g  t		D	\ g  	metaclass		\  g  tmp1		s  g  tmp2		s   	g  filenamef  oop/goops.scm
 
	
 		 	+	 		 		 		& 		- 		6 	$	8 		8 		; 		D 		S 		\ 		_ 		f 		i 	 	s 		s 		} 		~ 	
  	  	
  	  	
  	  	
  	 		 	
	  g  nameg  
make-class C&R4Y    h   c   ]4 5C     [       g  x
		  g  filenamef  oop/goops.scm
 		 	,	
 	' 		   C&      h0   ~   ] $     C  C      v       g  kw
		* g  arg		*  g  filenamef  oop/goops.scm
 		 		 	"	) 	' 		*	   C       h0      ] $    4 5C   C        g  def
		/  g  filenamef  oop/goops.scm
 		 				 		 			 		 			 		 		 		  			$ 		 		/   C        hp     - 1 3  $  "  4 >  "  G  4545$  "   4	
5C             g  supers
			i g  slots			i g  t		:	L g  slots		L	i g  options		L	i  g  filenamef  oop/goops.scm
 
	 		 		 		 		  		) 		2 		: 		I 	0	L 		R 		Z 		c 	 			i
   C        h   b   ]	4 5L 4?6Z       g  args
		 g  v			  g  filenamef  oop/goops.scm	 
 		   C       h(   `   ]	4 5$   O @ 6 X       g  y
		' g  tmp		'  g  filenamef  oop/goops.scm
 
 		'   C5R4       h   +   ] C#       g  out
		  		   C h      ]4 56          g  k
		 g  arg		 g  rest			 g  out			  g  filenamef  oop/goops.scm				 			   C
      h      ]4 5$  "  $  f4	
     
 	
  
     5C$  f4	
     
 	
  
     5CC       g  k
	  g  arg	  g  rest		  g  out		  g  key			   g  filenamef  oop/goops.scm					 	 	   C 	      hP   r   ]4 5"   4 5$  @ 6$  4?$  @""j       g  x
		P g  tmp		P g  tmp			1  g  filenamef  oop/goops.scm
	 		P   C5R4     h   +   ] C#       g  out
		  		   C*+   h    h   ]4  5C      `       g  slotname
		 g  slotopt		 g  rest			 g  out			  			   C,     h   x   ] 6p       g  slot
		 g  rest		 g  out			  g  filenamef  oop/goops.scm	/	 			   C6 h   O   ]C     G       g  slot
		 g  rest		 g  out			  			   C h      ]4 56   y       g  slot
		 g  rest		 g  out			  g  filenamef  oop/goops.scm	,		,	 			   C=        h   O   ]CG       g  slot
		 g  rest		 g  out			  			   C      h      ]!4 5$  @4 5"  N4 5"   4 5$  @ 6$  4	?$  
@""$  4?$  @""          g  x
	  g  tmp	  g  tmp		"  g  tmp		1	v g  tmp		@	W  g  filenamef  oop/goops.scm
'	 	    C5R4>QRSUVWXZ[\]^_`a  h   j   ]   	
   4  5  4  5   Cb       g  dummy
	  g  name	  g  supers		  g  slot		   	 	   C       h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  oop/goops.scm
6
 		"  g  
macro-typeg  syntax-rulesg  patternsg  nameg  supersg  slotg  ...   C5R4o      h   >   ]C6       g  dummy
		 g  arg		  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  oop/goops.scm
@
 		"  g  
macro-typeg  syntax-rulesg  patternsg  argg  ...   C5R4YpqT"rG(s    hx      ] $  "  4 >  "  G       	 
            C       g  name
		x  g  filenamef  oop/goops.scm
J
	K			K		L		L		L		#M	 		x   C    h   b   ]	4 5L 4?6Z       g  args
		 g  v			  g  filenamef  oop/goops.scm	J
 		   C       h(   `   ]	4 5$   O @ 6 X       g  y
		' g  tmp		'  g  filenamef  oop/goops.scm
J
 		'   C5R4Ypq)  h8      ] $  "  4 >  "  G       C        g  name
		7 g  val		7  g  filenamef  oop/goops.scm
R
	S			S		T		T		T		#U	 		7	   C   h   b   ]	4 5L 4?6Z       g  args
		 g  v			  g  filenamef  oop/goops.scm	R
 		   C       h(   `   ]	4 5$   O @ 6 X       g  y
		' g  tmp		'  g  filenamef  oop/goops.scm
R
 		'   C5R4 vtu  h   _   ] L 6      W       g  prefix
		
  g  filenamef  oop/goops.scm
]	$	
^	& 		
   C      h    o   ] 4 O L 5 C     g       g  name
		  g  filenamef  oop/goops.scm
[		\			]		\	 		   CYv h8      - 1 3 45$  4O  5C6            g  names
			3 g  args			3 g  prefixes			3  g  filenamef  oop/goops.scm
W
	
X		X		Y		Z		[		,Z		1a		3a	 
			3
   C        h   b   ]	4 5L 4?6Z       g  args
		 g  v			  g  filenamef  oop/goops.scm	W
 		   C       h(   `   ]	4 5$   O @ 6 X       g  y
		' g  tmp		'  g  filenamef  oop/goops.scm
W
 		'   C5 RG        h    v   -  . , 3  #    6 n       g  name
		  g  filenamef  oop/goops.scm
c
	d	 		
  g  nameg  make-generic C'R"w   h   [   ] 6      S       g  gf
		
  g  filenamef  oop/goops.scm
h		
h	! 		
   Cx"w(y  h(      ]4 5$  44 5L 5 CC            g  gf
		#  g  filenamef  oop/goops.scm
l	'	m	-	m	)	n	3	n	C	n	3	 n	-	"p	- 			#   CGz{|}y       h     - . , 3 #   $   "    45$  n$  45"  4O 54	
4	55445>  "  G  "  4	54>  "  G  C      g  gfs
	  g  name	  g  gfs		'  g  gws?		2  g  sname		L  g  setters		\  g  es		~  g  ans	    g  filenamef  oop/goops.scm
f
	g		g		'g	"	'g		*h		2g		:i		@j	!	Aj	+	Lj		Ol		\j		_r		nu	)	~r		~j	 x	 x	+ x	 z	 i	 }	 	   g  nameg  make-extended-generic C)Rb~a       h      ] L 4 56         g  gf
		  g  filenamef  oop/goops.scm
					"		/		"				 		   C  h(      ]4O  >  "  G  6              g  gfs
		! g  eg		!  g  filenamef  oop/goops.scm

			!	 		!	  g  nameg  extended-by! C}Rb~a      h       ] 4L 4 556             g  gf
		  g  filenamef  oop/goops.scm
								#		0		#				 			   C h(      ]4O  >  "  G  6              g  gfs
		! g  eg		!  g  filenamef  oop/goops.scm

			!	 		!	  g  nameg  not-extended-by! CR"Gwy       h      - . , 3 #  4 5$   C4 5$  4 5	4
 564 5$  4 5$   C 66          g  old-definition
		} g  name		}  g  filenamef  oop/goops.scm

				"		&			0		;		D		L			M			W		X		b			s		}	 		}  g  nameg  ensure-generic C(R4      h`   ?   ]      	
        C 7       g  dummy
		_ g  name		_  		_	   C  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  oop/goops.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  name   C5R  h      ]44 556           g  name
		  g  filenamef  oop/goops.scm

					!	
	+				 		  g  nameg  make-setter-name CxRGx    h@      -  . , 3  #    4 $  4 5"  56           g  name
		<  g  filenamef  oop/goops.scm

	 		,		-	 	:		<	 		<
  g  nameg  make-accessor C*R"wy'G(+*        h     - . , 3 #  "  4 5$   4 564 5$   4564 5$  #	
4 544 5564 5$  -4 5$  4
 5"  	4 5664 	5$  44 55$   C":"6           g  proc
	  g  name	   g  filenamef  oop/goops.scm

				&		+	 	3			4			@		E	 	M			N			X		c		l		o	$	y		{			|		 	 	 	 	 	 		 		 	 	 	 	 	 	 		  	   g  nameg  ensure-accessor C+RaG"|zk~b}b        h   h   ] L 6    `       g  method
		  g  filenamef  oop/goops.scm
			"		 		   C  h     ]4 544 5$  "  4	 5
4 554 5$  P4 54 >  "  G  4>  "  G  4>  "  G  "   4O >  "  G  4>  "  G  4>  "  G  C            g  generic
	  g  setter	  g  methods		=  g  gws		=  g  gfs		W   g  filenamef  oop/goops.scm

					#									&		/	!	5	3	7	!	=		=		B		N		O		U	%	W		W		Z	
	n	
	t		{	
 	
 	 	 	 	 	 	 	  g  nameg  upgrade-accessor CR{     h      ]45  6        g  name
		 g  val		  g  filenamef  oop/goops.scm

				 			  g  nameg  toplevel-define! C	R4      hx   c   ]     	 
         C       [       g  dummy
		q g  name		q g  args			q g  body			q  		q	   C  hX   c   ]      	
      C   [       g  dummy
		U g  name		U g  args			U g  body			U  		U	   C      h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  oop/goops.scm
	 		9  g  
macro-typeg  syntax-rulesg  patternsg  setterg  name g  argsg  bodyg  ... g  nameg  argsg  bodyg  ...   C5R4!h       ]
4L  L5$  CL L6  z       g  x
		 g  y		 g  t			  g  filenamef  oop/goops.scm							 			   C,       h   R   ] 6J       g  x
		  g  filenamef  oop/goops.scm			 		   C     h    |   ]	4 L 54 5$  CC t       g  x
		 g  id		  g  filenamef  oop/goops.scm									 		   C h@      ]4 5$  L O @  4?$  O @C        g  exp
		? g  referent		? g  tmp			? g  tmp		%	?  g  filenamef  oop/goops.scm
	 		?	  g  nameg  find-free-id C     h   ,   ] C     $       g  args
		  		   C     h   f   ] 4L54L 5 C ^       g  filenamef  oop/goops.scm			
							 		
   C,   h   U   ] 6M       g  tail
		  g  filenamef  oop/goops.scm		 		   C'       h       ]44L5 54L 5 C         g  tail
		  g  filenamef  oop/goops.scm														 		   C,  h   d   ] 6\       g  f
		 g  rest		  g  filenamef  oop/goops.scm		 			   C0     h   v   ]L LL 6      n       g  f
		 g  rest		  g  filenamef  oop/goops.scm						 			   C,   h      ]4 5$  6C   }       g  f
		 g  s		 g  rest			  g  filenamef  oop/goops.scm						" 			   C h      ]L LL 6      }       g  f
		 g  s		 g  rest			  g  filenamef  oop/goops.scm						 			   C        h      ]#4 5"  |4 5"  E4 5$  O @  4?$  O @ 6$  4	?$  
L O @""$  4?$  L O @"`"\          g  ls
	  g  formals	  g  specializers		  g  tmp		  g  tmp		  g  tmp		(	e g  tmp		B	e  g  filenamef  oop/goops.scm
	 	 	  g  nameg  lp C12>SVXYZ]Ua 	    h8   .   ] L     L  C    &       g  formal
		4  		4   C  h   k   ]L L 6   c       g  x
		 g  xs		  g  filenamef  oop/goops.scm		$		 			   C      h   B   ] L 6:       g  filenamef  oop/goops.scm		 		
   C        hH      ]4 5$  L O @4 5$  O @ 6           g  ls
		D g  out		D g  tmp			D g  tmp		(	D  g  filenamef  oop/goops.scm
		B	$	D	 		D	  g  nameg  lp Cjlmnoqrkt 
  h8   .   ]LL  	   L  C &       g  formal
		7  		7   C   hh      ]4L 5$  L O @O Q 4L 545$  L L O @6            g  body
		c g  tmp		c g  lp		(	8 g  tmp		8	c g  tmp		C	c  g  filenamef  oop/goops.scm	(		3		5		8.	 		c   C   h   -   ]L  C     %       g  body0
		  		   C 
h0   M   ]LL L L 	  C  E       g  	procedure
		. g  make-procedure		.  		.	   C        h   l  ]"L L4L5$  <45$  4 O ?"  
45	"  ;"  645$  4 O ?"  
45	"  G  4	5$  
L L O @6d      g  formals
	  g  specializer	  g  body		  g  id		  g  tmp		%	L g  tmp		_  g  	procedure	   g  make-procedure	   g  tmp	   g  tmp	    
g  filenamef  oop/goops.scm	I		
;		;	#	;		;		<		R>	 @	 G		 K	 	 	   C     hH      ]O Q 4 545$  L O @6         g  args
		F g  body0		F g  body1			F g  lp		
	 g  tmp			F g  tmp		&	F  g  filenamef  oop/goops.scm	
			"		5			F	 		F	   C 	       hP      ]O Q 4 5$  @4 5$  O @ 6            g  x
		K g  find-free-id	
	K g  tmp			K g  tmp		/	K  g  filenamef  oop/goops.scm
	 		K   C5!Rgb      h(      ]	4 54L 5$  C L 6        g  x
		' g  dm			'  g  filenamef  oop/goops.scm
Z		[			[		\		\		 ]	"	%]	2	']	 			'   Cn    h      ] O 4 56    }       g  m
		  g  filenamef  oop/goops.scm
X
	^		Z	 		  g  nameg  add-method-in-classes! CRbg     h   ~   ] 4L 4 556v       g  x
		  g  filenamef  oop/goops.scm
b		d			e		e	#	e		c	 		   Cn     h      ] O 4 56           g  m
		  g  filenamef  oop/goops.scm
`
	f		b	 		  g  nameg  remove-method-in-classes! CRna      hh   x  ]454 5"  ?(  C45$  4>  "  G  C""       p      g  gf
		a g  new		a g  new-spec			a g  methods			a g  l			Y  g  filenamef  oop/goops.scm
h
	i		
j		j		j		i		k		 l		%m	
	'n		,n	+	.n		1n		5n	
	6q		;q	+	@q		Mr		St		Yt		Yk	 		a	  g  nameg  compute-new-list-of-methods CRa        h      ]4 56        g  m
		  g  filenamef  oop/goops.scm
v
	w		w		w		w	 		  g  nameg  method-n-specializers CR        h   r   ]4 56 j       g  m
		 g  n		  g  filenamef  oop/goops.scm
z		z		z	 			   Cl h      ]
4 56       g  gf
		  g  filenamef  oop/goops.scm
y
	|		z	 		  g  nameg  calculate-n-specialized CRb        h   [   ] 6S       g  gf
		  g  filenamef  oop/goops.scm
			 		   Ca~ 	    h@      ]4 >  "  G  4 4 5>  "  G  4 56         g  gf
		>  g  filenamef  oop/goops.scm
~
									'		4		:		<		>	 		>  g  nameg  invalidate-method-cache! CR4Giiii b   h`      ]4 >  "  G  4 4 5>  "  G  4 >  "  G  4>  "  G  C            g  gf
		[ g  m		[  g  filenamef  oop/goops.scm
													 		-		6		H	 		[	   C5R"  $4(i4i,5$  ,i"  ,5"  B4i,5$  04"i,ii5$  4Gii,5"  ""  ",R44rii5,ii>  "  G  4i,5  $  "  ,i $  )4	i,4Gii,5>  "  G  "   4,i,i4Giiii q,     h0      ]4 5$  4 >  "  G   6L  6        g  proc
		/ g  m		/  g  filenamef  oop/goops.scm

							'		/
 		/	   C       h   _   ] O C      W       g  real-next-method
		
  g  filenamef  oop/goops.scm

 		
   C5>  "  G  4i,5  $  "  ,i $  )4	i,4Gii,5>  "  G  "   4,i,i4Giiii ,p   h   r   ]4 56 j       g  pg
		 g  m		  g  filenamef  oop/goops.scm

				 			   C5>  "  G  4i,5  $  "  ,i $  )4	i,4Gii,5>  "  G  "   4,i,i4Gii ii Y   h   s   ] 6      k       g  obj
		
 g  m		
  g  filenamef  oop/goops.scm

			
	 		
	   C5>  "  G  4i=5  $  "  =i $  )4	i=4Gii=5>  "  G  "   4,i=i4Giii da! 	       hP   J  ]!44 5544 55$  45CC      B      g  m
		J g  spec		J g  src		"	J g  args		2	H g  body		2	H  g  filenamef  oop/goops.scm

				 		,		 								 		,	 	 	"		"		*		-		1		2			8		9		F		G	 		J   C5>  "  G  4io5  $  "  oi $  )4	io4Giio5>  "  G  "   4,ioi4Giii a        h   b   ] 6      Z       g  m
		
  g  filenamef  oop/goops.scm

			
	 		
   C5>  "  G  i1Ri2Rv   h      ] 6          g  s
		  g  filenamef  oop/goops.scm

					 		  g  nameg  slot-definition-allocation C3Rv    h      ] 6    }       g  s
		  g  filenamef  oop/goops.scm

					 		  g  nameg  slot-definition-getter C4Rv        h      ] 6    }       g  s
		  g  filenamef  oop/goops.scm

					 		  g  nameg  slot-definition-setter C5Rv       h      ] 6           g  s
		  g  filenamef  oop/goops.scm

					 		  g  nameg  slot-definition-accessor C6Rv   h      ] 45 6       g  s
		  g  filenamef  oop/goops.scm

				
	$		 		  g  nameg  slot-definition-init-value C7Rv h      ] 45 6       g  s
		  g  filenamef  oop/goops.scm

				
	#		 		  g  nameg  slot-definition-init-form C8Rv    h      ] 6           g  s
		  g  filenamef  oop/goops.scm

					 		  g  nameg  slot-definition-init-thunk C9Rv    h      ] 6           g  s
		  g  filenamef  oop/goops.scm

					 		  g  nameg  slot-definition-init-keyword C:Rj h      ]4 56        g  class
		 g  	slot-name		  g  filenamef  oop/goops.scm

				 			  g  nameg  class-slot-definition C<Ra  h      ]44 55C          g  class
		 g  	slot-name		  g  filenamef  oop/goops.scm

						(						 			  g  nameg  slot-init-function C;Ra    h      ] 6             g  obj
		
  g  filenamef  oop/goops.scm

			
	 		
  g  nameg  accessor-method-slot-definitiong  documentationf  5Return the slot definition of the accessor @var{obj}. CsR4'i5R4,ii4Gii i i s   h   `   ]C    X       g  x
		 g  y		  g  filenamef  oop/goops.scm
	 			   C5>  "  G  4iii>  "  G  	
       h      ]44 5	56         g  o
		 g  file		  g  filenamef  oop/goops.scm

								 			  g  nameg  display-address CR4i5  $  "  i $  +4	i4Gii5>  "  G  "   4,ii4Gii i i 	     h8      ]4>  "  G  4 >  "  G  >6             g  o
		2 g  file		2  g  filenamef  oop/goops.scm

									2	 		2	   C5>  "  G  4pii5R4i5  $  "  i $  +4	i4Gii5>  "  G  "   4,ii4Giii i $c@	d  h     ]
 45$  ]4>  "  G  445>  "  G  4 >  "  G  4 >  "  G  >6L  6              g  o
		y g  file		y g  class			y  g  filenamef  oop/goops.scm
 
														
			 	
	)	
	,		9	
	B	
	V	
	q	
	y 
 		y	   C h   _   ] O C      W       g  real-next-method
		
  g  filenamef  oop/goops.scm
 
 		
   C5>  "  G  4i5  $  "  i $  +4	i4Gii5>  "  G  "   4,ii4Giii i %2c@	d      h   V  ]
 4 5$  45$  4>  "  G  445>  "  G  4 >  "  G  44 5>  "  G  4 >  "  G  4 >  "  G  >6L  6L  6     N      g  class
	  g  file	  g  meta		   g  filenamef  oop/goops.scm

								 											!		"	
	&		-	
	6	
	9		F	
	O	
	c	
	f		s	
	|	
 	
 	
 
 	 	   C       h   _   ] O C      W       g  real-next-method
		
  g  filenamef  oop/goops.scm

 		
   C5>  "  G  4i5  $  "  i $  +4	i4Gii5>  "  G  "   4,ii4Giii i 3Kc@	dk@BlF        h     ] 45$  4 5$  4>  "  G  445>  "  G  4 5$  ,4 >  "  G  4>  "  G  "   4>  "  G  44	4
 55>  "  G  6L  6L  6        g  gf
	  g  file	  g  meta		  g  name		U   g  filenamef  oop/goops.scm

																			!		"	
	&		-	
	6	
	9		F	
	O 		U 	
	]!		^#		r$	 %	
 %	 %	
 &	
 &	 &	 &	 &	
 '	 '	
 
 "	 	   C       h   _   ] O C      W       g  real-next-method
		
  g  filenamef  oop/goops.scm

 		
   C5>  "  G  4i5  $  "  i $  +4	i4Gii5>  "  G  "   4,ii4Giii i [c@	dc@a  h       ]4 5$   6 C             g  spec
		  g  filenamef  oop/goops.scm
2		3			3	1	3		3		4	.	4	 		   Cn      h   e  ]
 45$  4 5$  4>  "  G  445>  "  G  4 >  "  G  444	 55>  "  G  4 >  "  G  4
 >  "  G  >6L  6L  6      ]      g  o
	  g  file	  g  meta		   g  filenamef  oop/goops.scm
*
	+		+		,		,		,		,		-		-		-		!,		"/	
	&/		-/	
	60	
	90		F0	
	O1	
	c2	
	f2		k6		s2		z2	
 8	
 9	
 :	
 *
 	 	   C        h   _   ] O C      W       g  real-next-method
		
  g  filenamef  oop/goops.scm
*
 		
   C5>  "  G  4i	5  $  "  	i $  +4	i	4Gii	5>  "  G  "   4,i	i4Gii i i ]       h   k   ] 6      c       g  o
		
 g  file		
  g  filenamef  oop/goops.scm
>
	
?	 		
	   C5>  "  G  4i^5  $  "  ^i $  +4	i^4Gii^5>  "  G  "   4,i^i4Gii_i`i_i i_i i i i hs      h      , 3 C       g  module
		 g  name		 g  int1			 g  val1			 g  int2			 g  val2			 g  var			 g  val			  g  filenamef  oop/goops.scm
E
 			   C5>  "  G  4i^5  $  "  ^i $  +4	i^4Gii^5>  "  G  "   4,i^i4Gii_i`i_ii_ii iii hrm) h(      , 3 &  C4 56             g  module
		" g  name		" g  int1			" g  val1			" g  int2			" g  val2			" g  var			" g  val			"  g  filenamef  oop/goops.scm
O
	W		X		X	-	 X		"X	 		"	   C5>  "  G  4i^5  $  "  ^i $  +4	i^4Gii^5>  "  G  "   4,i^i4Gii_i`i_ii_ii i|i sab~       h     , 3 4455$  C44455>  "  G  44455>  "  G  4>  "  G  C       g  module
		 g  name		 g  int1			 g  val1			 g  int2			 g  val2			 g  var			 g  gf			  g  filenamef  oop/goops.scm
Z
	b		b		b	$	b		b		b		d			#e		&f		+f	+	1f	8	3f	+	5f		6f		;d			Dg			Jh		Mi		Ri	'	Xi	6	Zi	'	\i		]i		bg			kj		 			   C5>  "  G  4ii^^i>  "  G  4i5  $  "  i $  +4	i4Gii5>  "  G  "   4,ii4Gii_i`i_i i_i i i i hsh      , 3 C       g  module
		 g  name		 g  int1			 g  val1			 g  int2			 g  val2			 g  var			 g  val			  g  filenamef  oop/goops.scm
o
 			   C5>  "  G  4i5  $  "  i $  +4	i4Gii5>  "  G  "   4,ii4Gii_i`i_ii_ii i i h^   h       , 3  6             g  module
		 g  name		 g  int1			 g  val1			 g  int2			 g  val2			 g  var			 g  val			  g  filenamef  oop/goops.scm
y
		 			   C5>  "  G  4iii>  "  G  a03 	      hp   u  ]44 5544 55$  "  	4 54455$  "  4 >  "  G  C m      g  class
		o g  	slot-name		o g  	this-slot			o g  t		$	> g  g-n-s		@	o  g  filenamef  oop/goops.scm

				$		4		$								*	 	:	"	*	$		$		3		?		@		C		F		P		T		Y	 		o	  g  nameg  class-slot-g-n-s CR/   h(      ]
44 5545$   6C       g  class
		( g  slot		( g  x			(  g  filenamef  oop/goops.scm

															%	 
		(	  g  nameg  class-slot-ref C-R      h      ]4 56             g  class
		 g  slot		 g  value			  g  filenamef  oop/goops.scm

							 			  g  nameg  class-slot-set! C.R4i/5  $  "  /i $  )4	i/4Gii/5>  "  G  "   4,i/i4Giiii i Y      h      ]6    x       g  c
		 g  o		 g  s			  g  filenamef  oop/goops.scm

				 			   C5>  "  G  4i/5  $  "  /i $  )4	i/4Gii/5>  "  G  "   4,i/i4Giii i Y      h   q   ] 6    i       g  c
		 g  s		  g  filenamef  oop/goops.scm

				 			   C5>  "  G  4i/5  $  "  /i $  )4	i/4Gii/5>  "  G  "   4,i/i4Giii Y  h   b   ] 6      Z       g  o
		
  g  filenamef  oop/goops.scm

			
	 		
   C5>  "  G  4i05  $  "  0i $  )4	i04Gii05>  "  G  "   4,i0i4Giiii i Y        h      ]6    x       g  c
		 g  o		 g  s			  g  filenamef  oop/goops.scm

				 			   C5>  "  G  4i05  $  "  0i $  )4	i04Gii05>  "  G  "   4,i0i4Giii i Y      h   q   ] 6    i       g  c
		 g  s		  g  filenamef  oop/goops.scm

				 			   C5>  "  G  4i05  $  "  0i $  )4	i04Gii05>  "  G  "   4,i0i4Giiii i i 0       h      ] 6           g  c
		 g  o		 g  s			 g  value			  g  filenamef  oop/goops.scm

		 			   C5>  "  G  4iH5  $  "  Hi $  )4	iH4GiiH5>  "  G  "   4,iHi4Giii i Y   h   u   ] 6    m       g  gf
		 g  args		  g  filenamef  oop/goops.scm

				 			   C5>  "  G  4iI5  $  "  Ii $  )4	iI4GiiI5>  "  G  "   4,iIi4Giii i Yk      h      ] 4 56           g  gf
		 g  args		  g  filenamef  oop/goops.scm

									 			   C5>  "  G  4iJ5  $  "  Ji $  )4	iJ4GiiJ5>  "  G  "   4,iJi4Giii i Y      h   u   ] 6      m       g  gf
		
 g  args		
  g  filenamef  oop/goops.scm

			
	 		
	   C5>  "  G  4iM5  $  "  Mi $  )4	iM4GiiM5>  "  G  "   4,iMi4Giii 1jcba h(   x   ]4L 5$  L  4L 56C      p       g  slot
		"  g  filenamef  oop/goops.scm
							*	 	 		"   C     h@      ]4 544 554 O >  "  G  C           g  self
		< g  clone		< g  slots			<  g  filenamef  oop/goops.scm

				#			3								!								 		<   C5>  "  G  4iN5  $  "  Ni $  )4	iN4GiiN5>  "  G  "   4,iNi4Giii 1jcba\N       h@      ]	4L 5$  .L  4L 545$  45"  6C        g  slot
		? g  value		;  g  filenamef  oop/goops.scm
							,			!	%	+	!	,	%	=	 
		?   C       h@      ]4 544 554 O >  "  G  C           g  self
		< g  clone		< g  slots			<  g  filenamef  oop/goops.scm

				#			3								!								 		<   C5>  "  G  4iO5  $  "  Oi $  )4	iO4GiiO5>  "  G  "   4,iOi4Giiii g      h   Z   ] LL 6    R       g  m
		  g  filenamef  oop/goops.scm
			 		   Cbabf    h   ~   ] 4L 4 556v       g  c
		  g  filenamef  oop/goops.scm
			%			#		.		#		 		   Cebf  h       ] L 4L4 556            g  c
		  g  filenamef  oop/goops.scm
 					#		.		#				 		   C       h   Z   ] LL 6    R       g  c
		  g  filenamef  oop/goops.scm
				 		   Cf    h    ]
4 >  "  G  454 O >  "  G  444 55>  "  G  4	5 4
 O 4 5>  "  G  4 O 45>  "  G  4 >  "  G  4 O 45>  "  G  4 >  "  G  4>  "  G   C  z      g  old
	 g  new	 g  methods			]  g  filenamef  oop/goops.scm

									9		?		@		E		M		R		^		d		f		i		j		t			  	 	  	 	 	 	 	 	 	 	 	 		   C5>  "  G  4i5  $  "  i $  +4	i4Gii5>  "  G  "   4,ii4Giii "ab 
     hX      ]	4 5$  G4 544 455>  "  G  4>  "  G  	 6C       g  m
		X g  gf		V  g  filenamef  oop/goops.scm
									(					 		! 	"	"!		'!	)	-!	6	/!	)	1!		6 		?"		V$	 		X   Cg   h   b   ]4 56 Z       g  c
		  g  filenamef  oop/goops.scm

	%			 		   C5>  "  G  4i5  $  "  i $  +4	i4Gii5>  "  G  "   4,ii4Giiiii %n      h8      ]"  %$  $  	"   "C4 5"       g  m
		8 g  old		8 g  new			8 g  l			+  g  filenamef  oop/goops.scm
+
	.			1		1		3		3		3	
	4		#5		)5	
	+.		,.		8.	 		8	   C5>  "  G  4i5  $  "  i $  +4	i4Gii5>  "  G  "   4,ii4Giiiii &-O&ehd        h0      ] 44 54 54 5 56              g  c
		) g  old		) g  new			)  g  filenamef  oop/goops.scm
;
	?		
?	"	@	"	A	)	%B	.	'?		)>	 			)	   C5>  "  G  456,BCy  h   i  ]4 54 54 5$  44L 5>  "  G  "   $  44L 5>  "  G  "   $  /44L 5>  "  G  454L 56C  a      g  s
	  g  g-n-s	  g  getter-function		  g  setter-function		  g  accessor		   g  filenamef  oop/goops.scm
L		M		
N		O		M		#P	
	$Q		)R		6Q		HS	
	IT		NU		[T		mV	
	nX		sY	 X	 Z	 [	 Z	 	 	   Ca       h      ] O 4 56       g  class
		 g  slots		  g  filenamef  oop/goops.scm
J
	\		\		\		K	 			  g  nameg  compute-slot-accessors C.R4iB5  $  "  Bi $  )4	iB4GiiB5>  "  G  "   4,iBi4Giii i 0GG9=@D 	hP     ]  $  45"  $  45"  456           g  class
		L g  g-n-s		L g  
init-thunk		
	L g  g-n-s		
	L  g  filenamef  oop/goops.scm
^
	_			`		
_		b		c		"c		#d		(d	>	*d		4c		5f		@h		La	 		L	   C5>  "  G  4iC5  $  "  Ci $  )4	iC4GiiC5>  "  G  "   4,iCi4Giii i 0NG ID        h8      ]
  $  "  456       g  class
		8 g  g-n-s		8 g  g-n-s			8  g  filenamef  oop/goops.scm
k
	m		l		l		o		p		#p		&q		,r		8n	 		8	   C5>  "  G  O      h   c   ]4L  5 6 [       g  o
		  g  filenamef  oop/goops.scm
v		v		v	 		   C  h      ] O C      w       g  proc
		
  g  filenamef  oop/goops.scm
u
 		
  g  nameg  make-generic-bound-check-getter C9R	PR4QqWRSTU hH      ] $  : &    L  C &    L   CL 6 C         g  form
		F  g  filenamef  oop/goops.scm
																			"		$		(		+		.		4	.	:		C	 		F  g  nameg  
body-trans C      h(      ]	O  Q L4L 5C             g  x
		" g  
body-trans		"  g  filenamef  oop/goops.scm
						 	 		"  g  nameg  make-one CVPXYW[       hx      - 1 3    4O 455  	
 	 	 
    C           g  form
			t g  body			t g  name			t g  n-var			t g  args			t  g  filenamef  oop/goops.scm
~
											&		2	,	:		;	 			t
   C       h   b   ]	4 5L 4?6Z       g  args
		 g  v			  g  filenamef  oop/goops.scm	~
 		   C       h(   `   ]	4 5$   O @ 6 X       g  y
		' g  tmp		'  g  filenamef  oop/goops.scm
~
 		'   C5QR/ h    7   ]	 
45$   6C    /       g  o
		 g  x		  		   C/        h    7   ]	 45$   6C    /       g  o
		 g  x		  		   C/        h    7   ]	 	45$   6C   /       g  o
		 g  x		  		   C/        h    7   ]	 	45$   6C   /       g  o
		 g  x		  		   C/        h    7   ]	 	45$   6C   /       g  o
		 g  x		  		   C/        h    7   ]	 	45$   6C   /       g  o
		 g  x		  		   C/        h    7   ]	 	45$   6C   /       g  o
		 g  x		  		   C/        h    7   ]	 	45$   6C   /       g  o
		 g  x		  		   C/        h    7   ]	 	45$   6C   /       g  o
		 g  x		  		   C/        h    7   ]	 		45$   6C   /       g  o
		 g  x		  		   C/        h    7   ]	 	
45$   6C   /       g  o
		 g  x		  		   C/        h    7   ]	 	45$   6C   /       g  o
		 g  x		  		   C/        h    7   ]	 	45$   6C   /       g  o
		 g  x		  		   C/        h    7   ]	 	45$   6C   /       g  o
		 g  x		  		   C/        h    7   ]	 	45$   6C   /       g  o
		 g  x		  		   C/        h    7   ]	 	45$   6C   /       g  o
		 g  x		  		   C/        h    7   ]	 	45$   6C   /       g  o
		 g  x		  		   C/        h    7   ]	 	45$   6C   /       g  o
		 g  x		  		   C/        h    7   ]	 	45$   6C   /       g  o
		 g  x		  		   C/        h    7   ]	 	45$   6C   /       g  o
		 g  x		  		   C  /  h       ]	 L 45$   6C   |       g  o
		 g  x		  g  filenamef  oop/goops.scm					
					 		   C h    )   ] 	$  L  C O C       !       g  n
		  		   C O  @R h   )   ] 
C !       g  o
		  		   C     h   )   ] C !       g  o
		  		   C     h   )   ] 	C!       g  o
		  		   C     h   )   ] 	C!       g  o
		  		   C     h   )   ] 	C!       g  o
		  		   C     h   )   ] 	C!       g  o
		  		   C     h   )   ] 	C!       g  o
		  		   C     h   )   ] 	C!       g  o
		  		   C     h   )   ] 	C!       g  o
		  		   C     h   )   ] 		C!       g  o
		  		   C     h   )   ] 	
C!       g  o
		  		   C     h   )   ] 	C!       g  o
		  		   C     h   )   ] 	C!       g  o
		  		   C     h   )   ] 	C!       g  o
		  		   C     h   )   ] 	C!       g  o
		  		   C     h   )   ] 	C!       g  o
		  		   C     h   )   ] 	C!       g  o
		  		   C     h   )   ] 	C!       g  o
		  		   C     h   )   ] 	C!       g  o
		  		   C     h   )   ] 	C!       g  o
		  		   C         h   R   ] L CJ       g  o
		  g  filenamef  oop/goops.scm		 		   C   h    )   ] 	$  L  C O C       !       g  n
		  		   C O  =R h   8   ] 
C       0       g  o
			 g  v			  				   C      h   8   ] C       0       g  o
			 g  v			  				   C      h   8   ] 	C      0       g  o
		
 g  v		
  		
	   C      h   8   ] 	C      0       g  o
		
 g  v		
  		
	   C      h   8   ] 	C      0       g  o
		
 g  v		
  		
	   C      h   8   ] 	C      0       g  o
		
 g  v		
  		
	   C      h   8   ] 	C      0       g  o
		
 g  v		
  		
	   C      h   8   ] 	C      0       g  o
		
 g  v		
  		
	   C      h   8   ] 	C      0       g  o
		
 g  v		
  		
	   C      h   8   ] 		C      0       g  o
		
 g  v		
  		
	   C      h   8   ] 	
C      0       g  o
		
 g  v		
  		
	   C      h   8   ] 	C      0       g  o
		
 g  v		
  		
	   C      h   8   ] 	C      0       g  o
		
 g  v		
  		
	   C      h   8   ] 	C      0       g  o
		
 g  v		
  		
	   C      h   8   ] 	C      0       g  o
		
 g  v		
  		
	   C      h   8   ] 	C      0       g  o
		
 g  v		
  		
	   C      h   8   ] 	C      0       g  o
		
 g  v		
  		
	   C      h   8   ] 	C      0       g  o
		
 g  v		
  		
	   C      h   8   ] 	C      0       g  o
		
 g  v		
  		
	   C      h   8   ] 	C      0       g  o
		
 g  v		
  		
	   C  h   a   ] L C      Y       g  o
		
 g  v		
  g  filenamef  oop/goops.scm			 		
	   C    h    )   ] 	$  L  C O C       !       g  n
		  		   C O  IRa\@1]Y^B_`3a9bc7      h   A   ] L C   9       g  filenamef  oop/goops.scm
	 		
   C  h    ]94L 54L  54L 54 545$  "  "  4L >  "  G  "  $  y45	$  c4	5$  "  4
L >  "  G  4	5$  "  4L >  "  G  "  "h"  "`4 5$  "  $  A"  4>  "  &G  "  
$  $  "  ""  "C4 5$  "45$  "  4L 5"  $  "  #4 545$  "  O 45$  "  
$  "  4 5C           g  s
	 g  index	 g  g-n-s		 g  size		$ g  name		- g  t		6  g  get		~  g  set		~  g  key	  g  thunk	S g  t	 g  init	 g  t	  g  filenamef  oop/goops.scm
						'														)	!		$		$			'		-			0		6		G		K		V		b		e		i		j	"	s		w		z		}		~	 	 	 	 	 	 	 	 	 	 	 	 				#	&	+	.	(2	H	I	M	S	[	
\	f	m	q	 y						
	"		"			,			 I	   C        h      ] O 6        g  class
		 g  slots		  g  filenamef  oop/goops.scm

		 			  g  nameg  compute-getters-n-setters CdR4i>5  $  "  >i $  )4	i>4Gii>5>  "  G  "   4,i>i4Giii eg?e h   ]   ] 6      U       g  class
		
  g  filenamef  oop/goops.scm

	
	 		
   C5>  "  G  h      h   c   ] C [       g  l
		  g  filenamef  oop/goops.scm
	
				 		   C  h   u   ] 6      m       g  lst
		
  g  filenamef  oop/goops.scm

	
	 		
  g  nameg  only-non-null CiRjii       h0     ]
4 5  4445 556           g  c
		, g  get-direct-supers		, g  c-direct-supers				,  g  filenamef  oop/goops.scm

											 		(	& 	(	(	 	*		,	 		,	  g  nameg  compute-std-cpl C?Rk[l      h   c   ]L  6     [       g  l
		  g  filenamef  oop/goops.scm
	'				1			) 		   C  h(      ]	 (  C 4O L 5$  CC         g  l
		& g  c		&  g  filenamef  oop/goops.scm
					,		!		"	!	 		&  g  nameg  candidate-car CYmji   h      ] L &   C C      |       g  l
		  g  filenamef  oop/goops.scm
			$				 		  g  nameg  remove-next C h`   "  ]
45$   64O 5$  "  4>  "  G   4	4
O 556         g  reversed-partial-result
		] g  inputs		] g  next		#	]  g  filenamef  oop/goops.scm

									#		+		0	
	4		9	
	H		I		L	$	[		]	 		]	  g  nameg  merge-lists CjRnopq  h(      ]445 5445 5456          g  c
		% g  get-direct-supers		%  g  filenamef  oop/goops.scm
#
	$		$		$		%		%		%		&		%$	 
		%	  g  nameg  compute-clos-cpl CrRhk  h       ]	 L $  C L6         g  
constraint
		 g  t	
	  g  filenamef  oop/goops.scm
2		3	)		3	$	
3		
3		4	%	4	 		   C       h   Z   ] LO L 6       R       g  x
		  g  filenamef  oop/goops.scm
1		2	 		   CYs       h   c   ] L C       [       g  x
			  g  filenamef  oop/goops.scm
>		>	*	>	% 			   C        h     ]+"  f(  C4O 5(  6(  "  	454O 54 5" "           g  elements
		{ g  constraints		{ g  tie-breaker			{ g  elements			l g  constraints			l g  result			l g  can-go-in-now			l g  choice		D	l  g  filenamef  oop/goops.scm
)
	*		-		0		/		'7	
	+8		-8		09	'	49		7:	 	<;	 	D9		G>		WA		`A	 	bA		l=		l*		q,		{*	 		{	  g  nameg  top-sort CnRh     h   Z   ] L 6      R       g  x
		
  g  filenamef  oop/goops.scm
H	 	
I	& 		
   CYt   hX   h  ]""  >4L 54O 5(  (  6"C4 5"       `      g  partial-cpl
		Q g  min-elts		Q g  pcpl			D g  current-elt				D g  ds-of-ce			D g  common		"	D  g  filenamef  oop/goops.scm
D		E			F			F		G		G		H		"H	
	*K		-L		1L		5M	!	7M		:N		@N		CO		DE		EE		QE	 		Q	   C     h   u   ] O C      m       g  
get-supers
		
  g  filenamef  oop/goops.scm
C
 		
  g  nameg  std-tie-breaker CqR      hX   -  ]"  D(  C45$  "44L 55"  "%      g  x
		X g  result		J g  pending			J g  next			J  g  filenamef  oop/goops.scm
S		T		V		X		X	
	Y		!Y		&Z		.Z		3[		4\		7\		@]		B\		J[		JT		KT		PU		XT	 		X   C        h      ] O C      z       g  get-follow-ons
		
  g  filenamef  oop/goops.scm
R
 		
  g  nameg  build-transitive-closure CoRo  hx     ]"  S(  "  $  $(  C4L 5" "44L 5 5"       {      g  x
		q g  elements		Y g  this-one			Y g  result			Y  g  filenamef  oop/goops.scm
`		a		d	
	d		d	&	d		d		e	
	%g		(h		)i		.i	*	0i		1h		=g		Bl		Em		Hm	+	Lm		Om		Yk	
	Ya		Za		[a		ea		fb		gc		qa	 		q   C  h   {   ] O C      s       g  get-follow-ons
		
  g  filenamef  oop/goops.scm
_
 		
  g  nameg  build-constraints CpR4i@5  $  "  @i $  )4	i@4Gii@5>  "  G  "   4,i@i4Giii i u3a\b1h97iv2Y    hp    ]"45$  %4 54 >  "  G  C$  4544	4
 555$  ( 45$  	45 "  456"  '4455$  C"4 5"$  ( 45$  	45 "  456$  f44554455$  "$  "  4>  "  G  "  4>  "  G   CL  6         g  class
	m g  s	m g  key			m g  already-allocated			9 g  name		I  g  thunk		o  g  l	   g  r	   g  thunk	   g  get	e g  set	e  g  filenamef  oop/goops.scm
r
	y			y		|		|	.	|		|		 }		&}		)}	!	.}		By		C		I		L		Q		V	0	^		`		d		it		ot		wu		xv	
 w	
 	 	 	 	" 	, 	4 	" 	 	 	 	 	 	 	 	 	 	 y	 t	 t	 u	 v	
 w	
 	 y	 		)			)		'	-	2	6	=	N	U	d	mr
 C	m	   C        h   _   ] O C      W       g  real-next-method
		
  g  filenamef  oop/goops.scm
r
 		
   C5>  "  G     h   Q   ]M C   I       g  o
		  g  filenamef  oop/goops.scm
	 		   C     h   i   ]N Ca       g  o
		 g  v		  g  filenamef  oop/goops.scm
			 			   C    h      ]HO O  C       g  class
		 g  value		  g  filenamef  oop/goops.scm

		 			  g  nameg  make-closure-variable CR4i@5  $  "  @i $  )4	i@4Gii@5>  "  G  "   4,i@i4Giii i Y3     h   z   ]456 r       g  o
		 g  s		  g  filenamef  oop/goops.scm

				.		 			   C5>  "  G  4iA5  $  "  Ai $  )4	iA4GiiA5>  "  G  "   4,iAi4Giii e   h   ]   ] 6U       g  class
		  g  filenamef  oop/goops.scm

		 		   C5>  "  G  4iE5  $  "  Ei $  )4	iE4GiiE5>  "  G  "   4,iEi4Giii i    h   t   ] 6      l       g  object
		
 g  initargs		
  g  filenamef  oop/goops.scm

	
	 		
	   C5>  "  G  4iE5  $  "  Ei $  )4	iE4GiiE5>  "  G  "   4,iEi4Giii i vb@>A\d.ba   h      ] L 4 56         g  x
		  g  filenamef  oop/goops.scm
					'		3		'				 		   C        hp    ]4L  >  "  G  45454 45>  "  G  4 >  "  G  4 	>  "  G  4 
>  "  G  4 >  "  G  4 4 5>  "  G  4 >  "  G  4 54 >  "  G  4 
>  "  G  4 4 5>  "  G  4 >  "  G  4 O >  "  G  4 >  "  G   6        g  class
	n g  initargs	n g  dslots		*n g  supers		*n g  slots	 ;  g  filenamef  oop/goops.scm

				.	 		!		(	3	*		*		/		5		6	(	>	E	@	(	E		N		T		[		d		j		q		z	 	 	( 	 	 	 	( 	 	 	 	( 	 	 	 	 	 	 	 	 	 	 	 				*	%	<	U	n	 4	n	   C h   _   ] O C      W       g  real-next-method
		
  g  filenamef  oop/goops.scm

 		
   C5>  "  G  vb        h8      ]
45$  $  
 @ 6C              g  object
		1 g  initargs		1 g  proc			1  g  filenamef  oop/goops.scm

											!	#	%		+		/		0	 		1	  g  nameg  initialize-object-procedure CR4iE5  $  "  Ei $  )4	iE4GiiE5>  "  G  "   4,iEi4Giii i       h       ]4L  >  "  G   6  w       g  applicable-struct
		 g  initargs		  g  filenamef  oop/goops.scm

		 			   C      h   _   ] O C      W       g  real-next-method
		
  g  filenamef  oop/goops.scm

 		
   C5>  "  G  4iE5  $  "  Ei $  )4	iE4GiiE5>  "  G  "   4,iEi4Giii i vb"G      h   _   -  1  3 L  @ W       g  args
			  g  filenamef  oop/goops.scm
	*		, 			


   C@        h   ,  ]45454L  >  "  G  4 45$  &4	
O 5 "  >  "  G  $  
 6C$      g  generic
	  g  initargs	  g  previous-definition		  g  name		   g  filenamef  oop/goops.scm

							
	/		5		6	$	B	 	C	*	d	$	i	$	n		|	 	) 	 	 	   C h   _   ] O C      W       g  real-next-method
		
  g  filenamef  oop/goops.scm

 		
   C5>  "  G  4iE5  $  "  Ei $  )4	iE4GiiE5>  "  G  "   4,iEi4Giiwi i v   h(   z   ]4L  >  "  G   456  r       g  gws
		& g  initargs		&  g  filenamef  oop/goops.scm

			&	 		&	   C   h   _   ] O C      W       g  real-next-method
		
  g  filenamef  oop/goops.scm

 		
   C5>  "  G  4iE5  $  "  Ei $  )4	iE4GiiE5>  "  G  "   4,iEi4Gii|i i bv{        h(      ]4L  >  "  G   456       g  eg
		( g  initargs		(  g  filenamef  oop/goops.scm

					$	9	&		(	 		(	   C h   _   ] O C      W       g  real-next-method
		
  g  filenamef  oop/goops.scm

 		
   C5>  "  G      h   r   -  1  3 C     j       g  args
			  g  filenamef  oop/goops.scm
	 			


  g  nameg  dummy-procedure CR4iE5  $  "  Ei $  )4	iE4GiiE5>  "  G  "   4,iEi4Giii i  0bv!       h   ~  ]4L  >  "  G  4 45>  "  G  4 45>  "  G  4 45>  "  G  4 	4
5>  "  G  4 45>  "  G   456  v      g  method
	  g  initargs	   g  filenamef  oop/goops.scm

						&	,		5		;		<	"	C	G	E	"	J		S		Y		Z		h		q		w		x			= 	 	 	 	 	 	7 	 	 	 	$ 	 	 	   C       h   _   ] O C      W       g  real-next-method
		
  g  filenamef  oop/goops.scm

 		
   C5>  "  G  D;^`3<_] 	   h      ]	"  "4L  5$  L L 45 6C4LL 5$  @44L 55&  (4LL 5$  L L 4LL 56"""            g  slot
		{ g  init		(  g  filenamef  oop/goops.scm
			 					 		&		(		)		7		8		;		E		K		L		Z		c		o
	 		{   C1j1L 	    hh   &  ]454 O 4455>  "  G  4 >  "  G  4 >  "  G   C            g  old-instance
		b g  	old-class		b g  	new-class			b g  new-instance		
	b  g  filenamef  oop/goops.scm
 
				3	
		
						"	(	*		/		8		L	 		b	  g  nameg  change-object-class C2R4iL5  $  "  Li $  )4	iL4GiiL5>  "  G  "   4,iLi4Giiii 56   h   u   ]C   m       g  old-instance
		 g  new-instance		  g  filenamef  oop/goops.scm

 			   C5>  "  G  4iK5  $  "  Ki $  )4	iK4GiiK5>  "  G  "   4,iKi4Giiii 8;2    h      ]  6   |       g  old-instance
		 g  	new-class		  g  filenamef  oop/goops.scm
%
		&	$	&	 			   C5>  "  G  4iD5  $  "  Di $  )4	iD4GiiD5>  "  G  "   4,iDi4Giii i =    h   s   ] 6      k       g  class
		
 g  initargs		
  g  filenamef  oop/goops.scm
.
	
/	 		
	   C5>  "  G  4iF5  $  "  Fi $  )4	iF4GiiF5>  "  G  "   4,iFi4Giii i>EDE      h0      - 1 3 4 54>  "  G  C            g  class
			+ g  initargs			+ g  instance			+  g  filenamef  oop/goops.scm
1
	
2		2		3	 			+
   C5>  "  G  FiGR4iP5  $  "  Pi $  )4	iP4GiiP5>  "  G  "   4,iPi4Giii i QaJSRVI        hX      ]
4 5(  4 >  "  G  "   4 5$   4 56 6            g  gf
		S g  args		S g  methods		0	S  g  filenamef  oop/goops.scm
F
	G			G		G		G		H		(I		0I		8J		=K		KK		SL	 		S	   C5>  "  G  4GiiS5RR4iR5  $  "  Ri $  +4	iR4GiiR5>  "  G  "   4,iRi4Giii i TT    h   l   ] 6      d       g  gf
		
 g  args		
  g  filenamef  oop/goops.scm
S
	
T	 		
	   C5>  "  G  RiSi4iV5  $  "  Vi $  )4	iV4GiiV5>  "  G  "   4,iVi4Giii i i UbdZU     h   k   ] L 6    c       g  m1
		 g  m2		  g  filenamef  oop/goops.scm
Z		Z	" 			   C  h       ]45O 6             g  gf
		 g  methods		 g  args			 g  targs			  g  filenamef  oop/goops.scm
X
	Y		Y		Z	 			   C5>  "  G  4iU5  $  "  Ui $  )4	iU4GiiU5>  "  G  "   4,iUi4Giiii i ehf    h   }   ] 6    u       g  m1
		 g  m2		 g  targs			  g  filenamef  oop/goops.scm
\
	]	 			   C5>  "  G  4iQ5  $  "  Qi $  )4	iQ4GiiQ5>  "  G  "   4,iQi4Giii i i i jpr h      ]4545@       g  gf
		 g  methods		 g  
build-next			 g  args			  g  filenamef  oop/goops.scm
_
	`			`		
`			a			a		a			`	 				   C5>  "  G  4iR5  $  "  Ri $  )4	iR4GiiR5>  "  G  "   4,iRi4Giiiqi i rHQ        h@      -  1  3 L(  L (  L"   6LLL  (  L"   6            g  new-args
			;  g  filenamef  oop/goops.scm
f		h		g		#i		1g		;j	 			;


   C      h   x   ]L L O Cp       g  procs
		 g  args		  g  filenamef  oop/goops.scm
e	 			  g  nameg  next CQ   h       ]O  Q  6         g  gf
		 g  l		 g  args			 g  next			  g  filenamef  oop/goops.scm
d
	e		k	 			   C5>  "  G  4i    h   f   ] 6     ^       g  proc
		  g  filenamef  oop/goops.scm
n	
	o	*	o	 		   C/i0iHiIiJi >  "  G          hH     ]"  5(  C45$  "" "        g  l
		F g  l		; g  res			;  g  filenamef  oop/goops.scm

													 		*		-		0		3		;		;		>		F	 		F  g  nameg  list2set CRf       h      ] 4L 4 55C           g  c
		  g  filenamef  oop/goops.scm
				
	)				 		  g  nameg  allsubs Cf    h(      ]	O Q 44 556              g  c
		! g  allsubs	
	!  g  filenamef  oop/goops.scm

	
					)			!	 		!  g  nameg  class-subclasses CWRgW h      ]4 4 556        g  c
		  g  filenamef  oop/goops.scm

										 		  g  nameg  class-methods CXRi6              g  m
		, g  table-of-metas
 g  t
^^ g  t
`` g  t
aa g  t
bb g  t
e$e9 g  t
pZpp g  t
qq g  t
tt g  t
ww g  t
{{ g  t
       g  t
            , g  t
             g  t
             g  t
             g  t
      d      z g  t
      N      c g  t
             g  t
             g  t
             g  t
             g  t
      +      @ g  t
      t       g  t
             g  t
             g  t
            , g  t
             g  t
      ]      r g  t
            + g  t
             g  t
      p       g  t
            * g  t
      !      6 g  cache
             g  cache
            Ǳ g  cache
      Γ      q g  t
      ֭       g  t
            ' g  t
            & g  t
      D      Y g  t
      G      \ g  t
      n       g  t
             g  t
             g  t
     %     : g  t
           g  t
     i     ~ g  t
     =     R g  t
     W     l g  t
           g  t
           g  t
     -     B g  t
     *     @ g  t
     W     l g  t
     X     m g  t
           g  t
     !     6  ;g  filenamef  oop/goops.scm		
	-	M		6	M
	7	Q		I	T		e	U		k	U		p	U		y	X
	j
	x		x		x		x		y		y		y		~
 
 	 	 
	g 
 
 
*)c
.Cf
/
1e
3
5
6
9s
<
=
UyX
V`
Xh
Yv
Zy
\~
\	^ 
^m
^n
^o^
^
`{
a
b
e
f9
fA
f
g
hP
i
i
jt
k$
k
l
m
n
n	n	n	n
n
n	oO
oX
pN
pO
q	q
q 
t
w
{*
>
      E
      O
      Z
      m
      m	#      m
      o
      Yy
      
      '	#      1
      I
      c
      C
      D
      
      
      
      
      !
      j
      
      
      
      
      S
      

      +
      e;
      
J
      ^
      k
      u
      |	      
      ǵ
      u
      ֢
      ֣
      
      
      
      #
      ()
      C
      ^R
      _
      r
      
      
      :
      =
      d
      
      
      
     
     
     ^
     _
     2 
     3
     M%
     .
     1
     "6
     #F
     Q	     Q	     Q	     P
     S
     LV
     MX
     N\
     _
     d
     n
     p	
     n
      
     !
     "
     "
 	     "
   C6                 ccache/oop/goops/internal.go                                                                        0000644                 00000001655 15154557173 0012065 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4     h      ] g  guile	 	g  define-module*	 	 	g  oop	g  goops	g  internal		 	
g  filenameS	f  oop/goops/internal.scm	g  importsS	 	 	 	g  set-current-module	 	 	g  module-public-interface	g  current-module	g  module-for-each	g  %module-public-interface	g  module-add!	g  resolve-moduleC 5   h      ]4	
5 4 >  "  G   4i4i5 5 i    h      ] &  CL  6  }       g  name
		 g  var		  g  filenamef  oop/goops/internal.scm
					#	
					 			   C O 4i56          g  m
		( g  public-i
	6   g  filenamef  oop/goops/internal.scm		
	)			.		)	6			6	
 		 		# 		 		 
	 
   C6                                                                                    ccache/oop/goops/describe.go                                                                        0000644                 00000031216 15154557173 0012025 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0v2      ]i 4     h_      ] g  guile	 	g  define-module*	 	 	g  oop	g  goops	g  describe		 	
g  filenameS	f  oop/goops/describe.scm	g  importsS	 	 	g  ice-9	g  session	 	 	g  format	 	 	 	g  exportsS	 	g  set-current-module	 	 	g  defined?	 	 	g  toplevel-define!	  	! 	"g  make	#" 	$" 	%g  	<generic>	&% 	'% 	(g  nameS	)g  add-method!	*) 	+) 	,g  <method>	-, 	., 	/g  specializersS	0g  <top>	1g  formalsS	2g  x	32 	4g  bodyS	5f  ~s is 	652 	7g  cond	8g  integer?	982 	:f  
an integer	;: 	<9; 	=g  real?	>=2 	?f  a real	@? 	A>@ 	Bg  complex?	CB2 	Df  a complex number	ED 	FCE 	Gg  null?	HG2 	If  an empty list	JI 	KHJ 	Lg  boolean?	ML2 	Nf  a boolean value (~s)	Og  if	Pg  quote	Qg  true	RPQ 	Sg  false	TPS 	UO2RT 	VNU 	WMV 	Xg  char?	YX2 	Zf  a character, ascii value is ~s	[g  char->integer	\[2 	]Z\ 	^Y] 	_g  symbol?	`_2 	af  a symbol	ba 	c`b 	dg  list?	ed2 	ff  a list	gf 	heg 	ig  pair?	ji2 	kg  cdr	lk2 	mil 	nf  an improper list	on 	pf  a pair	qp 	rOmoq 	sjr 	tg  string?	ut2 	vg  eqv?	wf   	xv2w 	yf  an empty string	zy 	{f  a string of length ~s	|g  string-length	}|2 	~{} 	Oxz~  u  g  vector? 2     P  v2  f  an empty vector   f  a vector of length ~s g  vector-length 2    O    g  eof-object? 2  f  the end-of-file object     g  else f  an unknown object (~s) 2    7<AFKW^chs  f  .~%   g  *unspecified* 6  g  make-procedureS g  	procedureS g  <procedure> g  let g  name g  procedure-name 2      f  `~s'   g  display 2  O  f   is    f  an anonymous Oa    f  
 procedure   f   with    g  arity 2      g  slot-bound? g  
class-name g  safe-class-name g  <object> f  ~S is an instance of class ~A~% g  class-of 2    2  f  Slots are: ~%   g  for-each g  lambda g  slot   g  slot-definition-name       f       ~S = ~A~% 2  f  ~S g  slot-ref 2    f  
#<unbound> O        g  class-slots       g  <class> f  '~S is a class. It's an instance of ~A~% 2    f  Superclasses are:~%   g  class   f      ~A~%       g  class-direct-supers 2    g  slots g  class-direct-slots 2      G  f  (No direct slot)~%   g  begin f  Directs slots are:~%   g  s             O    g  classes g  class-direct-subclasses 2     G f  (No direct subclass)~% f  Directs subclasses are:~%    	 
	 O
   f  Class Precedence List is:~% g  class-precedence-list2  g  methodsg  class-direct-methods2   G f  (No direct method)~% f  Class direct methods are:~%   O    !g  generic-function-name"!2 #" $g  generic-function-methods%$2 &% '#& (f  3~S is a generic function. It's an instance of ~A.~%)( *f  (No method defined for ~S)~%+* ,f  Methods defined for ~S~%-, .2 /3. 0/ 1-0 2O+1 3')2 43 50 60 7g  omit-generic8279g  letrec:g  
print-args;g  args<; =G; >g  newline?> @=? Ai; B  Cg  carDC; ED FE Gk; H:G IABFH J; KJ LBK? M7@IL N<M O:N PO Qf      Method ~A~%RQ2 SG7 Tg  gfUg  method-generic-functionVU2 WTV XW Yf  	     Generic: ~A~%Z!T [YZ \f  	(No generic)~%]\ ^OT[] _X^ `OS_ af  	Specializers:ba cg  method-specializersdc2 e:d f9PR`be gf hg  provideC 5    h    ]4	
5 4 >  "  G   45  $  "  i $  !4!4$'(5>  "  G  "   4+i4$./0i 13458:=?BDILNQSXZ[afnptwy{| " hH    ]4 >  "  G  4 5$  4>  "  G  " 4 5$  4>  "  G  " 4 5$  4>  "  G  "  (  4	>  "  G  " 4
 5$  %4 $  "  >  "  G  " g4 5$  44 5>  "  G  " > $  4>  "  G  "   $  4>  "  G  "  $  6 $  4>  "  G  "  4>  "  G  "  4 5$  > $  4>  "  G  "  44 5>  "  G  "  | $  > $  4>  "  G  "  44 5>  "  G  "  74 5$  4>  "  G  "  4  >  "  G  4!>  "  G  C  |      g  x
	F  g  filenamef  oop/goops/describe.scm
	#
		$			$			$			&		"	%		#	&		(	&	#	-	&		:	'		D	%		E	'		J	'	#	O	'		\	(		f	%		g	(		l	(	#	q	(	 	%	 	)	 	)	# 	)	 	*	 	%	 	*	 	*	# 	*	: 	*	@ 	*	F 	*	 	+	 	%	 	+	 	+	# 	,	  	+	 	-	 	%	 	-	 	-	#	-		.		%		.		.	##	.	2	/	6	%	9	/	#:	/	>	/	?	0	D	0	'I	0	V	1	[	1	'`	1	m	2	w	%	{	2	$|	2		2		3		3	'	3		4		4	'	4	?	4		5		%		5	$	5		5		6		6	'	6		7		7	'	7	?	7		8		%		8		8	#	8		9	"	9	#)	9	2	:	7	:	<	:	 ^	F   C5>  "  G  45  $  "  i $  !4!4$'(5>  "  G  "   4+i4$./i 134 
  h     ]	4 5$  4>  "  G  "  4 >  "  G  4>  "  G  4$  a"  >  "  G  4>  "  G  4>  "  G  	 6        g  x
	  g  name		   g  filenamef  oop/goops/describe.scm
	=
		>				>			?			@			@			@		+	A		=	B		A	B		F	B		O	C		W	C		_	C		d	C		m	D		q	D		v	D			E	 	E	 	E	 	F	 	    C5>  "  G          h      ]4 5$   6 C       g  class
		  g  filenamef  oop/goops/describe.scm
	K
		L				L			L			L			M	 		  g  nameg  safe-class-name CR45  $  "  i $  !4!4$'(5>  "  G  "   4+i4$./i 134    h8      ]	4 54L 5$  44L 55"  6       g  slot
		8 g  name			8  g  filenamef  oop/goops/describe.scm
	V			W				W			X			Z			Z		 	[		%	[	'	&	[	,	0	[		6	\		8	X	 		8   C      hX      ]4 4 5>  "  G  4>  "  G  4 O 4 5>  "  G  C            g  x
		S  g  filenamef  oop/goops/describe.scm
	P
		Q			Q			R			R			R			Q		 	U		%	U		*	U		3	V		=	]		B	]		D	]		I	V	 		S   C5>  "  G  45  $  "  i $  !4!4$'(5>  "  G  "   4+i4$./i 134        h   u   ]4 56m       g  class
		  g  filenamef  oop/goops/describe.scm
	i			i	'		i	2		i	 		   C h   q   ]4 56i       g  s
		  g  filenamef  oop/goops/describe.scm
	r			s	!		s	,		s	 		   C     h   q   ]4 56i       g  s
		  g  filenamef  oop/goops/describe.scm
	}			~	!		~	,		~	 		   C  h   u   ]4 56m       g  s
		  g  filenamef  oop/goops/describe.scm
 		 	#	 	.	 	 		   C  hP  C  ]	44 54 5>  "  G  4>  "  G  44 5>  "  G  4 5(  4	>  "  G  "  '4
>  "  G  4>  "  G  4 5(  4>  "  G  "  '4>  "  G  4>  "  G  4>  "  G  44 5>  "  G  4 5(  64>  "  G  6   ;      g  x
	M g  slots	W  g  classes   g  methods#M  g  filenamef  oop/goops/describe.scm
	c
		d			d				e	
		e			e	/		e			d		%	h		*	h		/	h		8	i		=	j		H	i		Q	m		W	m		_	n		`	o		e	o		j	o		w	q	
	|	q	 	q	
 	r	
 	x	 	x	 	y	 	z	 	z	 	z	 	|	
 	|	 	|	
 	}	
  	  	  	 		 	 	 	# 	+ 	0 	2 	3 	
8 	= 	
M 	
 2	M   C5>  "  G  45  $  "  i $  !4!4$'(5>  "  G  "   4+i4$./%i 1344!$(*,     h   c   ] 6       [       g  x
			  g  filenamef  oop/goops/describe.scm
 			 	  			   C 
 h`     ]4 54 544 5>  "  G  (  	64>  "  G  	6         g  x
		] g  name		] g  methods			]  g  filenamef  oop/goops/describe.scm
 
	 		
 		 		 		 		 		" 	"	$ 		) 		7 		< 		@ 		A 	
	F 		M 	
	] 	
 		]   C5>  "  G  45  $  "  i $  !4!4$'(5>  "  G  "   4+i4$./,i6184g>QUY!\ac h     - 1 3 "  q(  6 $  34 >  "  G  445>  "  G  "4 >  "  G  445>  "  G  6 4 >  "  G  (  G4 5$  445>  "  G  "  4	>  "  G  "   4
>  "  G  4 5"      g  x
		  g  omit-generic		  g  args			~ g  gf	    g  filenamef  oop/goops/describe.scm
 
	 		 		 	-	 	 	 		 	 	1 	 	4 	)	9 	:	; 	)	@ 	 	K 	,	Q 	 	R 	 	d 	 	g 	)	r 	 	~ 	 	~ 		 	  	  	  	  	  	  	  	  	  	.  	  	  	  	  	  	  	  	  	 (		 
   C5>  "  G  hi6            g  m
		, g  t
	4	I g  t
 g  t
		 g  t
 g  t
J_ g  t
  g  filenamef  oop/goops/describe.scm		
	-	#
	=
		K
		P
	c
C 
 
y 		{ 
 	{
   C6                                                                                                                                                                                                                                                                                                                                                                                   ccache/oop/goops/util.go                                                                            0000644                 00000005717 15154557173 0011231 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] 5 4 h(      ] g  guile	 	g  define-module*	 	 	g  oop	g  goops	g  util		 	
g  filenameS	f  oop/goops/util.scm	g  importsS	g  srfi	g  srfi-1	 	 	 	g  exportsS	g  	mapappend	g  find-duplicate	g  map*	g  	for-each*	g  length*	g  improper->proper	 	g  
re-exportsS	g  any	g  every	 	g  set-current-module	 	  	!g  
append-map	"g  memv	#g  current-module	$g  module-eval-closure	%g  top-level-env	&g  
procedure?	'g  top-level-env?	(g  call-with-deferred-observers	)( 	*( 	+g  module-export!	,+ 	-+ 	.# 	/# 	0'% 	1g  map	2g  car	3g  cdr	4g  applyC 5   h     ]4	
5	 4  >  "  G   !iR" h(      ] (  C4  5$   C 6           g  l
		$  g  filenamef  oop/goops/util.scm
	!
		"			$			$			$			$			"			$	 	"	%	0	$	%	  		$  g  nameg  find-duplicate CR#$      h      ]45   $   6C        g  mod
		  g  filenamef  oop/goops/util.scm
	(		)			)			*			+				,		 		
  g  nameg  top-level-env C%R&       h      ] (  C 6              g  env
		  g  filenamef  oop/goops/util.scm
	.		/				/			0			0	 		  g  nameg  top-level-env? C'R4*-/0       h   D   ] 45 6   <       g  filenamef  oop/goops/util.scm
	2 		
   C>  "  G  123   h@      - 1 3 (  C$   4 45?4 45?C @       g  fn
			@ g  l			@  g  filenamef  oop/goops/util.scm
	4
		6			5			6			7			7			5			7			7	)	(	7		)	8		.	8	)	8	8		9	7		@	9	 			@
  g  nameg  map* CR4123 hP      - 1 3 (  C$  *4 45>  "  G   45@ @             g  fn
			J g  l			J  g  filenamef  oop/goops/util.scm
	;
		=			<			=			>			>			<			>		 	>		-	>		:	>	?	D	>	+	J	?	 			J
  g  nameg  	for-each* CRh0      ]"  $  "C
 "              g  ls
		) g  n		 g  ls			  g  filenamef  oop/goops/util.scm
	A
		B				D			B			B			C			B	 		)  g  nameg  length* CR        h       ] $   4 5C  C           g  ls
		  g  filenamef  oop/goops/util.scm
	F
		G				G			H			H			H	'		H			H			I	 
		  g  nameg  improper->proper CRC        g  m
		0  g  filenamef  oop/goops/util.scm		
	7	
*	!
	(	.	2q	4
	;
	A
	F
 	
   C6                                                  ccache/oop/goops/stklos.go                                                                          0000644                 00000012045 15154557173 0011563 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4       h
      ] g  guile	 	g  define-module*	 	 	g  oop	g  goops	g  stklos		 	
g  filenameS	f  oop/goops/stklos.scm	g  importsS	g  internal	 	 	 	g  set-current-module	 	 	g  module-for-each	g  module-add!	g  module-public-interface	g  current-module	g  resolve-interface	 	g  call-with-deferred-observers	 	 	g  module-export!	 	 	  	! 	"g  define-class	#g  define-method	$"# 	%g  write-object	&% 	'g  read-options	(' 	)' 	*g  append	+* 	,* 	-g  keywords	.g  prefix	/g  make-syntax-transformer	0/ 	1/ 	2g  macro	3g  $sc-dispatch	43 	53 	6g  any	7g  each-any	877	968	:69	;6:	<g  syntax-object	=g  standard-define-class	>g  top	?> 	@g  ribcage	Ag  dummy	Bg  name	Cg  supers	Dg  slot	Eg  rest	FABCDE 	Gg  m-1f4787962-8	HG> 	IH???? 	Jf  l-1f4787962-d	Kf  l-1f4787962-e	Lf  l-1f4787962-f	Mf  l-1f4787962-10	Nf  l-1f4787962-11	OJKLMN 	P@FIO 	Q@ 	Rg  x	SR 	TH 	Uf  l-1f4787962-a	VU 	W@STV 	X?PQW 	Yg  hygiene	ZY 	[<=XZ 	\g  syntax-violation	]\ 	^\ 	_f  -source expression failed to match any pattern	`g  module-define!	ag  toplevel-define!	bg  free-id	cg  setter	dg  m-1f4787962-1d	ed> 	fe 	gf  l-1f4787962-1f	hg 	i@Sfh 	j?Qi 	k<cjZ 	lbk 	ml6 	nm7	o6n	pg  begin	qABE 	re?? 	sf  l-1f4787962-22	tf  l-1f4787962-23	uf  l-1f4787962-24	vstu 	w@qrv 	x?wQi 	y<pxZ 	zg  if	{<zxZ 	|g  or	}<|xZ 	~g  not	<~xZ  g  defined? <xZ  g  quote <xZ  g  is-a? <xZ  g  <generic-with-setter> <xZ    <axZ  g  ensure-accessor <xZ  <xZ    g  add-method! <xZ  <cxZ  g  method <xZ  67 6 f  l-1f4787962-2a f  l-1f4787962-2b f  l-1f4787962-2c   @qr  ?Qi  <pZ  <zZ  <|Z  <~Z  <Z  <Z  <Z  g  	<generic> <Z    g  <primitive-generic> <Z    <aZ  g  ensure-generic <Z  <Z    <Z  <Z C 5       h     ]4	
5 4 >  "  G   4i h      ]445 5 6           g  sym
		 g  var		  g  filenamef  oop/goops/stklos.scm
	#			$	 		$	9		$	 		$	 			   C4i5>  "  G  4!$   h   F   ] 45 6   >       g  filenamef  oop/goops/stklos.scm
	)
 		
   C>  "  G  4!&        h   F   ] 45 6   >       g  filenamef  oop/goops/stklos.scm
	,
 		
   C>  "  G  4)4,4)5 -. 5>  "  G  41"25;[,        h   w   ]45C   o       g  dummy
		 g  name		 g  supers			 g  slot			 g  rest			  			   C^_  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  oop/goops/stklos.scm
	1
 		"  g  
macro-typeg  syntax-rulesg  patternsg  nameg  supersg  slotg  ... g  restg  ...   C5"R` h      ]45  6        g  name
		 g  val		  g  filenamef  oop/goops/stklos.scm
	4
		5			5	 			  g  nameg  toplevel-define! CaR41#25oy{}  hp   Q   ]     	 
         C  I       g  dummy
		n g  name		n g  rest			n  		n	   C     hx   Q   ]   	   
         C  I       g  dummy
		v g  name		v g  rest			v  		v	   C^_        h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  oop/goops/stklos.scm
	8	 		9  g  
macro-typeg  syntax-rulesg  patternsg  setterg  name g  restg  ... g  nameg  restg  ...   C5#RC         g  m
		(  g  filenamef  oop/goops/stklos.scm		
	)	#
 	&	 	&	$ 	&	 	#
 	)
t	,
	/
	/		/
	4
 	
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                            ccache/oop/goops/dispatch.go                                                                        0000644                 00000024204 15154557173 0012043 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0l(      ] a 4     h      ] g  guile	 	g  define-module*	 	 	g  oop	g  goops	g  dispatch		 	
g  filenameS	f  oop/goops/dispatch.scm	g  importsS	 	 	g  util	 	 	g  system	g  base	g  target	 	 	 	g  exportsS	g  memoize-method!	 	g  set-current-module	 	 	g  current-module	g  *dispatch-module*	 g  gensym	!f  a	"f  t	#g  append	$# 	%# 	&g  rest	'g  let	(g  map	)g  class-of	*f  p	+g  if	,g  and	-g  apply	.& 	/g  assq-ref	0g  eq?	1f  c	2g  
cache-miss	3g  cons*	4g  list	5g  emit-linear-dispatch	6g  make-vector	7f  g	8g  vector-length	9g  lambda	:g  cdr	;g  case-lambda	<g  car	=g  with-target	>g  
%host-type	?g  compile	@? 	A@? 	B@? 	Cg  envS	Dg  fromS	Eg  scheme	Fg  optsS	Gg  partial-eval?S	Hg  cse?S	IGH 	Jg  args	KJ 	Lg  max	Mg  compute-dispatch-procedure	Ng  
timer-init	Og  slot-ref	Pg  effective-methods	Qg  	slot-set!	Rg  	procedure	Sg  cache-dispatch	Tg  delayed-compile	Ug  n-specialized	V	) 	W	) 	Xg  compute-cmethod	YX 	ZX 	[g  memoize-effective-method!	\g  compute-applicable-methods	]g  %compute-applicable-methods	^g  no-applicable-method	_g  set-procedure-property!	`g  system-procedureC 5h8!     ]4	
5 4 >  "  G   4i5 R    h8      ]"   
$  C45" "             g  n
		2 g  stem		2 g  n			& g  syms			&  g  filenamef  oop/goops/dispatch.scm
	@			A		
	B	
		B			D			D			D		&	D	
	&	A		)	A		*	A		2	A	 		2	  g  nameg  gen-syms C!"%&'()     h   p   ]   C h       g  t
		 g  a		  g  filenamef  oop/goops/dispatch.scm
	P			Q	 			   C *+,-./01234     hX  &  ]e4545" (  .$  45"  45
  	D"  (  L4	
5	$  45"  
 
	"v45$  ! "{4	5 "J	"4 $  45"   
	"          g  gf-sym
	T g  nargs	T g  methods		T g  free		T g  rest?		T g  gen-syms		T g  args		T g  types		T g  methods		 $ g  free			 $ g  exp	
	 $ g  free		X g  types		X g  specs		X g  checks		X g  m-sym		e  g  var	  g  var	   g  filenamef  oop/goops/dispatch.scm
	?
		E			E			E			E			F			F	 		F			E		 	G		&	M		,	O		-	O		=	O		>	P		M	O		T	O		X	W		^	[	
	_	\		c	\	#	e	\		e	\		j	]		m	^	'	p	^		s	^		x	a	 	b	 	c	 	d	 	a	 	]	 	f	 	f	( 	f	 	f	 	g	 	i	 	j	 	k	" 	k	) 	k	" 	k	 	h	 	m	 	m	' 	m	 	m	 	n	% 	n	 	o	 	p	 	q	$ 	q	+ 	q	$	q		n		W		Y	(	Y		Z	$	W	$	G	*	I	2	J	 4	K	$D	L	$J	I	T	G	 G	T	  g  nameg  emit-linear-dispatch C5R6 785        hp   b  ] 4L5$  KL (    "4L >  G   "L 4L56     Z      g  n
		k g  clauses		k g  free			k g  methods			[ g  clause		@	[ g  free		@	[  g  filenamef  oop/goops/dispatch.scm
 		 		 		 		 		 		 		  		. 		/ 		C 		J 		O 	&	[ 		^ 		e 		k 	 		k	  g  nameg  	emit-rest C9(:;<=>BCDEFI     h       ]4L 5  L@          g  p
		  g  filenamef  oop/goops/dispatch.scm
 		 		 		 		 		 		 		 	
 			
   C5 
 h     ] 
$  /45 45O 6L (    "4	L >  G   "~          g  n
	  g  clauses	  g  free		  g  exp		&	9 g  vals		&	9 g  methods		>  g  clause		i  g  free		i   g  filenamef  oop/goops/dispatch.scm
 		 		
 		 		 		 		 		& 		9 		> 		> 		F 		I 		W 		X 		l 		s 		x 	%  	 	 	  g  nameg  emit-req C8J2KL     hH    ]R" -(  4545"  (  y45O 	O 

	Q 	
Q 
	
45
$  "  
$  	  "    6	$  
"Y
";"3	$  4

5"4

5"		"           g  gf
	C g  cache	C g  ls		3 g  nreq		3 g  nrest		3 g  req		  g  rest		  g  ls		&  g  gf-sym		3  g  	emit-rest			K  g  emit-req	
	K  g  t		m  g  n	   g  n	    g  filenamef  oop/goops/dispatch.scm
	t
		v			w			y			y			y	(		y			z			z			z	)		z			y		& 		, 		- 		1 		3 		3 		e 	 	l 		m 		~ 	 	 	  	  	  	  	  	  	"  	  	  	  	  	  	  	  	$  	-  	  	
  	  	
  	  	  	  	#  	,  	  	
  	  	
  	 	{	 	{	 	w	 	|		|	
	|	1	|	%	|		|		~		~	#	~	+%	~	'	~	3	~	3	v	 E	C	  g  nameg  compute-dispatch-procedure CMR	NRNMOPQRS      hP      -  1  3 MNM
$  .4L 4L 554L >  "  G   @L  6           g  args
			L g  dispatch	&	D  g  filenamef  oop/goops/dispatch.scm
 		 		 		 		 		 		 		" 	)	$ 		& 		& 		) 	
	/ 		6 	
	D 	
	L 	 			L


   C  h      ]	H O C       g  gf
		 g  timer		  g  filenamef  oop/goops/dispatch.scm
 
	 	 		  g  nameg  delayed-compile CTR h8     ] 
$  "  $  C454L  5C        g  n
		6 g  f		6 g  ls			6 g  t			  g  filenamef  oop/goops/dispatch.scm
 		 		 		 		 		 		  		% 		' 		( 		- 	&	2 	/	4 		5 	 		6	  g  nameg  	map-until C   h8      ] $  #$   &    "CC (  CC       g  x
		8 g  y		8  g  filenamef  oop/goops/dispatch.scm
 		 			 		 		 		 		 	'	 		 	"	  	*	( 		2 		5 	 		8	  g  nameg  equal? COUW2P   h     ]"O O Q Q 4 5$  X44 55"  1(   645$  
	@"4 5" 6             g  gf
	  g  args	  g  	map-until		  g  equal?		  g  types		;  g  cache		A	r  g  filenamef  oop/goops/dispatch.scm
 
	 		# 		% 		) 		* 		- 		3 	+	5 		; 		; 		A 		G 	
	O 		P 		U 	%	W 		[ 		_ 	
	b 	$	e 		i 		l 		r 		r 		s 		y 	%	{ 	  	  	 	 	  g  nameg  cache-dispatch CSR  h      ]4 5@        g  gf
		 g  args		  g  filenamef  oop/goops/dispatch.scm
 
	 			 	 			  g  nameg  
cache-miss C2R     h0      ]

$  "   $  C 4L  5C        g  ls
		/ g  n		/ g  t			  g  filenamef  oop/goops/dispatch.scm
 		 		 		 		 		 		" 		# 		( 	 	+ 	)	- 		. 	 		/	  g  nameg  first-n C(WZOPQRTU   h   z  ]3O "  (  `4545 4 54 >  "  G  4 4	 5>  "  G  C4 
5$  4455"  "_"  V45 4 54 >  "  G  4 4	 5>  "  G  CQ 
"       r      g  gf
	 g  args	 g  
applicable		 g  n		  g  ls		  g  types			t g  cmethod		(	t g  cache		>	t g  len	 	 g  rest?	 	 g  types	 	 g  cmethod	 	 g  cache	 	 g  first-n		  g  filenamef  oop/goops/dispatch.scm
 
	 		 		 		 		  		" 		( 		( 		4 		5 		; 	%	= 		> 		> 		A 		G 		N 		W 		] 		^ 		i 		w 		} 		 	  	  	  	  	'  	  	  	  	  	  	  	  	  	  	  	  	  	%  	  	  	  	  	  	  	  	  	  		 6		  g  nameg  memoize-effective-method! C[R\][^       h8      ]
4 &  "   5$  
 6 6            g  gf
		3 g  args		3 g  
applicable			3  g  filenamef  oop/goops/dispatch.scm
	
	
		
		
		
		!		+		3	 			3	  g  nameg  memoize-method! CR_ii`6        g  m
		,  g  filenamef  oop/goops/dispatch.scm		
	-			6	
	?
	t
 
< 
P 
 
 
!*	
!4	)!7
 	!7
   C6                                                                                                                                                                                                                                                                                                                                                                                             ccache/oop/goops/composite-slot.go                                                                  0000644                 00000007711 15154557173 0013231 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] \ 4  h      ] g  guile	 	g  define-module*	 	 	g  oop	g  goops	g  composite-slot		 	
g  filenameS	f  oop/goops/composite-slot.scm	g  importsS	 	 	 	g  exportsS	g  <composite-class>	 	g  set-current-module	 	 	g  toplevel-define!	 	 	g  
make-class	g  <class>	g  nameS	g  defined?	 	 	g  is-a?	  	! 	" 	# 	$g  memq	%g  <object>	&% 	'% 	(g  class-precedence-list	)( 	*( 	+g  class-redefinition	,+ 	-+ 	.g  compute-get-n-set	/g  make	0/ 	1/ 	2g  	<generic>	32 	42 	5g  add-method!	65 	75 	8g  <method>	98 	:8 	;g  specializersS	<g  <top>	=< 	>< 	?g  formalsS	@g  class	Ag  slot	B@A 	Cg  bodyS	Dg  if	Eg  eq?	Fg  slot-definition-allocation	GFA 	Hg  
propagatedS	IEGH 	Jg  compute-propagated-get-n-set	KJA 	Lg  next-method	ML 	NDIKM 	ON 	Pg  make-procedureS	Qg  	procedureS	Rg  get-keyword	Sg  propagate-toS	Tg  slot-definition-name	Ug  goops-error	Vf  %Propagation not specified for slot ~S	Wf   Bad propagation list for slot ~S	Xg  map	Yg  slot-ref	Zg  	slot-set!	[g  for-eachC 5  h     ]4	
5 4 >  "  G   "  +44ii   5>  "  xG  "  q45$  b4!i#5$  K4$i'4*i55$  -4-i4ii   5>  "  G  "  "t"  "l"  "d4.5  $  "  .i $  !4.414.5>  "  G  "   47.i41:;i> ?BCOPFHJ      h       ]45&  6L  6          g  class
		 g  slot		  g  filenamef  oop/goops/composite-slot.scm
	1
		2			2			3			1
 			   C  h   m   ] O C      e       g  real-next-method
		
  g  filenamef  oop/goops/composite-slot.scm
	1
 		
   CQ5>  "  G  RSTUVWXh   w   ] $   C Co       g  p
		  g  filenamef  oop/goops/composite-slot.scm
	?			?	(			?	$		?	2 		   C       h   w   ] $   CL C       o       g  p
		  g  filenamef  oop/goops/composite-slot.scm
	@			@	&			@	"		@	0 		   CY   h   o   ]4 L5L 6       g       g  o
		  g  filenamef  oop/goops/composite-slot.scm
	E				F			F	 		   CZY h   ~   ]4 L5L 6     v       g  o
		 g  v		  g  filenamef  oop/goops/composite-slot.scm
	J			K			K	 			   C[ZY       h      ]4L 5L 6     ~       g  object
		 g  slot		  g  filenamef  oop/goops/composite-slot.scm
	M			N	&		N	 			   C       h   v   ] O LL 6     n       g  o
		 g  v		  g  filenamef  oop/goops/composite-slot.scm
	L			M	 			   C       h     ]14 54 5$  "  4>  "  G  $  "  4>  "  G  454	O 5
O (  O "  	O  C          g  s
	  g  prop	  g  s-name		  g  objects		l  g  slots		l  g  first-object		v  g  
first-slot		v   g  filenamef  oop/goops/composite-slot.scm
	6
		7		
	7	4		7			8			7			:		#	;		'	;		.	;		9	<		=	<		B	=		F	=		M	=		V	?		_	@		l	?		s	A		v	B		v	A	 	I	 	I		 	C	 	   g  nameg  compute-propagated-get-n-set CJRC         g  m
		, g  t
    g  filenamef  oop/goops/composite-slot.scm		
	1	/
 	1
	6
 	
   C6                                                        ccache/oop/goops/accessors.go                                                                       0000644                 00000006265 15154557173 0012240 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] 4 4  hp      ] g  guile	 	g  define-module*	 	 	g  oop	g  goops	g  	accessors		 	
g  filenameS	f  oop/goops/accessors.scm	g  importsS	 	 	 	g  exportsS	g  define-class-with-accessors	g  $define-class-with-accessors-keywords	 	g  
re-exportsS	g  standard-define-class	 	g  set-current-module	 	 	g  make-syntax-transformer	 	 	g  macro	g  $sc-dispatch	 	  	!g  _	"g  any	#!"	$g  syntax->datum	%$ 	&$ 	'g  datum->syntax	(' 	)' 	*g  map-in-order	+g  keyword?	,g  get-keyword	-g  accessorS	.g  syntax-violation	/. 	0. 	1f  -source expression failed to match any pattern	2g  init-keywordS	3g  symbol->keywordC 5   hx  [   ]4	
5	 4 >  "  G   4 #&)*+,-        hX      ]	M $  N  C4 5$  N  C $  $4 5$   C  C   C           g  slot
		T g  name	;	J  g  filenamef  oop/goops/accessors.scm
											!						"		"	$		&			'	%		.	%	.	1	%		5	%		;	'	"	;	'		A	(		F	(	3	G	(		N	*	 		T   C       h(      - 1 3 H 4O 5C           g  name
			$ g  supers			$ g  slots				$ g  eat?		
	$  g  filenamef  oop/goops/accessors.scm
	
	
									!		 			$	
	   C     h   k   ]	4 5L 4?6c       g  args
		 g  v			  g  filenamef  oop/goops/accessors.scm		
 		   C01      h(   i   ]	4 5$   O @ 6 a       g  y
		' g  tmp		'  g  filenamef  oop/goops/accessors.scm
	
 		'   C5R4 #&)*+,-23      h     ]M $  N  C4 5$  N  C $  X4 5$   "    45$  C45C  4 5 C             g  slot
	  g  name	>	O g  slot	O	~ g  name		f	~ g  keyword		o	~  g  filenamef  oop/goops/accessors.scm
	2				3			4			6			3			7		"	9		&	3		'	;		.	;	5	1	;		5	;		>	=	)	>	=		D	>		I	>	:	J	>		O	:		R	?		Y	?	4	\	?		`	?		f	A	%	f	A		i	B	(	o	A		u	C		z	C	<	{	C	 	E	 	F	* 	E	 !	    C  h(      - 1 3 H 4O 5C           g  name
			$ g  supers			$ g  slots				$ g  eat?		
	$  g  filenamef  oop/goops/accessors.scm
	-
	
	.			/			1		!	/	 			$	
	   C     h   k   ]	4 5L 4?6c       g  args
		 g  v			  g  filenamef  oop/goops/accessors.scm		-
 		   C01      h(   i   ]	4 5$   O @ 6 a       g  y
		' g  tmp		'  g  filenamef  oop/goops/accessors.scm
	-
 		'   C5RCS       g  m
		0  g  filenamef  oop/goops/accessors.scm		
 	x
   C6                                                                                                                                                                                                                                                                                                                                            ccache/oop/goops/active-slot.go                                                                     0000644                 00000010466 15154557173 0012503 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4  h      ] g  guile	 	g  define-module*	 	 	g  oop	g  goops	g  active-slot		 	
g  filenameS	f  oop/goops/active-slot.scm	g  importsS	g  internal	 	 	 	g  exportsS	g  <active-class>	 	g  set-current-module	 	 	 	g  toplevel-define!	 	 	g  
make-class	g  <class>	g  nameS	g  defined?	 	  	!g  is-a?	"! 	#! 	$ 	% 	&g  memq	'g  <object>	(' 	)' 	*g  class-precedence-list	+* 	,* 	-g  class-redefinition	.- 	/- 	0g  compute-get-n-set	1g  make	21 	31 	4g  	<generic>	54 	64 	7g  add-method!	87 	97 	:g  <method>	;: 	<: 	=g  specializersS	>g  <top>	?> 	@> 	Ag  formalsS	Bg  class	Cg  slot	DBC 	Eg  bodyS	Fg  if	Gg  eq?	Hg  slot-definition-allocation	IHC 	Jg  activeS	KGIJ 	Lg  let*	Mg  index	Ng  slot-ref	Og  quote	Pg  nfields	QOP 	RNBQ 	SMR 	Tg  s	Ug  cdr	VUC 	WTV 	Xg  
before-ref	Yg  get-keyword	Zg  before-slot-refS	[YZT 	\X[ 	]g  	after-ref	^g  after-slot-refS	_Y^T 	`]_ 	ag  before-set!	bg  before-slot-set!S	cYbT 	dac 	eg  
after-set!	fg  after-slot-set!S	gYfT 	heg 	ig  unbound	jg  make-unbound	kj 	lik 	mSW\`dhl 	ng  	slot-set!	og  +	poM 	qnBQp 	rg  list	sg  lambda	tg  o	ut 	vXt 	wg  let	xg  res	yg  %fast-slot-ref	zytM 	{xz 	|{ 	}g  and	~g  not	g  eqv? xi  ~  ]t  }]  w|x  Fvk  FX  su  g  v t  at  g  begin g  %fast-slot-set! tM  et  }e    F  Fa  s  r  Lmq  g  next-method   FK    g  make-procedureS g  	procedureSC 5 h  |   ]4	
5 4 >  "  G   "  +44ii   5>  "  xG  "  q4 5$  b4#i%5$  K4&i)4,i55$  -4/i4ii   5>  "  G  "  "t"  "l"  "d4 05  $  "  0i $  !4043605>  "  G  "   90i43<=i@ ADEHJNPYZ^bfjnyj  h      ]	L$  F4L 5$  74 L 5L$  #L$  "  4L >  "  G  "   C6 4 L 5L$  #L$  "  4L >  "  G  "   C          g  o
	  g  res		J g  res	W   g  filenamef  oop/goops/active-slot.scm
	*			+				,			,			-	#		-		$	.		)	.	.	-	.		2	.	B	N	0		O	1		W	1		_	2		d	2	*	h	2		m	2	> 	    C   hh      ]L$  54L 5$  &4 L>  "  G  L $  L  6CC4 L>  "  G  L $  L  6C            g  o
		c g  v		c  g  filenamef  oop/goops/active-slot.scm
	5			6				7			7			9		1	:		9	:	*	>	<		Y	=		a	=	& 		c	   C  h     ]:45&  z4 54545454	54
5 4 >  "  G  O O  CL  6             g  class
	  g  slot	  g  index		  g  s		  g  
before-ref		)  g  	after-ref		5  g  before-set!		A  g  
after-set!		M  g  unbound		T   	g  filenamef  oop/goops/active-slot.scm
	 
		!			!			"			"	*		"			"			#			"		 	$		)	"		,	%		5	"		8	&		A	"		D	'		M	"		P	(		T	"		W	)		]	)		`	)	"	e	)	 	*	 	 
 	 	   C  h   j   ] O C      b       g  real-next-method
		
  g  filenamef  oop/goops/active-slot.scm
	 
 		
   C56       t       g  m
		, g  t
    g  filenamef  oop/goops/active-slot.scm		
	1	
 	 
 	
   C6                                                                                                                                                                                                           ccache/oop/goops/compile.go                                                                         0000644                 00000001061 15154557173 0011670 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4       hN      ] g  guile	 	g  define-module*	 	 	g  oop	g  goops	g  compile		 	
g  filenameS	f  oop/goops/compile.scm	g  importsS	g  internal	 	 	 	g  
re-exportsS	g  compute-cmethod	 	g  set-current-module	 	 C 5     h0   W   ]4	
5 4 >  "  G   C    O       g  m
		,  g  filenamef  oop/goops/compile.scm
	
 		,
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                ccache/oop/goops/simple.go                                                                          0000644                 00000003330 15154557173 0011532 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] D 4  h2      ] g  guile	 	g  define-module*	 	 	g  oop	g  goops	g  simple		 	
g  filenameS	f  oop/goops/simple.scm	g  importsS	g  	accessors	 	 	 	g  exportsS	g  define-class	 	g  set-current-module	 	 	g  make-syntax-transformer	 	 	g  macro	g  $sc-dispatch	 	 	g  any	g  each-any	 	!g  syntax-object	"g  $define-class-with-accessors-keywords	#g  top	$# 	%g  ribcage	&g  dummy	'g  arg	(&' 	)g  m-1f33f87a8-1	*)# 	+*$ 	,f  l-1f33f87a8-6	-f  l-1f33f87a8-7	.,- 	/%(+. 	0% 	1g  x	21 	3* 	4f  l-1f33f87a8-3	54 	6%235 	7$/06 	8g  hygiene	98 	:!"79 	;g  syntax-violation	<; 	=; 	>f  -source expression failed to match any pattern	?g  module-use!	@g  module-public-interface	Ag  current-module	Bg  resolve-interface	C C 5 h     ]4	
5 4 >  "  G   4 :  h   >   ]C6       g  dummy
		 g  arg		  			   C=>   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  oop/goops/simple.scm
	
 		"  g  
macro-typeg  syntax-rulesg  patternsg  argg  ...   C5R?i4@i4Ai5 54BiC56        g  m
		,  g  filenamef  oop/goops/simple.scm		
w		|		&						 			
 		
   C6                                                                                                                                                                                                                                                                                                         ccache/oop/goops/save.go                                                                            0000644                 00000146545 15154557173 0011217 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0M      ] 4    h.      ] g  guile	 	g  define-module*	 	 	g  oop	g  goops	g  save		 	
g  filenameS	f  oop/goops/save.scm	g  importsS	g  internal	 	 	g  util	 	 	 	g  exportsS	g  save-objects	g  load-objects	g  restore	g  
enumerate!	g  enumerate-component!	g  write-readably	g  write-component	g  write-component-procedure	g  literal?	g  readable	g  make-readable	  	!g  
re-exportsS	"g  make-unbound	#" 	$g  set-current-module	%$ 	&$ 	' 	(g  defined?	)'( 	*'( 	+g  
immediate?	,g  toplevel-define!	-', 	.', 	/g  make	0'/ 	1'/ 	2g  	<generic>	3'2 	4'2 	5g  nameS	6g  add-method!	7'6 	8'6 	9g  <method>	:'9 	;'9 	<g  specializersS	=g  <top>	>g  formalsS	?g  o	@? 	Ag  bodyS	B 	Cg  make-procedureS	Dg  	procedureS	Eg  <null>	F 	Gg  <number>	Hg  	<boolean>	Ig  <symbol>	Jg  <char>	Kg  	<keyword>	L'= 	M'= 	Ng  env	O?N 	Pg  file	Q?PN 	Rg  write	SR?P 	TS 	Ug  make-weak-key-hash-table	Vg  	readables	Wg  make-syntax-transformer	XW 	YW 	Zg  macro	[g  $sc-dispatch	\[ 	][ 	^g  _	_g  any	`^_	ag  syntax->datum	ba 	ca 	dg  datum->syntax	ed 	fd 	gg  quote	hg  	copy-tree	ig  syntax-violation	ji 	ki 	lf  -source expression failed to match any pattern	mg  
hashq-set!	ng  	hashq-ref	og  readable-expression	pg  	readable?	qg  	excluded?	rg  display	sg  object-info	tg  binding?	ug  visiting	vg  definedS	wg  binding	xg  or	yg  begin	zg  add-patcher!	{g  <string>	|g  <vector>	}g  not	~g  vector?	~?  }  g  let     g  array-for-each g  lambda g  if ?N  }  g  set!     @  ?    x    g  n g  vector-length ?      g  zero?   f  #() rP  g  not-literal? ?N  }      f  (vector  f  #(   rP  g  and g  
vector-ref ?
  N    r'P    g  
quasiquote g  vector-set! g  unquote ?    
    PN  g  do g  i g  +       g  =     r P  ?  N              PN    r)P        S    g  <array> g  shared-array-root ?  N    g  
array-rank g  reverse g  	list-tail g  t g  s g  r g  q g  p g  m g  l g  k g  j   g  gensym f  i g  shared-array-offset g  map g  * g  - g  array-dimensions g  shared-array-increments g  make-mapper g  	array-ref g  
array-set! g  write-array g  root     g  cond ~  }  r#P  ?  rP  (?PN  y  S    tN  f  (make-shared-array  rP  N    g  goops-error f  'write-readably(<array>): internal error   PN  ? r P g  for-eachg  dim rP  ?  	 
g  elsef  (list->uniform-array rP f   '() rP f  (list ?PN 
 	   g  <pair>g  car? N   g  cdr? N     !g  proper?"g  loop#g  ls$#? %$ &g  null?'&# (g  pair?)(# *# +t*N ,}+ -"* .),- /x'. 0"%/ 1!0 2g  1?3( 4}3 5tN 6x45 726 8g  infos9g :89 ;g  refs<g  	ref-stack=<N >;= ?17:> @} A@( B! Cf  (cons D2C Ef  (cons* F
E GABDF HrGP IN JI KJ Lg  set-car!M NLM ON POPN Q#* Rg  prevSR?# TQS U}) Vt#N WxUV X}' Yf   .ZrYP [@Z \#N ]\ ^] _g  set-cdr!`R a# b_`a cb d#cPN ey[^d fXe gWf hg  consis#N jhi8 k8j lg  	push-ref!ml#N ng  	visiting?o8 pno qp r# srN ts ut vr wLav xw yrxPN zTgkmquy 	{g  info|{ }n{ ~} |~ 8 =; ?HKPz  g  setter  g  integer?g  standard-getg  standard-setg  memqg  slot-definition-allocationg  classSg  each-subclassS g  class-slotsg  slot-refg  getters-n-settersg  get-set-for-eachg  slot-definition-accessorg  slot-definition-nameg  generic-function-nameg  access-for-eachg  @@g  %allocate-instance' 9 g  nameg  val g  	slot-set!?  g  listg  <object>g  getg  set ?   g  unbound? } N    g  class-of?   g  class  f  	(restore rP g  
class-name rP f   (rP g  slotdefsg  filterg  slotdef  g  g  slot-bound? ? ? qN  x }      & }   rP rP    y   g  aname g# rP  qN  N        g    PN 
      	 g  <class>? rP  ? rP   f  #No read-syntax for <method> defined   g  is-a?' ' g  
<accessor>' ' 	g  ensure-accessor
'	 '	 g  excludedg  pass-2?g  objectsg  pre-definesg  localsg  	stand-insg  post-definesg  patchersg  multiple-boundg  <environment>g  
make-classg  accessorSg  	init-formSg  make-hash-table	= g  
init-thunkSg  
init-valueS' ' '  ' !g  class-precedence-list"'! #'! $g  class-redefinition%'$ &'$ 'g  
initialize(g  initargs)N( *g  next-method+* ,g  get-keyword-g  excludedS.,-( /g  =>0g  	excludees10 2g  e32 4g  hashq-create-handle!5N 6452 736 870 918 :./9 ;: <+; =sN >n=? ?> @' A' Bg  xC?NB Dm=?B ED Fg  hashq-get-handleGg  pop-ref!Hg  	containerIg  <object-info>Js?N KwJ LK M+? Nq?N O{J PO Qt{ R}Q Sg  eq?Tu{ Ug  definingSVSTU W= X&W YVX ZxRY [{ \Z[ ]P\ ^xMN] _^ `g  pass-2Sag  binding-namebg  binding-objectcg  pass-1!dg  string->symboleg  string-appendff  %ogg  number->stringhg  
make-localig  boolean?jg  name-bindings!kg  appendlg  pass-2!mf  (define nf  )
og  write-define!pg  write-empty-defines!qg  write-definition!rf  (let* (sf  (tf  	
       (ug  write-let*-head!vg  write-rebindings!wg  newlinexg  write-definitions!yg  assqzg  write-patches!{g  write-immediates!|g  write-readables!}g  alist~g  restP~}g  portg  open-output-fileP   g  apply}~ g  
close-port g  *unspecified*  g  <output-port>g  >=g  length~  ~ 9  g  uses	 g  cadr~ 9   /- N  c}N j}N lN & } g  use-modulesg  unquote-splicing   RP wP y  {}P N & xmPN f   zPN y xmPN pPN uPN f    (set! N vPN xPN f    zPN f    )
rP y  |}PN N  vmPN  
  P g  let*g  open-input-fileP       g  module-public-interfaceg  current-moduleg  ifaceg  <input-port>g  make-module   g  module-use!g  the-scm-module  g  save-module-excursion$ g  sexpg  readP   g  eof-object? } g  eval " y  "   g  
module-mapg  var g  variable-ref h     C 5  h(  #  ]4	
 !#5	 4& >  "  G   4*+5  $  "  +i $  !4.+4145+5>  "  G  "   48+i41;<=i >@ABCD  h   T   ]C    L       g  o
		  g  filenamef  oop/goops/save.scm
	X
 		   C5>  "  G  4*+5  $  "  +i $  !4.+4145+5>  "  G  "   48+i41;<Ei >@AFCD       h   T   ]C    L       g  o
		  g  filenamef  oop/goops/save.scm
	Z
 		   C5>  "  G  4*+5  $  "  +i $  !4.+4145+5>  "  G  "   48+i41;<Gi >@AFCD       h   T   ]C    L       g  o
		  g  filenamef  oop/goops/save.scm
	[
 		   C5>  "  G  4*+5  $  "  +i $  !4.+4145+5>  "  G  "   48+i41;<Hi >@AFCD       h   T   ]C    L       g  o
		  g  filenamef  oop/goops/save.scm
	\
 		   C5>  "  G  4*+5  $  "  +i $  !4.+4145+5>  "  G  "   48+i41;<Ii >@AFCD       h   T   ]C    L       g  o
		  g  filenamef  oop/goops/save.scm
	]
 		   C5>  "  G  4*+5  $  "  +i $  !4.+4145+5>  "  G  "   48+i41;<Ji >@AFCD       h   T   ]C    L       g  o
		  g  filenamef  oop/goops/save.scm
	^
 		   C5>  "  G  4*+5  $  "  +i $  !4.+4145+5>  "  G  "   48+i41;<Ki >@AFCD       h   T   ]C    L       g  o
		  g  filenamef  oop/goops/save.scm
	_
 		   C5>  "  G  4*5  $  "  i $  !4.41455>  "  G  "   48i41;<=iM >OAFCD     h   e   ]C    ]       g  o
		 g  env		  g  filenamef  oop/goops/save.scm
	e
 			   C5>  "  G  4*5  $  "  i $  !4.41455>  "  G  "   48i41;<=iMM >QATCDR      h      ] 6      w       g  o
		
 g  file		
 g  env			
  g  filenamef  oop/goops/save.scm
	g
	
	i	 		
	   C5>  "  G  4Ui	=5VR4YZ]`cfgh   h   n   ] 4 5  C  f       g  exp
		  g  filenamef  oop/goops/save.scm
	r
		s				s			s	 		   C       h   f   ]	4 5L 4?6^       g  args
		 g  v			  g  filenamef  oop/goops/save.scm		r
 		   Ckl   h(   d   ]	4 5$   O @ 6 \       g  y
		' g  tmp		'  g  filenamef  oop/goops/save.scm
	r
 		'   C5RmV       h       ]4 >  "  G   C            g  obj
		 g  expr		  g  filenamef  oop/goops/save.scm
	u
		v	 			  g  nameg  make-readable CRnV h      ]4 5 C              g  obj
		  g  filenamef  oop/goops/save.scm
	y
		z			z			z	 		  g  nameg  readable-expression CoRnV       h   t   ] 6      l       g  obj
		
  g  filenamef  oop/goops/save.scm
	~
	
		 		
  g  nameg  	readable? CpR+Rpoqrstuvw     h     ]4 5$  4 >  "  G  C4 5$  44 5>  "  G  C4 5$  4>  "  G  C4 545$  *4	5
&  445>  "  G  CC4 >  "  G  C           g  o
	  g  file	  g  env		  g  info		t   g  filenamef  oop/goops/save.scm
 
	 			 		 		$ 			. 		/ 		2 		? 		J 			V 		W 		l 		t 			w 	  	  	  	  	  	   	  	( 	 	  g  nameg  write-component-procedureg  documentationf  Return #f if circular reference CR4YZ]`cfxyrz        h0      ]      C              g  object
		) g  patcher		) g  file			) g  env			)  g  filenamef  oop/goops/save.scm
 
	 	 		)	   C  h   g   ]	4 5L 4?6_       g  args
		 g  v			  g  filenamef  oop/goops/save.scm	 
 		   Ckl  h(   e   ]	4 5$   O @ 6 ]       g  y
		' g  tmp		'  g  filenamef  oop/goops/save.scm
 
 		'   C5R4*5  $  "  i $  !4.41455>  "  G  "   48i41;<{iM >OABCD      h   f   ]C    ^       g  o
		 g  env		  g  filenamef  oop/goops/save.scm
 
 			   C5>  "  G  4*5  $  "  i $  !4.41455>  "  G  "   48i41;<|iM >OACD    h   q   ]4 L5$  CN C  i       g  o
		  g  filenamef  oop/goops/save.scm
 		 	#	 		 	 		   C    h0      ]
 $  !H4O  >  "  G  JCC           g  o
		, g  env		, g  literal?		
	*  g  filenamef  oop/goops/save.scm
 
	 			 		
 		 		+ 	 		,	   C5>  "  G  4*5  $  "  i $  !4.41455>  "  G  "   48i41;<|iMM >QACDrzR        h    ]# $ 4 5
$  64 54$  "  >  "  G  $  +4 
5$  4'>  "  G  "   "   4 
5$  "  14>  "  G  4	 
 
 >  "  G  "  $  "  4 >  "  G  $  ,4 5$  4'>  "  G  "   "   4 5$  "  34>  "  G  4	   >  "  G  "T"M)6
 6           g  o
	 g  file	 g  env		 g  n		 g  not-literal?		, g  t	   g  i	 | g  t	1s  g  filenamef  oop/goops/save.scm
 
	 			 		
 		 		 		 		 		" 		# 	%	, 	 	, 		/ 		7 		9 		? 		F 		T 		U 		[ 	!	_ 		c 		d 	  	  	  	  	3  	  	  	  	  	  	  	  	# 	 	 	+ 	!1 	U 	!^ 	6a 	!v 	| 	 	 	 0		   C5>  "  G  4*5  $  "  i $  !4.41455>  "  G  "   48i41;<iM >OACD   h   x   ]4 56 p       g  o
		 g  env		  g  filenamef  oop/goops/save.scm
 
	 		 	 			   C5>  "  G      h(      ]$    "    C              g  ind
		! g  dim		! g  inc			!  g  filenamef  oop/goops/save.scm
 		 			 	!	 		 	-	 	7	 	-	  	 			!	   C        h     ]4 54	$  4	5"  2"  #
$  "   45""54	 54
4 54 55 C       g  array
	  g  n		  g  n		+	N g  ls		+	N g  indices		[   g  filenamef  oop/goops/save.scm
 
	 			 		 		 		 		 		 	*	! 	D	# 		+ 		. 	%	3 	!	< 	+	= 	1	A 	9	C 	1	F 	+	N 	%	N 		Q 	.	Y 		[ 		[ 		_ 		d 		k 		r 		y 	  	  	  	   g  nameg  make-mapper CRrrz h     ]" ( a 
$  "  4L4
5?L$  )4L5$  4'L>  "  G  "   "   4LL5$  "  04L>  "  G  4LL>  "  G  "  $  C4 L>  "  G  4L45?L$  )4L5$  4'L>  "  G  "   "   4LL5$  "  04L>  "  G  4LL>  "  G  "I"B "  t$  C
$  4 L>  "  G  "   4L L>  "  G  4L >  "  G  4)L>  "  G  "
"        g  dims
	 g  indices	 g  n		j g  el		*  g  t		f  g  i	 c g  el	 Z g  t	W g  n	m g  i	s  
g  filenamef  oop/goops/save.scm
 		 			 						 		 		 	"	  	)	& 	2	( 	)	* 	"	* 		2 		3 	#	? 		@ 		f 	  	  	  	  	  	  	   	)  	2  	)  	   	  	  	#  	  	 	< 	] 	c 	m	m	s	x	|											"		
			 6		  g  nameg  loop C   hX     ]4 >  "  G  O  Q 445>  "  G  )6          g  prefix
		U g  o		U g  not-literal?			U g  file			U g  env			U g  loop		#	M  g  filenamef  oop/goops/save.scm
 
	 		# 		6 		= 		B 		U	 		U	  g  nameg  write-array CR4*5  $  "  i $  !4.41455>  "  G  "   48i41;<iMM >QACDrRtzr  h    j   ]4 L >  "  G   L 6  b       g  dim
		  g  filenamef  oop/goops/save.scm
 		!		"	 		   C        h  =  ]4 54 5$  I$  :4#>  "  G  44 5>  "  G  ( 6 645$  4>  "  G  45$  4'>  "  G  "   4	5$  "  ,4>  "  G  4
45>  "  G  4 >  "  G  44 5>  "  G  4O 4 5>  "  G  )64>  "  G  44 5>  "  G  4>  "  G   6  5      g  o
	 g  file	 g  env		 g  root			 g  t	    g  filenamef  oop/goops/save.scm

														 		4		7		D		Y		a		b		n		o		s		z	 	 	 	 	 	 	) 	 				 	%#	0 	@$	A&	E&	L&	U'	X'	e'	n(	r(	y(	)	)	 -		   C5>  "  G  4*5  $  "  i $  !4.41455>  "  G  "   48i41;<iM >OA CD      h(      ]
4 54 5$  CC              g  o
		! g  env		! g  literal?			!  g  filenamef  oop/goops/save.scm
4
	5		5	(	5		5		6			6		6			6	 
		!	   C5>  "  G  4*5  $  "  i $  !4.41455>  "  G  "   48i41;<iMM >QACDt<rCEzLY_slnn   h   b   ]45 6  Z       g  info
		  g  filenamef  oop/goops/save.scm
d		e	 		   C   h     ]C"  3(  "  0$  45$  "  ""   " $  "  
4 54 545H4$  $  "  $  "  "  (>  "  G  $  *4 5$  4'>  "  G  "   "   4 5$  "  /4>  "  G  4	
   >  "  G  " $  45"  $  (  "  $  "  4>  "  G  4 >  "  G  $  )45$  4'>  "  G  "   "   45

$  "  .4>  "  G  4		 >  "  G  
4)>  "  G  "  4 >  "  G  45JK4>  "  G  445J>  "  G  $  *45$  4'>  "  G  "   "   45

$  "  /4>  "  G  4	
 >  "  G  
	"F  	"94J>  "  G  456           g  o
	 g  file	 g  env		 g  ls			9 g  t		F	a g  proper?		s g  1?		s g  not-literal?		s g  infos		s g  refs		s g  t	 / g  ls	3 g  prev		3 g  t	
 g  t	
  g  filenamef  oop/goops/save.scm
9
	:		;		;		<		<		=	!	=	+	"=	!	&<		.>	"	4>		9:		D?		E?		F?		F?		U@		Z@		^@		bA		kA		lB		mC		s:		~D	 D	 E	 D	 F	 G	 D	 I	 J	 J	 J	 I	 K	 L	 L	L	L	,L	3M	6O	:O		;P	HO	LM	RQ		\S	aT	eT	lT	uU	V	W	V	X	Y	Y	# Z		[	,\	7\	9\	:]	N^	X^	^^	l_	m`	r`	v`	z_	
{a	
b	b	b	 b	0b	 M	M	M	M	d	g	 X		   C5>  "  G         hH      ]
45$  L 4545644 55$  CL 6           g  slotdef
		D g  g-n-s		D g  g-n-s			D  g  filenamef  oop/goops/save.scm
s		t		t			u		u		v		v	2	%v		&w		)w	"	3w		7u		>y		Ay	)	Dy	 		D	   C    h       ] O 45456          g  proc
		 g  class		  g  filenamef  oop/goops/save.scm
r
	z		{		{		{		s	 			  g  nameg  get-set-for-each CR 
   h   N  ]4 545$  +L 4 5$  45"  4545644 5	5$  CL 4 5$  45"  6 F      g  slotdef
		 g  g-n-s		 g  g-n-s			 g  a			  g  filenamef  oop/goops/save.scm
~														+		,	$	8		?		G		H		K	"	U		Y		^		j		k	$	y		|			 			   C      h       ] O 45456          g  proc
		 g  class		  g  filenamef  oop/goops/save.scm
}
									~	 			  g  nameg  access-for-each CR4YZ]`cf?g@ 
   h8      - 1 3      	C           g  class
			4 g  slots			4 g  exps				4  g  filenamef  oop/goops/save.scm

		 			4	
	   C   h   g   ]	4 5L 4?6_       g  args
		 g  v			  g  filenamef  oop/goops/save.scm	
 		   Ckl  h(      ]	4 5$   O @ 6        g  y
		' g  tmp		'  g  filenamef  oop/goops/save.scm

 		'  g  documentationf  )(restore CLASS (SLOT-NAME1 ...) EXP1 ...)g  
macro-typeg  defmacrog  defmacro-argsg  args  C5R4*5  $  "  i $  !4.41455>  "  G  "   48i41;<iM >OACD   h       ]
4 L 545$  CL6       g  get
		  g  set		  g  val				   g  filenamef  oop/goops/save.scm
			!					!			 	 		 	   C      h       ]4 O  >  "  G  Cy       g  o
		  g  env		   g  filenamef  oop/goops/save.scm

						 		 	   C5>  "  G  4*5  $  "  i $  !4.41455>  "  G  "   48i41;<iMM >QACDrq       hP      ]	44 55$  "  ,4L 4 55$  44L 4 55L5"  C        g  slotdef
		O g  t		M  g  filenamef  oop/goops/save.scm
					$						#	$	2	,	#	0		1	#	4	$	9	0	A	$	E	#	N	 		O   Cr      h(   w   ]4 L >  "  G  4 5L 6     o       g  slotdef
		#  g  filenamef  oop/goops/save.scm
					!	#	 		#   Cr#qzg    h   X  ]4 L>  "  G  4L545$  L64L 5$  C4L 5$  4'L>  "  G  "   4LL 5$  C4L>  "  G  $  L  "  	L
   L 6      P      g  name
	  g  aname	  g  get		  g  set		  g  val		  g  t		;  g  t		v   g  filenamef  oop/goops/save.scm
					"			 	 	*		.	)	2	 	3	 	;		G	$	S	 	T	$	v	  	1 	5 	5 	 	   C     h     ] 4>  "  G  445>  "  G  4>  "  G  4 O 455(  "  4445>  "  G  4	
O >  "  G  4)>  "  G  4 O >  "  G  )6             g  o
	  g  file	  g  env		  g  class		  g  slotdefs		]   g  filenamef  oop/goops/save.scm

															,		5		9		@		I		U		]		]		e		j		m		r	+	t		{	 	 	 	 	 	 	 	 	   C5>  "  G  4*5  $  "  i $  !4.41455>  "  G  "   48i41;<iM >OABCDh   f   ]C    ^       g  o
		 g  env		  g  filenamef  oop/goops/save.scm

 			   C5>  "  G  4*5  $  "  i $  !4.41455>  "  G  "   48i41;<iMM >QACDr        h      ]4 56        g  o
		 g  file		 g  env			  g  filenamef  oop/goops/save.scm

				 			   C5>  "  G  4*5  $  "  i $  !4.41455>  "  G  "   48i41;<2iM >OABCD       h   f   ]C    ^       g  o
		 g  env		  g  filenamef  oop/goops/save.scm

 			   C5>  "  G  4*5  $  "  i $  !4.41455>  "  G  "   48i41;<2iMM >QACDr h      ]4 56        g  o
		 g  file		 g  env			  g  filenamef  oop/goops/save.scm

				 			   C5>  "  G  4*5  $  "  i $  !4.41455>  "  G  "   48i41;<9iM >OABCD       h   f   ]C    ^       g  o
		 g  env		  g  filenamef  oop/goops/save.scm

 			   C5>  "  G  4*5  $  "  i $  !4.41455>  "  G  "   48i41;<9iMM >QACD  h      ]6       g  o
		 g  file		 g  env			  g  filenamef  oop/goops/save.scm

				 			   C5>  "  G  4*s5  $  "  4si5 $  24.s44*s5$  si"  s5>  "  G  "   4*5  $  "  4i5 $  64.44*5$  	i"  5>  "  G  "   4*5  $  "  4i5 $  64.44*5$  	i"  5>  "  G  "   4*<5  $  "  4<i5 $  64.<44*<5$  	<i"  <5>  "  G  "   4*5  $  "  4i5 $  64.44*5$  	i"  5>  "  G  "   4*5  $  "  4i5 $  64.44*5$  	i"  5>  "  G  "   4*5  $  "  4i5 $  64.44*5$  	i"  5>  "  G  "   4*5  $  "  4i5 $  64.44*5$  	i"  5>  "  G  "   4*5  $  "  4i5 $  64.44*5$  	i"  5>  "  G  "   4*5  $  "  4i5 $  64.44*5$  	i"  5>  "  G  "   4*5  $  "  4i5 $  64.44*5$  	i"  5>  "  G  "   " 4.4i  ssi   h   G   ] 	=6?       g  filenamef  oop/goops/save.scm		 		
   C i   h   G   ] 	=6?       g  filenamef  oop/goops/save.scm		 		
   C i <<i i i i i i i i  55>  " G  " 4*5$ 4i5$ 4i 4#i55$ 4&i4i  ssi      h   G   ] 	=6?       g  filenamef  oop/goops/save.scm		 		
   C i   h   G   ] 	=6?       g  filenamef  oop/goops/save.scm		 		
   C i <<i i i i i i i i  55>  "  G  "  "J"  "B"  ":4*'5  $  "  'i $  #4.'4145'5>  "  G  "   48'i41;<iM >)A<C,-4     h   h   ]4L 5 6`       g  e
		  g  filenamef  oop/goops/save.scm
			0		 		   C     h8      ]
4L  >  "  G  45$   O 6C        g  env
		7 g  initargs		7 g  t		 	7  g  filenamef  oop/goops/save.scm

	
			 
		5	 		7	   C      h   d   ] O C      \       g  real-next-method
		
  g  filenamef  oop/goops/save.scm

 		
   CD5>  "  G  4*s5  $  "  si $  !4.s4145s5>  "  G  "   48si41;<MM >OA?CDns     h   x   ]45 6 p       g  o
		 g  env		  g  filenamef  oop/goops/save.scm

				 			   C5>  "  G  4*s5  $  "  4si5 $  24.s44*s5$  si"  s5>  "  G  "   484Asi541;<MMM >CAECDms h      ]45 6              g  o
		 g  env		 g  x			  g  filenamef  oop/goops/save.scm

				 			   C5>  "  G  F        h      ]45 6        g  o
		 g  env		  g  filenamef  oop/goops/save.scm

				 			  g  nameg  	excluded? CqR     h      ]45 456        g  patcher
		 g  env		  g  filenamef  oop/goops/save.scm

		%				 			  g  nameg  add-patcher! CzR<   h      ]45 456        g  o
		 g  env		  g  filenamef  oop/goops/save.scm

		 				 			  g  nameg  	push-ref! ClR<   h      ]45 4 56          g  env
		  g  filenamef  oop/goops/save.scm

	 		 		 	 		  g  nameg  pop-ref! CGR<      h      ]4 5C     w       g  env
		  g  filenamef  oop/goops/save.scm
"
	#		
#	 		  g  nameg  	container CHR4*u5  $  "  4ui5 $  24.u44*u5$  ui"  u5>  "  G  "   4*w5  $  "  4wi5 $  24.w44*w5$  wi"  w5>  "  G  "   4*5  $  "  4i5 $  24.44*5$  i"  5>  "  G  "   4*I5$ =4Ii5$  4i 4#Ii55$  ]4&Ii4i  uui wwi i  5I5>  "  G  "  V4.I4i  uui wwi i  5I5>  "  G  "  V4.I4i  uui wwi i  5I5>  "  G  "  V4.I4i  uui wwi i  5I5>  "  G  uinR4*w5  $  "  wi $  !4.w4145w5>  "  G  "   48wi41;<Hi >|ABCD   h   X   ]C    P       g  info
		  g  filenamef  oop/goops/save.scm
0
 		   C5>  "  G  4*w5  $  "  wi $  !4.w4145w5>  "  G  "   48wi41;<MM >OALCDws    h   x   ]4 56 p       g  o
		 g  env		  g  filenamef  oop/goops/save.scm
3
	4		4	 			   C5>  "  G  witR4*5  $  "  i $  !4.41455>  "  G  "   48i41;<Hi >|AFCD   h   X   ]C    P       g  info
		  g  filenamef  oop/goops/save.scm
8
 		   C5>  "  G  4*5  $  "  i $  !4.41455>  "  G  "   48i41;<MM >OA_CD+qstuU< 	     hx   5  ]4 5$  C4 5$  C4 545$  "  45&  45"  $  6C      -      g  o
		r g  env		r g  t				r g  t			r g  info		1	r g  t		;	f  g  filenamef  oop/goops/save.scm
>
	?			?		@		?		)A		1A		4D		;D		;D		IG		UG		VH	"	]H		^H		jD		pI	 		r	   C5>  "  G  +pqstn`wH/IlG   hx  ,  ]4 5$  C4 5$  C4 5$  C45$  K4 545$  45C4	 5$  44
5>  "  G  CC4 5$  =44
5>  "  G  45$  4
544556C4544
5 >  "  G  4 >  "  G  44
5>  "  G  4	 >  "  G  44
5>  "  G  4>  "  G  4
5 456      $      g  o
	r g  env	r g  info		?  g  t	 r g  info	 r  g  filenamef  oop/goops/save.scm
U
	V			V		W			V		X			)V		,Y			6V		7Z		?Z			B[		L[		M_		V_		W_		Y`		e`		fb	 d		 V	 f	 g	 g	 i	! i	. i	! i	 k	 k		 l	 m	n	 o	4p	Lq	ir	'pr	rr	 (	r	  g  nameg  enumerate-component! CRiaRibRb  h   n   ]4 5L 6 f       g  binding
		  g  filenamef  oop/goops/save.scm
~			$		 		   C       h      ]O  6        g  alist
		 g  env		  g  filenamef  oop/goops/save.scm
|
	~	 			  g  nameg  pass-1! CcRdefg     h      ]44 556           g  i
		  g  filenamef  oop/goops/save.scm

					!	
	&				 		  g  nameg  
make-local ChRb+pqswa 
    h   X  ]4 545$  "   45$  "  	4L 5$  C4L 545$  "45L 454	 54L 56454	 56     P      g  b
	  g  o		  g  t			B g  t		&	? g  info		Q   g  filenamef  oop/goops/save.scm
											 		&		4		F		I	 	Q		T	#	[		_		i	'	p	'	w	 	x	'		  	 	  	 	    Cwstih     h  R  ]:4O  >  "  G  "  }(  "  45$  6445>  "  G  445>  "  CG  "  <45$  ""45"s" C(  N44545>  "  G  44	545>  "  G  4
54564545$  4455$  <44545>  "  G  "I(  "&4544545>  "  G  45""4455
"       J      g  alist
	 g  env	 g  ls		  g  	post-defs		  g  ls	  g  i	  g  pre-defs	  g  locs	  g  sins	  g  info	 g  	real-name	  g  filenamef  oop/goops/save.scm

					%		&		+		0		4		6		:		;		T		q		v		z		~	 	 	% 	 	 	 	 	 	 	 	 	 	 	
 	" 	
 	
 	 	
 	 	
	
	!				
		'	+	
,	6	&A	L	O	T	!W	g	m	
p	u	!x			"			(				#		$												 R		  g  nameg  name-bindings! CjRsu`      h@      ]	4 L 54454 L 5>  "  G  456             g  o
		: g  info		:  g  filenamef  oop/goops/save.scm
									&	%		:	 		:   Ck 	   h@      ]445 >  "  G   O 44 54 54 556        g  env
		?  g  filenamef  oop/goops/save.scm

			$		'		.		5		=		?	 			?  g  nameg  pass-2! ClRrmRn    hx     ]4>  "  G  4 >  "  G  4 >  "  G  $  4'>  "  G  "   4>  "  G  6       g  name
		x g  val		x g  literal?			x g  file			x  g  filenamef  oop/goops/save.scm

									+		D		E		]		t		x	 		x	  g  nameg  write-define! CoRo    h   o   ] L 6   g       g  stand-in
		  g  filenamef  oop/goops/save.scm
					 		   Cow     h   h   ]4 L5L 6     `       g  o
		  g  filenamef  oop/goops/save.scm
					 		   C  h8      ]4 O 45>  "  G   O 456           g  file
		4 g  env		4  g  filenamef  oop/goops/save.scm

							,		4	 		4	  g  nameg  write-empty-defines! CpRrswluUvG       h   W  ]4 >  "  G  45445>  "  G  4 >  "  G  45$  4'>  "  G  "   4>  "  G  445>  "  G  4	>  "  G  445
>  "  G  4>  "  G  )6 O      g  prefix
	  g  o	  g  file		  g  env		  g  info		   g  filenamef  oop/goops/save.scm

							"		%		2		;		O		Y		Z		r	 	 	 	 	 	 	 	  g  nameg  write-definition! CqRrrqsqt h   h   ] LL 6  `       g  o
		  g  filenamef  oop/goops/save.scm
			!		 		   Cn 	 h`     ]4 >  "  G  445 >  "  G  4 O 45>  "  G   6          g  file
		] g  env		]  g  filenamef  oop/goops/save.scm

													#		,		5		A		H		M		Y		]	 		]	  g  nameg  write-let*-head! CuRrn   h`      ]4LL >  "  G  4 L >  "  G  4 L >  "  G  4 L >  "  G  L 6           g  patch
		\  g  filenamef  oop/goops/save.scm
								#		,		@		E		L		X		\	 		\   C h      ] O 6              g  prefix
		 g  bindings		 g  file			 g  env			  g  filenamef  oop/goops/save.scm

		 			  g  nameg  write-rebindings! CvRqw    h    h   ]4L LL >  "  G  L6`       g  o
		   g  filenamef  oop/goops/save.scm
		 		 	 		    C     h      ]O 4 56       g  selector
		 g  prefix		 g  file			 g  env			  g  filenamef  oop/goops/save.scm

				 			  g  nameg  write-definitions! CxRrwy     hP     ]4 L5$  44L55$  CC $  4L  54L  5C C          g  patcher
		L g  t		L g  t		!	0  g  filenamef  oop/goops/save.scm
			 			
	,	
	7	!
	,	!
	%	3	 	7		8	&	=	4	?	&	@	&	E	4	G	&	H	  		L  g  nameg  name-objects Cw hH      ]	4LL>  "  G  4O L Q 4 5L>  "  G  L6       g  patch
		H g  name-objects	"	3  g  filenamef  oop/goops/save.scm
						"		:		H	 		H   C        h       ] O 44556          g  prefix
		 g  file		 g  env			  g  filenamef  oop/goops/save.scm

								 			  g  nameg  write-patches! CzR+boa     h0      ]44 55$  4 54 5L 6C              g  b
		)  g  filenamef  oop/goops/save.scm
											!		!	'	 			)   C        h      ]O  6        g  alist
		 g  file		  g  filenamef  oop/goops/save.scm

		 			  g  nameg  write-immediates! C{Rpbyaoo 	   h   Y  ]	44 55$  C44 5M5$  45L 4 54L 5644 544 55L>  "  G  4 54 5MNC      Q      g  b
	  g  t	  g  t	(   g  filenamef  oop/goops/save.scm
 		!		!	'	!		!		!		"		"		("		(!		<%	)	=&	)	D%	"	E'	)	L%	"	N$		O)		R)	&	Y*	&	\*	;	d*	&	l)		u-	,	|.	, -	% -	 	    C    h      ]HO  6         g  alist
		 g  file		 g  env			 g  written			  g  filenamef  oop/goops/save.scm

					 	 			  g  nameg  write-readables! C|R4*5  $  "  i $  !4.41455>  "  G  "   48i41;<i{iM>ACD        h@      - 1 3 454 >  "  G  4>  "  G  C         g  alist
			> g  file			> g  rest				> g  port			>  g  filenamef  oop/goops/save.scm
2
	
3		3		4		+5	 			>	
	   C5>  "  G  4*5  $  "  i $  !4.41455>  "  G  "   48i41;<iiM>ACD/-cjlRw{xmzpuvr|       h    - 1 3 45$  "  45	$  "  454 >  "  G  4 >  "  G  4>  "  G  (  "  )4	>  "  G  4
>  "  G  4 >  "  G  45(  24>  "  G  4>  "  G  "  4>  "  G  4>  "  G  4>  "  G  445>  "  G  4>  "  G  4>  "  G  4>  "  G  4 >  "  G  44556       g  alist
		 g  file		 g  rest			 g  excluded		5 g  uses		5 g  env		D  g  filenamef  oop/goops/save.scm
8
	
9		9		9		9	+	9	6	:		(:		,:		/:	+	5:	7	59		:;		D;		G<		[=		o>	 ?	 A	 A	 A	 B	 C	 D	 D	 F	 F	- F	 G	 G	 G	I	I	,I	J	1K	EL	IL	JL	*YL	bM	hM	-qM	zN	~N	N	O	O	O	P	Q	Q	$Q	-Q	$Q	 8			
	   C5>  "  G  4*5  $  "  i $  !4.41455>  "  G  "   48i41;<{i >ACD   h0      ]4 5454>  "  G  C              g  file
		) g  port			) g  objects			)  g  filenamef  oop/goops/save.scm
S
	T			T		U		T		V	 		)   C5>  "  G  4i4i5 5R4*5  $  "  i $  !4.41455>  "  G  "   8i41;<i >ACD$     hX      ]4L>  "  G  "  .4 5$  C4 L>  "  G  4L 5 "4L 5 "            g  sexp
		F  g  filenamef  oop/goops/save.scm
`		a		b		c		#c			&e		:f		Ff		Fb		Gb		Sb	 		S
   Ch   |   ] C       t       g  name
			 g  var			  g  filenamef  oop/goops/save.scm
g		h		h	 				   C 	hX      ]	45 4>  "  G  4>  "  G  4 O >  "  G  6             g  file
		R g  m		R  g  filenamef  oop/goops/save.scm
[
	\		\		
]		^		2_		Rg	 		R   C56      g  m
		0 g  t
	8	M g  t
( g  t
 g  t
 g  t
 g  t
 g  t
s g  t
Sh g  t
DY g  t
2G g  t
%: g  t
 5 g  t
 g  t
## g  t
)) g  t
*{* g  t
;h;} g  t
=p= g  t
DE g  t
EE g  t
G	G g  t
GH g  t
I!I6 g  t
JJ* g  t
K1KO g  t
KK g  t
KL g  t
LRLq g  t
LL g  t
MM5 g  t
MxM g  t
MM g  t
N<N[ g  t
NN g  t
O O g  t
S,SB g  t
UU g  t
VV g  t
[[ g  t
\\- g  t
\k\ g  t
^n^ g  t
_O_d g  t
`f`{ g  t
aGa\ g  t
      m       g  t
             g  t
      {       g  t
              2g  filenamef  oop/goops/save.scm		
	1	X
	Z
	[
	\
	]
	^
l	_
L	e
=	g
W	p	b	p
	u
	y
_	~
 
+ 
 
 
 
b 
# 
#
(4
*t9
5r
8}
;a
=i
D
E
G
G
I
J
K*
P{	P	P	P	P	P	P	P	Q
Rs	R	R	R	R	R	R	R	R
S$
U
V
X
Y
ZK
[
["
[%
^f.
^g0
_H3
`^6
`_8
a@>
ggU
gpy
gyz
h|
i
rF
tV
u
x#
z
|
~
      H
      
      ^
      e
      f2
      8
      tS
      Y	      Y	'      Y	      Y
      [
 ^	      (
   C6                                                                                                                                                            ccache/srfi/srfi-26.go                                                                              0000644                 00000014614 15154557173 0010457 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0t      ]  4   h
      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-26	 		g  filenameS	
f  srfi/srfi-26.scm	g  exportsS	g  cut	g  cute	 	g  set-current-module	 	 	g  cond-expand-provide	g  current-module	 	g  make-syntax-transformer	 	 	g  macro	g  $sc-dispatch	 	 	g  any	g  each-any			 g  reverse	! 	"g  syntax-object	#g  lambda	$g  top	%$ 	&g  ribcage	'& 	(g  t-46961e50f5-72	)g  t-46961e50f5-71	*() 	+g  m-46961e50f5-73	,+$ 	-,, 	.f  l-46961e50f5-77	/f  l-46961e50f5-78	0./ 	1&*-0 	2g  loop	3g  slots	4g  params	5g  args	62345 	7%%%% 	8f  l-46961e50f5-68	9f  l-46961e50f5-69	:f  l-46961e50f5-6a	;f  l-46961e50f5-6b	<89:; 	=&67< 	>g  slot0	?g  slot1+	@>? 	A%%% 	Bf  l-46961e50f5-62	Cf  l-46961e50f5-63	Df  l-46961e50f5-64	EBCD 	F&@AE 	Gg  stx	HG 	I% 	Jf  l-46961e50f5-5f	KJ 	L&HIK 	M%'1'=F'L 	Ng  hygiene	ON 	P"#MO 	Qg  syntax-violation	RQ 	SQ 	Tf  -source expression failed to match any pattern	Ug  generate-temporaries	Vg  var	WV 	X 	Yg  free-id	Zg  <>	[V 	\f  l-46961e50f5-82	]\ 	^&[I] 	_g  s	`g  rest	a_` 	b%% 	cf  l-46961e50f5-7b	df  l-46961e50f5-7c	ecd 	f&abe 	g%'^''f'=F'L 	h"ZgO 	iYh 	jg  <...>	k"jgO 	lYk 	mg  error	nf  &<...> not on the end of cut expression	og  append	p 	qg  t-46961e50f5-88	rg  t-46961e50f5-87	sqr 	tg  m-46961e50f5-89	ut$ 	vuu 	wf  l-46961e50f5-8d	xf  l-46961e50f5-8e	ywx 	z&svy 	{%'z'^''f'=F'L 	|"#{O 	}g  apply	~"}{O 	g  let g  t-46961e50f5-a8 g  t-46961e50f5-a7   g  m-46961e50f5-a9 $    f  l-46961e50f5-ad f  l-46961e50f5-ae   &  g  process-hole   %  f  l-46961e50f5-a5   &  g  bindings g  	arguments 23  f  l-46961e50f5-9c f  l-46961e50f5-9d f  l-46961e50f5-9e f  l-46961e50f5-9f   &7  3  f  l-46961e50f5-98 f  l-46961e50f5-99   &b  f  l-46961e50f5-95   &HI  %''  "O  "O  %'  "ZO  Y  "jO  Y  g  t  C 5       hP  r   ]4	
5 4 >  "  G   4i4i5 >  "  G  4 !P   h   T   ]  C    L       g  t-46961e50f5-72
		 g  t-46961e50f5-71		  			   CSTUWXi   h   T   ] LLLLLL 6      L       g  filenamef  srfi/srfi-26.scm		%			%	3		%	 		
   Clmn  h   \   ] L $  6C       T       g  filenamef  srfi/srfi-26.scm		'				'			(			(	 		
   Co p|~   h   T   ]  C L       g  t-46961e50f5-88
		 g  t-46961e50f5-87		  			   CST     h@      ]44L 5L54LL5  4 5$  @ 6        g  tmp
		? g  tmp	(	?  g  filenamef  srfi/srfi-26.scm		)	 		)	(		)	 		*	"		*	+		*	"		)	 		?
   C       hp      ]4L 5$  L LLLO @4L 5"  LLLL L6$  #4LO ?$  L LO @"" w       g  var
		o g  tmp		o g  tmp		/	o  g  filenamef  srfi/srfi-26.scm	@	,	&	B	,	 		o   C      h   K  ]# (  34545 45$  @6  454	5$  
L O @6     C      g  slots
		{ g  params		{ g  args			{ g  tmp			; g  tmp		$	; g  s		A	{ g  rest		A	{ g  tmp		L	{ g  tmp		W	{  	g  filenamef  srfi/srfi-26.scm
													,				>	 		A	!		A	 		F	"	$	J	"	:	L	"	$	L	"	 		{	  g  nameg  loop C  h       ]O Q 6             g  cut
		 g  slot0		 g  slot1+			 g  loop		
	  g  filenamef  srfi/srfi-26.scm	
					 						 			   CST  h(   e   ]	4 5$  @ 6      ]       g  stx
		" g  tmp		"  g  filenamef  srfi/srfi-26.scm
		 		"   C5R4 p  h   T   ]  C L       g  t-46961e50f5-a8
		 g  t-46961e50f5-a7		  			   CST    h   \   ] LLLLL 6       T       g  filenamef  srfi/srfi-26.scm		6			6	,		6	&		6	 		
   Ch   \   ] LLLLL 6       T       g  filenamef  srfi/srfi-26.scm		6			6	,		6	&		6	 		
   CUX    h   l   ]LL L L L 6d       g  t
		  g  filenamef  srfi/srfi-26.scm		?			@			A			?	 		   C h   c  ]+ (  .45 45$  @6 45$   L O @4	5$  
 L O @4545$   L O @6   [      g  slots
	  g  bindings	  g  	arguments		  g  tmp			6 g  tmp			6 g  tmp		9  g  tmp		D  g  tmp		f  g  tmp	   g  tmp	    
g  filenamef  srfi/srfi-26.scm
	2			7				9			8		9	:		9	:	 	>	# 	>	9 	>	# 	>	 	 	  g  nameg  loop C  h      ]
O Q 6        g  cute
		 g  slots		 g  loop		
	  g  filenamef  srfi/srfi-26.scm	
	2			3			4			2	 			   CST     h(   e   ]	4 5$  @ 6      ]       g  stx
		" g  tmp		"  g  filenamef  srfi/srfi-26.scm
	/	 		"   C5RC    j       g  m
		(  g  filenamef  srfi/srfi-26.scm		
	)	
	.			6		&	;	
 	L
   C6                                                                                                                     ccache/srfi/srfi-42.go                                                                              0000644                 00000310764 15154557173 0010462 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0ܑ     ]
w 4       h      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-42	 		g  filenameS	
f  srfi/srfi-42.scm	g  exportsS	g  :	g  :-dispatch-ref	g  :-dispatch-set!	g  :char-range	g  :dispatched	g  :do	g  :generator-proc	g  	:integers	g  :let	g  :list	g  	:parallel	g  :port	g  :range	g  :real-range	g  :string	g  :until	g  :vector	g  :while	g  any?-ec	g  	append-ec	 g  dispatch-union	!g  do-ec	"g  	every?-ec	#g  first-ec	$g  fold-ec	%g  fold3-ec	&g  last-ec	'g  list-ec	(g  make-initial-:-dispatch	)g  max-ec	*g  min-ec	+g  
product-ec	,g  string-append-ec	-g  	string-ec	.g  sum-ec	/g  	vector-ec	0g  vector-of-length-ec	1 !"#$%&'()*+,-./0 %	2g  set-current-module	32 	42 	5g  cond-expand-provide	6g  current-module	7 	8g  make-syntax-transformer	98 	:8 	;g  macro	<g  $sc-dispatch	=< 	>< 	?g  any	@g  free-id	Ag  syntax-object	Bg  nested	Cg  top	DC 	Eg  ribcage	FE 	Gg  x	HG 	Ig  m-46961e513b-2	JIC 	KJ 	Lf  l-46961e513b-4	ML 	NEHKM 	ODFN 	Pg  hygiene	QP 	RABOQ 	S@R 	Tg  each-any	UST	VUT	W?V	Xg  dummy	Yg  q	Zg  etc	[XYZ 	\JDD 	]f  l-46961e513b-7	^f  l-46961e513b-8	_f  l-46961e513b-9	`]^_ 	aE[\` 	bDaFN 	cA!bQ 	dg  append	ed 	fd 	g?T	h?g	i?h	j?i	kg  q1	lg  q2	mg  etc1	nXklmZ 	oJDDDD 	pf  l-46961e513b-10	qf  l-46961e513b-11	rf  l-46961e513b-12	sf  l-46961e513b-13	tf  l-46961e513b-14	upqrst 	vEnou 	wDvFN 	xA!wQ 	y?? 	zg  begin	{g  cmd	|X{ 	}JD 	~f  l-46961e513b-1c	f  l-46961e513b-1d ~  E|}  DFN  AzQ  g  if AQ  AQ      AOQ  @  ?  ??  g  test X{  f  l-46961e513b-21 f  l-46961e513b-22 f  l-46961e513b-23   E\  DFN  AQ  A!Q  g  not AOQ  @  ?  ??  f  l-46961e513b-28 f  l-46961e513b-29 f  l-46961e513b-2a   E\  DFN  AQ  AQ  A!Q  g  and AOQ  @  T ??  f  l-46961e513b-2f f  l-46961e513b-30 f  l-46961e513b-31   E\  DFN  AQ  AQ  A!Q  g  or AOQ  @  T ??  f  l-46961e513b-37 f  l-46961e513b-38 f  l-46961e513b-39   E\  DFN  AQ  AQ  A!Q  AzOQ  @  T ??  XZ{  f  l-46961e513b-3f f  l-46961e513b-40 f  l-46961e513b-41   E\  DFN  AzQ  A!Q  AOQ  @  ??????  ??  g  do-ec:do g  olet g  lbs g  ne1? g  ilet g  ne2? g  lss X{  JDDDDDDD  f  l-46961e513b-47 f  l-46961e513b-48 f  l-46961e513b-49 f  l-46961e513b-4a f  l-46961e513b-4b f  l-46961e513b-4c f  l-46961e513b-4d f  l-46961e513b-4e   E  DFN  AQ  AQ  ?h?  g  g g  arg1 g  arg X{  f  l-46961e513b-58 f  l-46961e513b-59 f  l-46961e513b-5a f  l-46961e513b-5b f  l-46961e513b-5c   Eo  DFN  AQ  g  syntax-violation     f  -source expression failed to match any pattern g  m-46961e513b-63 C    f  l-46961e513b-65   EH  DF A Q @ g  letA Q @ g???T ?? 	g  ec-simplify
g  obsg  ocg  ibsg  icg  lsX{
 
DDDDDDDDD 
f  l-46961e513b-68f  l-46961e513b-69f  l-46961e513b-6af  l-46961e513b-6bf  l-46961e513b-6cf  l-46961e513b-6df  l-46961e513b-6ef  l-46961e513b-6ff  l-46961e513b-70f  l-46961e513b-71 
E DF A	Q AQ  g  loop!A Q "AQ #g  m-46961e513b-7f$#C %$ &f  l-46961e513b-81'& (EH%' )DF( *A)Q +@* ,g  atom-, .+-? /?. 0, 1+0? 2?1 3g  
consequent4X3 5$D 6f  l-46961e513b-897f  l-46961e513b-8a867 9E458 :D9F( ;A:Q <A:Q =;<< >+-?? ??> @+0?? A?@ BA)Q C@B DC? ECD F+E? G?F HX3 I$DD Jf  l-46961e513b-9cKf  l-46961e513b-9dLf  l-46961e513b-9eMJKL NEHIM ODNF( PA	OQ QAOQ R+E?? S?R Tg  	alternateUX3T V$DDD Wf  l-46961e513b-a3Xf  l-46961e513b-a4Yf  l-46961e513b-a5Zf  l-46961e513b-a6[WXYZ \EUV[ ]D\F( ^A	]Q _A]Q `A)Q a@` bTcabd?c eg  commandfXe gf  l-46961e513b-achf  l-46961e513b-adigh jEf5i kDjF( lA	kQ mAzkQ nAz)Q o@n poTq?p rf  l-46961e513b-b2sf  l-46961e513b-b3trs uEf5t vDuF( wA	vQ xAvQ y, zpT{?y?z |g  done}g  to-do1~g  to-do2X|}~ f  l-46961e513b-b8f  l-46961e513b-b9f  l-46961e513b-baf  l-46961e513b-bb EV DF( A	Q AQ ?yTg g  to-doX|} f  l-46961e513b-c3f  l-46961e513b-c4f  l-46961e513b-c5f  l-46961e513b-c6 EV DF( A	Q AQ ?y X f  l-46961e513b-ce E% DF( AQ AQ  ? ?y ?yg g  command1Xe f  l-46961e513b-d6f  l-46961e513b-d7f  l-46961e513b-d8 EI DF( AzQ ?T?????? g  ccX g  m-46961e513b-e2C DDDDDDD f  l-46961e513b-e7f  l-46961e513b-e8f  l-46961e513b-e9f  l-46961e513b-eaf  l-46961e513b-ebf  l-46961e513b-ecf  l-46961e513b-edf  l-46961e513b-ee E  f  l-46961e513b-e4 EH DF AQ ????? X DDDD f  l-46961e513b-f9f  l-46961e513b-faf  l-46961e513b-fbf  l-46961e513b-fcf  l-46961e513b-fd E DF AQ AQ  AQ g  indexg  m-46961e513b-103C  f  l-46961e513b-105 EH DF AQ @ ? ???? g  varg  ig  
expressionX DDDD f  l-46961e513b-108f  l-46961e513b-109f  l-46961e513b-10af  l-46961e513b-10bf  l-46961e513b-10c E DF AQ AQ A
Q  AQ  AQ  ???? X DDD f  l-46961e513b-113f  l-46961e513b-114f  l-46961e513b-115f  l-46961e513b-116 E DF AQ AQ AQ  AQ   hT? ?g  :parallel-1g  genX g  m-46961e513b-11bC DDDDD 	f  l-46961e513b-125
f  l-46961e513b-126f  l-46961e513b-127f  l-46961e513b-128f  l-46961e513b-129f  l-46961e513b-12a	
 E  f  l-46961e513b-11d EH DF AQ ?? ? g  resultX g  m-46961e513b-133C DDDDDD f  l-46961e513b-138f  l-46961e513b-139f  l-46961e513b-13a f  l-46961e513b-13b!f  l-46961e513b-13c"f  l-46961e513b-13d#f  l-46961e513b-13e$ !"# %E$ & 'f  l-46961e513b-135(' )EH&( *D%F) +A*Q ,DF) -A,Q .@- /A,Q 0@/ 1TT2013.2T?2?T 4???33 5g  gens6g  ob17g  oc18g  lb19g  ne1?1:g  ib1;g  ic1<g  ne2?1=g  ls1>g  ob2?g  oc2@g  lb2Ag  ne1?2Bg  ib2Cg  ic2Dg  ne2?2Eg  ls2FX56789:;<=>?@ABCDE GDDDDDDDDDDDDDDDDDD Hf  l-46961e513b-149If  l-46961e513b-14aJf  l-46961e513b-14bKf  l-46961e513b-14cLf  l-46961e513b-14dMf  l-46961e513b-14eNf  l-46961e513b-14fOf  l-46961e513b-150Pf  l-46961e513b-151Qf  l-46961e513b-152Rf  l-46961e513b-153Sf  l-46961e513b-154Tf  l-46961e513b-155Uf  l-46961e513b-156Vf  l-46961e513b-157Wf  l-46961e513b-158Xf  l-46961e513b-159Yf  l-46961e513b-15aZf  l-46961e513b-15b[HIJKLMNOPQRSTUVWXYZ \EFG[ ]D\F) ^A]Q _A]Q `A]Q aA]Q b?T? c??h? dg  :while-1eX fg  m-46961e513b-183gfC hgDDDDD if  l-46961e513b-188jf  l-46961e513b-189kf  l-46961e513b-18alf  l-46961e513b-18bmf  l-46961e513b-18cnf  l-46961e513b-18doijklmn pEeho qg rf  l-46961e513b-185sr tEHqs uDpFt vAduQ wg  m-46961e513b-195xwC yx zf  l-46961e513b-197{z |EHy{ }DF| ~A}Q @~ ?????? ??? g  :while-2X 	xDDDDDDDD 	f  l-46961e513b-19af  l-46961e513b-19bf  l-46961e513b-19cf  l-46961e513b-19df  l-46961e513b-19ef  l-46961e513b-19ff  l-46961e513b-1a0f  l-46961e513b-1a1f  l-46961e513b-1a2 	E DF| AQ AQ g  m-46961e513b-1acC  f  l-46961e513b-1ae EH DF AQ @ AQ @ yTT????? ???TTT g  ib-letg  ib-saveg  
ib-restoreg  ib-varg  ib-rhsg  ibX DDDDDDDDDDDDDD f  l-46961e513b-1b1f  l-46961e513b-1b2f  l-46961e513b-1b3f  l-46961e513b-1b4f  l-46961e513b-1b5f  l-46961e513b-1b6f  l-46961e513b-1b7f  l-46961e513b-1b8f  l-46961e513b-1b9f  l-46961e513b-1baf  l-46961e513b-1bbf  l-46961e513b-1bcf  l-46961e513b-1bdf  l-46961e513b-1bef  l-46961e513b-1bf E DF AQ g  ib-tmpAQ AQ    AQ AQ g  set!AQ 1b???? ???TTT g  obX DDDDDDDDDDDD f  l-46961e513b-1d5f  l-46961e513b-1d6f  l-46961e513b-1d7f  l-46961e513b-1d8f  l-46961e513b-1d9f  l-46961e513b-1daf  l-46961e513b-1dbf  l-46961e513b-1dcf  l-46961e513b-1ddf  l-46961e513b-1def  l-46961e513b-1dff  l-46961e513b-1e0f  l-46961e513b-1e1 E DF AQ AQ g  
ne1?-valueAQ AQ g  :until-1g  m-46961e513b-1f5C DDDDD f  l-46961e513b-1faf  l-46961e513b-1fbf  l-46961e513b-1fcf  l-46961e513b-1fdf  l-46961e513b-1fef  l-46961e513b-1ff Ee  f  l-46961e513b-1f7 EH DF AQ g  m-46961e513b-207C  f  l-46961e513b-209 EH DF AQ @ ??????  ??? DDDDDDDD 	f  l-46961e513b-20cf  l-46961e513b-20df  l-46961e513b-20ef  l-46961e513b-20ff  l-46961e513b-210f  l-46961e513b-211f  l-46961e513b-212	f  l-46961e513b-213
f  l-46961e513b-214	
 	E DF AQ AQ AQ g  m-46961e513b-21eC  f  l-46961e513b-220 EH DF AQ @ ? T???X  DDDD !f  l-46961e513b-223"f  l-46961e513b-224#f  l-46961e513b-225$f  l-46961e513b-226%f  l-46961e513b-227&!"#$% 'E & (D'F )A(Q *A(Q +A(Q ,?j-g  arg2.X- /DDDDD 0f  l-46961e513b-22f1f  l-46961e513b-2302f  l-46961e513b-2313f  l-46961e513b-2324f  l-46961e513b-2335f  l-46961e513b-2346012345 7E./6 8D7F 9A8Q :Ad8Q ;X <DDD =f  l-46961e513b-23d>f  l-46961e513b-23e?f  l-46961e513b-23f@f  l-46961e513b-240A=>?@ BE;<A CDBF DACQ EACQ FE Gg  tHAGCQ IACQ Jg  null?KAJCQ LKH MIL Ng  carOANCQ POH QP RACQ Sg  cdrTASCQ UTH VU WRV Xg  m-46961e513b-245YXC ZY [f  l-46961e513b-247\[ ]EHZ\ ^DF] _A^Q `@_ a`? b???a? cYDDDD df  l-46961e513b-24aef  l-46961e513b-24bff  l-46961e513b-24cgf  l-46961e513b-24dhf  l-46961e513b-24eidefgh jEci kDjF] lAkQ mAkQ ng  stroAnkQ pg  lenqApkQ rA
kQ sqr ts uAkQ vg  string-lengthwAvkQ xwo yuqx zy {r |g  <}A|kQ ~q g  
string-refAkQ AkQ g  +AkQ AkQ  ah???X- YDDDDDD f  l-46961e513b-255f  l-46961e513b-256f  l-46961e513b-257f  l-46961e513b-258f  l-46961e513b-259f  l-46961e513b-25af  l-46961e513b-25b E DF] AQ AQ g  string-appendAQ X f  l-46961e513b-265f  l-46961e513b-266f  l-46961e513b-267f  l-46961e513b-268f  l-46961e513b-269 Ec DF] AQ AQ AQ  g  m-46961e513b-270C DDD f  l-46961e513b-275f  l-46961e513b-276f  l-46961e513b-277f  l-46961e513b-278 E;  f  l-46961e513b-272 EH DF AQ AQ AQ  DF AQ @ ? ???? DDDD f  l-46961e513b-27ef  l-46961e513b-27ff  l-46961e513b-280f  l-46961e513b-281f  l-46961e513b-282 E DF AQ AQ g  vecAQ ApQ A
Q   AQ g  vector-lengthAQ     A|Q  g  
vector-refAQ AQ AQ AQ  h?ތ?ߌ?DDDDDD f  l-46961e513b-289f  l-46961e513b-28af  l-46961e513b-28bf  l-46961e513b-28cf  l-46961e513b-28df  l-46961e513b-28ef  l-46961e513b-28f E DF AQ AQ AQ DDDDD f  l-46961e513b-299f  l-46961e513b-29af  l-46961e513b-29bf  l-46961e513b-29cf  l-46961e513b-29df  l-46961e513b-29e E. DF AQ AQ AQ AQ  ApQ  A
Q   g  vecsAQ g  ec-:vector-filterAQ g  listAQ g  k	AQ 
	  
 AQ A|Q 	 AQ AJQ  AzQ AQ ANQ   ASQ   AQ   	      !AQ "!	 #" $AQ %AQ &$	% '& (' )g  m-46961e513b-2a6*)C +* ,f  l-46961e513b-2a8-, .EH+- /DF. 0A/Q 1@0 21? 3???2 4X 5*DDD 6f  l-46961e513b-2ab7f  l-46961e513b-2ac8f  l-46961e513b-2ad9f  l-46961e513b-2ae:6789 ;E45: <D;F. =A<Q >A
<Q ?> @A<Q AA<Q BA<Q CB D??? EX F*DD Gf  l-46961e513b-2b4Hf  l-46961e513b-2b5If  l-46961e513b-2b6JGHI KEEFJ LDKF. MALQ NA
LQ ON PALQ QALQ RALQ SR Tg  m-46961e513b-2baUTC VU Wf  l-46961e513b-2bcXW YEHVX ZDFY [AZQ \@[ ]\? ^]g_?^`?_a?`bX cUDDDDD df  l-46961e513b-2bfef  l-46961e513b-2c0ff  l-46961e513b-2c1gf  l-46961e513b-2c2hf  l-46961e513b-2c3if  l-46961e513b-2c4jdefghi kEbcj lDkFY mAlQ nAlQ oAlQ pX qUDDD rf  l-46961e513b-2cdsf  l-46961e513b-2cetf  l-46961e513b-2cfuf  l-46961e513b-2d0vrstu wEpqv xDwFY yAxQ zA
xQ {AxQ |{ }X- ~UDDDD f  l-46961e513b-2d6f  l-46961e513b-2d7f  l-46961e513b-2d8f  l-46961e513b-2d9f  l-46961e513b-2da E}~ DFY AQ AQ  ,
 ????y X- f  l-46961e513b-2e1f  l-46961e513b-2e2f  l-46961e513b-2e3f  l-46961e513b-2e4 Eq DFY AQ AQ g  bAQ AQ AQ AQ g  integer?AQ  g  exact?AQ    g  errorAQ f  *arguments of :range are not exact integer AQ f  (use :real-range?)AQ A
Q AQ     A|Q   AQ AQ  ,	 ???? f  l-46961e513b-2eaf  l-46961e513b-2ebf  l-46961e513b-2ecf  l-46961e513b-2ed Eq DFY AQ AQ AQ AQ AQ AQ AQ  AQ    AQ AQ AQ A
Q AQ     g  >AQ   AQ g  -AQ  ?????y f  l-46961e513b-2f3f  l-46961e513b-2f4f  l-46961e513b-2f5f  l-46961e513b-2f6f  l-46961e513b-2f7 E}~ DFY AQ AQ g  aAQ AQ AQ AQ AQ AQ  AQ      AQ AQ AQ AQ     A|Q   AQ  AQ  ????? f  l-46961e513b-2fef  l-46961e513b-2fff  l-46961e513b-300f  l-46961e513b-301f  l-46961e513b-302 	E}~ 
D	FY A
Q A
Q A
Q A
Q g  sA
Q A	
Q  g  stopA
Q A

Q   A
Q A
Q A
Q A
Q  A
Q     !  "! #A
Q $A
Q %A
Q &#$% '"& (' ) *A
Q + , -A
Q .A
Q /A
Q 0/ 1?????? 2g  arg33X-2 4f  l-46961e513b-3095f  l-46961e513b-30a6f  l-46961e513b-30b7f  l-46961e513b-30c8f  l-46961e513b-30d9f  l-46961e513b-30e:456789 ;E3c: <D;FY =A<Q >A<Q ?A<Q @A<Q AA<Q BA<Q CA
<Q DBC ED FA<Q GA<Q HA<Q IA<Q JI? KA<Q LK? MI@ NK@ OIA PKA QHJLMNOP RGQ SA<Q TA<Q UA<Q VSTU?@A WFRV Xg  zero?YAX<Q ZYA [f  $step size must not be zero in :range\A[<Q ]S\ ^FZ] _A<Q `A<Q ag  *bAa<Q cg  maxdAc<Q eg  ceilingfAe<Q gg  /hAg<Q iA<Q ji@? khjA lfk mdCl nbmA o`?n p_Bo qW^p r? sg  =tAs<Q uB v> wA<Q xA yg  m-46961e513b-315zyC {zDDD |f  l-46961e513b-31a}f  l-46961e513b-31b~f  l-46961e513b-31cf  l-46961e513b-31d|}~ Ep{ z f  l-46961e513b-317 EH DF AQ AQ AQ  A
Q AQ  DF AQ @ ? ???? X zDDDD f  l-46961e513b-323f  l-46961e513b-324f  l-46961e513b-325f  l-46961e513b-326f  l-46961e513b-327 E DF AQ AQ A
Q AQ  f  l-46961e513b-32ef  l-46961e513b-32ff  l-46961e513b-330f  l-46961e513b-331f  l-46961e513b-332 E} DF AQ AQ AQ  AQ  ????? X- zDDDDD f  l-46961e513b-339f  l-46961e513b-33af  l-46961e513b-33bf  l-46961e513b-33cf  l-46961e513b-33df  l-46961e513b-33e E DF AQ AQ AQ  f  l-46961e513b-346f  l-46961e513b-347f  l-46961e513b-348f  l-46961e513b-349f  l-46961e513b-34af  l-46961e513b-34b E3 DF AQ AQ AQ  ?????? X-2 zDDDDDD f  l-46961e513b-353f  l-46961e513b-354f  l-46961e513b-355f  l-46961e513b-356f  l-46961e513b-357f  l-46961e513b-358f  l-46961e513b-359 E DF AQ AQ AQ AQ AQ g  istopAQ A
Q   AQ AQ AQ g  real?AQ      AQ f  %arguments of :real-range are not realAQ   AQ  AQ       AQ g  exact->inexactAQ      AgQ AQ      	A|Q 
 AQ AaQ AQ AQ  g  m-46961e513b-361C  f  l-46961e513b-363 EH DF AQ @ ? ????? DDDDD f  l-46961e513b-366f  l-46961e513b-367f  l-46961e513b-368f  l-46961e513b-369 f  l-46961e513b-36a!f  l-46961e513b-36b" ! #E" $D#F %A$Q &A$Q 'A$Q (DDDD )f  l-46961e513b-373*f  l-46961e513b-374+f  l-46961e513b-375,f  l-46961e513b-376-f  l-46961e513b-377.)*+,- /E}(. 0D/F 1A0Q 2A0Q 3g  imax4A30Q 5g  char->integer6A50Q 7A0Q 8g  <=9A80Q :974 ;g  integer->char<A;0Q =<7 >= ?A0Q @A0Q AA0Q B@7A CB D?C Eg  m-46961e513b-37dFEC GF Hf  l-46961e513b-37fIH JEHGI KDFJ LAKQ M@L NM? ONgP?OQ?PR?QSFDDDDD Tf  l-46961e513b-382Uf  l-46961e513b-383Vf  l-46961e513b-384Wf  l-46961e513b-385Xf  l-46961e513b-386Yf  l-46961e513b-387ZTUVWXY [EbSZ \D[FJ ]A\Q ^A\Q _A\Q `FDDD af  l-46961e513b-390bf  l-46961e513b-391cf  l-46961e513b-392df  l-46961e513b-393eabcd fE;`e gDfFJ hAgQ ig  readjAigQ kj lFDDDD mf  l-46961e513b-399nf  l-46961e513b-39aof  l-46961e513b-39bpf  l-46961e513b-39cqf  l-46961e513b-39drmnopq sE}lr tDsFJ uAtQ vAtQ wg  portxAwtQ yg  	read-proczAytQ {zx |{ }AtQ ~g  eof-object?A~tQ v AtQ | g  m-46961e513b-3a3C  f  l-46961e513b-3a5 EH DF AQ @ ? h???g  dispatchX DDDDDD f  l-46961e513b-3a8f  l-46961e513b-3a9f  l-46961e513b-3aaf  l-46961e513b-3abf  l-46961e513b-3acf  l-46961e513b-3adf  l-46961e513b-3ae E DF AQ AQ AQ X DDDDD f  l-46961e513b-3b8f  l-46961e513b-3b9f  l-46961e513b-3baf  l-46961e513b-3bbf  l-46961e513b-3bcf  l-46961e513b-3bd E DF AQ AQ g  dAQ g  argsAQ AQ AQ AQ  g  emptyAQ    AQ   AQ AQ g  
procedure?AQ   AQ f  %unrecognized arguments in dispatchingAQ g  quoteAQ        g  eq?AQ   AQ  ?g X g  m-46961e513b-3c5C DD f  l-46961e513b-3caf  l-46961e513b-3cbf  l-46961e513b-3cc E  f  l-46961e513b-3c7 EH DF AQ AQ  DF AQ @ AQ @ gg  eachy T??T ?? g  lvg  lig  vX
 DDDDDDDDDDD f  l-46961e513b-3d2f  l-46961e513b-3d3f  l-46961e513b-3d4f  l-46961e513b-3d5f  l-46961e513b-3d6f  l-46961e513b-3d7f  l-46961e513b-3d8 f  l-46961e513b-3d9f  l-46961e513b-3daf  l-46961e513b-3dbf  l-46961e513b-3dcf  l-46961e513b-3dd  E DF A	Q 	AQ 
g  map
 
 g  ne2AQ AQ   AQ  g  lambdaAQ AQ  AQ AQ  AzQ AQ g  valueAQ    ! "X #D $f  l-46961e513b-3f4%f  l-46961e513b-3f5&$% 'E"#& (D'F )A(Q *f  illegal macro call+A*(Q ,)+ -f  dispatching conflict.g  length/g  SRFI420g  string?1g  input-port?2g  char?3g  list?4g  vector?5g  vector->list6g  
:-dispatch7f  not a procedure8g  m-46961e513b-3f898C :9 ;f  l-46961e513b-3fa<; =EH:< >DF= ?A>Q @@? A@? BAgC?BD?CE?DF9DDDDD Gf  l-46961e513b-3fdHf  l-46961e513b-3feIf  l-46961e513b-3ffJf  l-46961e513b-400Kf  l-46961e513b-401Lf  l-46961e513b-402MGHIJKL NEbFM ODNF= PAOQ QAOQ RA6OQ S9DDDD Tf  l-46961e513b-40bUf  l-46961e513b-40cVf  l-46961e513b-40dWf  l-46961e513b-40eXf  l-46961e513b-40fYTUVWX ZESY [DZF= \A[Q ]A6[Q ^g  m-46961e513b-416_^C `_ af  l-46961e513b-418ba cEH`b dDFc eABdQ f@e gfThgji?hj?ikg  x0lg  etc2mg  etc3nXkkYmlmZ o_DDDDDDD pf  l-46961e513b-41bqf  l-46961e513b-41crf  l-46961e513b-41dsf  l-46961e513b-41etf  l-46961e513b-41fuf  l-46961e513b-420vf  l-46961e513b-421wf  l-46961e513b-422xpqrstuvw yEnox zDyFc {A%zQ |ABzQ }?,~?}XkklmlmZ f  l-46961e513b-42ef  l-46961e513b-42ff  l-46961e513b-430f  l-46961e513b-431f  l-46961e513b-432f  l-46961e513b-433f  l-46961e513b-434f  l-46961e513b-435 Eo DFc A%Q ABQ g  f1g  f2Xk _DDDD f  l-46961e513b-440f  l-46961e513b-441f  l-46961e513b-442f  l-46961e513b-443f  l-46961e513b-444 E DFc A%Q ABQ  g  	qualifierXk _DDDDD f  l-46961e513b-44bf  l-46961e513b-44cf  l-46961e513b-44df  l-46961e513b-44ef  l-46961e513b-44ff  l-46961e513b-450 E DFc AQ AQ AQ  AQ AQ   A!Q AQ AQ AzQ AQ      g  m-46961e513b-457C  f  l-46961e513b-459 EH DF ABQ @ Ti?Č?ŌXkkYmlZ DDDDDD f  l-46961e513b-45cf  l-46961e513b-45df  l-46961e513b-45ef  l-46961e513b-45ff  l-46961e513b-460f  l-46961e513b-461f  l-46961e513b-462 E DF A$Q ABQ XkklmlZ f  l-46961e513b-46df  l-46961e513b-46ef  l-46961e513b-46ff  l-46961e513b-470f  l-46961e513b-471f  l-46961e513b-472f  l-46961e513b-473 E DF A$Q ABQ Xk DDD f  l-46961e513b-47df  l-46961e513b-47ef  l-46961e513b-47ff  l-46961e513b-480 E DF A$Q ABQ  Xk DDDD f  l-46961e513b-486f  l-46961e513b-487f  l-46961e513b-488f  l-46961e513b-489f  l-46961e513b-48a E DF AQ AQ A!Q AQ  g  reverseXmZ g  m-46961e513b-490 C  DD f  l-46961e513b-495f  l-46961e513b-496f  l-46961e513b-497 E   f  l-46961e513b-492	 
EH	 DF
 AQ A$Q AQ  g  consAQ  g  applyg  m-46961e513b-49cC DD f  l-46961e513b-4a1f  l-46961e513b-4a2f  l-46961e513b-4a3 E  f  l-46961e513b-49e EH  DF !A Q "Ad Q #A' Q $g  list->string%g  m-46961e513b-4a8&%C '&DD (f  l-46961e513b-4ad)f  l-46961e513b-4ae*f  l-46961e513b-4af+()* ,E'+ -& .f  l-46961e513b-4aa/. 0EH-/ 1D,F0 2A$1Q 3A'1Q 4g  m-46961e513b-4b454C 65DD 7f  l-46961e513b-4b98f  l-46961e513b-4ba9f  l-46961e513b-4bb:789 ;E6: <5 =f  l-46961e513b-4b6>= ?EH<> @D;F? AA@Q BA@Q CA'@Q Dg  list->vectorEg  m-46961e513b-4c0FEC GFDD Hf  l-46961e513b-4c5If  l-46961e513b-4c6Jf  l-46961e513b-4c7KHIJ LEGK MF Nf  l-46961e513b-4c2ON PEHMO QDLFP RADQQ SA'QQ Tg  m-46961e513b-4ccUTC VU Wf  l-46961e513b-4ceXW YEHVX ZDFY [ABZQ \@[ ]\T^]h_?^`?_aXkYmZ bUDDDDD cf  l-46961e513b-4d1df  l-46961e513b-4d2ef  l-46961e513b-4d3ff  l-46961e513b-4d4gf  l-46961e513b-4d5hf  l-46961e513b-4d6icdefgh jEabi kDjFY lA0kQ mABkQ nXklmZ of  l-46961e513b-4e0pf  l-46961e513b-4e1qf  l-46961e513b-4e2rf  l-46961e513b-4e3sf  l-46961e513b-4e4tf  l-46961e513b-4e5uopqrst vEnbu wDvFY xA0wQ yABwQ zX {UDD |f  l-46961e513b-4ee}f  l-46961e513b-4ef~f  l-46961e513b-4f0|}~ Ez{ DFY A0Q ABQ  X UDDD f  l-46961e513b-4f5f  l-46961e513b-4f6f  l-46961e513b-4f7f  l-46961e513b-4f8 E DFY AQ ApQ AQ g  make-vectorAQ   AQ A
Q   A!Q AQ A|Q  AzQ g  vector-set!AQ AQ AQ AQ    AQ f  )vector is too short for the comprehensionAQ   AsQ  f  (vector is too long for the comprehensionAQ    g  m-46961e513b-4fdC DD f  l-46961e513b-502f  l-46961e513b-503f  l-46961e513b-504 E  f  l-46961e513b-4ff EH DF A$Q AQ  g  m-46961e513b-509C DD f  l-46961e513b-50ef  l-46961e513b-50ff  l-46961e513b-510 E  f  l-46961e513b-50b EH DF A$Q AaQ  g  m-46961e513b-515C DD f  l-46961e513b-51af  l-46961e513b-51bf  l-46961e513b-51c E  f  l-46961e513b-517 EH DF A%Q g  minAQ   g  m-46961e513b-521C DD f  l-46961e513b-526f  l-46961e513b-527f  l-46961e513b-528 E  f  l-46961e513b-523 EH DF A%Q AcQ   g  m-46961e513b-52dC  f  l-46961e513b-52f EH DF ABQ @ Th	 ?	?	 	g  default	X	kYmZ 	DDDDD 	f  l-46961e513b-532	f  l-46961e513b-533	f  l-46961e513b-534	f  l-46961e513b-535		f  l-46961e513b-536	
f  l-46961e513b-537								
 	E			 	D	F 	A&	Q 	AB	Q 	X	klmZ 	f  l-46961e513b-541	f  l-46961e513b-542	f  l-46961e513b-543	f  l-46961e513b-544	f  l-46961e513b-545	f  l-46961e513b-546							 	E			 	D	F 	A&	Q 	AB	Q 	X	 	DD 	f  l-46961e513b-54f	f  l-46961e513b-550	 f  l-46961e513b-551	!			  	"E			! 	#D	"F 	$A&	#Q 	%AB	#Q 	&	% 	'X	 	(DDD 	)f  l-46961e513b-556	*f  l-46961e513b-557	+f  l-46961e513b-558	,f  l-46961e513b-559	-	)	*	+	, 	.E	'	(	- 	/D	.F 	0A	/Q 	1A	/Q 	2A!	/Q 	3A	/Q 	4	1 	5g  m-46961e513b-55e	6	5C 	7	6 	8f  l-46961e513b-560	9	8 	:EH	7	9 	;DF	: 	<AB	;Q 	=@	< 	>	=T	?	>h	@?	?	A?	@	B	6DDDDD 	Cf  l-46961e513b-563	Df  l-46961e513b-564	Ef  l-46961e513b-565	Ff  l-46961e513b-566	Gf  l-46961e513b-567	Hf  l-46961e513b-568	I	C	D	E	F	G	H 	JE		B	I 	KD	JF	: 	LA#	KQ 	MAB	KQ 	Nf  l-46961e513b-572	Of  l-46961e513b-573	Pf  l-46961e513b-574	Qf  l-46961e513b-575	Rf  l-46961e513b-576	Sf  l-46961e513b-577	T	N	O	P	Q	R	S 	UE		B	T 	VD	UF	: 	WA#	VQ 	XAB	VQ 	Y	6DD 	Zf  l-46961e513b-580	[f  l-46961e513b-581	\f  l-46961e513b-582	]	Z	[	\ 	^E		Y	] 	_D	^F	: 	`A#	_Q 	aAB	_Q 	b	a 	c	6DDD 	df  l-46961e513b-587	ef  l-46961e513b-588	ff  l-46961e513b-589	gf  l-46961e513b-58a	h	d	e	f	g 	iE	'	c	h 	jD	iF	: 	kA	jQ 	lA	jQ 	mA	jQ 	nA	jQ 	o	m	n 	p	o 	qg  ec-guarded-do-ec	rA	q	jQ 	sAB	jQ 	tAz	jQ 	uA	jQ 	vA	jQ 	w	u	m	v 	x	w 	y	l 	zg  m-46961e513b-58f	{	zC 	|	{ 	}f  l-46961e513b-591	~	} 	EH	|	~ 	DF	 	AB	Q 	@	 		T		T				??	? 	Xkl{ 		{DDDD 	f  l-46961e513b-594	f  l-46961e513b-595	f  l-46961e513b-596	f  l-46961e513b-597	f  l-46961e513b-598						 	E			 	D	F	 	A	q	Q 	AB	Q 	A	Q 	@	 		? 		T				??	? 	XY{ 	f  l-46961e513b-5a1	f  l-46961e513b-5a2	f  l-46961e513b-5a3	f  l-46961e513b-5a4	f  l-46961e513b-5a5						 	E			 	D	F	 	A	Q 	A	q	Q 	AB	Q 	A	Q 	@	 		? 		T				??	? 	f  l-46961e513b-5ad	f  l-46961e513b-5ae	f  l-46961e513b-5af	f  l-46961e513b-5b0	f  l-46961e513b-5b1						 	E			 	D	F	 	A	Q 	A	Q 	A	q	Q 	AB	Q 	A	Q 	@	 		T		T				??	? 	f  l-46961e513b-5b9	f  l-46961e513b-5ba	f  l-46961e513b-5bb	f  l-46961e513b-5bc	f  l-46961e513b-5bd						 	E			 	D	F	 	A	Q 	A	Q 	A	q	Q 	AB	Q 	A	Q 	@	 		T		T			̌	??	? 	f  l-46961e513b-5c6	f  l-46961e513b-5c7	f  l-46961e513b-5c8	f  l-46961e513b-5c9	f  l-46961e513b-5ca						 	E			 	D	F	 	A	Q 	A	Q 	A	q	Q 	AB	Q 	Az	Q 	@	 		T		T			ތ	??	? 	XZY{ 	f  l-46961e513b-5d3	f  l-46961e513b-5d4	f  l-46961e513b-5d5	f  l-46961e513b-5d6	f  l-46961e513b-5d7						 	E			 	D	F	 	Az	Q 	A	q	Q 	AB	Q 		g	??	? 	XY{ 	f  l-46961e513b-5e0	f  l-46961e513b-5e1	f  l-46961e513b-5e2	f  l-46961e513b-5e3	f  l-46961e513b-5e4						 	E			 	D	F	 	A!	Q 	A	Q 	A	q	Q 	AB	Q 		 	??	? 	X{ 		{DD 
 f  l-46961e513b-5ec
f  l-46961e513b-5ed
f  l-46961e513b-5ee

 

 
E		
 
D
F	 
A!
Q 
g  m-46961e513b-5f2

C 
	
 

f  l-46961e513b-5f4


 
EH
	
 
DF
 
AB
Q 
@
 

T

h
?

XkYmZ 

DDDD 
f  l-46961e513b-5f7
f  l-46961e513b-5f8
f  l-46961e513b-5f9
f  l-46961e513b-5fa
f  l-46961e513b-5fb





 
E


 
D
F
 
A
Q 
AB
Q 
f  l-46961e513b-604
 f  l-46961e513b-605
!f  l-46961e513b-606
"f  l-46961e513b-607
#f  l-46961e513b-608
$

 
!
"
# 
%En

$ 
&D
%F
 
'A
&Q 
(AB
&Q 
)X 
*
D 
+f  l-46961e513b-610
,f  l-46961e513b-611
-
+
, 
.E
)
*
- 
/D
.F
 
0A
/Q 
1AB
/Q 
2
1 
3X 
4
DD 
5f  l-46961e513b-615
6f  l-46961e513b-616
7f  l-46961e513b-617
8
5
6
7 
9E
3
4
8 
:D
9F
 
;A#
:Q 
<A
:Q 
=A
:Q 
>A
:Q 
?
> 
@g  m-46961e513b-61b
A
@C 
B
A 
Cf  l-46961e513b-61d
D
C 
EEH
B
D 
FDF
E 
GAB
FQ 
H@
G 
I
HT
J
Ih
K?
J
L
ADDDD 
Mf  l-46961e513b-620
Nf  l-46961e513b-621
Of  l-46961e513b-622
Pf  l-46961e513b-623
Qf  l-46961e513b-624
R
M
N
O
P
Q 
SE

L
R 
TD
SF
E 
UA"
TQ 
VAB
TQ 
Wf  l-46961e513b-62d
Xf  l-46961e513b-62e
Yf  l-46961e513b-62f
Zf  l-46961e513b-630
[f  l-46961e513b-631
\
W
X
Y
Z
[ 
]En
L
\ 
^D
]F
E 
_A"
^Q 
`AB
^Q 
a
AD 
bf  l-46961e513b-639
cf  l-46961e513b-63a
d
b
c 
eE
)
a
d 
fD
eF
E 
gA"
fQ 
hAB
fQ 
i
h 
j
ADD 
kf  l-46961e513b-63e
lf  l-46961e513b-63f
mf  l-46961e513b-640
n
k
l
m 
oE
3
j
n 
pD
oF
E 
qA#
pQ 
rA
pQ 
sA
pQ 
tA
pQ 
uA
pQ 
v
u C 5    h     ]4	
15 44 >  "  G   45i46i5 7>  "  G  4:!;>Wcf h   M   ]45C E       g  dummy
		 g  q		 g  etc			  			   Cjx   h   p   ] C   h       g  dummy
		 g  q1		 g  q2			 g  etc1			 g  etc			  			   Cy      h   >   ]C     6       g  dummy
		 g  cmd		  			   C        h   P   ]  C       H       g  dummy
		 g  test		 g  cmd			  			   C    h   P   ]   C  H       g  dummy
		 g  test		 g  cmd			  			   C    h   P   ]  C    H       g  dummy
		 g  test		 g  cmd			  			   C    h   P   ]  C    H       g  dummy
		 g  test		 g  cmd			  			   Cf    h   O   ]4  5C G       g  dummy
		 g  etc		 g  cmd			  			   C       h       , 3   C        g  dummy
		 g  olet		 g  lbs			 g  ne1?			 g  ilet			 g  ne2?			 g  lss			 g  cmd			  			   C        h   p   ] C     h       g  dummy
		 g  g		 g  arg1			 g  arg			 g  cmd			  			   C h     ]Q4 5$  @4 5$  @4 5$  @4 5$  	@4 
5$  @4 5$  @4 5$  @4 5$  @4 5		$  	@4 5

$  
@ 6             g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp		~  g  tmp	   g  tmp	   g  tmp		   g  tmp	
    g  filenamef  srfi/srfi-42/ec.scm
	:	 	   g  
macro-typeg  syntax-rulesg  patternsg  nestedg  qg  ... g  etcg  ... g  q1g  q2g  etc1g  etcg  ... g  cmd g  ifg  test g  cmd g  notg  test g  cmd g  andg  testg  ... g  cmd g  org  testg  ... g  cmd g  beging  etcg  ... g  cmd g  :dog  oletg  lbsg  ne1?g  iletg  ne2?g  lss g  cmd g  gg  arg1g  argg  ... g  cmd   C5!R4:;>f!"    h`      , 
3 
44	   5     5 C              g  dummy
		Y g  cmd		Y g  obs			Y g  oc			Y g  lbs			Y g  ne1?			Y g  ibs			Y g  ic			Y g  ne2?			Y g  ls				Y  
		Y	
   C    h(     ]	4 5$  @ 6            g  x
		" g  tmp		"  g  filenamef  srfi/srfi-42/ec.scm
	g	 		"  g  
macro-typeg  syntax-rulesg  patternsg  cmdg  :dog  letg  obsg  ocg  ... g  lbsg  ne1?g  letg  ibsg  icg  ... g  ne2?g  lsg  ...     C5R4:	;>/h   E   ]C   =       g  dummy
		 g  
consequent		  			   C2= h   E   ]C   =       g  dummy
		 g  
consequent		  			   C?      h   \   ]C   T       g  dummy
		 g  
consequent		 g  	alternate			  			   CA       h   \   ]C   T       g  dummy
		 g  
consequent		 g  	alternate			  			   CGPQ       h   W   ]  C       O       g  dummy
		 g  test		 g  
consequent			  			   CS^_    h   n   ]  C     f       g  dummy
		 g  test		 g  
consequent			 g  	alternate			  			   Cdlm     h   B   ] C   :       g  dummy
		 g  command		  			   Cqwx h   B   ] C   :       g  dummy
		 g  command		  			   C{f       h   g   ]45 C   _       g  dummy
		 g  done		 g  to-do1			 g  to-do2			  			   Cf  h   f   ]4 5 C^       g  dummy
		 g  done		 g  to-do1			 g  to-do			  			   C        h   -   ]C   %       g  dummy
		  		   C      h   B   ]C   :       g  dummy
		 g  command		  			   C    h   X   ]C     P       g  dummy
		 g  command1		 g  command			  			   Cy    h   E   ]C   =       g  dummy
		 g  
expression		  			   C     hP    ]q4 5$  @4 5$  @4 5$  @4 5$  	@4 
5$  @4 5$  @4 5$  @4 5$  @4 5		$  	@4 5

$  
@4 5$  @4 5$  @4 5$  @4 5$  @ 6         g  x
	M g  tmp	M g  tmp		"M g  tmp		9M g  tmp		PM g  tmp		gM g  tmp		~M g  tmp	 M g  tmp	 M g  tmp		 M g  tmp	
 M g  tmp	 M g  tmp	M g  tmp	M g  tmp	6M  g  filenamef  srfi/srfi-42/ec.scm
 	 	M  g  
macro-typeg  syntax-rulesg  patternsg  ifg  
consequent  g  ifg  
consequent  g  ifg  
consequentg  	alternate  g  ifg  
consequentg  	alternate  g  ifg  notg  notg  test  g  
consequent  g  ifg  notg  notg  test  g  
consequentg  	alternate  g  letg  commandg  ...  g  beging  commandg  ...  g  doneg  beging  to-do1g  ... g  to-do2g  ...  g  doneg  ... g  to-do1g  to-dog  ...   g  command  g  command1g  commandg  ...  g  
expression   C5	R4:;>f  h       , 3   6       g  dummy
		  g  cc		  g  olet			  g  lbs			  g  ne1?			  g  ilet			  g  ne2?			  g  lss			   		 	   C h   q   ] C  i       g  dummy
		 g  cc		 g  lbs			 g  ne1?			 g  lss			  			   C        h@     ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-42/ec.scm
 	 		9  g  
macro-typeg  syntax-rulesg  patternsg  ccg  ... g  oletg  lbsg  ne1?g  iletg  ne2?g  lss g  ccg  lbsg  ne1?g  lss   C5R4:;>        h    u   ]   Cm       g  dummy
		  g  cc		  g  var			  g  i			  g  
expression			   		 	   C   h    f   ]   C     ^       g  dummy
		 g  cc		 g  var			 g  
expression			  			   C   h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-42/ec.scm
 	 		9  g  
macro-typeg  syntax-rulesg  patternsg  ccg  varg  indexg  i g  
expression g  ccg  varg  
expression   C5R4:;>y  h   =   ]C   5       g  dummy
		 g  cc		  			   C h      ] C   x       g  dummy
		 g  cc		 g  g			 g  arg1			 g  arg			 g  gen			  			   C h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-42/ec.scm
 	 		9  g  
macro-typeg  syntax-rulesg  patternsg  cc g  ccg  gg  arg1g  argg  ... g  geng  ...   C5R4:;>+  h      ] C        g  dummy
		 g  cc		 g  g			 g  arg1			 g  arg			 g  gen			 g  result			  			   C4^_`fa       hh   g  , 3 454545 4545	 4
5  C   _      g  dummy
		e g  cc		e g  gens			e g  ob1			e g  oc1			e g  lb1			e g  ne1?1			e g  ib1			e g  ic1			e g  ne2?1				e g  ls1	
		e g  ob2			e g  oc2			e g  lb2			e g  ne1?2			e g  ib2			e g  ic2			e g  ne2?2			e g  ls2			e  		e	   Cbf        h   Q   ] 6   I       g  dummy
		 g  cc		 g  result			  			   C 
       hP   H  ]4 5$  @4 5$  @4 5$  @	 6@      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  srfi/srfi-42/ec.scm
 	 		P  g  
macro-typeg  syntax-rulesg  patternsg  ccg  gg  arg1g  argg  ... g  geng  ... g  result g  ccg  gensg  :dog  letg  ob1g  ... g  oc1g  ... g  lb1g  ... g  ne1?1g  letg  ib1g  ... g  ic1g  ... g  ne2?1g  ls1g  ...  g  :dog  letg  ob2g  ... g  oc2g  ... g  lb2g  ... g  ne1?2g  letg  ib2g  ... g  ic2g  ... g  ne2?2g  ls2g  ...   g  ccg  ... g  result   C5R4:;>cv      h      ] C   y       g  dummy
		 g  cc		 g  g			 g  arg1			 g  arg			 g  test			  			   C        h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-42/ec.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  ccg  gg  arg1g  argg  ... g  test   C5R4:d;>       h(      , 	3 	  C           g  dummy
		$ g  cc		$ g  test			$ g  olet			$ g  lbs			$ g  ne1?			$ g  ilet			$ g  ne2?			$ g  lss			$  			$		   C        h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-42/ec.scm
>	 		"  g  
macro-typeg  syntax-rulesg  patternsg  ccg  testg  :dog  oletg  lbsg  ne1?g  iletg  ne2?g  lss    C5dR4:;>f 	  hh   0  , 3 454	
  54	 54	  5  C       (      g  dummy
		a g  cc		a g  test			a g  ib-let			a g  ib-save			a g  
ib-restore			a g  olet			a g  lbs			a g  ne1?			a g  ib-var				a g  ib-rhs	
		a g  ib			a g  ic			a g  ne2?			a g  lss			a  		a	   Cf   hX     , 3 45	  4
 5    C             g  dummy
		R g  cc		R g  test			R g  ib-let			R g  ib-save			R g  
ib-restore			R g  ob			R g  oc			R g  lbs			R g  ne1?				R g  ic	
		R g  ne2?			R g  lss			R  		R	   C   h@     ]4 5$  @4 5$  @ 6             g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-42/ec.scm
C	 		9  g  
macro-typeg  syntax-rulesg  patternsg  ccg  testg  ib-letg  ... g  ib-saveg  ... g  
ib-restoreg  ... g  :dog  oletg  lbsg  ne1?g  letg  ib-varg  ib-rhs g  ibg  ... g  icg  ... g  ne2?g  lss  g  ccg  testg  ib-letg  ... g  ib-saveg  ... g  
ib-restoreg  ... g  :dog  letg  obg  ... g  ocg  ... g  lbsg  ne1?g  letg  icg  ... g  ne2?g  lss    C5R4:;>c       h      ] C   y       g  dummy
		 g  cc		 g  g			 g  arg1			 g  arg			 g  test			  			   C        h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-42/ec.scm
n	 		"  g  
macro-typeg  syntax-rulesg  patternsg  ccg  gg  arg1g  argg  ... g  test   C5R4:;>     h(      , 	3 	   C         g  dummy
		& g  cc		& g  test			& g  olet			& g  lbs			& g  ne1?			& g  ilet			& g  ne2?			& g  lss			&  			&		   C        h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-42/ec.scm
s	 		"  g  
macro-typeg  syntax-rulesg  patternsg  ccg  testg  :dog  oletg  lbsg  ne1?g  iletg  ne2?g  lss    C5R4:;>)*+  h    n   ]  C       f       g  dummy
		 g  cc		 g  var			 g  i			 g  arg			  			   C,9:     h      ] C {       g  dummy
		 g  cc		 g  var			 g  arg1			 g  arg2			 g  arg			  			   CDFHMEQW h0   _   ]    C      W       g  dummy
		* g  cc		* g  var			* g  arg			*  		*	   C 
 hP   +  ]4 5$  @4 5$  @4 5$  @	 6#      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  srfi/srfi-42/ec.scm
}	 		P  g  
macro-typeg  syntax-rulesg  patternsg  ccg  varg  indexg  i g  argg  ... g  ccg  varg  arg1g  arg2g  argg  ... g  ccg  varg  arg   C5R4:;>blmotz{}~   hP   n   ]  	    
  C   f       g  dummy
		M g  cc		M g  var			M g  i			M g  arg			M  		M	   C  h       ]  C         g  dummy
		 g  cc		 g  var			 g  i			 g  arg1			 g  arg2			 g  arg			  			   Cj  h   q   ]C    i       g  dummy
		 g  cc		 g  var			 g  arg1			 g  arg			  			   C 
       hP   D  ]4 5$  @4 5$  @4 5$  @	 6<      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  srfi/srfi-42/ec.scm
	 		P  g  
macro-typeg  syntax-rulesg  patternsg  ccg  varg  indexg  i g  arg g  ccg  varg  indexg  i g  arg1g  arg2g  argg  ... g  ccg  varg  arg1g  argg  ...   C5R4:;>        h   _   ] CW       g  dummy
		 g  cc		 g  var			 g  arg			  			   C      hP   n   ]  	    
  C   f       g  dummy
		M g  cc		M g  var			M g  i			M g  arg			M  		M	   C  h(      ]  C             g  dummy
		" g  cc		" g  var			" g  i			" g  arg1			" g  arg2			" g  arg			"  		"	   C, #(      hH      ]    	
  C       {       g  dummy
		A g  cc		A g  var			A g  arg1			A g  arg2			A g  arg			A  		A	   C      hh   t  ]!4 5$  @4 5$  @4 5$  @4 5$  	@
 6 l      g  x
		g g  tmp		g g  tmp		"	g g  tmp		9	g g  tmp		P	g  g  filenamef  srfi/srfi-42/ec.scm
	 		g  g  
macro-typeg  syntax-rulesg  patternsg  ccg  varg  arg g  ccg  varg  indexg  i g  arg g  ccg  varg  indexg  i g  arg1g  arg2g  argg  ... g  ccg  varg  arg1g  arg2g  argg  ...   C5R     h0      ] (  C4 5
$   6 4 5C           g  vecs
		,  g  filenamef  srfi/srfi-42/ec.scm

									 				
						
	"		#		(	.	*		+	
 		,  g  nameg  ec-:vector-filter CR4:;>3=?@AC       h0   ]   ]   C    U       g  dummy
		, g  cc		, g  var			, g  i			,  		,	   CDMOPQS     h    N   ]   C F       g  dummy
		 g  cc		 g  var			  			   C   h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-42/ec.scm
	 		9  g  
macro-typeg  syntax-rulesg  patternsg  ccg  varg  indexg  i  g  ccg  var   C5R4:;>amno  h       ]  C    x       g  dummy
		 g  cc		 g  var			 g  i			 g  arg1			 g  arg			  			   Cyz|        h   `   ]C    X       g  dummy
		 g  cc		 g  var			 g  arg1			  			   C   h   r   ]C    j       g  dummy
		 g  cc		 g  var			 g  arg1			 g  arg2			  			   C      h@   `   ]   	
  C       X       g  dummy
		9 g  cc		9 g  var			9 g  arg2			9  		9	   C        h@   `   ]   	
  C       X       g  dummy
		9 g  cc		9 g  var			9 g  arg2			9  		9	   C      h@   r   ]    	
  Cj       g  dummy
		@ g  cc		@ g  var			@ g  arg1			@ g  arg2			@  		@	   C()*+,-.0        hH   r   ]   	
  C       j       g  dummy
		A g  cc		A g  var			A g  arg1			A g  arg2			A  		A	   C1=>?@AEqrGtuvw`x  hP      ]    	
   C  |       g  dummy
		N g  cc		N g  var			N g  arg1			N g  arg2			N g  arg3			N  		N	   C     h   '  ]A4 5$  @4 5$  @4 5$  @4 5$  	@4 
5$  @4 5$  @4 5$  @4 5$  @ 6           g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp		~  g  tmp	   g  tmp	    	g  filenamef  srfi/srfi-42/ec.scm
	 	   g  
macro-typeg  syntax-rulesg  patternsg  ccg  varg  indexg  i g  arg1g  argg  ... g  ccg  varg  arg1 g  ccg  varg  arg1g  arg2 g  ccg  var
g  arg2 g  ccg  var
g  arg2	 g  ccg  varg  arg1g  arg2 g  ccg  varg  arg1g  arg2	 g  ccg  varg  arg1g  arg2g  arg3  	 C5R4:;>       h   `   ]C X       g  dummy
		 g  cc		 g  var			 g  arg1			  			   C     h    o   ] C    g       g  dummy
		 g  cc		 g  var			 g  i			 g  arg1			  			   C h   r   ]C j       g  dummy
		 g  cc		 g  var			 g  arg1			 g  arg2			  			   C      h       ] C    y       g  dummy
		 g  cc		 g  var			 g  i			 g  arg1			 g  arg2			  			   C1  h      ] C    |       g  dummy
		 g  cc		 g  var			 g  arg1			 g  arg2			 g  arg3			  			   C	
   hh      ]    	
       C           g  dummy
		d g  cc		d g  var			d g  i			d g  arg1			d g  arg2			d g  arg3			d  		d	   C      h     ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$  @4 5$  @ 6         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp		~   g  filenamef  srfi/srfi-42/ec.scm
5	 	   g  
macro-typeg  syntax-rulesg  patternsg  ccg  varg  arg1 g  ccg  varg  indexg  i g  arg1 g  ccg  varg  arg1g  arg2 g  ccg  varg  indexg  i g  arg1g  arg2 g  ccg  varg  arg1g  arg2g  arg3 g  ccg  varg  indexg  i g  arg1g  arg2g  arg3   C5R4:;>%&'    h       ]   C    y       g  dummy
		 g  cc		 g  var			 g  i			 g  arg1			 g  arg2			  			   C12467:>D 	       hH   r   ]         C       j       g  dummy
		A g  cc		A g  var			A g  arg1			A g  arg2			A  		A	   C       h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-42/ec.scm
X	 		9  g  
macro-typeg  syntax-rulesg  patternsg  ccg  varg  indexg  i g  arg1g  arg2 g  ccg  varg  arg1g  arg2   C5R4:;>R]^_  h       ]  C    x       g  dummy
		 g  cc		 g  var			 g  i			 g  arg1			 g  arg			  			   Chk   h   _   ]C       W       g  dummy
		 g  cc		 g  var			 g  arg			  			   Cuvxz|} 	 h8   r   ]       Cj       g  dummy
		8 g  cc		8 g  var			8 g  arg1			8 g  arg2			8  		8	   C 
      hP   %  ]4 5$  @4 5$  @4 5$  @	 6      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  srfi/srfi-42/ec.scm
j	 		P  g  
macro-typeg  syntax-rulesg  patternsg  ccg  varg  indexg  i g  arg1g  argg  ... g  ccg  varg  arg g  ccg  varg  arg1g  arg2   C5R4:;>    h       ]  C        g  dummy
		 g  cc		 g  var			 g  i			 g  dispatch			 g  arg1			 g  arg			  			   C,       hH      ]   	
 C              g  dummy
		A g  cc		A g  var			A g  dispatch			A g  arg1			A g  arg			A  		A	   C  h@     ]4 5$  @4 5$  @ 6             g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-42/ec.scm
~	 		9  g  
macro-typeg  syntax-rulesg  patternsg  ccg  varg  indexg  i g  dispatchg  arg1g  argg  ... g  ccg  varg  dispatchg  arg1g  argg  ...   C5R4:;> h   M   ]C  E       g  dummy
		 g  g		 g  arg			  			   C	f       h   :   ] C2       g  tmp-46961e513b-3ec
		  		   C     h   Z   ]  C    R       g  tmp-46961e513b-3f1
		 g  tmp-46961e513b-3f0		  			   C    h   Z   ]  C    R       g  tmp-46961e513b-3ee
		 g  tmp-46961e513b-3ed		  			   C !     h      , 3 4445545	
4454	  

45   55 	     5 C       g  dummy
	  g  var	  g  obs		  g  oc		  g  lv		  g  li		  g  ne1?		  g  i		  g  v		  g  ic			  g  ne2?	
	  g  ls		   	 	   Cy, h   >   ]C   6       g  dummy
		 g  var		  			   C 
  hP   s  ]4 5$  @4 5$  @4 5$  @	 6k      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  srfi/srfi-42/ec.scm
	 		P  g  
macro-typeg  syntax-rulesg  patternsg  gg  argg  ...  g  varg  :dog  letg  obsg  ocg  ... g  lvg  li g  ... g  ne1?g  letg  ig  v g  ... g  icg  ... g  ne2?g  lsg  ...   g  var   C5Rd-   hp   ?  ]4L  54L 5$  K$  B (  ($  "   $  "   6 4L 54L56C$  CC7      g  args
		p g  g1		p g  g2			p  g  filenamef  srfi/srfi-42/ec.scm
				
						 	
	&		+		/		:	,	=		A		L	,	N		R		U	5	X	9	Z	5	[	>	^	B	`	>	b		k	
 		p   C      h      ] O C    z       g  d1
		 g  d2		  g  filenamef  srfi/srfi-42/ec.scm

 			  g  nameg  dispatch-union C R./ h    m   ]	M'  MN M MNC C    e       g  empty
		 g  value		  g  filenamef  srfi/srfi-42/ec.scm
	 		   C0v      h(   m   ]	MM$  4L M5NMMNC C   e       g  empty
		% g  value		"  g  filenamef  srfi/srfi-42/ec.scm
	 		%   C      h(   m   ]	MM$  L MNMMNC C       e       g  empty
		! g  value		  g  filenamef  srfi/srfi-42/ec.scm
	 		!   C  h(   m   ]	MM$  M MNMMNC C     e       g  empty
		# g  value		   g  filenamef  srfi/srfi-42/ec.scm
	 		#   C1i~      h    m   ]	4M5#  M4L L5NC Ce       g  empty
		  g  value		  g  filenamef  srfi/srfi-42/ec.scm
	 		    C      h    m   ]	ML $  MMNC C      e       g  empty
		 g  value		  g  filenamef  srfi/srfi-42/ec.scm
	 		   C~ h    m   ]	4M5#  M4L L5NC Ce       g  empty
		  g  value		  g  filenamef  srfi/srfi-42/ec.scm
	 		    C25;      h(   m   ]	ML$  4M5N M MNC C     e       g  empty
		# g  value		   g  filenamef  srfi/srfi-42/ec.scm
	 		#   C h(   m   ]	MM$  M MNMMNC C     e       g  empty
		# g  value		   g  filenamef  srfi/srfi-42/ec.scm
	 		#   C h    m   ]	ML $  MMNC C      e       g  empty
		 g  value		  g  filenamef  srfi/srfi-42/ec.scm
	 		   C hP   m   ]	MM$  "  "M(  "  MNMN4M5N
N$  MMN M MNC C    e       g  empty
		L g  value	?	I  g  filenamef  srfi/srfi-42/ec.scm
	 		L   C h(   m   ]	MM$  4L M5NMMNC C   e       g  empty
		% g  value		"  g  filenamef  srfi/srfi-42/ec.scm
	 		%   Cd       h    m   ]	M'  MN M MNC C    e       g  empty
		 g  value		  g  filenamef  srfi/srfi-42/ec.scm
	 		   C h(   m   ]	MM$  M LMNMMNC C    e       g  empty
		$ g  value		!  g  filenamef  srfi/srfi-42/ec.scm
	 		$   C[ceh    m   ]	MM#  MML NC C    e       g  empty
		 g  value		  g  filenamef  srfi/srfi-42/ec.scm
	 		   C    hP   m   ]	MM$  "  "M(  "  MNMN4M5N
N$  MMN M MNC C    e       g  empty
		L g  value	?	I  g  filenamef  srfi/srfi-42/ec.scm
	 		L   C    h(   m   ]	MM$  4L M5NMMNC C   e       g  empty
		% g  value		"  g  filenamef  srfi/srfi-42/ec.scm
	 		%   C h    m   ]	M'  MN M MNC C    e       g  empty
		 g  value		  g  filenamef  srfi/srfi-42/ec.scm
	 		   C h(      ](  C4 5$    "C          g  pred
		% g  args		%  g  filenamef  srfi/srfi-42/ec.scm
							"						)	#	 			%	  g  nameg  every? C3     h    m   ]	M'  MN M MNC C    e       g  empty
		 g  value		  g  filenamef  srfi/srfi-42/ec.scm
	 		   C    h(   m   ]	MM$  4L M5NMMNC C   e       g  empty
		% g  value		"  g  filenamef  srfi/srfi-42/ec.scm
	 		%   C4
5h    m   ]	M'  MN M MNC C    e       g  empty
		 g  value		  g  filenamef  srfi/srfi-42/ec.scm
	 		   C 1       h  
  ]I4 5
$  C$ S $  HHO C45$   
H45K
HHO C$   
H45K
HHO C"  4	5$  

HH"  4
J>  "  G  "  4	J5$  "  "4J5$  $45$  4J5K"   "   JK
HHO C45$  45HO CC45$  45$  
HO C"$" 	$ &  "  /45$  "45$  45HO CCC"  ?45$  045$  !4545HHO C"""  4	5$  4	5$  
HH"  4
J>  "  G  "  4	J5$  "  "4J5$  $45$  4J5K"   "   JK
HHO C"""  J45$  ;45$  ,45$  45$  HO C"""""  @$  5$  *
4 5HHH
HHO C"v"r"  :45$  +45
H45K
HHO C"$  #$  45HH O C""	$ \   "  4	5$  4	5$  4	5$  
HH"  4
J>  "  G  "  4	J5$  "  "4J5$  545$  "  45$  4J5K"   "   JK
HH!O CCCC"  45$  45$  45$  y45$  j45$  [45$  L
H
$  4
">  "  G  "   4#
4$55KH%O C"""""""  M$  B$  7$  ,
4 5HHH
HH	&	O C"""	"  K45$  <45$  -45
H45K
HH'O C"h"d$  0$  %$  45HH(O C""~"z)O Q 4* 5$  4 ?HH+O C4 5$  )4 ?
H45K
HH,O C4- 5$  44./ 5?HH0O CC 
      g  args
	 g  key		 g  a1		!q g  t		,	; g  var		/	; g  len		G	f g  i		S	f g  var		V	f g  len		n  g  i		z  g  var		}  g  a	   g  istop	   g  t	   g  i	  g  var	  g  	read-proc	-D g  var	6D g  var	]i g  a1	 g  a2	 g  var	 g  imax	 g  i	 g  var	 g  a	 g  istop	 g  t	ah g  i	 g  var	 g  var	 g  vec	, g  len	, g  vecs	, g  k	, g  var	, g  str	Mn g  len	Mn g  i	[n g  var	^n g  t	 g  var	 g  a1	 g  a2	 g  a3	 g  a	z g  istop	z g  t	-E g  i	ez g  var	hz g  stop	 g  var	 g  vec	So g  len	So g  vecs	So g  k	Zo g  var		]o g  str	 g  len	 g  i	 g  var	 g  t	 g  var	 g  every?	 g  t	&5 g  var	)5 g  str	Jk g  len	Jk g  i	Xk g  var	[k g  t	 g  var	  Hg  filenamef  srfi/srfi-42/ec.scm
			
								!		!		&		*		,		<		F		G		i		m		n	 	 	 	!	+	-	F	G	Q	R	"\	]	z	}		%				%									 	
								"		.		<						!		4	9	C	D	r	u	y	|						%	6						*						"				"				"		*	1 	5	8 	!< 	? 	.C 	F	{				.								*						 	#&	6	B		C	%J	l	x		y	#|	1	#	 	   C        h   j   ] C   b       g  filenamef  srfi/srfi-42/ec.scm

 		
  g  nameg  make-initial-:-dispatch C(R4(i5 6R6 h   a   ] C   Y       g  filenamef  srfi/srfi-42/ec.scm

 		
  g  nameg  :-dispatch-ref CR76    h0      ]4 5$  "  4 >  "  G    C            g  dispatch
		+  g  filenamef  srfi/srfi-42/ec.scm
!
	"		"		#		#		#		)$	 		+  g  nameg  :-dispatch-set! CR4:;>EPQR    h       ] C    x       g  dummy
		 g  cc		 g  var			 g  i			 g  arg1			 g  arg			  			   Cj\]    h   q   ]C    i       g  dummy
		 g  cc		 g  var			 g  arg1			 g  arg			  			   C        h@     ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-42/ec.scm
'	 		9  g  
macro-typeg  syntax-rulesg  patternsg  ccg  varg  indexg  i g  arg1g  argg  ... g  ccg  varg  arg1g  argg  ...   C5R4:%;>j{|f       h(      , 3 4 5C       g  dummy
		( g  x0		( g  q1			( g  q			( g  etc1			( g  etc2			( g  etc3			( g  etc			(  		(	   C~        h(      , 3  C             g  dummy
		" g  x0		" g  q1			" g  q2			" g  etc1			" g  etc2			" g  etc3			" g  etc			"  		"	   C       h   u   ] C      m       g  dummy
		 g  x0		 g  
expression			 g  f1			 g  f2			  			   C1     hP      ]  	
 	     C       g  dummy
		P g  x0		P g  	qualifier			P g  
expression			P g  f1			P g  f2			P  		P	   C     hh     ]!4 5$  @4 5$  @4 5$  @4 5$  	@
 6       g  x
		g g  tmp		g g  tmp		"	g g  tmp		9	g g  tmp		P	g  g  filenamef  srfi/srfi-42/ec.scm
3	 		g  g  
macro-typeg  syntax-rulesg  patternsg  x0g  nestedg  q1g  ... g  qg  etc1g  etc2g  etc3g  etcg  ... g  x0g  q1g  q2g  etc1g  etc2g  etc3g  etcg  ... g  x0g  
expressiong  f1g  f2 g  x0g  	qualifierg  
expressiong  f1g  f2   C5%R4:$;>f      h(      ]4 5C              g  dummy
		! g  x0		! g  q1			! g  q			! g  etc1			! g  etc2			! g  etc			!  		!	   C}  h       ] C            g  dummy
		 g  x0		 g  q1			 g  q2			 g  etc1			 g  etc2			 g  etc			  			   C h   e   ] C]       g  dummy
		 g  x0		 g  
expression			 g  f2			  			   C     h0   |   ]    C      t       g  dummy
		* g  x0		* g  	qualifier			* g  
expression			* g  f2			*  		*	   C     hh     ]!4 5$  @4 5$  @4 5$  @4 5$  	@
 6       g  x
		g g  tmp		g g  tmp		"	g g  tmp		9	g g  tmp		P	g  g  filenamef  srfi/srfi-42/ec.scm
G	 		g  g  
macro-typeg  syntax-rulesg  patternsg  x0g  nestedg  q1g  ... g  qg  etc1g  etc2g  etcg  ... g  x0g  q1g  q2g  etc1g  etc2g  etcg  ... g  x0g  
expressiong  f2 g  x0g  	qualifierg  
expressiong  f2   C5$R4:';>hf     h    P   ]45 C      H       g  dummy
		 g  etc1		 g  etc			  			   C h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-42/ec.scm
Z	 		"  g  
macro-typeg  syntax-rulesg  patternsg  etc1g  etcg  ...   C5'R4:;>h!"#    h   P   ] C      H       g  dummy
		 g  etc1		 g  etc			  			   C h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-42/ec.scm
f	 		"  g  
macro-typeg  syntax-rulesg  patternsg  etc1g  etcg  ...   C5R4:-;>h23       h   P   ] CH       g  dummy
		 g  etc1		 g  etc			  			   C h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-42/ec.scm
k	 		"  g  
macro-typeg  syntax-rulesg  patternsg  etc1g  etcg  ...   C5-R4:,;>hABC    h   P   ] C      H       g  dummy
		 g  etc1		 g  etc			  			   C h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-42/ec.scm
w	 		"  g  
macro-typeg  syntax-rulesg  patternsg  etc1g  etcg  ...   C5,R4:/;>hRS       h   P   ] CH       g  dummy
		 g  etc1		 g  etc			  			   C h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-42/ec.scm
|	 		"  g  
macro-typeg  syntax-rulesg  patternsg  etc1g  etcg  ...   C5/R4:0;>`lmf    h    ~   ]4 5C  v       g  dummy
		 g  k		 g  q1			 g  q			 g  etc1			 g  etc			  			   C,xy     h      ] Cw       g  dummy
		 g  k		 g  q1			 g  q2			 g  etc1			 g  etc			  			   CD    h   T   ] C  L       g  dummy
		 g  k		 g  
expression			  			   C      h@   k   ]  	
   C    c       g  dummy
		< g  k		< g  	qualifier			< g  
expression			<  		<	   C      hh   h  ]!4 5$  @4 5$  @4 5$  @4 5$  	@
 6 `      g  x
		g g  tmp		g g  tmp		"	g g  tmp		9	g g  tmp		P	g  g  filenamef  srfi/srfi-42/ec.scm
	 		g  g  
macro-typeg  syntax-rulesg  patternsg  kg  nestedg  q1g  ... g  qg  etc1g  etcg  ... g  kg  q1g  q2g  etc1g  etcg  ... g  kg  
expression g  kg  	qualifierg  
expression   C50R4:.;>hf   h   P   ]45C   H       g  dummy
		 g  etc1		 g  etc			  			   C h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-42/ec.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  etc1g  etcg  ...   C5.R4:+;>hf     h   P   ]45C   H       g  dummy
		 g  etc1		 g  etc			  			   C h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-42/ec.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  etc1g  etcg  ...   C5+R4:*;>hf  h   P   ]45C   H       g  dummy
		 g  etc1		 g  etc			  			   C h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-42/ec.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  etc1g  etcg  ...   C5*R4:);>hf  h   P   ]45C   H       g  dummy
		 g  etc1		 g  etc			  			   C h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-42/ec.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  etc1g  etcg  ...   C5)R4:&;>			f    h       ]4 5C  |       g  dummy
		 g  default		 g  q1			 g  q			 g  etc1			 g  etc			  			   C,		       h      ] C}       g  dummy
		 g  default		 g  q1			 g  q2			 g  etc1			 g  etc			  			   CD	$	&      h   Z   ] C  R       g  dummy
		 g  default		 g  
expression			  			   C	0	1	2	3	4        h(   q   ]    C    i       g  dummy
		$ g  default		$ g  	qualifier			$ g  
expression			$  		$	   C        hh     ]!4 5$  @4 5$  @4 5$  @4 5$  	@
 6 x      g  x
		g g  tmp		g g  tmp		"	g g  tmp		9	g g  tmp		P	g  g  filenamef  srfi/srfi-42/ec.scm
	 		g  g  
macro-typeg  syntax-rulesg  patternsg  defaultg  nestedg  q1g  ... g  qg  etc1g  etcg  ... g  defaultg  q1g  q2g  etc1g  etcg  ... g  defaultg  
expression g  defaultg  	qualifierg  
expression   C5&R4:#;>	A	L	Mf  h       ]4 5C  |       g  dummy
		 g  default		 g  q1			 g  q			 g  etc1			 g  etc			  			   C,	W	X       h      ] C}       g  dummy
		 g  default		 g  q1			 g  q2			 g  etc1			 g  etc			  			   CD	`	b      h   Z   ] C  R       g  dummy
		 g  default		 g  
expression			  			   C	k	l	p	r	m	s	t	u	x	y h8   q   ]   	 
C       i       g  dummy
		1 g  default		1 g  	qualifier			1 g  
expression			1  		1	   C        hh     ]!4 5$  @4 5$  @4 5$  @4 5$  	@
 6 x      g  x
		g g  tmp		g g  tmp		"	g g  tmp		9	g g  tmp		P	g  g  filenamef  srfi/srfi-42/ec.scm
	 		g  g  
macro-typeg  syntax-rulesg  patternsg  defaultg  nestedg  q1g  ... g  qg  etc1g  etcg  ... g  defaultg  q1g  q2g  etc1g  etcg  ... g  defaultg  
expression g  defaultg  	qualifierg  
expression   C5#R4:	q;>			f h   p   ]45 Ch       g  dummy
		 g  stop		 g  q1			 g  q2			 g  cmd			  			   C				        h   q   ]  Ci       g  dummy
		 g  stop		 g  test			 g  q			 g  cmd			  			   C					    h    q   ]   C   i       g  dummy
		 g  stop		 g  test			 g  q			 g  cmd			  			   C					    h    q   ]  C     i       g  dummy
		 g  stop		 g  test			 g  q			 g  cmd			  			   C					    h    q   ]  C     i       g  dummy
		 g  stop		 g  test			 g  q			 g  cmd			  			   C		f		     h    p   ]4  5C  h       g  dummy
		 g  stop		 g  etc			 g  q			 g  cmd			  			   C					     h    p   ]   C h       g  dummy
		 g  stop		 g  gen			 g  q			 g  cmd			  			   C	
      h   P   ] C      H       g  dummy
		
 g  stop		
 g  cmd			
  		
	   C h     ]A4 5$  @4 5$  @4 5$  @4 5$  	@4 
5$  @4 5$  @4 5$  @4 5$  @ 6           g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp		~  g  tmp	   g  tmp	    	g  filenamef  srfi/srfi-42/ec.scm
	 	   g  
macro-typeg  syntax-rulesg  patternsg  stopg  nestedg  nestedg  q1g  ... g  q2g  ... g  cmd g  stopg  nestedg  ifg  test g  qg  ... g  cmd g  stopg  nestedg  notg  test g  qg  ... g  cmd g  stopg  nestedg  andg  testg  ... g  qg  ... g  cmd g  stopg  nestedg  org  testg  ... g  qg  ... g  cmd g  stopg  nestedg  beging  etcg  ... g  qg  ... g  cmd g  stopg  nestedg  geng  qg  ... g  cmd g  stopg  nested g  cmd  	 C5	qR4:;>


f     h    o   ]4 5C     g       g  dummy
		 g  q1		 g  q			 g  etc1			 g  etc			  			   Cj
'
(     h   p   ] C   h       g  dummy
		 g  q1		 g  q2			 g  etc1			 g  etc			  			   Cy
0
2    h   E   ] C    =       g  dummy
		 g  
expression		  			   CD
;
<
=
?        h   \   ] C  T       g  dummy
		 g  	qualifier		 g  
expression			  			   C     hh   T  ]!4 5$  @4 5$  @4 5$  @4 5$  	@
 6 L      g  x
		g g  tmp		g g  tmp		"	g g  tmp		9	g g  tmp		P	g  g  filenamef  srfi/srfi-42/ec.scm
	 		g  g  
macro-typeg  syntax-rulesg  patternsg  nestedg  q1g  ... g  qg  etc1g  etcg  ... g  q1g  q2g  etc1g  etcg  ... g  
expression g  	qualifierg  
expression   C5R4:";>
K
U
Vf      h    o   ]4 5C     g       g  dummy
		 g  q1		 g  q			 g  etc1			 g  etc			  			   Cj
_
`     h   p   ] C   h       g  dummy
		 g  q1		 g  q2			 g  etc1			 g  etc			  			   Cy
g
i    h   E   ] C    =       g  dummy
		 g  
expression		  			   CD
q
r
s
t
v     h    \   ]  C     T       g  dummy
		 g  	qualifier		 g  
expression			  			   C     hh   T  ]!4 5$  @4 5$  @4 5$  @4 5$  	@
 6 L      g  x
		g g  tmp		g g  tmp		"	g g  tmp		9	g g  tmp		P	g  g  filenamef  srfi/srfi-42/ec.scm
	 		g  g  
macro-typeg  syntax-rulesg  patternsg  nestedg  q1g  ... g  qg  etc1g  etcg  ... g  q1g  q2g  etc1g  etcg  ... g  
expression g  	qualifierg  
expression   C5"RC            g  m
		(  g  filenamef  srfi/srfi-42.scm		
	)	?
	.	?		6	?	&	;	?
g  filenamef  srfi/srfi-42/ec.scmA)
f
      
      	      
      
      
!
 	      ó
   C6             ccache/srfi/srfi-6.go                                                                               0000644                 00000002167 15154557173 0010375 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0_      ]  4        h      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-6	 		g  filenameS	
f  srfi/srfi-6.scm	g  
re-exportsS	g  get-output-string	 	g  replacementsS	g  open-input-string	g  open-output-string	 	g  set-current-module	 	 	g  %default-port-encoding	f  UTF-8	 	 	 	 	g  cond-expand-provide	g  current-module	 C 5       h  }   ]4	
5 4 >  "  G     h      ]Y4 >  ZCZF         g  s
		  g  filenamef  srfi/srfi-6.scm
	 
		!	(			"			"			"	 		  g  nameg  open-input-string CR    h      ] Y4>   ZCZF    x       g  filenamef  srfi/srfi-6.scm
	$
		%	(			&			&			&	 		
  g  nameg  open-output-string CRi4i5 6      u       g  m
		,  g  filenamef  srfi/srfi-6.scm		
 	 
	$
	(		(	&	(
 	
   C6                                                                                                                                                                                                                                                                                                                                                                                                          ccache/srfi/srfi-11.go                                                                              0000644                 00000016544 15154557173 0010455 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0L      ]  4    h      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-11	 		g  filenameS	
f  srfi/srfi-11.scm	g  exportsS	g  
let-values	g  let*-values	 	g  set-current-module	 	 	g  cond-expand-provide	g  current-module	 	g  make-syntax-transformer	 	 	g  macro	g  $sc-dispatch	 	 	g  _	g  any	 	 	 g  each-any	! 	"!	#"	$g  syntax-object	%g  call-with-values	&g  top	'& 	(g  ribcage	)g  binds	*g  exp	+g  b0	,g  b1	-)*+, 	.'''' 	/f  l-46961e50cb-93	0f  l-46961e50cb-94	1f  l-46961e50cb-95	2f  l-46961e50cb-96	3/012 	4(-.3 	5( 	6g  x	76 	8' 	9f  l-46961e50cb-90	:9 	;(78: 	<'45; 	=g  hygiene	>= 	?$%<> 	@g  lambda	A$@<> 	B !	CB	D   	Eg  let	Fg  id	Gg  tmp	HFG 	I'' 	Jf  l-46961e50cb-af	Kf  l-46961e50cb-b0	LJK 	M(HIL 	Ng  lp	Og  clauses	Pg  ids	Qg  tmps	RNOPQ 	Sf  l-46961e50cb-a3	Tf  l-46961e50cb-a4	Uf  l-46961e50cb-a5	Vf  l-46961e50cb-a6	WSTUV 	X(R.W 	Yg  clause	ZY+, 	[''' 	\f  l-46961e50cb-9d	]f  l-46961e50cb-9e	^f  l-46961e50cb-9f	_\]^ 	`(Z[_ 	a'5M5X`5; 	b$Ea> 	cg  map	dc 	ec 	fg  list	gg  syntax-violation	hg 	ig 	jf  -source expression failed to match any pattern	k  	lg  generate-temporaries	m    	ng  append	on 	pn 	qg  inner	rq 	sf  l-46961e50cb-c7	ts 	u(r8t 	vg  new-tmp	wvFG 	xf  l-46961e50cb-bf	yf  l-46961e50cb-c0	zf  l-46961e50cb-c1	{xyz 	|(w[{ 	}g  var	~}* 	f  l-46961e50cb-b8 f  l-46961e50cb-b9   (~I  '5u55|5X`5;  $%>  $@>   g  each         g  args q  f  l-46961e50cb-e2 f  l-46961e50cb-e3   (I  g  new-var vFG  f  l-46961e50cb-d7 f  l-46961e50cb-d8 f  l-46961e50cb-d9 f  l-46961e50cb-da   (.  g  vars *  f  l-46961e50cb-d0 f  l-46961e50cb-d1   (I  '5555X`5;  $%>  $@>     g  dummy g  body   g  m-46961e50cb-104 &  '  f  l-46961e50cb-109 f  l-46961e50cb-10a   (    f  l-46961e50cb-106   (7  '5  $E>        g  vars-1 g  	binding-1 g  vars-2 g  	binding-2   '''''  f  l-46961e50cb-10f f  l-46961e50cb-110 f  l-46961e50cb-111 f  l-46961e50cb-112 f  l-46961e50cb-113 f  l-46961e50cb-114   (  '5  $%>  $@>  $> C 5       h@  r   ]4	
5 4 >  "  G   4i4i5 >  "  G  4#?A h    ^   ]   C     V       g  binds
		 g  exp		 g  b0			 g  b1			  			   CCDbef        h   ;   ]4 5L LC 3       g  id
		 g  tmp		  			   Cijklmp      h8      ]4L L4L54 55L    C          g  new-tmp
		5 g  id		5 g  tmp			5 g  tmp			5  g  filenamef  srfi/srfi-11.scm		W	'		W	+		W	'		W	 		5	   Cij     h@      ]4 5L L 45$  LL O @6          g  var
		= g  exp		= g  tmp			= g  tmp			=  g  filenamef  srfi/srfi-11.scm		S	-		S	 		=	   Cl h       ] 4  54L 5C              g  id
		 g  rest		  g  filenamef  srfi/srfi-11.scm		c	,		b	+		a	$		d	+		a	$ 			   Cl    h0      ]	4 5$  L O @ 4  5 C       g  vars
		0 g  tmp		0  g  filenamef  srfi/srfi-11.scm
	^		!	g	/	+	f	.	,	e	'	/	h	. 		0  g  nameg  lp Cp     h   *   ] C   "       g  id
		  		   C  h   o   ] 4L 5C   g       g  id
		 g  rest		  g  filenamef  srfi/srfi-11.scm		r	=		q	7 			   Cij  h@      ]4 5$  @4 5$  L O @ 6  ~       g  tmps
		> g  tmp		> g  tmp		"	>  g  filenamef  srfi/srfi-11.scm
	n	& 		>  g  nameg  lp C      h    ?   ]L     C       7       g  inner
		 g  args		  			   Cij  h`      ]4L L454 55O Q 4 5 45$  LO @6          g  new-tmp
		] g  new-var		] g  id			] g  tmp			] g  lp		$	3 g  tmp		6	] g  tmp		A	]  g  filenamef  srfi/srfi-11.scm		k	'		k	+		k	'	$	n	&	6	k	 		]	   Cij       hP      ]O Q 4 5L L 45$  LLO @6            g  vars
		K g  exp		K g  lp		
	 g  tmp		 	K g  tmp		+	K  g  filenamef  srfi/srfi-11.scm	
	^		 	]	 		K	   C 
  h     ] (  0 45$  LLO @6 45$   L O @45$  	 L O @6             g  clauses
	  g  ids	  g  tmps		  g  tmp			8 g  tmp			8 g  tmp		;  g  tmp		F  g  tmp		h   g  filenamef  srfi/srfi-11.scm
	I			L				M		;	Q		;	Q	 	 	  g  nameg  lp C      h       ]O Q  6          g  clause
		 g  b0		 g  b1			 g  lp			  g  filenamef  srfi/srfi-11.scm		I			J			K			I	 			   Cij        h@   t   ]4 5$  @4 5$  @ 6       l       g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-11.scm
	C	 		9   C5R4     h   ?   ]C      7       g  dummy
		
 g  body		
  		
	   Cef h(      ] 45  C       g  dummy
		( g  vars-1		( g  	binding-1			( g  vars-2			( g  	binding-2			( g  body			(  		(	   Cij    h@     ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-11.scm
 	 		9  g  
macro-typeg  syntax-rulesg  patternsg  bodyg  ... g  vars-1g  	binding-1 g  vars-2g  	binding-2 g  ... g  bodyg  ...   C5RC   j       g  m
		(  g  filenamef  srfi/srfi-11.scm		&
	)	)
	.	)		6	)	&	;	)
 	=
   C6                                                                                                                                                             ccache/srfi/srfi-19.go                                                                              0000644                 00000413373 15154557173 0010466 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0     ] 4      hƭ      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-19	 		g  filenameS	
f  srfi/srfi-19.scm	g  importsS	g  srfi-6	 	 	g  srfi-8	 	 	g  srfi-9	 	 	g  ice-9	g  i18n	 	 	 	g  exportsS	g  time-duration	g  time-monotonic	g  time-process	g  time-tai	g  time-thread	 g  time-utc	!g  current-date	"g  current-julian-day	#g  current-modified-julian-day	$g  time-resolution	%g  	make-time	&g  time?	'g  	time-type	(g  time-nanosecond	)g  time-second	*g  set-time-type!	+g  set-time-nanosecond!	,g  set-time-second!	-g  	copy-time	.g  time<=?	/g  time<?	0g  time=?	1g  time>=?	2g  time>?	3g  time-difference	4g  time-difference!	5g  add-duration	6g  add-duration!	7g  subtract-duration	8g  subtract-duration!	9g  	make-date	:g  date?	;g  date-nanosecond	<g  date-second	=g  date-minute	>g  	date-hour	?g  date-day	@g  
date-month	Ag  	date-year	Bg  date-zone-offset	Cg  date-year-day	Dg  date-week-day	Eg  date-week-number	Fg  date->julian-day	Gg  date->modified-julian-day	Hg  date->time-monotonic	Ig  date->time-tai	Jg  date->time-utc	Kg  julian-day->date	Lg  julian-day->time-monotonic	Mg  julian-day->time-tai	Ng  julian-day->time-utc	Og  modified-julian-day->date	Pg  #modified-julian-day->time-monotonic	Qg  modified-julian-day->time-tai	Rg  modified-julian-day->time-utc	Sg  time-monotonic->date	Tg  time-monotonic->julian-day	Ug  #time-monotonic->modified-julian-day	Vg  time-monotonic->time-tai	Wg  time-monotonic->time-tai!	Xg  time-monotonic->time-utc	Yg  time-monotonic->time-utc!	Zg  time-tai->date	[g  time-tai->julian-day	\g  time-tai->modified-julian-day	]g  time-tai->time-monotonic	^g  time-tai->time-monotonic!	_g  time-tai->time-utc	`g  time-tai->time-utc!	ag  time-utc->date	bg  time-utc->julian-day	cg  time-utc->modified-julian-day	dg  time-utc->time-monotonic	eg  time-utc->time-monotonic!	fg  time-utc->time-tai	gg  time-utc->time-tai!	hg  date->string	ig  string->date	j !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghi O	kg  replacementsS	lg  current-time	ml 	ng  	autoloadsS	og  rdelim	po 	qg  	read-line	rq 	spr 	tg  set-current-module	ut 	vt 	wg  cond-expand-provide	xg  current-module	y 	zf  ~a ~b ~d ~H:~M:~S~z ~Y	{g  locale-date-time-format	|f  ~m/~d/~y	}g  locale-short-date-format	~f  ~H:~M:~S	g  locale-time-format f  ~Y-~m-~dT~H:~M:~S~z g  iso-8601-date-time-format g  nano g  sid g  sihd e  	4881175/2 g  tai-epoch-in-jd g  throw g  
misc-error f  TIME-ERROR type ~A: ~S f  TIME-ERROR type ~A g  
time-error g  open-input-file g  eof-object? g  read g  open-input-string g  string-append f  ( f  ) g  inexact->exact g  read-tai-utc-data     U-	$     O 	#     I\	"     C	!     6 	      3H	     0$ 	     .\	     ,2) 	     *P	     ' 	     %	     ! 	     % 	     b1	      	     ʀ	     Φ 	     r	     ? 	     +	     H	     	gS 	     	      	     X 	     g 	
   g  leap-second-table g  read-leap-second-table g  leap-second-delta g  time g  !%make-time-unnormalized-procedure g  make-syntax-transformer     g  make-time-unnormalized g  macro g  $sc-dispatch     g  _ g  any   g  syntax-object g  lambda g  m-46961e50d3-30 g  top   g  ribcage g  t-46961e50d3-2d g  t-46961e50d3-2e g  t-46961e50d3-2f     f  l-46961e50d3-35 f  l-46961e50d3-36 f  l-46961e50d3-37       g  x     f  l-46961e50d3-32     g  shift g  	proc-name g  args       f  l-1e8ba8b5a-60 f  l-1e8ba8b5a-61     g  key g  value g  name g  formals g  body     f  l-1e8ba8b5a-53 f  l-1e8ba8b5a-54 f  l-1e8ba8b5a-55 f  l-1e8ba8b5a-56 f  l-1e8ba8b5a-57     g  make-procedure-name     f  l-1e8ba8b5a-43       f  l-1e8ba8b5a-42       g  hygiene     g  type      g  
nanosecond  g  second   g  make-structg  m-46961e50d3-2b	 
g  t-1e8ba8b5a-133g  t-1e8ba8b5a-132g  t-1e8ba8b5a-131
 g  m-1e8ba8b5a-134  f  l-1e8ba8b5a-138f  l-1e8ba8b5a-139f  l-1e8ba8b5a-13a  g  	ctor-args f  l-1e8ba8b5a-120  g  ctorg  field f  l-1e8ba8b5a-11cf  l-1e8ba8b5a-11d  !  "g  form#g  	type-name$g  constructor-spec%g  field-names&"#$% ' (f  l-1e8ba8b5a-111)f  l-1e8ba8b5a-112*f  l-1e8ba8b5a-113+f  l-1e8ba8b5a-114,()*+ -&', .g  record-layout/g  functional-setters0g  setters1g  copier2g  getters3g  constructor4g  getter-identifiers5g  field-identifiers6./012345 7 8f  l-1e8ba8b5a-e99f  l-1e8ba8b5a-e7:f  l-1e8ba8b5a-e5;f  l-1e8ba8b5a-e3<f  l-1e8ba8b5a-e1=f  l-1e8ba8b5a-df>f  l-1e8ba8b5a-dd?f  l-1e8ba8b5a-db@89:;<=>? A67@ Bf  l-1e8ba8b5a-daCB DC E	!-AD FE G  H
E IFGH JI Kg  each-anyLKMg  syntax-violationNM OM Pf  Wrong number of argumentsQg  identifier?RQ SQ T UT  VM WM Xf  -source expression failed to match any patternYg  record-type-vtableZY [Y \g  pwpwpw]g  default-record-printer^] _] ` ag  set-struct-vtable-name!ba ca dg  vtable-offset-usered fd gg  %time?-procedureh ig  m-46961e50d3-41ji kg  t-46961e50d3-40lk mj nf  l-46961e50d3-46on plmo qf  l-46961e50d3-43rq smr tjps ut vg  objwg  t-1e8ba8b5a-224xg  t-1e8ba8b5a-21eyg  t-1e8ba8b5a-21fzg  t-1e8ba8b5a-220{g  t-1e8ba8b5a-223|g  t-1e8ba8b5a-222}g  t-1e8ba8b5a-221~wxyz{|} g  m-1e8ba8b5a-225  f  l-1e8ba8b5a-229f  l-1e8ba8b5a-22af  l-1e8ba8b5a-22bf  l-1e8ba8b5a-22cf  l-1e8ba8b5a-22df  l-1e8ba8b5a-22ef  l-1e8ba8b5a-22f ~ g  	copier-id f  l-1e8ba8b5a-21c  g  	ctor-name f  l-1e8ba8b5a-214  % f  l-1e8ba8b5a-212  g  layout f  l-1e8ba8b5a-210  g  
immutable? f  l-1e8ba8b5a-20e  g  field-count f  l-1e8ba8b5a-20c  g  
getter-ids f  l-1e8ba8b5a-209  g  	field-ids f  l-1e8ba8b5a-206  g  predicate-nameg  
field-spec"#$  f  l-1e8ba8b5a-1f9f  l-1e8ba8b5a-1faf  l-1e8ba8b5a-1fbf  l-1e8ba8b5a-1fcf  l-1e8ba8b5a-1fdf  l-1e8ba8b5a-1fe  	psAD v  g  and g  struct?  g  eq? g  struct-vtable  ps     u s g  g  throw-bad-struct  g  %time-type-procedureg  free-idg  
%%on-errorg  m-46961e50d3-4d  f  l-46961e50d3-4f      g  %%typeg  t-1e8ba8b5a-14bg  t-1e8ba8b5a-14cg  t-1e8ba8b5a-14dg  t-1e8ba8b5a-14eg  t-1e8ba8b5a-14fg  t-1e8ba8b5a-150g  t-1e8ba8b5a-151 g  m-1e8ba8b5a-152  f  l-1e8ba8b5a-156f  l-1e8ba8b5a-157f  l-1e8ba8b5a-158f  l-1e8ba8b5a-159f  l-1e8ba8b5a-15af  l-1e8ba8b5a-15bf  l-1e8ba8b5a-15c  g  getterg  index f  l-1e8ba8b5a-149f  l-1e8ba8b5a-14a  #   f  l-1e8ba8b5a-144f  l-1e8ba8b5a-145f  l-1e8ba8b5a-146   	AD    	g  ck
g  errg  s
  f  l-46961e50d3-52f  l-46961e50d3-53   	 g  quote      g  %%index   f  l-46961e50d3-57f  l-46961e50d3-58  !  "! #	" $" %! &
%  '$& (' )g  %%copier*) +* ,+ -f  l-46961e50d3-5c.f  l-46961e50d3-5d/-. 0/ 10 2	1 31 4g  %%time-set-fields50 645  736 87 9g  t-46961e50d3-4c:9 ;f  l-46961e50d3-61<; =:< >= ?> @	=AD A@ BA Cg  ifDC@ E@ F@ GFA H= IH  JEGI Kg  
struct-refLK@ M= N
M  OLAN P@ Q@ R'H  SQR TPAS UDJOT V?BU W XW  Yg  %time-nanosecond-procedureZg  m-46961e50d3-68[Z \[ ]f  l-46961e50d3-6a^] _\^ `[_ a` ba cb d	_AD ed fe gcf h[[ if  l-46961e50d3-6djf  l-46961e50d3-6ekij lhk m[l_ n	m om pl_ qp  roq sr td ut vcu wf  l-46961e50d3-72xf  l-46961e50d3-73ywx zhy {[z_ |	{ }{ ~z_ ~  }  )d  c f  l-46961e50d3-77f  l-46961e50d3-78 h [_ 	  _ 4    g  t-46961e50d3-67 f  l-46961e50d3-7c \ [_  	_AD   C    _    K _      (      _ Y  g  %time-second-procedureg  m-46961e50d3-83  f  l-46961e50d3-85      	AD     f  l-46961e50d3-88f  l-46961e50d3-89   	          f  l-46961e50d3-8df  l-46961e50d3-8e   	   	    )   f  l-46961e50d3-92f  l-46961e50d3-93   	   4    g  t-46961e50d3-82 f  l-46961e50d3-97    	AD   C        K  	     )          g  each  	g  %%set-fields
g  dummyg  check?g  expr
 g  m-46961e50d3-9e 				 f  l-46961e50d3-a3f  l-46961e50d3-a4f  l-46961e50d3-a5f  l-46961e50d3-a6f  l-46961e50d3-a7   f  l-46961e50d3-a0  g  t-1e8ba8b5a-16ag  t-1e8ba8b5a-16cg  t-1e8ba8b5a-16b  g  m-1e8ba8b5a-16d!  "!!! #f  l-1e8ba8b5a-171$f  l-1e8ba8b5a-172%f  l-1e8ba8b5a-173&#$% '"& (f  l-1e8ba8b5a-167)f  l-1e8ba8b5a-168*f  l-1e8ba8b5a-169+()* ,+ -	',AD .	- / 0/  1'/  2(/  3)/  4123 5g  map65 75 8g  list9g  %set-time-type!-procedure: ;g  m-46961e50d3-b2<; =g  t-46961e50d3-b0>g  t-46961e50d3-b1?=> @<< Af  l-46961e50d3-b7Bf  l-46961e50d3-b8CAB D?@C E< Ff  l-46961e50d3-b4GF HEG I<DH JI Kg  t-1e8ba8b5a-18cLg  t-1e8ba8b5a-18dMKL Ng  m-1e8ba8b5a-18eON POO Qf  l-1e8ba8b5a-192Rf  l-1e8ba8b5a-193SQR TMPS Ug  setterVU Wf  l-1e8ba8b5a-186Xf  l-1e8ba8b5a-187Yf  l-1e8ba8b5a-188ZWXY [VZ \ ]f  l-1e8ba8b5a-17d^f  l-1e8ba8b5a-17e_]^ `\_ ag  field-specsb#a cf  l-1e8ba8b5a-179df  l-1e8ba8b5a-17aecd fbe g	DHT[`fAD hg ig  valjig khj lCg mg ng onh pDH qp  rmoq sg  struct-set!tsg uDH v
u  wthvj xg yg z*p  {yz |xh{ }lrw| ~Jk} H 9  g  %set-time-nanosecond!-procedureg  m-46961e50d3-c2 g  t-46961e50d3-c0g  t-46961e50d3-c1  f  l-46961e50d3-c7f  l-46961e50d3-c8   f  l-46961e50d3-c4    	T[`fAD  i  C        s       +         g  %set-time-second!-procedureg  m-46961e50d3-d2 g  t-46961e50d3-d0g  t-46961e50d3-d1  f  l-46961e50d3-d7f  l-46961e50d3-d8   f  l-46961e50d3-d4    	T[`fAD  i  C        s  	     ,         g  integer?g  truncateg  
split-realg  absg  time-normalize!g  mktimeg  
set-tm:secg  
set-tm:ming  set-tm:hourg  set-tm:mdayg  
set-tm:mong  set-tm:yearg  set-tm:isdstg  set-tm:gmtoffg  date->broken-down-timeg  gettimeofdayg  current-time-utcg  current-time-taig  current-time-monotonicg  unsupported-clock-typeg  current-time-threadg  internal-time-units-per-secondg  ns-per-guile-tickg  get-internal-run-timeg  current-time-processg  invalid-clock-typeg  not-durationg  incompatible-time-typesg  priv:time-tai->time-utc!g  priv:time-utc->time-tai!g  dateg  %make-date-procedure 	g  m-46961e50d3-343 g  t-46961e50d3-33bg  t-46961e50d3-33cg  t-46961e50d3-33dg  t-46961e50d3-33eg  t-46961e50d3-33fg  t-46961e50d3-340g  t-46961e50d3-341g  t-46961e50d3-342   f  l-46961e50d3-348f  l-46961e50d3-349f  l-46961e50d3-34af  l-46961e50d3-34bf  l-46961e50d3-34cf  l-46961e50d3-34df  l-46961e50d3-34ef  l-46961e50d3-34f  	 
 f  l-46961e50d3-345 
 	  	     g  minute  g  hour  g  day  g  month  g  year  g  zone-offset    g  m-46961e50d3-339!  "!	!-AD #" $  %
" &#$% '& ( )(  *g  pwpwpwpwpwpwpwpw+ ,g  %date?-procedure-g  m-46961e50d3-35e.- /g  t-46961e50d3-35d0/ 1. 2f  l-46961e50d3-36332 4013 5f  l-46961e50d3-36065 716 8.47 98 :!47AD ;v: <; =: >: ?>; @: A: BA; C47 DC  E@BD F=?E G9<F H7 I,H  Jg  %date-nanosecond-procedureKg  m-46961e50d3-36aLK ML Nf  l-46961e50d3-36cON PMO QLP RQ SR TS U!PAD VU WV XTW YLL Zf  l-46961e50d3-36f[f  l-46961e50d3-370\Z[ ]Y\ ^L]P _	^ `^ a]P ba  c`b dc eU fe gTf hf  l-46961e50d3-374if  l-46961e50d3-375jhi kYj lLkP m	l nl okP p
o  qnp rq s)U ts uTt vf  l-46961e50d3-379wf  l-46961e50d3-37axvw yYx zLyP {	z |z }g  %%date-set-fields~yP }~  |  g  t-46961e50d3-369 f  l-46961e50d3-37e M LP  !PAD   C    P    K P 
     ;      P J  g  %date-second-procedureg  m-46961e50d3-385  f  l-46961e50d3-387      !AD     f  l-46961e50d3-38af  l-46961e50d3-38b   	          f  l-46961e50d3-38ff  l-46961e50d3-390   	       )   f  l-46961e50d3-394f  l-46961e50d3-395   	   }    g  t-46961e50d3-384 f  l-46961e50d3-399    !AD   C        K       <         g  %date-minute-procedureg  m-46961e50d3-3a0  f  l-46961e50d3-3a2       !AD      f  l-46961e50d3-3a5f  l-46961e50d3-3a6  	 
		 	          f  l-46961e50d3-3aaf  l-46961e50d3-3ab   	   	    )     !f  l-46961e50d3-3af"f  l-46961e50d3-3b0#!" $# %$ &	% '% ($ )}(  *') +* ,g  t-46961e50d3-39f-, .f  l-46961e50d3-3b4/. 0-/ 10 21 3!0AD 43 54 6C3 73 83 984 :0 ;:  <79; =K3 >0 ?	>  @=4? A3 B3 C=:  DBC EA4D F6<@E G25F H IH  Jg  %date-hour-procedureKg  m-46961e50d3-3bbLK ML Nf  l-46961e50d3-3bdON PMO QLP RQ SR TS U!PAD VU WV XTW YLL Zf  l-46961e50d3-3c0[f  l-46961e50d3-3c1\Z[ ]Y\ ^L]P _	^ `^ a]P ba  c`b dc eU fe gTf hf  l-46961e50d3-3c5if  l-46961e50d3-3c6jhi kYj lLkP m	l nl okP p	o  qnp rq s)U ts uTt vf  l-46961e50d3-3cawf  l-46961e50d3-3cbxvw yYx zLyP {	z |z }yP ~}}  |~  g  t-46961e50d3-3ba f  l-46961e50d3-3cf M LP  !PAD   C    P    K P 	     >      P J  g  %date-day-procedureg  m-46961e50d3-3d6  f  l-46961e50d3-3d8      !AD     f  l-46961e50d3-3dbf  l-46961e50d3-3dc   	          f  l-46961e50d3-3e0f  l-46961e50d3-3e1   	   	    )   f  l-46961e50d3-3e5f  l-46961e50d3-3e6   	   }    g  t-46961e50d3-3d5 f  l-46961e50d3-3ea    !AD   C        K  	     ?         g  %date-month-procedureg  m-46961e50d3-3f1  f  l-46961e50d3-3f3      !AD       f  l-46961e50d3-3f6f  l-46961e50d3-3f7   		 
    
     f  l-46961e50d3-3fbf  l-46961e50d3-3fc   	   	    )    f  l-46961e50d3-400!f  l-46961e50d3-401" ! #" $# %	$ &$ '# (}'  )&( *) +g  t-46961e50d3-3f0,+ -f  l-46961e50d3-405.- /,. 0/ 10 2!/AD 32 43 5C2 62 72 873 9/ :9  ;68: <K2 =/ >	=  ?<3> @2 A2 B@9  CAB D@3C E5;?D F14E G HG  Ig  %date-year-procedureJg  m-46961e50d3-40cKJ LK Mf  l-46961e50d3-40eNM OLN PKO QP RQ SR T!OAD UT VU WSV XKK Yf  l-46961e50d3-411Zf  l-46961e50d3-412[YZ \X[ ]K\O ^	] _] `\O a`  b_a cb dT ed fSe gf  l-46961e50d3-416hf  l-46961e50d3-417igh jXi kKjO l	k mk njO o	n  pmo qp r)T sr tSs uf  l-46961e50d3-41bvf  l-46961e50d3-41cwuv xXw yKxO z	y {y |xO }}|  ~{} ~ g  t-46961e50d3-40b f  l-46961e50d3-420 L KO  !OAD   C    O    K O 	     A      O I  g  %date-zone-offset-procedureg  m-46961e50d3-427  f  l-46961e50d3-429      !AD     f  l-46961e50d3-42cf  l-46961e50d3-42d   	          f  l-46961e50d3-431f  l-46961e50d3-432   	   	    )   f  l-46961e50d3-436f  l-46961e50d3-437   	   }    g  t-46961e50d3-426 f  l-46961e50d3-43b    !AD   C        K  	     B         g  m-46961e50d3-442 !!!! f  l-46961e50d3-447f  l-46961e50d3-448f  l-46961e50d3-449f  l-46961e50d3-44af  l-46961e50d3-44b   f  l-46961e50d3-444   ! ',AD 	     ;  <  =  >  	?  
@  A  B  	
 g  set-date-nanosecond!g  %set-date-nanosecond!-procedureg  m-46961e50d3-456 g  t-46961e50d3-454g  t-46961e50d3-455  f  l-46961e50d3-45bf  l-46961e50d3-45c   f  l-46961e50d3-458     !T[`fAD !  "i  #!" $C  %  &  '&! ( )(  *%') +s  , -
,  .+!-" /  0  1(  201 3/!2 4$*.3 5#4 6 76  8g  set-date-second!9g  %set-date-second!-procedure:g  m-46961e50d3-466;: <g  t-46961e50d3-464=g  t-46961e50d3-465><= ?;; @f  l-46961e50d3-46bAf  l-46961e50d3-46cB@A C>?B D; Ef  l-46961e50d3-468FE GDF H;CG IH J!CGT[`fAD KJ LiJ MKL NCJ OJ PJ QPK RCG SR  TOQS UsJ VCG WV  XUKWL YJ ZJ [8R  \Z[ ]YK\ ^NTX] _IM^ `G a9`  bg  set-date-minute!cg  %set-date-minute!-proceduredg  m-46961e50d3-476ed fg  t-46961e50d3-474gg  t-46961e50d3-475hfg iee jf  l-46961e50d3-47bkf  l-46961e50d3-47cljk mhil ne of  l-46961e50d3-478po qnp remq sr t!mqT[`fAD ut vit wuv xCt yt zt {zu |mq }|  ~y{} st mq 	  uv t t b|   u x~ sw q c  g  set-date-hour!g  %set-date-hour!-procedureg  m-46961e50d3-486 g  t-46961e50d3-484g  t-46961e50d3-485  f  l-46961e50d3-48bf  l-46961e50d3-48c   f  l-46961e50d3-488    !T[`fAD  i  C        s  	              g  set-date-day!g  %set-date-day!-procedureg  m-46961e50d3-496 g  t-46961e50d3-494g  t-46961e50d3-495  f  l-46961e50d3-49bf  l-46961e50d3-49c   f  l-46961e50d3-498    !T[`fAD  i  C        s  	              g  set-date-month!g  %set-date-month!-procedureg  m-46961e50d3-4a6 g  t-46961e50d3-4a4g  t-46961e50d3-4a5  f  l-46961e50d3-4abf  l-46961e50d3-4ac   f  l-46961e50d3-4a8    !T[`fAD  i  C        s  	              	  
g  set-date-year!g  %set-date-year!-procedureg  m-46961e50d3-4b6 g  t-46961e50d3-4b4g  t-46961e50d3-4b5  f  l-46961e50d3-4bbf  l-46961e50d3-4bc   f  l-46961e50d3-4b8    !T[`fAD  i   C ! " #" $ %$  &!#% 's ( )	(  *') + , -
$  .,- /+. 0 &*/ 10 2 32  4g  set-date-zone-offset!5g   %set-date-zone-offset!-procedure6g  m-46961e50d3-4c676 8g  t-46961e50d3-4c49g  t-46961e50d3-4c5:89 ;77 <f  l-46961e50d3-4cb=f  l-46961e50d3-4cc><= ?:;> @7 Af  l-46961e50d3-4c8BA C@B D7?C ED F!?CT[`fAD GF HiF IGH JCF KF LF MLG N?C ON  PKMO QsF R?C S	R  TQGSH UF VF W4N  XVW YUGX ZJPTY [EIZ \C ]5\  ^g  encode-julian-day-number_g  decode-julian-day-number`g  	tm:gmtoffag  	localtimebg  local-tz-offsetcg  time->julian-day-numberdg  assoceg  leap-second?fg  
time->dategg  roundhe  1/2ig  
leap-year?j
k		l		;m		Zn		xo	 p	 q	 Ԍr		 s	
t	0u	Nvjklmnopqrstu wg  month-assocxg  invalid-month-specificationyg  year-dayzg  week-day{g  days-before-first-week|g  natural-year}e  -1/2~e  	4800001/2g  number->stringg  string-lengthg  make-stringg  paddingg  exptg  last-n-digitsg  locale-day-shortg  locale-abbr-weekdayg  
locale-dayg  locale-long-weekdayg  locale-month-shortg  locale-abbr-monthg  locale-monthg  locale-long-monthg  date-reverse-lookupg  string=?g  locale-abbr-weekday->indexg  locale-long-weekday->indexg  locale-abbr-month->indexg  locale-long-month->indexg  
tz-printerg  locale-print-time-zoneg  locale-pm-stringg  locale-am-stringg  locale-am-string/pmg  displayf  Zf  -f  +e  1.0g  locale-decimal-pointg  	substringf  ~bg  newlinef  ~I:~M:~S ~pf  ~Y-~m-~df  
~H:~M:~S~zf  ~Y-~m-~dT~H:~M:~Sg  
directivesg  get-formatterg  
string-refg  char=?g  date-printerg  bad-date-format-stringg  open-output-stringf  ~cg  get-output-stringg  	char->intg  bad-date-template-stringf  Non-integer characterg  	peek-charg  char-numeric?g  	read-charg  integer-readerg  make-integer-readerf  !Premature ending to integer read.f  'Non-numeric characters in integer read.g  integer-reader-exactg  make-integer-exact-readerf  Invalid time zone +/-f  Invalid time zone numberg  zone-readerg  char-alphabetic?g  list->stringg  reverse!f  Invalid string for g  locale-readerg  make-locale-readerf  Invalid character match.g  make-char-id-readerg  read-directivesg  priv:string->datef  Incomplete date read. C 5     h8S   ]@4	
jkmns5 4v >  "  G   4wi4xi5 y>  "  G  R  RRRRRz{R|}R~RR    ; R     QR      RR  h0      ]$    6  6             g  caller
		* g  type		* g  value			*  g  filenamef  srfi/srfi-19.scm
 
	 		 		 	 	 	9	 		 		" 	 	' 	5	* 	 		*	  g  nameg  
time-error CRq      h   N  ]94 5H"  45$  "  ~444555$  45	
45JK"   45"45"sJC      F      g  filename
	  g  port	
  g  table		
  g  line		  g  data		6  g  year		;  g  jd		D  g  secs		O   g  filenamef  srfi/srfi-19.scm
 
	 		
 		
 		 		 		 		" 		% 		( 	 	, 	/	0 	8	2 	 	4 		6 		6 		; 		; 		@ 	!	A 		D 		I 	!	L 		O 		W 		[ 		\ 	
	e 		h 		i 		p 		s 		u 		z 	  	  	  	  	 '	   g  nameg  read-tai-utc-data CRR  h      ]4 5 C          g  filename
		  g  filenamef  srfi/srfi-19.scm
 
	 		 	 		  g  nameg  read-leap-second-table CR      h8      ]	"   $  C" $  
C"         g  utc-seconds
		6 g  table		  g  filenamef  srfi/srfi-19.scm
 
	 		 	)	 		 		 		 	#	 		 		$ 		( 		, 		6 	 		6  g  nameg  leap-second-delta CR      h      ]  C         g  type
		 g  
nanosecond		 g  second			  g  filenamef  srfi/srfi-19.scm
 
 			  g  nameg  !%make-time-unnormalized-procedure CR4J  h   q   ]  C  i       g  t-46961e50d3-2d
		 g  t-46961e50d3-2e		 g  t-46961e50d3-2f			  			   CLOP        h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	 
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	 
 		
   CU     h      ] C          		
   CWX      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-19.scm
 
 		n   C5R[\_`  4c >  "  G   	fi  R  h   r   ] $   CC      j       g  obj
		  g  filenamef  srfi/srfi-19.scm
 
 		  g  nameg  %time?-procedure CgR4&h      h   7   ]  C      /       g  t-46961e50d3-40
		
  		
   CLO&P  h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	 
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	 
 		
   C     h      ] C          		
   CWX      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-19.scm
 
 		n   C5&R'   h   t   ] &   
C 6l       g  s
		  g  filenamef  srfi/srfi-19.scm
 
 		  g  nameg  %time-type-procedure CR4' h   :   ]C     2       g  err
		 g  s		  			   C#( h   :   ]C     2       g  err
		 g  s		  			   C,28 h   :   ]C     2       g  err
		 g  s		  			   ChV    h   7   ]  C      /       g  t-46961e50d3-4c
		
  		
   CLO'P  h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	 
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	 
 		
   CX     h      ] C          		
   CWX      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-19.scm
 
 	    C5'R(       h   z   ] &   C 6r       g  s
		  g  filenamef  srfi/srfi-19.scm
 
 		  g  nameg  %time-nanosecond-procedure CYR4(gns   h   :   ]C     2       g  err
		 g  s		  			   Cv| h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   Ch    h   7   ]  C      /       g  t-46961e50d3-67
		
  		
   CLO(P  h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	 
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	 
 		
   C     h      ] C          		
   CWX      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-19.scm
 
 	    C5(R)       h    v   ] &   	C 6       n       g  s
		  g  filenamef  srfi/srfi-19.scm
 
 		  g  nameg  %time-second-procedure CR4)       h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   Ch     h   7   ]  C      /       g  t-46961e50d3-82
		
  		
   CLO)P  h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	 
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	 
 		
   C     h      ] C          		
   CWX      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-19.scm
 
 	    C5)R44.0478 h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   CWX h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-19.scm
 
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C54R*        h       ] &   
C 6             g  s
		 g  val		  g  filenamef  srfi/srfi-19.scm
 
 			  g  nameg  %set-time-type!-procedure C9R4*:~      h   T   ]  C    L       g  t-46961e50d3-b0
		 g  t-46961e50d3-b1		  			   CLO*P     h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	 
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	 
 		
   C     h      ] C          		
   CWX      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-19.scm
 
 		n   C5*R+   h       ] &   C 6             g  s
		 g  val		  g  filenamef  srfi/srfi-19.scm
 
 			  g  nameg  %set-time-nanosecond!-procedure CR4+:        h   T   ]  C    L       g  t-46961e50d3-c0
		 g  t-46961e50d3-c1		  			   CLO+P     h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	 
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	 
 		
   C     h      ] C          		
   CWX      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-19.scm
 
 		n   C5+R,   h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-19.scm
 
 			  g  nameg  %set-time-second!-procedure CR4,:    h   T   ]  C    L       g  t-46961e50d3-d0
		 g  t-46961e50d3-d1		  			   CLO,P     h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	 
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	 
 		
   C     h      ] C          		
   CWX      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-19.scm
 
 		n   C5,R%'()     hX      ] &   
"  	4 5 &   "  	4 5 &  	 	"  	4 56          g  time
		U  g  filenamef  srfi/srfi-19.scm
 
	 		! 		; 	5	U 	 		U  g  nameg  	copy-time C-R h0      ]	4 5$  
4 5
D4 545 D         g  r
		. g  l		.  g  filenamef  srfi/srfi-19.scm

													!		,	#	.	 		.  g  nameg  
split-real CR(),+ 	   h    ]4 &   "  	4 55    ; $  4 &   "  	4 5>  G  &  	 	"  	4 5    ;  &   	"  4 >  "  G      ;  &   "  4 >  "  G  "   "   &  	 	"  	4 5
$   &   "  	4 5
$   &  	 	"  	4 5 &   	"  4 >  "  G      ;  &   "  	4 5 &   " 4 >  "  G  "  "  "   &  	 	"  	4 5
$   &   "  	4 5
$   &  	 	"  	4 5 &   	"  4 >  "  G      ;  &   "  	4 5 &   "  4 >  "  G  "  "4"  ", C      g  t
	 g  int	R  g  frac		R  g  val	   g  val	   g  valV g  val g  val>l g  val  	g  filenamef  srfi/srfi-19.scm

			
				!		
	+			/			0	
	5		Q	
	U
		\	 	 	 	 	# 	  	 				5	:	
=	#V	 V		2	$							"	%	>	>	x	.	 	 +	  g  nameg  time-normalize! CR        h      ]  6              g  type
		 g  
nanosecond		 g  second			  g  filenamef  srfi/srfi-19.scm

				 			  g  nameg  	make-time C%R<=>?@AB      h     ]	4
544 5>  "  G  44 5>  "  G  44 5>  "  G  44	 5>  "  G  4
4 5>  "  G  4l4 5>  "  G  4	>  "  G  4
4 5>  "  G  C       g  date
	  g  result	   g  filenamef  srfi/srfi-19.scm
!
	"		"		%		%		%		$&		)&		4&		='		B'		M'		V)		[)		f)		o*		t*		{*	 *	 ,	 ,	  ,	 ,	 -	 .	 .	 .	 .	 .	 	   g  nameg  date->broken-down-time CR%    h       ]45    6              g  tod
		  g  filenamef  srfi/srfi-19.scm
5
	7		7		8		8		8	+	8	 		
  g  nameg  current-time-utc CR%       h0      ]45    456              g  tod
		) g  sec		) g  usec			)  g  filenamef  srfi/srfi-19.scm
:
	<		<		=		<		>		<		@		A		 A		'A		)?	 		)
  g  nameg  current-time-tai CR      h   o   ] 6   g       g  filenamef  srfi/srfi-19.scm
N
	P	 		
  g  nameg  current-time-monotonic CRl        h      ] 6           g  filenamef  srfi/srfi-19.scm
R
	S		S		
S	4	S	 		
  g  nameg  current-time-thread CR    ; iR% h       ]45    6           g  run-time
		  g  filenamef  srfi/srfi-19.scm
W
	X		X		[		[		]		Y	 		
  g  nameg  current-time-process CR l       h`     -  1  3  (  "   &  6 &  6 &  6 &  6 	&  
6 6      g  
clock-type
			` g  
clock-type		`  g  filenamef  srfi/srfi-19.scm
b
	c		c	4	c		"d		&e	 	.d		2f	 	:d		>g	&	Fd		Jh	#	Rd		Vi	$	Zk		\k	%	`k	 			`


  g  nameg  current-time ClR  $ 
      hX      -  1  3  (  "   $  C$  C$  C$  C	6        g  
clock-type
			W g  
clock-type		W  g  filenamef  srfi/srfi-19.scm
q
	r		r	4	r		#s		Qz		Sz	)	Wz	 				W


  g  nameg  time-resolution C$R)('      h      ] &  	 	"  	4 5&  		"  	45$  q &   "  	4 5&  "  	45$  6 &   
"  	4 5&  
"  	45CCC       g  t1
	  g  t2	   g  filenamef  srfi/srfi-19.scm
~
		
	 		9		=		@	
	Z		r		v		y	 	 	 	 	  g  nameg  time=? C0R)( h      ]
 &  	 	"  	4 5&  		"  	45$  C &  	 	"  	4 5&  		"  	45$  6 &   "  	4 5&  "  	45CC        g  t1
	  g  t2	  g  t		9   g  filenamef  srfi/srfi-19.scm

				 		9		9		G		b		{			 	 	# 	 	 	  g  nameg  time>? C2R)(        h      ]
 &  	 	"  	4 5&  		"  	45$  C &  	 	"  	4 5&  		"  	45$  6 &   "  	4 5&  "  	45CC        g  t1
	  g  t2	  g  t		9   g  filenamef  srfi/srfi-19.scm

				 		9		9		G		b		{			 	 	# 	 	 	  g  nameg  time<? C/R)(        h      ]
 &  	 	"  	4 5&  		"  	45$  C &  	 	"  	4 5&  		"  	45$  6 &   "  	4 5&  "  	45CC        g  t1
	  g  t2	  g  t		9   g  filenamef  srfi/srfi-19.scm

				 		9		9		G		b		{			 	 	$ 	 	 	  g  nameg  time>=? C1R)(       h      ]
 &  	 	"  	4 5&  		"  	45$  C &  	 	"  	4 5&  		"  	45$  6 &   "  	4 5&  "  	45CC        g  t1
	  g  t2	  g  t		9   g  filenamef  srfi/srfi-19.scm

				 		9		9		G		b		{			 	 	$ 	 	 	  g  nameg  time<=? C.R)(*,+ 
   h   1  ] &  	 	"  	4 5&  		"  	45 &   "  	4 5&  "  	45 &   
"  4 >  "  G   &   	"  4 >  "  G   &   "  4 >  "  G  	 6)      g  time1
	  g  time2	  g  sec-diff		n  g  	nsec-diff		n  g  val		t   g  filenamef  srfi/srfi-19.scm

			 	)	9		<		V	.	n		n		t	 	 	 	 	 	  g  nameg  time-difference! C4R-4    h      ]
4 56            g  time1
		 g  time2		 g  result				  g  filenamef  srfi/srfi-19.scm

							 			  g  nameg  time-difference C3R')(,+5 h   F  ]&  
"  	45&   &  	 	"  	4 5&  		"  	45 &   "  	4 5&  "  	45 &   	"  4 >  "  G   &   "  4 >  "  G  	 6
6     >      g  t
	  g  duration	  g  sec-plus	   g  	nsec-plus	    g  filenamef  srfi/srfi-19.scm

			"		%		@	)	Y		\		v	. 	 	 	 	 	 	 	  	 	 	  g  nameg  add-duration! C6R-6       h      ]
4 56            g  t
		 g  duration		 g  result				  g  filenamef  srfi/srfi-19.scm

							 			  g  nameg  add-duration C5R')(,+5     h   M  ]&  
"  	45&   &  	 	"  	4 5&  		"  	45 &   "  	4 5&  "  	45 &   	"  4 >  "  G   &   "  4 >  "  G  	 6
6     E      g  t
	  g  duration	  g  	sec-minus	   g  
nsec-minus	    g  filenamef  srfi/srfi-19.scm

			"		%		@	+	Y		\		v	/ 	 	 	 	 	 	 	  	 	 	  g  nameg  subtract-duration! C8R-8        h      ]
4 56            g  time1
		 g  duration		 g  result				  g  filenamef  srfi/srfi-19.scm

							 			  g  nameg  subtract-duration C7R' *(+),   h   h  ] &   
"  	4 5&  "  4 >  "  G  &  
"  4>  "  G   &   "  	4 	5&  "  4
>  "  G   &  	 	"  	4 54 &  	 	"  	4 55&  	"  4>  "  G  C `      g  time-in
	 g  time-out	 g  caller		 g  val		>	k g  val	   g  val	   g  filenamef  srfi/srfi-19.scm

			"		'		-		4		>		n	! 	 	$ 	$ 	% 	$ 	! 	 		  g  nameg  priv:time-tai->time-utc! CR_ h      ]  6             g  time-in
		  g  filenamef  srfi/srfi-19.scm

		$		F		 		  g  nameg  time-tai->time-utc C_R` h      ]  6           g  time-in
		  g  filenamef  srfi/srfi-19.scm

	
	,		 		  g  nameg  time-tai->time-utc! C`R' *(+),  h   h  ] &   
"  	4 5&  "  4 >  "  G  &  
"  4>  "  G   &   "  	4 	5&  "  4
>  "  G   &  	 	"  	4 54 &  	 	"  	4 55&  	"  4>  "  G  C `      g  time-in
	 g  time-out	 g  caller		 g  val		>	k g  val	   g  val	   g  filenamef  srfi/srfi-19.scm

			"		'		-		4		>		n	! 	 	$ 	$ 	% 	$ 	! 	 		  g  nameg  priv:time-utc->time-tai! CRf h      ]  6             g  time-in
		  g  filenamef  srfi/srfi-19.scm

		$		F		 		  g  nameg  time-utc->time-tai CfRg h      ]  6           g  time-in
		  g  filenamef  srfi/srfi-19.scm

	
	,		 		  g  nameg  time-utc->time-tai! CgR'X-*     h     ] &   
"  	4 5&  "  4 >  "  G  4 5	&  
"  4
>  "  G  6         g  time-in
		~ g  ntime	C	~ g  val		G	t  g  filenamef  srfi/srfi-19.scm

			"		'		+		-		4		=		C		G		|	*	~	 		~  g  nameg  time-monotonic->time-utc CXR'Y*X    hx      ]	 &   
"  	4 5&  "  4 >  "  G   &   
"  4 	>  "  G  
  6          g  time-in
		u g  val	>	k  g  filenamef  srfi/srfi-19.scm

			"		'		+		-		4		>		s	,	u	 		u  g  nameg  time-monotonic->time-utc! CYR'V-*   hx      ] &   
"  	4 5&  "  4 >  "  G  4 5	&  
"  4
>  "  G  C        g  time-in
		w g  ntime	C	w g  val		G	t  g  filenamef  srfi/srfi-19.scm

			"		'		+		-		4		=		C		G	 		w  g  nameg  time-monotonic->time-tai CVR'W* 
  hp      ]	 &   
"  	4 5&  "  4 >  "  G   &   
"  4 	>  "  G   C         g  time-in
		n g  val	>	k  g  filenamef  srfi/srfi-19.scm

			"		'		+		-		4		> 	 			n  g  nameg  time-monotonic->time-tai! CWR' d*    h     ] &   
"  	4 5&  "  4 >  "  G  4  5	&  
"  4
>  "  G  C             g  time-in
	  g  ntime	M  g  val		Q	~  g  filenamef  srfi/srfi-19.scm

			"		'		+		-		4		=		I	1	K	)	M		M		Q		 	   g  nameg  time-utc->time-monotonic CdR' e*  h     ] &   
"  	4 5&  "  4 >  "  G  4  5	&  
"  4
>  "  G  C            g  time-in
		{ g  ntime	G	{ g  val		K	x  g  filenamef  srfi/srfi-19.scm

			"		'		+		-		4		=		E	)	G		G		K	 		{  g  nameg  time-utc->time-monotonic! CeR']-*      hx      ] &   
"  	4 5&  "  4 >  "  G  4 5	&  
"  4
>  "  G  C        g  time-in
		w g  ntime	C	w g  val		G	t  g  filenamef  srfi/srfi-19.scm

			"		'		+		-		4		=		C		G	 		w  g  nameg  time-tai->time-monotonic C]R'^* 
  hp      ]	 &   
"  	4 5&  "  4 >  "  G   &   
"  4 	>  "  G   C         g  time-in
		n g  val	>	k  g  filenamef  srfi/srfi-19.scm

			"		'		+		- 		4		>!	 			n  g  nameg  time-tai->time-monotonic! C^R        h      , 3   	C           g  
nanosecond
		 g  second		 g  minute			 g  hour			 g  day			 g  month			 g  year			 g  zone-offset			  g  filenamef  srfi/srfi-19.scm
)
 			  g  nameg  %make-date-procedure CR49'  h    
  , 3   	C          g  t-46961e50d3-33b
		 g  t-46961e50d3-33c		 g  t-46961e50d3-33d			 g  t-46961e50d3-33e			 g  t-46961e50d3-33f			 g  t-46961e50d3-340			 g  t-46961e50d3-341			 g  t-46961e50d3-342			  			   CLO9P       h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	)
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	)
 		
   C)     h      ] C          		
   CWX      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-19.scm
)
 		n   C59R[*_+  4c >  "  G   	fi  R     h   r   ] $   CC      j       g  obj
		  g  filenamef  srfi/srfi-19.scm
)
 		  g  nameg  %date?-procedure C,R4:hG      h   8   ]  C      0       g  t-46961e50d3-35d
		
  		
   CLO:P h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	)
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	)
 		
   CI     h      ] C          		
   CWX      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-19.scm
)
 		n   C5:R;  h   z   ] &   
C 6r       g  s
		  g  filenamef  srfi/srfi-19.scm
)
 		  g  nameg  %date-nanosecond-procedure CJR4;X_d   h   :   ]C     2       g  err
		 g  s		  			   Cgmr h   :   ]C     2       g  err
		 g  s		  			   Cu{ h   :   ]C     2       g  err
		 g  s		  			   Ch    h   8   ]  C      0       g  t-46961e50d3-369
		
  		
   CLO;P h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	)
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	)
 		
   C     h      ] C          		
   CWX      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-19.scm
)
 	    C5;R<      h   v   ] &   C 6n       g  s
		  g  filenamef  srfi/srfi-19.scm
)
 		  g  nameg  %date-second-procedure CR4<       h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   Ch    h   8   ]  C      0       g  t-46961e50d3-384
		
  		
   CLO<P h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	)
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	)
 		
   C     h      ] C          		
   CWX      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-19.scm
)
 	    C5<R=      h    v   ] &   	C 6       n       g  s
		  g  filenamef  srfi/srfi-19.scm
)
 		  g  nameg  %date-minute-procedure CR4=
       h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C &+ h   :   ]C     2       g  err
		 g  s		  			   ChG    h   8   ]  C      0       g  t-46961e50d3-39f
		
  		
   CLO=P h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	)
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	)
 		
   CI     h      ] C          		
   CWX      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-19.scm
)
 	    C5=R>      h    t   ] &   	C 6       l       g  s
		  g  filenamef  srfi/srfi-19.scm
)
 		  g  nameg  %date-hour-procedure CJR4>X_d h   :   ]C     2       g  err
		 g  s		  			   Cgmr h   :   ]C     2       g  err
		 g  s		  			   Cu{ h   :   ]C     2       g  err
		 g  s		  			   Ch    h   8   ]  C      0       g  t-46961e50d3-3ba
		
  		
   CLO>P h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	)
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	)
 		
   C     h      ] C          		
   CWX      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-19.scm
)
 	    C5>R?      h    s   ] &   	C 6       k       g  s
		  g  filenamef  srfi/srfi-19.scm
)
 		  g  nameg  %date-day-procedure CR4?  h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   Ch    h   8   ]  C      0       g  t-46961e50d3-3d5
		
  		
   CLO?P h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	)
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	)
 		
   C     h      ] C          		
   CWX      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-19.scm
)
 	    C5?R@      h    u   ] &   	C 6       m       g  s
		  g  filenamef  srfi/srfi-19.scm
)
 		  g  nameg  %date-month-procedure CR4@	        h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C%* h   :   ]C     2       g  err
		 g  s		  			   ChF    h   8   ]  C      0       g  t-46961e50d3-3f0
		
  		
   CLO@P h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	)
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	)
 		
   CH     h      ] C          		
   CWX      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-19.scm
)
 	    C5@RA      h    t   ] &   	C 6       l       g  s
		  g  filenamef  srfi/srfi-19.scm
)
 		  g  nameg  %date-year-procedure CIR4AW^c h   :   ]C     2       g  err
		 g  s		  			   Cflq h   :   ]C     2       g  err
		 g  s		  			   Ctz h   :   ]C     2       g  err
		 g  s		  			   Ch    h   8   ]  C      0       g  t-46961e50d3-40b
		
  		
   CLOAP h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	)
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	)
 		
   C     h      ] C          		
   CWX      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-19.scm
)
 	    C5ARB      h    {   ] &   	C 6       s       g  s
		  g  filenamef  srfi/srfi-19.scm
)
 		  g  nameg  %date-zone-offset-procedure CR4B  h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   Ch    h   8   ]  C      0       g  t-46961e50d3-426
		
  		
   CLOBP h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	)
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	)
 		
   C     h      ] C          		
   CWX      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-19.scm
)
 	    C5BR4}78 h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   CWX h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-19.scm
)
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5}R      h       ] &   
C 6             g  s
		 g  val		  g  filenamef  srfi/srfi-19.scm
)
 			  g  nameg  %set-date-nanosecond!-procedure CR4:5       h   V   ]  C    N       g  t-46961e50d3-454
		 g  t-46961e50d3-455		  			   CLOP  h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	)
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	)
 		
   C7     h      ] C          		
   CWX      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-19.scm
)
 		n   C5R8        h       ] &   C 6             g  s
		 g  val		  g  filenamef  srfi/srfi-19.scm
)
 			  g  nameg  %set-date-second!-procedure C9R48:_   h   V   ]  C    N       g  t-46961e50d3-464
		 g  t-46961e50d3-465		  			   CLO8P  h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	)
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	)
 		
   Ca     h      ] C          		
   CWX      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-19.scm
)
 		n   C58Rb        h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-19.scm
)
 			  g  nameg  %set-date-minute!-procedure CcR4b:   h   V   ]  C    N       g  t-46961e50d3-474
		 g  t-46961e50d3-475		  			   CLObP  h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	)
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	)
 		
   C     h      ] C          		
   CWX      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-19.scm
)
 		n   C5bR        h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-19.scm
)
 			  g  nameg  %set-date-hour!-procedure CR4:     h   V   ]  C    N       g  t-46961e50d3-484
		 g  t-46961e50d3-485		  			   CLOP  h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	)
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	)
 		
   C     h      ] C          		
   CWX      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-19.scm
)
 		n   C5R        h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-19.scm
)
 			  g  nameg  %set-date-day!-procedure CR4:      h   V   ]  C    N       g  t-46961e50d3-494
		 g  t-46961e50d3-495		  			   CLOP  h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	)
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	)
 		
   C     h      ] C          		
   CWX      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-19.scm
)
 		n   C5R        h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-19.scm
)
 			  g  nameg  %set-date-month!-procedure CR4:    h   V   ]  C    N       g  t-46961e50d3-4a4
		 g  t-46961e50d3-4a5		  			   CLOP  h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	)
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	)
 		
   C	     h      ] C          		
   CWX      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-19.scm
)
 		n   C5R
        h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-19.scm
)
 			  g  nameg  %set-date-year!-procedure CR4
:1     h   V   ]  C    N       g  t-46961e50d3-4b4
		 g  t-46961e50d3-4b5		  			   CLO
P  h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	)
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	)
 		
   C3     h      ] C          		
   CWX      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-19.scm
)
 		n   C5
R4        h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-19.scm
)
 			  g  nameg   %set-date-zone-offset!-procedure C5R44:[      h   V   ]  C    N       g  t-46961e50d3-4c4
		 g  t-46961e50d3-4c5		  			   CLO4P  h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-19.scm	)
 		   CS   h   D   ] L 6<       g  filenamef  srfi/srfi-19.scm	)
 		
   C]     h      ] C          		
   CWX      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-19.scm
)
 		n   C54R   hh     ]		
$  	"  
		  		m	
	dӖC          g  day
		d g  month		d g  year			d g  a		
	d g  y		%	d g  m		2	d  g  filenamef  srfi/srfi-19.scm
9
	:		
:		
:		;		;		;	#	;		%;		%:		.<		/<		2<		2:		<>		?>		B>		C=		I?		J=		O@		P=		QA		VA	
	WA		X=		^B		_=	 		d	  g  nameg  encode-julian-day-number C^R  h     ]A44 55},		     :     :						 	d@	
 
 					

$  "  D            g  jdn
	  g  days	  g  a		  g  b		*  g  c		>  g  d		L  g  e		Z  g  m		h  g  y		|   	g  filenamef  srfi/srfi-19.scm
F
	G		G		G		G		H		G		I		 I		*I		*G		:J		=J		>J		>G		EK		HK		LK		LG		VL		YL		ZL		ZG		aM		dM		hM		hG		oN		rN		{N	!	|N		|G	 P	 P	 Q	
 Q	 Q	 Q	 Q	
 Q	 R	 R	 R	 R	 S		 S	 S	 O	 1	   g  nameg  decode-julian-day-number C_R`a)      h0      ]
44 &  	 	"  	4 555C             g  utc-time
		*  g  filenamef  srfi/srfi-19.scm
Y
	[		[		[		[		&[		([		)[	 			*  g  nameg  local-tz-offset CbR     h      ] C              g  seconds
		 g  	tz-offset		  g  filenamef  srfi/srfi-19.scm
^
	_		_		_	 			  g  nameg  time->julian-day-number CcRd    h      ]4 5$  CC     {       g  second
		  g  filenamef  srfi/srfi-19.scm
c
	d		d	 		  g  nameg  leap-second? CeR' fbe)c_g(    hP  R  - 1 3  &   
"  	4 5&  "  4 >  "  G  (  4 5"  4	 &  	 	"  	4 
554$    &  	 	"  	4 
5"   &  	 	"  	4 
554>  G 4455		
		<	< &   "  	4 5$  "  
 	C   J      g  time
		M g  	tz-offset		M g  offset		WM g  leap-second?		|M g  jdn	 M g  secs	 M g  date	 M g  month	 M g  year	 M g  int-secs		 M g  hours	
 M g  rem	 M g  minutes	M g  seconds	M g  
nanosecond	3M g  second	3M  g  filenamef  srfi/srfi-19.scm
f
	g		)g		.h		2h		4h		;h		Ii		Jj		Wk		Wi		Zl		al	/	zl	%	|l		|i		m	 m	' n	3 n	0 o	0 m	 i	 r	! r	 v	 v	) v	 v	 w	, w	 v	 x	- x	 v	y	v	z	v	{	*|	-|	&3{	
 ,		M
  g  nameg  time-utc->date CaR'fb_)ec_g(  hH    - 1 3  &   
"  	4 5&  "  4 >  "  G  (  44	 55"   &  	 	"  	4 
54 &  	 	"  	4 
55454$  "  54>  G 	4455


	<	< &   "  	4 5$  "  	 	C         g  time
		E g  	tz-offset		E g  offset		\E g  seconds	 E g  leap-second?	 E g  jdn	 E g  secs	 E g  date	 E g  month	 E g  year		 E g  int-secs	
 E g  hours	 E g  rem	 E g  minutes	 E g  seconds	 E g  
nanosecond	+E g  second	+E  g  filenamef  srfi/srfi-19.scm

			)		.		2		4		;		I		J		M	&	U		\		\		a		z			( 	 	 	 	 	% 	 	 	 	' 	0 	 	 	! 	 	 	) 	 	 	, 	 	 	- 	 	 	 	 	 		"	%	&+	
 1		E
  g  nameg  time-tai->date CZR'fbX)ec_g(       hH    - 1 3  &   
"  	4 5&  "  4 >  "  G  (  44	 55"   &  	 	"  	4 
54 &  	 	"  	4 
55454$  "  54>  G 	4455


	<	< &   "  	4 5$  "  	 	C         g  time
		E g  	tz-offset		E g  offset		\E g  seconds	 E g  leap-second?	 E g  jdn	 E g  secs	 E g  date	 E g  month	 E g  year		 E g  int-secs	
 E g  hours	 E g  rem	 E g  minutes	 E g  seconds	 E g  
nanosecond	+E g  second	+E  g  filenamef  srfi/srfi-19.scm

			)		.		2		4		;		I		J		M	&	U		\		\		a		z			( 	 	 	 	 	% 	 	 	 	' 	0 	 	 	! 	 	 	) 	 	 	, 	 	 	- 	 	 	 	 	 		"	%	&+	
 1		E
  g  nameg  time-monotonic->date CSR^?@Ah% ;>=<B  h    ]4 &  	 	"  	4 5 &  	 	"  	4 5 &  	 	"  	4 554	5
 &   
"  	4 5		<	< &  	 	"  	4 5	<	< &  	 	"  	4 5	< &   "  	4 5
 &  	 	"  	4 56        g  date
	 g  jdays	[ g  	jdays-1/2		g  g  filenamef  srfi/srfi-19.scm

				-	#	1	>	1	X		[		[		^		d	-	e	$	g		g		p	 	 	 	 	 	 	 	 	 	 	 				 	  g  nameg  date->time-utc CJRgJ      h      ]4 56   {       g  date
		  g  filenamef  srfi/srfi-19.scm

				 		  g  nameg  date->time-tai CIReJ  h      ]4 56          g  date
		  g  filenamef  srfi/srfi-19.scm

				 		  g  nameg  date->time-monotonic CHR  h0      ]	 
$  C 	
$  	 	d
CC            g  year
		+ g  t	
	+  g  filenamef  srfi/srfi-19.scm

				
		
						 		%	)	'	&	(	! 		+  g  nameg  
leap-year? CiRvwRdwCxi     h`   4  ]45$  "  4>  "  G  "   C45$  	$  	 C""   ,      g  day
		] g  month		] g  year			] g  days-pr			]  g  filenamef  srfi/srfi-19.scm

												#	%		6		7		8		9		C		H		L		Q		R	 		]	  g  nameg  year-day CyRy?@A     hX      ] &  	 	"  	4 5 &  	 	"  	4 5 &  	 	"  	4 56        g  date
		W  g  filenamef  srfi/srfi-19.scm

			"		=	.	W	 		W  g  nameg  date-year-day CCR       hH   y  ]				 	
	d			C q      g  day
		G g  month		G g  year			G g  a		
	G g  y			G g  m			G  g  filenamef  srfi/srfi-19.scm

			
		
												%		*		+		,		1		2		3		9		:		?		B		C		F	 		G	  g  nameg  week-day CzRz?@A        hX      ] &  	 	"  	4 5 &  	 	"  	4 5 &  	 	"  	4 56        g  date
		W  g  filenamef  srfi/srfi-19.scm

			"		=	.	W	 		W  g  nameg  date-week-day CDRAD   hH      ] &  	 	"  	4 5



 	45	C          g  date
		D g  day-of-week-starting-week		D g  year			0 g  	first-day		0	D g  
fdweek-day		9	D  g  filenamef  srfi/srfi-19.scm
 
					0		3		9		@		C	 			D	  g  nameg  days-before-first-week C{RC{   h      ]4 54 5	C       g  date
		 g  day-of-week-starting-week		  g  filenamef  srfi/srfi-19.scm

			
							 			  g  nameg  date-week-number CERl ab h0      -  1  3 45 (  45"   6           g  	tz-offset
			, g  time		,  g  filenamef  srfi/srfi-19.scm

	
									*			,	 			,


  g  nameg  current-date C!R!A  hh   I  ]45 &  		"  	45	d	d 	d$   C 
$   C 	2$   C	d CA      g  n
		h g  s		' g  current-year	'	h g  current-century		1	h  g  filenamef  srfi/srfi-19.scm

		"			'		.		1		1		8!		< 		C"		G 		O#		R#		U#		Y 		^#	6	d$		g$	 		h  g  nameg  natural-year C|R;<=>?@AB^}       h    ]A &   
"  	4 5 &   "  	4 5 &  	 	"  	4 5 &  	 	"  	4 5 &  	 	"  	4 5 &  	 	"  	4 5 &  	 	"  	4 	5 &  	 	"  	4 
545
	<	<	<C       g  date
	 g  
nanosecond  g  second	  g  minute	  g  hour	  g  day	  g  month	  g  year	  g  offset	   	g  filenamef  srfi/srfi-19.scm
&
	'		(		9)		T*		o+	 ,	 -	 .	 '	 /	 0	 /	 1	 2	1	3		1	5	1	1	
/	 	  g  nameg  date->julian-day CFRF~       h      ]4 5C          g  date
		  g  filenamef  srfi/srfi-19.scm
8
	9		:		9	 		  g  nameg  date->modified-julian-day CGR' f)(       h      ] &   
"  	4 5&  "  4 >  "  G   &  	 	"  	4 5 &   "  	4 	5
C           g  time
		|  g  filenamef  srfi/srfi-19.scm
<
	=		"=		'>		+>		->		4>		??		Z?	!	t?		u?		x?		{?	 		|  g  nameg  time-utc->julian-day CbRb~ h      ]4 5C          g  time
		  g  filenamef  srfi/srfi-19.scm
C
	D		E		D	 		  g  nameg  time-utc->modified-julian-day CcR'f)( h     ] &   
"  	4 5&  "  4 >  "  G   &  	 	"  	4 54	 &  	 	"  	4 55 &   "  	4 
5C         g  time
	   g  filenamef  srfi/srfi-19.scm
G
	H		"H		'I		+I		-I		4I		?J		XK		]K	!	wK		xJ		{L	 L	 J	 J	 J	 	   g  nameg  time-tai->julian-day C[R[~       h      ]4 5C          g  time
		  g  filenamef  srfi/srfi-19.scm
P
	Q		R		Q	 		  g  nameg  time-tai->modified-julian-day C\R'f)( h     ] &   
"  	4 5&  "  4 >  "  G   &  	 	"  	4 54	 &  	 	"  	4 55 &   "  	4 
5C         g  time
	   g  filenamef  srfi/srfi-19.scm
U
	V		"V		'W		+W		-W		4W		?X		XY		]Y	!	wY		xX		{Z	 Z	 X	 X	 X	 	   g  nameg  time-monotonic->julian-day CTRT~ h      ]4 5C          g  time
		  g  filenamef  srfi/srfi-19.scm
^
	_		`		_	 		  g  nameg  #time-monotonic->modified-julian-day CUR%    h0      ] 4>  G 6            g  jdn
		+ g  secs	
	+ g  seconds			+ g  parts			+  g  filenamef  srfi/srfi-19.scm
b
		c		
c		
c		e		d		'g		+f	 			+  g  nameg  julian-day->time-utc CNRgN       h      ]4 56          g  jdn
		  g  filenamef  srfi/srfi-19.scm
j
	k		k	 		  g  nameg  julian-day->time-tai CMReN     h      ]4 56          g  jdn
		  g  filenamef  srfi/srfi-19.scm
m
	n		n	 		  g  nameg  julian-day->time-monotonic CLRNba    h0      - 1 3 4 5(  45"  6       g  jdn
			0 g  	tz-offset			0 g  time			0 g  offset		&	0  g  filenamef  srfi/srfi-19.scm
p
	
q		q		r		s		&t		&q		0u	 				0
  g  nameg  julian-day->date CKRK~     h      - 1 3  @           g  jdn
			 g  	tz-offset			  g  filenamef  srfi/srfi-19.scm
w
	x	!	x		x	 			
  g  nameg  modified-julian-day->date CORN~      h      ] 6            g  jdn
		  g  filenamef  srfi/srfi-19.scm
{
	|			|		|	 		  g  nameg  modified-julian-day->time-utc CRRM~  h      ] 6            g  jdn
		  g  filenamef  srfi/srfi-19.scm
~
							 		  g  nameg  modified-julian-day->time-tai CQRL~  h      ] 6            g  jdn
		  g  filenamef  srfi/srfi-19.scm

		%					 		  g  nameg  #modified-julian-day->time-monotonic CPRbl    h   t   ] 456   l       g  filenamef  srfi/srfi-19.scm

				 		
  g  nameg  current-julian-day C"Rcl        h   }   ] 456   u       g  filenamef  srfi/srfi-19.scm

		!		 		
  g  nameg  current-modified-julian-day C#R hH   2  ]4 545$  "  $  C456   *      g  n
		E g  pad-with		E g  length			E g  str				E g  str-len			E g  t			,  g  filenamef  srfi/srfi-19.scm

														)		0		6		=	$	A		E	 		E	  g  nameg  padding CR        h      ] 4	
56             g  i
		 g  n		  g  filenamef  srfi/srfi-19.scm

						 			  g  nameg  last-n-digits CR      h      ] 6       }       g  n
			  g  filenamef  srfi/srfi-19.scm

		2			  			  g  nameg  locale-abbr-weekday CR        h      ] 6       }       g  n
			  g  filenamef  srfi/srfi-19.scm

		,			  			  g  nameg  locale-long-weekday CRiRiR   h8   ,  ]"  )$  C4 455$  C""  $      g  needle
		6 g  haystack-ref		6 g  haystack-len			6 g  same?			6 g  index			/  g  filenamef  srfi/srfi-19.scm

													#		)		/		/	 		6	  g  nameg  date-reverse-lookup CR   h      ] 	6         g  string
		  g  filenamef  srfi/srfi-19.scm

		 		  g  nameg  locale-abbr-weekday->index CR       h      ] 	6         g  string
		  g  filenamef  srfi/srfi-19.scm

		 		  g  nameg  locale-long-weekday->index CR       h      ] 	6  ~       g  string
		  g  filenamef  srfi/srfi-19.scm

		 		  g  nameg  locale-abbr-month->index CR h      ] 	6  ~       g  string
		  g  filenamef  srfi/srfi-19.scm

		 		  g  nameg  locale-long-month->index CRB       h(      ] &  	 	"  	4 56            g  date
		# g  port		#  g  filenamef  srfi/srfi-19.scm

			#	 		#	  g  nameg  locale-print-time-zone CR     h      ] 	$  6 6             g  hr
		  g  filenamef  srfi/srfi-19.scm

								# 		  g  nameg  locale-am-string/pm CR      h     ] 
$  4>  "  G  "  4 
$  4>  "  G  "  4>  "  G   
$  C4 54 	<5440	5>  "  G  40	56           g  offset
	  g  port	  g  hours		y  g  minutes		y   g  filenamef  srfi/srfi-19.scm

			
								%		*		+		/	 	6		C			G		N			Z		^		a		h	+	i		k		l		s	6	t	$	w		y		y		~	 	 	 	 	  	 	  g  nameg  
tz-printer CR~   h      ]~6             g  date
		
 g  pad-with		
 g  port			
  g  filenamef  srfi/srfi-19.scm
		
	 		
	   CaD h      ]44 556           g  date
		 g  pad-with		 g  port			  g  filenamef  srfi/srfi-19.scm
					-				 			   CAD      h      ]44 556           g  date
		 g  pad-with		 g  port			  g  filenamef  srfi/srfi-19.scm
					-				 			   Cb@        h(      ]4 &  	 	"  	4 556       g  date
		( g  pad-with		( g  port			(  g  filenamef  srfi/srfi-19.scm
				
	+	$		(	 		(	   CB@        h(      ]4 &  	 	"  	4 556       g  date
		( g  pad-with		( g  port			(  g  filenamef  srfi/srfi-19.scm
				
	+	$		(	 		(	   Cch{       h      ]4 56              g  date
		 g  pad-with		 g  port			  g  filenamef  srfi/srfi-19.scm
					 			   Cd?  h0      ]4 &  	 	"  	4 50	56           g  date
		, g  pad-with		, g  port			,  g  filenamef  srfi/srfi-19.scm
				
	!	(		,	 		,	   CDh|       h      ]4 56              g  date
		 g  pad-with		 g  port			  g  filenamef  srfi/srfi-19.scm
					+				 			   Ce?        h0      ]4 &  	 	"  	4 5 	56           g  date
		, g  pad-with		, g  port			,  g  filenamef  srfi/srfi-19.scm
				
	!	(		,	 		,	   Cf;<  h    ]# &   
"  	4 5$  :44 &   "  	4 5	5>  "  G  "  544 &   "  	4 5	5>  "  G  4 &   
"  	4 5	>  G 4
545	$  (445 >  "  G  4	56C       g  date
	 g  pad-with	 g  port		 g  i	  g  f	  g  ns	  g  le	   g  filenamef  srfi/srfi-19.scm
						#		$		'		,	(	D	%	J		Q		^		a		f	% 	 	 	 	* 	$ 	/ 	$ 	 	 	# 	 	# 	 	 	 	  	) 	  	)	  "		   Chh    h      ]4 56              g  date
		 g  pad-with		 g  port			  g  filenamef  srfi/srfi-19.scm
					+				 			   CH>        h0      ]4 &  	 	"  	4 5	56           g  date
		, g  pad-with		, g  port			,  g  filenamef  srfi/srfi-19.scm
 				
	!	(		,	 		,	   CI>        hP      ] &  	 	"  	4 5	$  4		564	56          g  date
		M g  pad-with		M g  port			M g  hr			M  g  filenamef  srfi/srfi-19.scm
						$		(		+		2	'	8		<		?
		M
	 		M	   CjC        h      ]44 5	56       g  date
		 g  pad-with		 g  port			  g  filenamef  srfi/srfi-19.scm
					!				 			   Ck>        h0      ]4 &  	 	"  	4 5 	56           g  date
		, g  pad-with		, g  port			,  g  filenamef  srfi/srfi-19.scm
				
	!	(		,	 		,	   Cl>        hx      ] &  	 	"  	4 5	$  " &  	 	"  	4 5	"   &  	 	"  	4 54 	56           g  date
		t g  pad-with		t g  port			t g  hr		a	t  g  filenamef  srfi/srfi-19.scm
			 	 		$		'	 	B		I	5	a		f		t	 		t	   Cm@   h0      ]4 &  	 	"  	4 5	56           g  date
		, g  pad-with		, g  port			,  g  filenamef  srfi/srfi-19.scm
				
	!	(		,	 		,	   CM=        h0      ]4 &  	 	"  	4 5	56           g  date
		, g  pad-with		, g  port			,  g  filenamef  srfi/srfi-19.scm
				
	!	(		,	 		,	   Cn   h      ]6       g  date
		 g  pad-with		 g  port			  g  filenamef  srfi/srfi-19.scm
"		#	 			   CN;   h0      ]4 &   
"  	4 5	56            g  date
		+ g  pad-with		+ g  port			+  g  filenamef  srfi/srfi-19.scm
$		%		
%	!	'%		+%	 		+	   Cp>        h(      ]4 &  	 	"  	4 556       g  date
		( g  pad-with		( g  port			(  g  filenamef  srfi/srfi-19.scm
(		)		
)	-	$)		()	 		(	   Crh      h      ]4 56              g  date
		 g  pad-with		 g  port			  g  filenamef  srfi/srfi-19.scm
*		+		+	+	+		+	 			   CsJ)  h0      ]4 5&  		"  	456        g  date
		/ g  pad-with		/ g  port			/ g  s			+  g  filenamef  srfi/srfi-19.scm
,		-	%	-		/-	 		/	   CS;<      hx      ] &   
"  	4 5$  *4 &   "  	4 5	564 &   "  	4 5	56         g  date
		v g  pad-with		v g  port			v  g  filenamef  srfi/srfi-19.scm
.		/		/		#/		&1		+1	(	C1	%	I1		M1		P4		U4	%	r4		v4	 		v	   Ct   h      ]	6             g  date
		
 g  pad-with		
 g  port			
  g  filenamef  srfi/srfi-19.scm
7		
8	 		
	   CTh~  h      ]4 56              g  date
		 g  pad-with		 g  port			  g  filenamef  srfi/srfi-19.scm
9		:		:	+	:		:	 			   CU{E   h@      ]4 
5
$  44 
50	5644 
50	56        g  date
		? g  pad-with		? g  port			?  g  filenamef  srfi/srfi-19.scm
;		<		<		<		=		=	(	=	%	$=		(=		+?		.?	%	;?		??	 		?	   CVE      h       ]44 50	56              g  date
		 g  pad-with		 g  port			  g  filenamef  srfi/srfi-19.scm
A		B		B	!	B		B	 			   CwD h      ]4 56        g  date
		 g  pad-with		 g  port			  g  filenamef  srfi/srfi-19.scm
D		E		E	 			   Cxh} h      ]4 56              g  date
		 g  pad-with		 g  port			  g  filenamef  srfi/srfi-19.scm
F		G		G	 			   CXh h      ]4 56              g  date
		 g  pad-with		 g  port			  g  filenamef  srfi/srfi-19.scm
H		I		I	 			   CW{E     h@      ]4 5
$  44 50	5644 50	56        g  date
		? g  pad-with		? g  port			?  g  filenamef  srfi/srfi-19.scm
J		K		K		K		L		L	(	L	%	$L		(L		+N		.N	%	;N		?N	 		?	   CyA     h8      ]44 &  	 	"  	4 5	5	56            g  date
		3 g  pad-with		3 g  port			3  g  filenamef  srfi/srfi-19.scm
P		Q		Q	!	R	'	)Q	!	/Q		3Q	 		3	   CYA h(      ] &  	 	"  	4 56            g  date
		# g  pad-with		# g  port			#  g  filenamef  srfi/srfi-19.scm
V		W		#W	 		#	   CzB     h(      ] &  	 	"  	4 56            g  date
		# g  pad-with		# g  port			#  g  filenamef  srfi/srfi-19.scm
X		Y		#Y	 		#	   CZ     h      ] 6             g  date
		
 g  pad-with		
 g  port			
  g  filenamef  srfi/srfi-19.scm
Z		
[	 		
	   C1h h      ]4 56              g  date
		 g  pad-with		 g  port			  g  filenamef  srfi/srfi-19.scm
\		]		]	+	]		]	 			   C2h      h      ]4 56              g  date
		 g  pad-with		 g  port			  g  filenamef  srfi/srfi-19.scm
^		_		_	+	_		_	 			   C3h~       h      ]4 56              g  date
		 g  pad-with		 g  port			  g  filenamef  srfi/srfi-19.scm
`		a		a	+	a		a	 			   C4h       h      ]4 56              g  date
		 g  pad-with		 g  port			  g  filenamef  srfi/srfi-19.scm
b		c		c	+	c		c	 			   C5h      h      ]4 56              g  date
		 g  pad-with		 g  port			  g  filenamef  srfi/srfi-19.scm
d		e		e	+	e		e	 			   C )Rd   h       ]	4 5$  CC              g  char
		 g  
associated		  g  filenamef  srfi/srfi-19.scm
h
	i		i		j		j	 		  g  nameg  get-formatter CR 	     h    ]$ |454~5$ A$  
6454-5$  _	$  
644	55$  &4 >  "  G   	664_5$  `	$  
644	55$  '4  >  "  G   	664455$  '4 0>  "  G   	664>  "  G   6C             g  date
	 g  index	 g  format-string		 g  str-len		 g  port		 g  current-char		 g  	pad-char?		Ad g  	formatter		w  g  	formatter	  g  	formatter	+d  
g  filenamef  srfi/srfi-19.scm
l
	m		m		n		n		o		#o		&s		)s		-s		1t		3t	*	7t		8v	!	?v	;	Av	!	Av		Dx		Pw		Uy		Xy		\y		`z	$	b{	)	fz		g}	)	j~	*	s	6	u~	*	w}	)	w}			 	  	3 	  	* 	/ 	 	 w	 	 	 	 	$ 	) 	 	) 	* 	6 	* 	) 	 	 	 
	3	 	*	/		% 	&'	2)	&+	%+	3	4	R	/Z	^	&`	+d	eq	r	!r	 L		  g  nameg  date-printer CR     hH     - 1 3 45 (  "  4 
45>  "  G  6          g  date
			E g  format-string			E g  str-port			E g  fmt-str			E  g  filenamef  srfi/srfi-19.scm

	
					+		0			"		*	!	7		E	 			E
  g  nameg  date->string ChR       h      ] 0$  
C 1$  C 2$  	C 3$  	C 4$  	C 5$  	C 6$  	C 7$  	C 8$  	C 9$  		C  6        g  ch
	   g  filenamef  srfi/srfi-19.scm

			|		~	  	  	 		 	   g  nameg  	char->int CR     h     ]*"  l4545$  "  (45$  "   $  	 "  $  C	
4455"

"    {      g  upto
		| g  port		| g  accum			r g  nchars			r g  ch			r g  t			N g  t		+	K  g  filenamef  srfi/srfi-19.scm

										
	$		+		+	
	>		C		R		Z		[	 	^	+	f	 	g		j		r	
	r	 		|	  g  nameg  integer-reader CR h   `   ]L  6      X       g  port
		
  g  filenamef  srfi/srfi-19.scm
		
	 		
   C     h   v   ] O C      n       g  upto
		
  g  filenamef  srfi/srfi-19.scm

 		
  g  nameg  make-integer-reader CRi       h     ]*H"  45 $  C45$  
645$  $K	
44	55"J$  #4	>  "  G  "~
6

"f           g  n
	  g  port	  g  
padding-ok		  g  port			  g  accum			  g  nchars			  g  ch		   g  filenamef  srfi/srfi-19.scm

						
					
				
	)		-		/	$	1		3	
	4	
	>		A	
	H		I	%	L	0	T	%	U		X		b	
	h		i	
 	  	
 	 	$ 	 	
 	 !	 	  g  nameg  integer-reader-exact CR       h   `   ]L  6      X       g  port
		
  g  filenamef  srfi/srfi-19.scm
		
	 		
   C     h   y   ] O C      q       g  n
		
  g  filenamef  srfi/srfi-19.scm

 		
  g  nameg  make-integer-exact-reader CRi 
      h  9  ]!
HH4 545$  4 >  "  G  "   4Z5$  "  	4z5$  
C4+5$  K"  /4-5$  K"  4 >  "  G  4 545$  4 >  "  G  "   4	5	
	<	<K4 545$  4 >  "  G  "   J4	5	<	<K4 545$  4 >  "  G  "   J4	5	
	<K4 545$  4 >  "  G  "   J4	5	<KJ$  JC
JC       1      g  port
	 g  offset	 g  	positive?		 g  ch		 g  t		D	] g  ch	   g  ch	 6 g  ch	=~ g  ch	  	g  filenamef  srfi/srfi-19.scm

									
				
	!		#	$	%	!	*		/	
	<		D	
	R		a		d		p		s		x	 	 	 	 	 	( 	% 	 	  	  	 	 	 	 	 	, 	) 	# 	 	 	 	 	 	 						,		)		#	$
	(-
	%1
	3
	7	=	@	J	K	O	Q	,S	)X	#]	l	(u	%y	{								,	)	#		(	%				! V	  g  nameg  zone-reader CR       h8      ]	4L545$  4L5  "4 56              g  result
		1 g  ch			1  g  filenamef  srfi/srfi-19.scm
								
			 	"	  		& 	
	)!		1!	
 		1  g  nameg  read-char-string Ci     h@   3  ]O  Q 4545$  C 6     +      g  port
		; g  indexer		; g  read-char-string			; g  str			; g  index		!	;  g  filenamef  srfi/srfi-19.scm

	#		#	 	#		#		$		!#		)%		0%	 	2&	%	4'	+	9'	%	;%	 		;	  g  nameg  locale-reader CR h   `   ] L 6      X       g  port
		
  g  filenamef  srfi/srfi-19.scm
*		
+	 		
   C     h   x   ] O C      p       g  indexer
		
  g  filenamef  srfi/srfi-19.scm
)
 		
  g  nameg  make-locale-reader CRi       h(      ]4L 4 55$  L C6              g  port
		!  g  filenamef  srfi/srfi-19.scm
.		/		/		/		/		1		2		3		!1	 
		!   C      h   v   ] O C      n       g  char
		
  g  filenamef  srfi/srfi-19.scm
-
 		
  g  nameg  make-char-id-reader CR    h   k   ]C    c       g  ch
		  g  filenamef  srfi/srfi-19.scm
M	 		  g  nameg  	char-fail C 4i	54i	54i	54ii54ii54ii54ii5~ 4i~5 ai Ai bi h    s   ]&  	 C6     k       g  val
		 g  object		  g  filenamef  srfi/srfi-19.scm
T		U	 			   C Bi    h    s   ]&  	 C6     k       g  val
		 g  object		  g  filenamef  srfi/srfi-19.scm
W		X	 			   C di    h    s   ]&  	 C6     k       g  val
		 g  object		  g  filenamef  srfi/srfi-19.scm
Y	&	Z	( 			   C e        h    s   ]&  	 C6     k       g  val
		 g  object		  g  filenamef  srfi/srfi-19.scm
\	#	]	% 			   C hi    h    s   ]&  	 C6     k       g  val
		 g  object		  g  filenamef  srfi/srfi-19.scm
_		`	 			   C Hi    h    s   ]&  	 C6     k       g  val
		 g  object		  g  filenamef  srfi/srfi-19.scm
a	&	b	( 			   C k        h    s   ]&  	 C6     k       g  val
		 g  object		  g  filenamef  srfi/srfi-19.scm
c	#	d	% 			   C mi    h    s   ]&  	 C6     k       g  val
		 g  object		  g  filenamef  srfi/srfi-19.scm
e	&	f	( 			   C Mib    h    s   ]&  	 C6     k       g  val
		 g  object		  g  filenamef  srfi/srfi-19.scm
g	&	h	( 			   C Si8    h    s   ]&   C6      k       g  val
		 g  object		  g  filenamef  srfi/srfi-19.scm
j	&	k	( 			   C y |
    h(      ]
4 5&  	C6           g  val
		$ g  object		$ g  val				$  g  filenamef  srfi/srfi-19.scm
m		n	$		n	 		$	   C Yi
  h    s   ]&  	 C6     k       g  val
		 g  object		  g  filenamef  srfi/srfi-19.scm
o	&	p	( 			   C z hH      ]	4 Z5$  C4 z5$  C4 +5$  C -6         g  c
		F g  t		F g  t		F g  t	3	F  g  filenamef  srfi/srfi-19.scm
q		r		r		s		r		+t		3r		Fu	 			F   Ci4 h    s   ]&  	 C6     k       g  val
		 g  object		  g  filenamef  srfi/srfi-19.scm
v		w	 			   C   Ri       hP      ]
4 545$  
L645$  C4 >  "  G    "            g  port
		K g  skipper		K g  ch				K  g  filenamef  srfi/srfi-19.scm
z		{			{		|	
	|		}		}	$	 }	
	!~		+~	
	.		K	& 		K	  g  nameg  
skip-until Cid    hX    ]FO Q $ 7454~5$  $  
64545		$  			
4
>  "  G  454	5$  4>  "  G  "  $  4 >  "  G  "   
 	66454	5		$  "  
45	$  4>  "  G  "   
 6C          g  date
	T g  index	T g  format-string		T g  str-len		T g  port		T g  template-string		T g  
skip-until		T g  current-char		$R g  format-char		Q  g  format-info			\  g  skipper	
	s  g  reader		s  g  actor		s  g  val	   g  	port-char	 R g  t			#  g  filenamef  srfi/srfi-19.scm
y
							$		'		3		6		9		=		A		C	!	G		H	$	O	>	Q	$	Q		T	$	\		d		g	'	k	'	p	'	s		z	 	% 	 	  	 	  	, 	1 	  	  	* 	- 	 	" 	' 	 	 					 	'	(	,	.	#5	H	!R	 6	T	  g  nameg  priv:string->date CRBb% 4Ji;<=>?@A   h   B  ]



 	4
454 5>  "  G  &  		"  	45$  "  v44	

55&  	"  4
>  "  G  4455&  	"  4
>  "  G  "   6&  
"  	45$  &  "  	45$  &  		"  	45$  &  		"  	45$  &  		"  	45$  l&  		"  	45$  I&  		"  	45$  &&  		"  	45$  C""""""""   :      g  input-string
	 g  template-string	 g  newdate		 g  val		g  g  val	    g  filenamef  srfi/srfi-19.scm

									!		.		9		U		Z	!	]	"	g	!	g	
 	! 	" 	! 	
 		 		 	 		 	 	 					 	#		?	B		^	a		}										 (		  g  nameg  string->date CiRC       g  m
		4 g  rtd


 g  rtd
gg g  	char-fail
     <     G g  ireader4     =     G g  ireader2	     =     G g  	eireader2	     =     G g  locale-reader-abbr-weekday	     =     G g  locale-reader-long-weekday	     =     G g  locale-reader-abbr-month	     =     G g  locale-reader-long-month	     =     G  g  filenamef  srfi/srfi-19.scm		)
	5 
	: 		B 	&	G 
	Q 		T 
	V 		Y 
	[ 		^ 
	` 		c 
	e 		h 
	j 		m 
	o 	 	r 
	t 	!	w 
	y 		| 
	~ 	"  
  
  
  
  	  
 
 
 	 
 
 
 
) 
*
0_
1=
3!
45
6:
6N
7[R
7jU	7nU
8]W
:b
;cq
=~
>
@
Bd
D,
F|
G`
I
J
M 
N
P
Q
R6
T
U
V^
X
Y
[%
\
^K
_
a
b
d2)
      9
      yF
      Y
      c^
      c
      f
      
      F
      *
      
      ˄
      ̐
      ̓	      ̗
      P
      _
      5
      G
       
      
      
      ו
      &
      ے8
      &<
      C
      G
      P
      fU
      ,^
      ib
      j
      m
      
p
      w
      {
      m~
      3
      
      x
      
      
      
      9
      B
      K
      
      t
      ,
      
      
      y
      D
      
      	      \	      4	      $	      	      	      	      	      	     	     	      	     	     	     	     	Q	     
D	     <	     "	     $	     (	     *	     ,	     .	     7	     9	     ;	     A	     zD	     :F	     H	     DJ	     VP	     *V	     X	     Z	     \	     \^	     4`	     b	     d	     	     
      h
     &l
     (

     )Y
     +
     ,
     /
     0
     6
     9
     :)
     <J-
     <B	     <B	     <C	     <D	     <E	$     <G	$     =I	$     =K	$     =B	     =2P	     =?P	     =LQ	     =YR	     >S	     >V	     ?~Y	     @6\	     @^	     Aa	     B^c	     Ce	     Cg	     Dj	     E`l	     Fo	     Gq	     GO	     GA
     Ny
     S5
 	     S7
   C6                                                                                                                                                                                                                                                                      ccache/srfi/srfi-9.go                                                                               0000644                 00000071676 15154557173 0010413 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0s      ] 4   hG3      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-9	 		g  filenameS	
f  srfi/srfi-9.scm	g  importsS	g  srfi-1	 	 	g  system	g  base	g  ck	 	 	 	g  exportsS	g  define-record-type	 	g  set-current-module	 	 	g  cond-expand-provide	g  current-module	 	g  make-syntax-transformer	 	  	!g  define-inlinable	"g  macro	#g  $sc-dispatch	$# 	%# 	&g  any	'g  each-any	(&'	)('	*&)	+g  syntax-object	,g  define-tagged-inlinable	-g  top	.- 	/g  ribcage	0g  dummy	1g  name	2g  formals	3g  body	40123 	5g  m-1e8ba8b5a-25b	65- 	76... 	8f  l-1e8ba8b5a-260	9f  l-1e8ba8b5a-261	:f  l-1e8ba8b5a-262	;f  l-1e8ba8b5a-263	<89:; 	=/47< 	>/ 	?g  x	@? 	A6 	Bf  l-1e8ba8b5a-25d	CB 	D/@AC 	E.=>D 	Fg  hygiene	GF 	H+,EG 	Ig  syntax-violation	JI 	KI 	Lf  -source expression failed to match any pattern	Mg  
%%on-error	N&& 	Og  %%type	Pg  getter-type	Qg  free-id	Rg  quote	Sg  m-1e8ba8b5a-274	TS- 	UT 	Vf  l-1e8ba8b5a-276	WV 	X/@UW 	Y.>X 	Z+RYG 	[QZ 	\[& 	]&&\\ 	^g  s	_g  getter	`g  err	a0^_` 	bT... 	cf  l-1e8ba8b5a-279	df  l-1e8ba8b5a-27a	ef  l-1e8ba8b5a-27b	ff  l-1e8ba8b5a-27c	gcdef 	h/abg 	i.h>X 	j+MiG 	k+OiG 	lg  %%index	mg  getter-index	ng  m-1e8ba8b5a-281	on- 	po 	qf  l-1e8ba8b5a-283	rq 	s/@pr 	t.>s 	u+RtG 	vQu 	wv& 	x&&ww 	yo... 	zf  l-1e8ba8b5a-286	{f  l-1e8ba8b5a-287	|f  l-1e8ba8b5a-288	}f  l-1e8ba8b5a-289	~z{|} 	/ay~  .>s  +MG  +lG  g  %%copier g  getter-copier g  m-1e8ba8b5a-28e -    f  l-1e8ba8b5a-290   /@  .>  +RG  Q  &  &&  ...  f  l-1e8ba8b5a-293 f  l-1e8ba8b5a-294 f  l-1e8ba8b5a-295 f  l-1e8ba8b5a-296   /a  .>  +MG  +G  g  _ g  each N  )  g  identifier? g  datum->syntax g  symbol-append g  % g  syntax->datum g  
-procedure g  generate-temporaries &'  g  begin g  	proc-name g  args   ..  f  l-1e8ba8b5a-2ba f  l-1e8ba8b5a-2bb   /  g  key g  value 123  .....  f  l-1e8ba8b5a-2ad f  l-1e8ba8b5a-2ae f  l-1e8ba8b5a-2af f  l-1e8ba8b5a-2b0 f  l-1e8ba8b5a-2b1   /  g  make-procedure-name   .  f  l-1e8ba8b5a-29d   /  .  f  l-1e8ba8b5a-29c   /@  .>>>> 	 +G  g  define +G  g  define-syntax +G  g  lambda +G  +?G    g  syntax-case +G  +MG  g  append     g  map     +G  +`G    +^G    g  syntax +G  +G  +RG  g  a +G  g  ... +G    +IG  f  Wrong number of arguments +G    +G    g  display f  #< g  record-type-name g  record-type-descriptor f    f  :  g  write g  record-type-fields f  > g  default-record-printer g  throw g  wrong-type-arg f  Wrong type argument: ~S g  throw-bad-struct g  %% g  -set-fields g  make-copier-id g  %%set-fields & & '& g  everyg  listg  for-eachg  findg  free-identifier=?f  unknown getter	g  
struct-ref
g  t-1e8ba8b5a-32b
 g  m-1e8ba8b5a-32c-  f  l-1e8ba8b5a-32f / g  index_ f  l-1e8ba8b5a-329f  l-1e8ba8b5a-32a / g  lookup f  l-1e8ba8b5a-2fe / g  copier-nameg  getter+exprs  f  l-1e8ba8b5a-2f8!f  l-1e8ba8b5a-2f9" ! #/" $g  	type-name%g  	getter-id&g  check?'g  expr($%&^_' )...... *f  l-1e8ba8b5a-2ec+f  l-1e8ba8b5a-2ed,f  l-1e8ba8b5a-2ee-f  l-1e8ba8b5a-2ef.f  l-1e8ba8b5a-2f0/f  l-1e8ba8b5a-2f10*+,-./ 1/()0 2f  l-1e8ba8b5a-2dc32 4/@3 5.>>#1>4 
6+	5G 7g  filter8g  length9f  duplicate getter:g  iota;g  make-struct<g  t-1e8ba8b5a-31f=< >g  m-1e8ba8b5a-320?>- @? Af  l-1e8ba8b5a-324BA C/=@B D.>C#1>4 E+;DG F+
DG Gg  hereHg  unsafe-exprIH Jf  l-1e8ba8b5a-317KJ L/IK M.>L#1>4 N+GMG Og  ifPg  t-1e8ba8b5a-319QP Rg  m-1e8ba8b5a-31aSR- TS Uf  l-1e8ba8b5a-31dVU W/QTV X.>W>L#1>4 
Y+OXG Zg  eq?[+ZXG \g  struct-vtable]+\XG ^+XG _+RXG `g  %define-record-typea&(b&ac&bd&cedf&&g&fhgif   invalid record definition syntaxjg  boolean?kf  expected type namelf  invalid constructor specmf  expected predicate namen&&& of  invalid field specpg  string-concatenateqg  	make-listrf  prsf  pwtg  memquf  !unknown field in constructor specvg  assq-refw&&' xg  t-1e8ba8b5a-38dyg  t-1e8ba8b5a-38czg  t-1e8ba8b5a-38b{xyz |g  m-1e8ba8b5a-38e}|- ~}}} f  l-1e8ba8b5a-392f  l-1e8ba8b5a-393f  l-1e8ba8b5a-394 /{~ g  	ctor-args f  l-1e8ba8b5a-37a / g  ctorg  field f  l-1e8ba8b5a-376f  l-1e8ba8b5a-377 / g  formg  constructor-specg  field-names$ .... f  l-1e8ba8b5a-36bf  l-1e8ba8b5a-36cf  l-1e8ba8b5a-36df  l-1e8ba8b5a-36e / g  record-layoutg  functional-settersg  settersg  copierg  gettersg  constructorg  getter-identifiersg  field-identifiers ........ f  l-1e8ba8b5a-343f  l-1e8ba8b5a-341f  l-1e8ba8b5a-33ff  l-1e8ba8b5a-33df  l-1e8ba8b5a-33bf  l-1e8ba8b5a-339f  l-1e8ba8b5a-337f  l-1e8ba8b5a-335 / f  l-1e8ba8b5a-334 /@ .>>>>> +!G +;G +
G g  	copier-id f  l-1e8ba8b5a-476 / g  	ctor-name f  l-1e8ba8b5a-46e /  f  l-1e8ba8b5a-46c / g  layout f  l-1e8ba8b5a-46a / g  
immutable? f  l-1e8ba8b5a-468 / g  field-count f  l-1e8ba8b5a-466 / g  
getter-ids f  l-1e8ba8b5a-463 / g  	field-ids f  l-1e8ba8b5a-460 / g  predicate-nameg  
field-spec$ f  l-1e8ba8b5a-453f  l-1e8ba8b5a-454f  l-1e8ba8b5a-455f  l-1e8ba8b5a-456f  l-1e8ba8b5a-457f  l-1e8ba8b5a-458 /) .>>>>>>>>>>> +GG g  make-struct-layout&&&&&&& g  t-1e8ba8b5a-3a5g  t-1e8ba8b5a-3a6g  t-1e8ba8b5a-3a7g  t-1e8ba8b5a-3a8g  t-1e8ba8b5a-3a9g  t-1e8ba8b5a-3aag  t-1e8ba8b5a-3ab g  m-1e8ba8b5a-3ac-  f  l-1e8ba8b5a-3b0f  l-1e8ba8b5a-3b1f  l-1e8ba8b5a-3b2f  l-1e8ba8b5a-3b3f  l-1e8ba8b5a-3b4f  l-1e8ba8b5a-3b5f  l-1e8ba8b5a-3b6 /  f  l-1e8ba8b5a-3a3f  l-1e8ba8b5a-3a4  / $ ... f  l-1e8ba8b5a-39ef  l-1e8ba8b5a-39ff  l-1e8ba8b5a-3a0	 
/	 .>>>>>
 +,G +OG +lG +G +^G  +OG +ZG +\G  +	G +G +RG g  define-syntax-ruleg  t-1e8ba8b5a-3c4g  t-1e8ba8b5a-3c6g  t-1e8ba8b5a-3c5 g  m-1e8ba8b5a-3c7-   !f  l-1e8ba8b5a-3cb"f  l-1e8ba8b5a-3cc#f  l-1e8ba8b5a-3cd$!"# %/ $ &f  l-1e8ba8b5a-3c1'f  l-1e8ba8b5a-3c2(f  l-1e8ba8b5a-3c3)&'( */) +.>%>>>* 	,++G -+&+G .+^+G /+_+G 0+'+G 1/0 2++G 3-.12 4++G 5g  
filter-map6g  t-1e8ba8b5a-40576 8g  m-1e8ba8b5a-40698- :9 ;f  l-1e8ba8b5a-409<; =/7:< >g  setter?1_> @f  l-1e8ba8b5a-3ffAf  l-1e8ba8b5a-400Bf  l-1e8ba8b5a-401C@AB D/?C E Ff  l-1e8ba8b5a-3f6Gf  l-1e8ba8b5a-3f7HFG I/EH Jg  field-specsKJ Lf  l-1e8ba8b5a-3f2Mf  l-1e8ba8b5a-3f3NLM O/KN P.>=D>I>O 
Q+!PG R+^PG Sg  valT+SPG URT V+PG WT Xg  t-1e8ba8b5a-3e6Yg  t-1e8ba8b5a-3e7ZXY [g  m-1e8ba8b5a-3e8\[- ]\\ ^f  l-1e8ba8b5a-3ec_f  l-1e8ba8b5a-3ed`^_ a/Z]` bf  l-1e8ba8b5a-3e0cf  l-1e8ba8b5a-3e1df  l-1e8ba8b5a-3e2ebcd f/?e gf  l-1e8ba8b5a-3d7hf  l-1e8ba8b5a-3d8igh j/Ei k$J lf  l-1e8ba8b5a-3d3mf  l-1e8ba8b5a-3d4nlm o/kn p.>af>j>o 
q+!pG r+^pG s+SpG trs u+OpG v+ZpG w+\pG xwr yg  struct-set!z+ypG {s |+pG }+RpG ~&&&&'&' g  t-1e8ba8b5a-47eg  t-1e8ba8b5a-478g  t-1e8ba8b5a-479g  t-1e8ba8b5a-47ag  t-1e8ba8b5a-47dg  t-1e8ba8b5a-47cg  t-1e8ba8b5a-47b g  m-1e8ba8b5a-47f-  f  l-1e8ba8b5a-483f  l-1e8ba8b5a-484f  l-1e8ba8b5a-485f  l-1e8ba8b5a-486f  l-1e8ba8b5a-487f  l-1e8ba8b5a-488f  l-1e8ba8b5a-489 / .>>>>>>>>>>>> +G +G g  let+G g  rtd+G g  make-struct/no-tail+G g  record-type-vtable+G +RG +G g  set-struct-vtable-name!+G +yG g  ++G +	G g  vtable-offset-user+G   +!G g  obj+G  g  and+G g  struct?+G  +ZG +\G  g  predg  fields01 g  m-1e8ba8b5a-4a3- .... f  l-1e8ba8b5a-4a8f  l-1e8ba8b5a-4a9f  l-1e8ba8b5a-4aaf  l-1e8ba8b5a-4abf  l-1e8ba8b5a-4ac /  f  l-1e8ba8b5a-4a5 /@ .> +`G +G +G C 5    h<     ]4	
5 4 >  "  G   4i4i5 >  "  G  4 !"%*H       h   f   ]C^       g  dummy
		 g  name		 g  formals			 g  body			  			   CKL   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-9.scm
	J
 		"  g  
macro-typeg  syntax-rulesg  patternsg  nameg  formalsg  ... g  bodyg  ...   C5!R4 M"%N       h   >   ]C   6       g  dummy
		 g  err		  			   CKL   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-9.scm
	R
 		"  g  
macro-typeg  syntax-rulesg  patternsg  err   C5MROR4 P"%]jk  h   a   ]  C     Y       g  dummy
		 g  s		 g  getter			 g  err			  			   CKL        h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-9.scm
	V	 		"  g  
macro-typeg  syntax-rulesg  patternsg  sg  quoteg  getter g  quoteg  err    C5PRlR4 m"%x  h   a   ]  C     Y       g  dummy
		 g  s		 g  getter			 g  err			  			   CKL        h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-9.scm
	\	 		"  g  
macro-typeg  syntax-rulesg  patternsg  sg  quoteg  getter g  quoteg  err    C5mRR4 "%  h   a   ]  C     Y       g  dummy
		 g  s		 g  getter			 g  err			  			   CKL        h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-9.scm
	b	 		"  g  
macro-typeg  syntax-rulesg  patternsg  sg  quoteg  getter g  quoteg  err    C5R4 ,"%KL    h      ]6       g  key
		 g  value		 g  name			 g  formals			 g  body			  g  filenamef  srfi/srfi-9.scm		o	 			   C%       h(   X   ]     C    P       g  tmp-1e8ba8b5a-2c8
		$ g  tmp-1e8ba8b5a-2c7		$  		$	   C       hx   C   ] LLL L4	4
LL5LL  L       5   C;       g  	proc-name
		x g  args		x  		x	   CKL      hX     ]44455545 45$  	 O @
6             g  key
		R g  value		R g  name			R g  formals			R g  body			R g  tmp		#	R g  tmp		.	R  g  filenamef  srfi/srfi-9.scm		i			j			j	$		j	'		k	$		j			i			q	!	#	p	 
		R	   C  h@   b   ]	4 5"  	 6$  4?$  @""       Z       g  x
		9 g  tmp		9  g  filenamef  srfi/srfi-9.scm
	g	 		9   C5,R 
  h     ]4>  "  G  444 55>  "  G  "  l(  "  w4>  "  G  4>  "  G  4>  "  G  4 >  "  G  "44 55
"	6             g  s
	  g  p	  g  fields		8  g  off		8   g  filenamef  srfi/srfi-9.scm
 
	 		 		 		 		 		 		% 		, 		8 		> 		C 		G 		N 		W 		\ 		c 		l 		p 		w 	  	  	  	  	  	  	  	  	  	)  	  	  	  	 "	 	  g  nameg  default-record-printer CR        h      ]    6         g  s
		 g  who		  g  filenamef  srfi/srfi-9.scm
 
	 			
 			 	#	 			 	 			  g  nameg  throw-bad-struct CR  h      ] 44 556       g  	type-name
		  g  filenamef  srfi/srfi-9.scm
 
	 		 	 	 	$	 	 	 		 	 		  g  nameg  make-copier-id CR4 "%KL        h      ]6             g  	type-name
		
 g  	getter-id		
 g  check?			
 g  s			
 g  getter			
 g  expr			
  g  filenamef  srfi/srfi-9.scm	
 	 		
	   C    h   d   ]L  6      \       g  	getter-id
		
  g  filenamef  srfi/srfi-9.scm
 		
 	! 		
   CI    h(      ]	4 O L 5$  CLL 6 ~       g  id
		' g  t		'  g  filenamef  srfi/srfi-9.scm
 		 		 		! 	&	' 	 		'   C67  h   g   ]L  6     _       g  g+e
		  g  filenamef  srfi/srfi-9.scm
 			 	2	 	 		   C8I9      hP      ]L  4 O L545
$  C$  CLL 6            g  getter
		K g  index		K g  default-expr			K g  results			K g  key		$	K  g  filenamef  srfi/srfi-9.scm
 	#	 	%	 		 		 		$ 		< 		E 	"	K 	 
		K	   C:8%'EF h   7   ]L  C  /       g  t-1e8ba8b5a-31f
		  		   CKLNY[]^_      h     ]&44 55454L O >  "  G  4L O 4	4
55545		$  4 O 	?"  
45	45$  /45	   	   CC          g  	type-name
	  g  	getter-id	  g  check?		  g  s		  g  getter		  g  expr		  g  copier-name		  g  getter+exprs		  g  tmp		Z  g  tmp			e  g  tmp	   g  tmp		    g  filenamef  srfi/srfi-9.scm	 		 	)	 		 		 			; 		M 	#	P 	)	X 	#	Z 		Z 	  		  	  	  	  	 	 	   C       h@   c   ]	4 5"  	 6$  4?$   O @""  [       g  x
		> g  tmp		>  g  filenamef  srfi/srfi-9.scm
 	 		>   C5R4 `"%ehI%f h   j   ] 6b       g  macro
		 g  args		  g  filenamef  srfi/srfi-9.scm	O	 			   CKLi    h8      ]45$  4?"  
456            g  
immutable?
		3 g  form		3 g  rest			3 g  tmp			-  g  filenamef  srfi/srfi-9.scm	/P		3M	 		3	   CKLjI%f    h   j   ] 6b       g  macro
		 g  args		  g  filenamef  srfi/srfi-9.scm		/ 			   CKLk(       h   j   ] 6b       g  macro
		 g  args		  g  filenamef  srfi/srfi-9.scm		/ 			   Cl  h   i   ] 6   a       g  ctor
		 g  args		  g  filenamef  srfi/srfi-9.scm	 	 			   C     h   >   ]C    6       g  ctor
		 g  args		  			   C    h   j   ] 6b       g  macro
		 g  args		  g  filenamef  srfi/srfi-9.scm		/ 			   Cm%N h   A   ]C    9       g  field
		 g  getter		  			   Cn  h   U   ]C    M       g  field
		 g  getter		 g  setter			  			   CIf        h   j   ] 6b       g  macro
		 g  args		  g  filenamef  srfi/srfi-9.scm		/ 			   CKLo    hh      ]4 5$  @4 5$  @4L 5$  4?"  
4	
L 5L  6            g  spec
		c g  tmp		c g  tmp		"	c g  tmp		;	[  g  filenamef  srfi/srfi-9.scm
&		]*	*	c	 		c   C   h@    ]44 55$ '45$  "  4445$  4?"  
4	5
5$  45"  8445$  4?"  
4	55"  ($  4?$  4?"  ""  "$  ^45$  "  4445$  4?"  
4	55$  O 6CCCC           g  
immutable?
	; g  form	; g  	type-name		; g  constructor-spec		; g  predicate-name		; g  
field-spec		; g  t			] g  tmp		2	R g  tmp		j  g  tmp		|  g  t	 " g  tmp	   g  filenamef  srfi/srfi-9.scm														'		T	 	Z		a			q	 "	! 	 		 $	 $	 	%	 	&		3&	 	;	   C%N h   @   ] C   8       g  name
		 g  getter		  			   Cn   h   T   ] C   L       g  name
		 g  getter		 g  setter			  			   CKL     h@   }   ]4 5$  @4 5$  @ 6       u       g  
field-spec
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-9.scm
 	 		9   C%N    h   @   ]C   8       g  name
		 g  getter		  			   Cn   h   T   ]C   L       g  name
		 g  getter		 g  setter			  			   CKL     h@   }   ]4 5$  @4 5$  @ 6       u       g  
field-spec
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-9.scm
 	 		9   C8pqrs%(    h   >   ] C   6       g  ctor
		 g  args		  			   CKL   h   j   ]6      b       g  ctor
		
 g  field		
  g  filenamef  srfi/srfi-9.scm	
 		 		
	   CtI%f        h   j   ] 6b       g  macro
		 g  args		  g  filenamef  srfi/srfi-9.scm	 	+ 			   CKLu 
   hh      ]4 54L 5$  "  ?44L5$  4?"  
4L5	L >  "  G   C       g  field
		h g  name			h g  t			b g  tmp		,	L  g  filenamef  srfi/srfi-9.scm
 		 	-		 	!	 	'	 	#	! 	'	N 	(	W 	'	g 	# 
		h   Cv h   _   ]L  6      W       g  name
		
  g  filenamef  srfi/srfi-9.scm
 	$	
 	& 		
   C%w       h   q   ]  C   i       g  t-1e8ba8b5a-38d
		 g  t-1e8ba8b5a-38c		 g  t-1e8ba8b5a-38b			  			   CKL 	       hP      ]4LL O 5LL4O L5 45$  @6            g  ctor
		K g  field		K g  	ctor-args			K g  tmp		)	K g  tmp		4	K  g  filenamef  srfi/srfi-9.scm	 		 			 		) 	 		K	   C%    hP      ]      	
 
    C             g  t-1e8ba8b5a-3a5
		J g  t-1e8ba8b5a-3a6		J g  t-1e8ba8b5a-3a7			J g  t-1e8ba8b5a-3a8			J g  t-1e8ba8b5a-3a9			J g  t-1e8ba8b5a-3aa			J g  t-1e8ba8b5a-3ab			J  		J	   CKL    h8      ]L L L   45$  @6          g  getter
		5 g  index		5 g  tmp			5 g  tmp			5  g  filenamef  srfi/srfi-9.scm
 		 	 		5	   C:n,34       h   q   ]  Ci       g  t-1e8ba8b5a-3c4
		 g  t-1e8ba8b5a-3c6		 g  t-1e8ba8b5a-3c5			  			   C5%N     h   @   ]C    8       g  name
		 g  getter		  			   CnQUVRW  h    T   ]L   C     L       g  name
		 g  getter		 g  setter			  			   CKL     h@      ]4 5$  @4 5$  L O @ 6         g  
field-spec
		> g  index		> g  tmp			> g  tmp		"	>  g  filenamef  srfi/srfi-9.scm
	 		>	   C%Nh   @   ]C    8       g  name
		 g  getter		  			   Cn%Nqtuvxzr{|}      h8   T   ]L   	
L     C    L       g  t-1e8ba8b5a-3e6
		4 g  t-1e8ba8b5a-3e7		4  		4	   CKL     h0      ]L L 45$  O @6       g  name
		0 g  getter		0 g  setter			0 g  tmp				0 g  tmp			0  g  filenamef  srfi/srfi-9.scm		 	 		0	   CKL        h@      ]4 5$  @4 5$  L O @ 6       g  
field-spec
		@ g  index		@ g  tmp			@ g  tmp		"	@  g  filenamef  srfi/srfi-9.scm
 	 		@	   C~        h      ] L  L      	L   
  LL    45C        g  t-1e8ba8b5a-47e
		 g  t-1e8ba8b5a-478		 g  t-1e8ba8b5a-479			 g  t-1e8ba8b5a-47a			 g  t-1e8ba8b5a-47d			 g  t-1e8ba8b5a-47c			 g  t-1e8ba8b5a-47b			  			   C        h    ]V4545454 5	44	$  "  	55
454
5$  4?"  
45454
5"  45"  3$  )4?$  4O ?"  ""  "44
554O 44555 4
5$  4?"  
45	$  4O 44555"  4O 44555 4
5$  O @6       g  
immutable?
	 g  form	 g  	type-name		 g  constructor-spec		 g  predicate-name		 g  
field-spec		 g  	field-ids		 g  
getter-ids		 g  field-count		 g  
immutable?			( g  layout	
	D g  field-names		O g  tmp		Z	z g  	ctor-name		z g  	copier-id	  g  tmp	   g  tmp	= g  tmp	: g  tmp	~ g  tmp	  g  filenamef  srfi/srfi-9.scm	 		,		 		,		.		,		"/		(,		+		.		8		:	!	@	&	B		D		D,		G1		O,		}4	 ,	 ;	 ;	4 ;	  	  	  	 	 	 	CI	D	P	S	[	]	b 	n	q	y	{ 	~5	
 *		   C 	   hP   t   ]4 5"   4 5$  @ 6$  4?$  @""l       g  x
		P g  tmp		P g  tmp			1  g  filenamef  srfi/srfi-9.scm
 	 		P   C5`R4 "%c    h(   w   ]C     o       g  dummy
		# g  name		# g  ctor			# g  pred			# g  fields			#  		#	   CKL  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-9.scm
S
 		"  g  
macro-typeg  syntax-rulesg  patternsg  nameg  ctorg  predg  fieldsg  ...   C5RC            g  m
		,  g  filenamef  srfi/srfi-9.scm		=
	-	B
	2	B		:	B	&	?	B
	T
	Z
Z	`
N 
0 
 
 	<
   C6                                                                   ccache/srfi/srfi-39.go                                                                              0000644                 00000002504 15154557173 0010456 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0,      ]  4        h      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-39	 		g  filenameS	
f  srfi/srfi-39.scm	g  exportsS	g  with-parameters*	 	g  
re-exportsS	g  make-parameter	g  parameterize	g  current-input-port	g  current-output-port	g  current-error-port	 	g  set-current-module	 	 	g  cond-expand-provide	g  current-module	 	g  with-fluids*	g  parameter-fluid	g  parameter-converterC 5    hP  z   ]4	
5 4 >  "  G   4i4i5 >  "  G         hX     ]#"  >(  
6454455" "        g  params
		V g  values		V g  thunk			V g  params			D g  values			D g  fluids			D g  convs			D  g  filenamef  srfi/srfi-39.scm
	-
		.			2			3			4			4			5		"	5	%	$	5		'	5		(	6		)	6		.	6	*	0	6		3	6	8	5	6		8	6		D	4		D	.		I	0		J	1		V	.	 		V	  g  nameg  with-parameters* CRC r       g  m
		,  g  filenamef  srfi/srfi-39.scm		$
	-	+
	2	+		:	+	&	?	+
M	-
 	O
   C6                                                                                                                                                                                             ccache/srfi/srfi-17.go                                                                              0000644                 00000010767 15154557173 0010464 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4     h3      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-17	 		g  filenameS	
f  srfi/srfi-17.scm	g  exportsS	g  getter-with-setter	 	g  replacementsS	g  setter	g  car	g  cdr	g  caar	g  cadr	g  cdar	g  cddr	g  caaar	g  caadr	g  cadar	g  caddr	g  cdaar	g  cdadr	g  cddar	g  cdddr	g  caaaar	g  caaadr	 g  caadar	!g  caaddr	"g  cadaar	#g  cadadr	$g  caddar	%g  cadddr	&g  cdaaar	'g  cdaadr	(g  cdadar	)g  cdaddr	*g  cddaar	+g  cddadr	,g  cdddar	-g  cddddr	.g  
string-ref	/g  
vector-ref	0 !"#$%&'()*+,-./ !	1g  set-current-module	21 	31 	4g  cond-expand-provide	5g  current-module	6 	7g  make-procedure-with-setter	8 	9 	:g  error	;f  3Setting setters is not supported for a good reason.	<g  compose-setter	= 	> 	?g  set-car!	@ 	A 	Bg  set-cdr!	C 	D 	E 	F 	G 	H 	I 	J 	K 	L 	M 	N 	O 	P 	Q 	R 	S 	T 	U 	V 	W 	X 	Y 	Z 	[ 	\ 	] 	^ 	_  	`  	a! 	b! 	c" 	d" 	e# 	f# 	g$ 	h$ 	i% 	j% 	k& 	l& 	m' 	n' 	o( 	p( 	q) 	r) 	s* 	t* 	u+ 	v+ 	w, 	x, 	y- 	z- 	{. 	|. 	}g  string-set!	~/ 	/  g  vector-set!C 5h(    ]4	
05 43 >  "  G   44i45i5 6>  "  G  7iR4i9:;   h   h   -  1  3 6 `       g  args
			  g  filenamef  srfi/srfi-17.scm
	>			?			?	 			


   C5Rh   x   ]L4L  56 p       g  obj
		 g  value		  g  filenamef  srfi/srfi-17.scm
	D			E			E	 			   C     h      ] O C           g  setter
		 g  location		  g  filenamef  srfi/srfi-17.scm
	C
 			  g  nameg  compose-setter C<R4i>?i5R4iABi5R4iD4<i?i>55R4iF4<i?iA55R4iH4<iBi>55R4iJ4<iBiA55R4iL4<i?iD55R4iN4<i?iF55R4iP4<i?iH55R4iR4<i?iJ55R4iT4<iBiD55R4iV4<iBiF55R4iX4<iBiH55R4iZ4<iBiJ55R4i\4<i?iL55R4i^4<i?iN55R4i`4<i?iP55 R4ib4<i?iR55!R4id4<i?iT55"R4if4<i?iV55#R4ih4<i?iX55$R4ij4<i?iZ55%R4il4<iBiL55&R4in4<iBiN55'R4ip4<iBiP55(R4ir4<iBiR55)R4it4<iBiT55*R4iv4<iBiV55+R4ix4<iBiX55,R4iz4<iBiZ55-R4i|}i5.R4ii5/RC             g  m
		,  g  filenamef  srfi/srfi-17.scm		,
	-	5
	2	5		:	5	&	?	5
	N	9
	O	<	 	;
#	C
$	H	3	G
4	K	C	J
D	O	K	P	Y	O	\	N
]	R	d	S	r	R	u	Q
v	U	}	V		U		T
	X		Y		X		W
	\		]		\		[
	_		`		_		^
	b		c		b		a
	e		f		e		d
	h		i	!	h	$	g
%	k	,	l	:	k	=	j
>	n	E	o	S	n	V	m
W	q	^	r	l	q	o	p
p	u	w	v		u		t
	x		y		x		w
	{		|		{		z
	~				~		}
 	 	 	 
 	 	 	 
 	 	 	 
 	& 	4 	7 
8 	? 	M 	P 
Q 	X 	f 	i 
j 	q 	 	 
 	 	 	 
 	 	 	 
 	 	 	 
 	 	 	 
 	 	 	 
  	 
 	 
 	!
   C6          ccache/srfi/srfi-35.go                                                                              0000644                 00000043344 15154557173 0010461 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0F      ] 4  hQ      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-35	 		g  filenameS	
f  srfi/srfi-35.scm	g  importsS	g  srfi-1	 	 	 	g  exportsS	g  make-condition-type	g  condition-type?	g  make-condition	g  
condition?	g  condition-has-type?	g  condition-ref	g  make-compound-condition	g  extract-condition	g  define-condition-type	g  	condition	g  
&condition	g  &message	g  message-condition?	g  condition-message	g  &serious	 g  serious-condition?	!g  &error	"g  error?	# !" 	$g  set-current-module	%$ 	&$ 	'g  cond-expand-provide	(g  current-module	) 	*g  make-vtable	+g  string-append	,g  standard-vtable-fields	-f  prprpr	.g  format	/f  #<condition-type ~a ~a>	0g  condition-type-id	1g  number->string	2g  object-address	3g  set-struct-vtable-name!	4g  condition-type	5g  %condition-type-vtable	6g  make-struct-layout	7g  print-condition	8g  string?	9g  string->symbol	:f   	;g  %make-condition-type	<g  vtable-offset-user	=g  condition-type-parent	>g  condition-type-all-fields	?g  string-concatenate/shared	@f  pr	A@ 	Bg  struct-layout-for-condition	Cf  #<condition ~a [~a] ~a>	Dg  fold	Ef  ~A: ~S	Fg  string-join	Gg  reverse	Hf   	Ig  error	Jf  "invalid condition type field names	Kg  every	Lg  symbol?	Mg  lset-intersection	Ng  eq?	Og  append	Pf  parent is not a condition type	Qf  )condition type identifier is not a symbol	Rf  7`make-compound-condition-type' passed empty parent list	Sg  
append-map	Tg  make-compound-condition-type	Ug  throw	Vg  wrong-type-arg	Wf  condition-has-type?	Xf  Wrong type argument	Yg  any	Zg  
list-index	[f  invalid field name	\f  field name is not a symbol	]f  condition-ref	^f  Wrong type argument: ~S	_g  make-struct	`g  make-condition-from-values	ag  
fold-right	bg  memq	cf  field not specified	df  make-condition	eg  map	fg  compound	gg  reverse!	hf  extract-condition	ig  +	jg  length	kg  make-syntax-transformer	lk 	mk 	ng  macro	og  $sc-dispatch	po 	qo 	rg  each	sYY 	trs 	uYt	vYu	wYv	xYw	yg  syntax-object	zg  begin	{g  top	|{ 	}g  ribcage	~g  dummy	g  name g  parent g  pred g  
field-name g  field-accessor ~  g  m-46961e5119-cc {  |||||  f  l-46961e5119-d1 f  l-46961e5119-d2 f  l-46961e5119-d3 f  l-46961e5119-d4 f  l-46961e5119-d5 f  l-46961e5119-d6   }  }  g  x     f  l-46961e5119-ce   }  |  g  hygiene   yz  g  define y  y  g  quote y  g  c y    y  e  e  y  g  syntax-violation     f  -source expression failed to match any pattern g  compound-condition g  each-any Y  g  type g  field ~  g  m-46961e5119-e1 {  ||  f  l-46961e5119-e6 f  l-46961e5119-e7 f  l-46961e5119-e8   }    f  l-46961e5119-e3   }  |  y  yT  y  g  	%compound y    g  
quasiquote y  g  unquote y  g  condition-instantiation YY  g  out ~  g  m-46961e5119-ee {  ||  f  l-46961e5119-f3 f  l-46961e5119-f4 f  l-46961e5119-f5   }    f  l-46961e5119-f0   }  |  y  s ڌ Yی Y܌ g  field-value g  rest ~  |||||  f  l-46961e5119-fb f  l-46961e5119-fc f  l-46961e5119-fd f  l-46961e5119-fe f  l-46961e5119-ff f  l-46961e5119-100   }  |  y  O  O  y  Y Y  g  m-46961e5119-109 {  ||  f  l-46961e5119-10e f  l-46961e5119-10f f  l-46961e5119-110   }    f  l-46961e5119-10b   }  |  y  r  Yf  l-46961e5119-116f  l-46961e5119-117f  l-46961e5119-118 } | y g  display	f  <&condition>
g  message
 C 5  hx0    ]4	
#5 4& >  "  G   4'i4(i5 )>  "  G  4*i4+i,i-5./012 h       ]4 544 5	56        g  ct
		 g  port		  g  filenamef  srfi/srfi-35.scm
	3			4	'			5	"		6	"		6	2		6	"		4	 			   C5 43i 4>  "  G    5R567389:      hX   0  ]4 5 4$  "  45$  45"  45>  "  G  C (      g  layout
		W g  id		W g  parent			W g  
all-fields			W g  struct			W  g  filenamef  srfi/srfi-35.scm
	;
		=			<			<			C		 	C	+	$	C	$	+	D	+	5	C	$	6	D	8	A	E	8	E	E	H	G	E	8	L	C	 		W	  g  nameg  %make-condition-type C;R5       h      ] $   CC             g  obj
		  g  filenamef  srfi/srfi-35.scm
	H
		J				J			K			K	 		  g  nameg  condition-type?g  documentationf  'Return true if OBJ is a condition type. CR<        h      ]4 5$   
CC        g  ct
		  g  filenamef  srfi/srfi-35.scm
	N
		O			O			P			P	 		  g  nameg  condition-type-id C0R<    h      ]4 5$   CC         g  ct
		  g  filenamef  srfi/srfi-35.scm
	R
		S			S			T			T	 		  g  nameg  condition-type-parent C=R<        h      ]4 5$  	 	CC       g  ct
		  g  filenamef  srfi/srfi-35.scm
	V
		W			W			X			X	 		  g  nameg  condition-type-all-fields C>R?@A  h0      ]"  (  6" "         g  field-names
		. g  field-names		" g  layout			"  g  filenamef  srfi/srfi-35.scm
	[
		^			`			a			b			c			c		"	b		"	^		&	_		.	^	 		.  g  nameg  struct-layout-for-condition CBR.C04D.E        h       ]4 4L  55C              g  field
		 g  result		  g  filenamef  srfi/srfi-35.scm
	j			k	"		k	-		l	*		k	"		k	 			   C>FGH12      hX   ?  ]44 55 4 O 45544	5
544 5	56     7      g  c
		S g  port		S g  type			C g  strings		-	@  g  filenamef  srfi/srfi-35.scm
	e
		r				s	
		s			s	
		i			i			j		$	n		%	o		-	j		-	i		0	p		3	p		;	p	%	=	p		D	u	
	G	u		Q	u	
	S	r	 		S	  g  nameg  print-condition C7R>IJKLMNOB;PQ        h     ] $  l45$  Y45"  645$  345(   4	54
5 6""6 6         g  id
		} g  parent		} g  field-names			} g  parent-fields			m g  
all-fields		N	e g  layout		W	e  g  filenamef  srfi/srfi-35.scm
	w
		|				|		
	}	
		}			~			~	
	% 		) 		)			*			6			7 		E			F 	#	N 		Q 	#	W 		e 		q 		u 	
	y 		} 	 		}	  g  nameg  make-condition-typeg  documentationf  Return a new condition type named ID, inheriting from PARENT, and with the
fields whose names are listed in FIELD-NAMES.  FIELD-NAMES must be a list of
symbols and must not contain names already used by PARENT or one of its
supertypes. CRIRS>B; h@   !  ](   6(  C4545 6           g  id
		; g  parents		; g  
all-fields		$	; g  layout		-	;  g  filenamef  srfi/srfi-35.scm
 
	 		 		 			 		 		 			 		$ 			' 		- 			; 	 		;	  g  nameg  make-compound-condition-type CTR      h      ] $   6C             g  c
		  g  filenamef  srfi/srfi-35.scm
 
	 			 		 		 	 		  g  nameg  
condition?g  documentationf   Return true if C is a condition. CR   h       ]	 $   45$  CCC       g  c
		  g  vtable		  g  filenamef  srfi/srfi-35.scm
 
	 			 		 		 		 		 		 		   g  nameg  condition-type C4RUVWX=Y h@      ]	 L&  C $  %4 5$  L 64 5 "C              g  ct
		9 g  parent		7  g  filenamef  srfi/srfi-35.scm
 		
 		 		 		 		 		 		" 		* 		+ 		7 	 		9  g  nameg  loop C4 	       hP   B  ]
"  
64 5$  *45$  O Q 4 56""       :      g  c
		I g  type		I g  loop		/	A  g  filenamef  srfi/srfi-35.scm
 
	
 		 		 		 		 		 		 		 		& 		/ 		9 		A 	 		I	  g  nameg  condition-has-type?g  documentationf  )Return true if condition C has type TYPE. CR4>Zh   `   ] L CX       g  name
		  g  filenamef  srfi/srfi-35.scm
 	%	 	' 		   CI[\UV]^       h`     ]4 5$  E$  64 5454O 5$   C66	
 6        g  c
		^ g  
field-name		^ g  type			J g  fields		$	J g  index		4	J  g  filenamef  srfi/srfi-35.scm
 
	 		 		 	
	 		 		 	
	 		$ 	
	' 		4 	
	< 		A 		F 		J 		N 		R 	
	V 		X 		Z 		^ 	 		^	  g  nameg  condition-refg  documentationf  @Return the value of the field named FIELD-NAME from condition C. CR_       h      ] 
@            g  type
		 g  values		  g  filenamef  srfi/srfi-35.scm
 
	 	 			  g  nameg  make-condition-from-values C`R>abIc  h(      ]
4 L 5$  C 6           g  field
		$ g  inits		$ g  v			$  g  filenamef  srfi/srfi-35.scm
 	%	 	0	 	'	 	-	 	)	 	3	 	-	  	4	$ 	- 
		$	   C`UVd^ 
hH     - 1 3 4 5$  "4 54O 5 6	 6            g  type
			B g  field+value			B g  
all-fields			6 g  inits		,	6  g  filenamef  srfi/srfi-35.scm
 
	
 		 		 		 		 		( 	%	, 		, 		6 		: 		< 		> 		B 	 			B
  g  nameg  make-conditiong  documentationf  Return a new condition of type TYPE with fields initialized as specified
by FIELD+VALUE, a sequence of field names (symbols) and values. CRe4TfS4e      h   ]   ]L  6      U       g  f
		
  g  filenamef  srfi/srfi-35.scm
 	&	
 	( 		
   C>      h       ]	4 5 O 456          g  c
		 g  ct			  g  filenamef  srfi/srfi-35.scm
 		 	)		 		 	&	 	! 		   C`    h8   U  -  1  3 4 5454 56      M      g  
conditions
			2 g  types		2 g  ct			2 g  inits		(	2  g  filenamef  srfi/srfi-35.scm
 
	
 		 		 		 	/	 		 		  		( 		2 	 			2


  g  nameg  make-compound-conditiong  documentationf  7Return a new compound condition composed of CONDITIONS. CRg h@   ;  ]"  ((  6L " "   3      g  start-index
		= g  field-names		= g  index			. g  field-names			. g  result			.  g  filenamef  srfi/srfi-35.scm
								
	
						 		#		.
	
	.		3		=	 		=	  g  nameg  list-fields CUVhX4=ie>j hp   h  ]  (  CL &  C$  04L5$  C 445? "4455  " `      g  parents
		o g  index		o g  parent			o g  t		*	Q g  shift		]	o  g  filenamef  srfi/srfi-35.scm
 		 		 		 		 		! 		" 		* 		8 		; 		> 	%	H 		I 		Q 		R 		U 	$	] 		] 		b 		g		o 	 		o	  g  nameg  loop C> h     ]"O  Q "  
64 5$  f45$  W4 54	5&   C$  1
O Q 4
54455@C""            g  c
	  g  type	  g  list-fields		
  g  ct		:  g  parent		C  g  loop		`	r g  field-index		r   g  filenamef  srfi/srfi-35.scm
 
	!		!		"		!						(		)		3		4		:		=		C		M		S		W		` 		r		y		~	% 	 	 	 	  g  nameg  extract-conditiong  documentationf  OReturn a condition of condition type TYPE with the field values specified
by C. CR4mnqx   h    X   ]    C     P       g  tmp-46961e5119-df
		 g  tmp-46961e5119-de		  			   C 
    hH      ]      4	5C             g  dummy
		B g  name		B g  parent			B g  pred			B g  
field-name			B g  field-accessor			B  		B	   C        h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-35.scm
)
 		"  g  
macro-typeg  syntax-rulesg  patternsg  nameg  parentg  predg  
field-nameg  field-accessor g  ...   C5R4mnq      h   9   ]  C      1       g  tmp-46961e5119-ec
		
  		
   C    h    R   ]45   CJ       g  dummy
		  g  type		  g  field			   		 	   C       h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-35.scm
3
 		"  g  
macro-typeg  syntax-rulesg  patternsg  typeg  ... g  fieldg  ...    C5R4mnq        h   P   ]C     H       g  dummy
		 g  type		 g  out			  			   C    h       ]4  5C        g  dummy
		 g  type		 g  out			 g  
field-name			 g  field-value			 g  rest			  			   C      h@   
  ]4 5$  @4 5$  @ 6             g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-35.scm
:	 		9  g  
macro-typeg  syntax-rulesg  patternsg  typeg  outg  ...  g  typeg  outg  ... g  
field-nameg  field-value g  restg  ...   C5R4mnq       h   R   ]C   J       g  dummy
		 g  type		 g  field			  			   C   h   R   ]4? C       J       g  dummy
		 g  type		 g  field			  			   C       h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-35.scm
A	 		9  g  
macro-typeg  syntax-rulesg  patternsg  typeg  fieldg  ...  g  typeg  fieldg  ... g  ...   C5R5i46i:5	      h   x   ]6p       g  c
		 g  port		  g  filenamef  srfi/srfi-35.scm
P		Q		Q	 			   C R4ii5R  h   r   ] 6      j       g  c
		
  g  filenamef  srfi/srfi-35.scm
T
 		
  g  nameg  message-condition? CR
  h   q   ] 6      i       g  c
		
  g  filenamef  srfi/srfi-35.scm
T
 		
  g  nameg  condition-message CR4ii5R   h   r   ] 6      j       g  c
		
  g  filenamef  srfi/srfi-35.scm
X
 		
  g  nameg  serious-condition? C R4i!i5!R!  h   f   ] 6      ^       g  c
		
  g  filenamef  srfi/srfi-35.scm
[
 		
  g  nameg  error? C"RC           g  m
		, g  s
(E  g  filenamef  srfi/srfi-35.scm		
	-	'
	2	'		:	'	&	?	'
	H	2		M	2		W	2	>	Y	2	(	2	(	2	+	8	3	8	8	8	H	.
	;
	H
	N
x	R
D	V
	[

	e
o	w
 
 
 
 
k 
- 
\ 
H 
# 
-@O	-FO	#-HO	-R	-R	-R	"-N	-L
-T
/-X
/[
 ,	0s
   C6                                                                                                                                                                                                                                                                                             ccache/srfi/srfi-8.go                                                                               0000644                 00000001153 15154557173 0010371 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0S      ]  4     hf      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-8	 		g  filenameS	
f  srfi/srfi-8.scm	g  importsS	g  ice-9	g  receive	 	 	 	g  
re-exportsS	 	g  set-current-module	 	 	g  cond-expand-provide	g  current-module	 C 5     h@   i   ]4	
5 4 >  "  G   i4i5 6     a       g  m
		,  g  filenamef  srfi/srfi-8.scm		
	1			9		&	;	
 		;
   C6                                                                                                                                                                                                                                                                                                                                                                                                                      ccache/srfi/srfi-60.go                                                                              0000644                 00000004120 15154557173 0010444 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.08      ] : 4    h+      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-60	 		g  filenameS	
f  srfi/srfi-60.scm	g  exportsS	g  bitwise-and	g  bitwise-ior	g  bitwise-xor	g  bitwise-not	g  any-bits-set?	g  
bitwise-if	g  bitwise-merge	g  log2-binary-factors	g  first-set-bit	g  bit-set?	g  copy-bit	g  	bit-field	g  copy-bit-field	g  arithmetic-shift	g  rotate-bit-field	g  reverse-bit-field	g  integer->list	g  list->integer	g  booleans->integer	 	 g  
re-exportsS	!g  logand	"g  logior	#g  logxor	$g  integer-length	%g  logtest	&g  logcount	'g  logbit?	(g  ash	)!"#$%&'( 	*g  replacementsS	+g  	bit-count	,+ 	-g  set-current-module	.- 	/- 	0g  load-extension	1g  string-append	2f  	libguile-	3g  effective-version	4f  scm_init_srfi_60	5g  lognot	6g  bit-extract	7g  cond-expand-provide	8g  current-module	9 C 5h    ]4	
 )*,5	 4/ >  "  G   40i41i243i5 54>  "  G  !iR"iR#iR5iR%iR&i+R5    h      ] 4 5C            g  mask
		 g  n0		 g  n1			  g  filenamef  srfi/srfi-60.scm
	8
		9	
		:			:	
		9	 			  g  nameg  
bitwise-if CRiRiR'iR6iR6       h(      ] 4 54
5C             g  n
		" g  newbits		" g  start			" g  end			"  g  filenamef  srfi/srfi-60.scm
	A
		B			C			C	0		C			B		 	B		!	B	 			"	  g  nameg  copy-bit-field CR(iR7i48i5 96        g  m
		0  g  filenamef  srfi/srfi-60.scm		
	1	.
	6	.		<	.		=	.	+	E	.		G	/		L	.
	[	1
	b	2
	i	3
	p	4
	w	5
	~	6
W	8
^	;
e	=
l	>
s	?
	A
	F
	H		H	&	H
 	
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                 ccache/srfi/srfi-34.go                                                                              0000644                 00000011613 15154557173 0010452 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0s      ] z 4    hn      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-34	 		g  filenameS	
f  srfi/srfi-34.scm	g  exportsS	g  with-exception-handler	g  guard	 	g  replacementsS	g  raise	 	g  set-current-module	 	 	g  cond-expand-provide	g  current-module	 	g  	throw-key	g  with-throw-handler	g  throw	g  make-syntax-transformer	 	 	g  macro	g  $sc-dispatch	  	! 	"g  any	#g  each+	$g  free-id	%g  syntax-object	&g  else	'g  top	(' 	)g  ribcage	*) 	+g  x	,+ 	-g  m-46961e5118-a	.-' 	/. 	0f  l-46961e5118-c	10 	2),/1 	3(*2 	4g  hygiene	54 	6%&35 	7$6 	8g  each-any	9"8	:79	;: 	<#"; 	="<	>=9	?">	@g  catch	Ag  dummy	Bg  var	Cg  clause	Dg  e	Eg  e*	Fg  body	Gg  body*	HABCDEFG 	I.(((((( 	Jf  l-46961e5118-f	Kf  l-46961e5118-10	Lf  l-46961e5118-11	Mf  l-46961e5118-12	Nf  l-46961e5118-13	Of  l-46961e5118-14	Pf  l-46961e5118-15	QJKLMNOP 	R)HIQ 	S(R*2 	T%@S5 	U%S5 	Vg  lambda	W%VS5 	Xg  key	Y%XS5 	Zg  cond	[%ZS5 	\g  append	]\ 	^\ 	_%&S5 	`"9	a`9	b"a	cg  clause*	dABCcFG 	e.((((( 	ff  l-46961e5118-21	gf  l-46961e5118-22	hf  l-46961e5118-23	if  l-46961e5118-24	jf  l-46961e5118-25	kf  l-46961e5118-26	lfghijk 	m)del 	n(m*2 	o%@n5 	p%n5 	q%Vn5 	r%Xn5 	s%Zn5 	t%&n5 	u%n5 	vg  syntax-violation	wv 	xv 	yf  -source expression failed to match any patternC 5     h
     ]4	
5 4 >  "  G   4i4i5 >  "  G  R     h   n   ]L 6f       g  key
		 g  obj		  g  filenamef  srfi/srfi-34.scm
	,			-	 			   C       h     ] O 6             g  handler
		 g  thunk		  g  filenamef  srfi/srfi-34.scm
	%
		*	 			  g  nameg  with-exception-handlerg  documentationf  Returns the result(s) of invoking THUNK. HANDLER must be a
procedure that accepts one argument.  It is installed as the current
exception handler for the dynamic extent (as determined by
dynamic-wind) of the invocation of THUNK. CR     h     ] 6            g  obj
		
  g  filenamef  srfi/srfi-34.scm
	/
	
	5	 		
  g  nameg  raiseg  documentationf 6Invokes the current exception handler on OBJ.  The handler is
called in the dynamic environment of the call to raise, except that
the current exception handler is that in place for the call to
with-exception-handler that installed the handler being called.  The
handler's continuation is otherwise unspecified. CR4!?TUWY[^_     h8      ] 4 5  C          g  dummy
		5 g  var		5 g  clause			5 g  e			5 g  e*			5 g  body			5 g  body*			5  		5	   Cbopqrs^tu 	   h@      ] 4   5  C         g  dummy
		> g  var		> g  clause			> g  clause*			> g  body			> g  body*			>  		>	   Cxy     h@     ]4 5$  @4 5$  @ 6             g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-34.scm
	8	 		9  g  documentationf Syntax: (guard (<var> <clause1> <clause2> ...) <body>)
Each <clause> should have the same form as a `cond' clause.

Semantics: Evaluating a guard form evaluates <body> with an exception
handler that binds the raised object to <var> and within the scope of
that binding evaluates the clauses as if they were the clauses of a
cond expression.  That implicit cond expression is evaluated with the
continuation and dynamic environment of the guard expression.  If
every <clause>'s <test> evaluates to false and there is no else
clause, then raise is re-invoked on the raised object within the
dynamic environment of the original call to raise except that the
current exception handler is that of the guard expression.g  
macro-typeg  syntax-rulesg  patternsg  varg  clauseg  ...g  elseg  eg  e*g  ...  g  bodyg  body*g  ... g  varg  clauseg  clause*g  ... g  bodyg  body*g  ...   C5RC           g  m
		,  g  filenamef  srfi/srfi-34.scm		
	-	!
	2	!		:	!	&	?	!
	I	#		L	#
	%
u	/
 
	

   C6                                                                                                                      ccache/srfi/srfi-4/gnu.go                                                                           0000644                 00000032320 15154557173 0011156 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.04      ]  4 hF      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-4	g  gnu		 	
g  filenameS	f  srfi/srfi-4/gnu.scm	g  importsS	g  rnrs	g  bytevectors	 	 	 	 	 	g  exportsS	g  
c32vector?	g  make-c32vector	g  	c32vector	g  c32vector-length	g  c32vector-ref	g  c32vector-set!	g  c32vector->list	g  list->c32vector	g  
c64vector?	g  make-c64vector	g  	c64vector	 g  c64vector-length	!g  c64vector-ref	"g  c64vector-set!	#g  c64vector->list	$g  list->c64vector	%g  make-srfi-4-vector	&g  any->u8vector	'g  any->s8vector	(g  any->u16vector	)g  any->s16vector	*g  any->u32vector	+g  any->s32vector	,g  any->u64vector	-g  any->s64vector	.g  any->f32vector	/g  any->f64vector	0g  any->c32vector	1g  any->c64vector	2 !"#$%&'()*+,-./01 	3g  set-current-module	43 	53 	6% 	7% 	8g  make-rectangular	9g  bytevector-c32-native-ref	:g  	real-part	;g  	imag-part	<g  bytevector-c32-native-set!	=g  bytevector-c64-native-ref	>g  bytevector-c64-native-set!	?g  bytevector?	@g  
array-type	Ag  c32	Bg  bytevector-length	Cg  integer?	Dg  error	Ef  fractional length	Fg  length	Gg  c64	Hg  make-syntax-transformer	IH 	JH 	Kg  define-any->vector	Lg  macro	Mg  $sc-dispatch	NM 	OM 	Pg  _	Qg  any	RPQ	Sg  syntax->datum	TS 	US 	Vg  datum->syntax	WV 	XV 	Yg  begin	Zg  map	[g  define	\g  symbol-append	]g  any->	^g  vector	_g  obj	`_ 	ag  cond	bg  vector?	cg  pair?	dc_ 	eg  list->	fg  and	gg  array?	hg_ 	ig  eqv?	jg  
array-rank	kj_ 	lik 	mfhl 	ng  let*	og  len	pg  array-length	qp_ 	roq 	sg  v	tg  make-	uo 	vg  let	wg  lp	xg  i	yx
 	zy 	{g  if	|g  <	}|xo 	~g  vector-set!	g  	array-ref _x  sx  g  1+ x  w    s  g  else g  	scm-error g  quote g  wrong-type-arg   f      g  list _        g  syntax-violation     f  -source expression failed to match any pattern g  	u8vector? g  list->u8vector g  make-u8vector g  	s8vector? g  list->s8vector g  make-s8vector g  
u16vector? g  list->u16vector g  make-u16vector g  
s16vector? g  list->s16vector g  make-s16vector g  
u32vector? g  list->u32vector g  make-u32vector g  
s32vector? g  list->s32vector g  make-s32vector g  
u64vector? g  list->u64vector g  make-u64vector g  
s64vector? g  list->s64vector g  make-s64vector g  
f32vector? g  list->f32vector g  make-f32vector g  
f64vector? g  list->f64vector g  make-f64vectorC 5     h '     ]4	
25 45 >  "  G   7%R8 h      ]  	6            g  v
		 g  i		  g  filenamef  srfi/srfi-4/gnu.scm
	,
			-			.	9		.			-	 			  g  nameg  bytevector-c32-native-ref C9R:;   h       ] 45 	45C        g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4/gnu.scm
	/
		0	*		0			1	(		1	0		1	 			  g  nameg  bytevector-c32-native-set! C<R8     h      ]  	6            g  v
		 g  i		  g  filenamef  srfi/srfi-4/gnu.scm
	2
			3			4	9		4			3	 			  g  nameg  bytevector-c64-native-ref C=R:;   h       ] 45 	45C        g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4/gnu.scm
	5
		6	*		6			7	(		7	0		7	 			  g  nameg  bytevector-c64-native-set! C>R?@A h    n   ]4 5$  4 5CC      f       g  obj
		  g  filenamef  srfi/srfi-4/gnu.scm
	9
 		  g  nameg  
c32vector? CR%A       h      - 1 3  @     }       g  len
			 g  fill			  g  filenamef  srfi/srfi-4/gnu.scm
	9
 			
  g  nameg  make-c32vector CRBCDEA  h(      ]	4 5	45$  C 	6       g  v
		( g  len		(  g  filenamef  srfi/srfi-4/gnu.scm
	9
g  filenamef  9/builddir/build/BUILD/guile-2.0.14/module/srfi/srfi-4.scm	 	T	 		(  g  nameg  c32vector-length CR   h   p   -  1  3  6 h       g  elts
			  g  filenamef  srfi/srfi-4/gnu.scm
	9
 			


  g  nameg  	c32vector CRF   h`      ]!4 545"  ;$  /$  %4>  "  G  "CC
 "         g  elts
		^ g  len			^ g  v			^ g  i			S g  elts			S  g  filenamef  srfi/srfi-4/gnu.scm
	9
 		^  g  nameg  list->c32vector CR h@      ]"  "
$  C4 5"4 5"              g  v
		9 g  i		( g  elts			(  g  filenamef  srfi/srfi-4/gnu.scm
	9
 		9  g  nameg  c32vector->list CR9      h   ~   ] 	6   v       g  v
		 g  i		  g  filenamef  srfi/srfi-4/gnu.scm
	9
 			  g  nameg  c32vector-ref CR< h      ] 	6        g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4/gnu.scm
	9
 			  g  nameg  c32vector-set! CR< h      ] 	6        g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4/gnu.scm
	9
 			  g  nameg  c32vector-set! CR?@G     h    n   ]4 5$  4 5CC      f       g  obj
		  g  filenamef  srfi/srfi-4/gnu.scm
	:
 		  g  nameg  
c64vector? CR%G       h      - 1 3  @     }       g  len
			 g  fill			  g  filenamef  srfi/srfi-4/gnu.scm
	:
 			
  g  nameg  make-c64vector CRBCDEG  h(      ]	4 5	45$  C 	6       g  v
		( g  len		(  g  filenamef  srfi/srfi-4/gnu.scm
	:
g  filenamef  9/builddir/build/BUILD/guile-2.0.14/module/srfi/srfi-4.scm	 	T	 		(  g  nameg  c64vector-length C R$   h   p   -  1  3  6 h       g  elts
			  g  filenamef  srfi/srfi-4/gnu.scm
	:
 			


  g  nameg  	c64vector CRF"   h`      ]!4 545"  ;$  /$  %4>  "  G  "CC
 "         g  elts
		^ g  len			^ g  v			^ g  i			S g  elts			S  g  filenamef  srfi/srfi-4/gnu.scm
	:
 		^  g  nameg  list->c64vector C$R!  h@      ]"  "
$  C4 5"4 5"              g  v
		9 g  i		( g  elts			(  g  filenamef  srfi/srfi-4/gnu.scm
	:
 		9  g  nameg  c64vector->list C#R=      h   ~   ] 	6   v       g  v
		 g  i		  g  filenamef  srfi/srfi-4/gnu.scm
	:
 			  g  nameg  c64vector-ref C!R> h      ] 	6        g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4/gnu.scm
	:
 			  g  nameg  c64vector-set! C"R> h      ] 	6        g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4/gnu.scm
	:
 			  g  nameg  c64vector-set! C"R4JKLORUXYZ[\]^`abdemnrstuvwz{}Y~ h     ]4 54 54	 5 
4 5  4 5    C        g  tag
	   g  filenamef  srfi/srfi-4/gnu.scm
	>			?			?				?	(		?	3		?			?			@			@	-		@			?		&	A	&	*	A	5	.	A	A	0	A	&	2	?		?	D	$	C	D	3	G	D	>	I	D	$	K	?		_	H	$	e	H	7	g	H	$	i	?	 	    C   h   r   -  1  3 4 5C  j       g  tags
			  g  filenamef  srfi/srfi-4/gnu.scm
	<
		=			>			=	 			


   C   h   g   ]	4 5L 4?6_       g  args
		 g  v			  g  filenamef  srfi/srfi-4/gnu.scm		<
 		   C  h(   e   ]	4 5$   O @ 6 ]       g  y
		' g  tmp		'  g  filenamef  srfi/srfi-4/gnu.scm
	<
 		'   C5KRgjp      h      ]4 5$   C $   6"    64 5$  P4 5&  @4 54	5"  #$  4
 5"C
"""        g  obj
	  g  len	N  g  v		W  g  i		]   g  filenamef  srfi/srfi-4/gnu.scm
	O
	(	L	; 	   g  nameg  any->u8vector C&Rgjp h      ]4 5$   C $   6"    64 5$  P4 5&  @4 54	5"  #$  4
 5"C
"""        g  obj
	  g  len	N  g  v		W  g  i		]   g  filenamef  srfi/srfi-4/gnu.scm
	O
	(	L	; 	   g  nameg  any->s8vector C'Rgjp h      ]4 5$   C $   6"    64 5$  S4 5&  C4 54	5"  &$  	4
 5"C
"""             g  obj
	  g  len	N  g  v		W  g  i		]   g  filenamef  srfi/srfi-4/gnu.scm
	O
	(	L	; 	   g  nameg  any->u16vector C(Rgjp        h      ]4 5$   C $   6"    64 5$  S4 5&  C4 54	5"  &$  	4
 5"C
"""             g  obj
	  g  len	N  g  v		W  g  i		]   g  filenamef  srfi/srfi-4/gnu.scm
	O
	(	L	; 	   g  nameg  any->s16vector C)Rgjp        h      ]4 5$   C $   6"    64 5$  S4 5&  C4 54	5"  &$  	4
 5"C
"""             g  obj
	  g  len	N  g  v		W  g  i		]   g  filenamef  srfi/srfi-4/gnu.scm
	O
	(	L	; 	   g  nameg  any->u32vector C*Rgjp        h      ]4 5$   C $   6"    64 5$  S4 5&  C4 54	5"  &$  	4
 5"C
"""             g  obj
	  g  len	N  g  v		W  g  i		]   g  filenamef  srfi/srfi-4/gnu.scm
	O
	(	L	; 	   g  nameg  any->s32vector C+Rgjp        h      ]4 5$   C $   6"    64 5$  S4 5&  C4 54	5"  &$  	4
 5"C
"""             g  obj
	  g  len	N  g  v		W  g  i		]   g  filenamef  srfi/srfi-4/gnu.scm
	O
	(	L	; 	   g  nameg  any->u64vector C,Rgjp        h      ]4 5$   C $   6"    64 5$  S4 5&  C4 54	5"  &$  	4
 5"C
"""             g  obj
	  g  len	N  g  v		W  g  i		]   g  filenamef  srfi/srfi-4/gnu.scm
	O
	(	L	; 	   g  nameg  any->s64vector C-Rgjp        h      ]4 5$   C $   6"    64 5$  S4 5&  C4 54	5"  &$  	4
 5"C
"""             g  obj
	  g  len	N  g  v		W  g  i		]   g  filenamef  srfi/srfi-4/gnu.scm
	O
	(	L	; 	   g  nameg  any->f32vector C.Rgjp        h      ]4 5$   C $   6"    64 5$  S4 5&  C4 54	5"  &$  	4
 5"C
"""             g  obj
	  g  len	N  g  v		W  g  i		]   g  filenamef  srfi/srfi-4/gnu.scm
	O
	(	L	; 	   g  nameg  any->f64vector C/Rgjp      h      ]4 5$   C $   6"    64 5$  _4 5&  O4 54	5"  2$  &4
4 5>  "  G  "C
"""         g  obj
	  g  len	N  g  v		W  g  i		]   g  filenamef  srfi/srfi-4/gnu.scm
	O
	(	L	; 	   g  nameg  any->c32vector C0R$gjp"      h      ]4 5$   C $   6"    64 5$  _4 5&  O4 54	5"  2$  &4
4 5>  "  G  "C
"""         g  obj
	  g  len	N  g  v		W  g  i		]   g  filenamef  srfi/srfi-4/gnu.scm
	O
	(	L	; 	   g  nameg  any->c64vector C1RC             g  m
		,  g  filenamef  srfi/srfi-4/gnu.scm		
	1	*
	,
	/
	2
	5
q	9
	:
/	O
 
	&
   C6                                                                                                                                                                                                                                                                                                                 ccache/srfi/srfi-2.go                                                                               0000644                 00000001173 15154557173 0010365 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0c      ]  4    h{      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-2	 		g  filenameS	
f  srfi/srfi-2.scm	g  importsS	g  ice-9	g  and-let-star	 	 	 	g  
re-exportsS	g  and-let*	 	g  set-current-module	 	 	g  cond-expand-provide	g  current-module	 C 5h@   i   ]4	
5 4 >  "  G   i4i5 6     a       g  m
		,  g  filenamef  srfi/srfi-2.scm		
	1			9		&	;	
 		;
   C6                                                                                                                                                                                                                                                                                                                                                                                                      ccache/srfi/srfi-98.go                                                                              0000644                 00000002403 15154557173 0010461 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]   4      h      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-98	 		g  filenameS	
f  srfi/srfi-98.scm	g  importsS	g  srfi-1	 	 	 	g  exportsS	g  get-environment-variable	g  get-environment-variables	 	g  set-current-module	 	 	g  cond-expand-provide	g  current-module	 	g  getenv	g  
filter-map	g  string-index	g  string-length	g  	substring	g  environC 5h      ]4	
5 4 >  "  G   4i4i5 >  "  G  iR     h8      ]4 =54 5$  4 
54 5CC         g  str
		6 g  pvt		6 g  len			6  g  filenamef  srfi/srfi-98.scm
	'			(			)			(			*			*		'	*	+	.	*	:	2	*	+	3	*	 		6  g  nameg  string->alist-entry C     h   x   ] 45 6   p       g  filenamef  srfi/srfi-98.scm
	&
		+	"		+	 		
  g  nameg  get-environment-variables CRC   y       g  m
		,  g  filenamef  srfi/srfi-98.scm		
	-	#
	2	#		:	#	&	?	#
	N	%
	&
 	
   C6                                                                                                                                                                                                                                                              ccache/srfi/srfi-43.go                                                                              0000644                 00000176476 15154557173 0010475 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0&      ]t 4  h      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-43	 		g  filenameS	
f  srfi/srfi-43.scm	g  importsS	g  srfi-1	 	 	g  srfi-8	 	 	 	g  exportsS	g  vector-empty?	g  vector=	g  vector-unfold	g  vector-unfold-right	g  vector-reverse-copy	g  vector-append	g  vector-concatenate	g  vector-fold	g  vector-fold-right	g  
vector-map	g  vector-map!	g  vector-for-each	 g  vector-count	!g  vector-index	"g  vector-index-right	#g  vector-skip	$g  vector-skip-right	%g  vector-binary-search	&g  
vector-any	'g  vector-every	(g  vector-swap!	)g  vector-reverse!	*g  vector-copy!	+g  vector-reverse-copy!	,g  reverse-vector->list	-g  reverse-list->vector	. !"#$%&'()*+,- 	/g  
re-exportsS	0g  make-vector	1g  vector	2g  vector?	3g  
vector-ref	4g  vector-set!	5g  vector-length	6012345 	7g  replacementsS	8g  vector-copy	9g  vector-fill!	:g  list->vector	;g  vector->list	<89:; 	=g  set-current-module	>= 	?= 	@g  cond-expand-provide	Ag  current-module	B 	Cg  error	Dg  string-append	Eg  symbol->string	Ff  : 	Gg  
error-from	Hg  make-syntax-transformer	IH 	JH 	Kg  assert-nonneg-exact-integer	Lg  macro	Mg  $sc-dispatch	NM 	OM 	Pg  any	QPPP 	Rg  syntax-object	Sg  unless	Tg  top	UT 	Vg  ribcage	Wg  dummy	Xg  k	Yg  who	ZWXY 	[g  m-46961e513c-7	\[T 	]\UU 	^f  l-46961e513c-c	_f  l-46961e513c-d	`f  l-46961e513c-e	a^_` 	bVZ]a 	cV 	dg  x	ed 	f\ 	gf  l-46961e513c-9	hg 	iVefh 	jUbci 	kg  hygiene	lk 	mRSjl 	ng  and	oRnjl 	pg  exact-integer?	qRpjl 	rg  not	sRrjl 	tg  	negative?	uRtjl 	vRGjl 	wf  (expected non-negative exact integer, got	xRwjl 	yg  syntax-violation	zy 	{y 	|f  -source expression failed to match any pattern	}g  assert-procedure	~g  f	W~Y  g  m-46961e513c-13 T  UU  f  l-46961e513c-18 f  l-46961e513c-19 f  l-46961e513c-1a   V    f  l-46961e513c-15   Ve  Uc  RSl  g  
procedure? Rl  RGl  f  expected procedure, got Rl  g  assert-vector g  v WY  g  m-46961e513c-1f T  UU  f  l-46961e513c-24 f  l-46961e513c-25 f  l-46961e513c-26   V    f  l-46961e513c-21   Ve  Uc  RSl  R2l  RGl  f  expected vector, got Rl  g  assert-valid-index PPPP  g  i g  len WY  g  m-46961e513c-2b T  UUU  f  l-46961e513c-30 f  l-46961e513c-31 f  l-46961e513c-32 f  l-46961e513c-33   V    f  l-46961e513c-2d   Ve  Uc  RSl  Rnl  Rpl  g  <= Rl  R
l  RGl  f  invalid index Rl  g  assert-valid-start g  start WY  g  m-46961e513c-39 T  UUU  f  l-46961e513c-3e f  l-46961e513c-3f f  l-46961e513c-40 f  l-46961e513c-41   V    f  l-46961e513c-3b   Ve  Uc  RSl  Rnl  Rpl  Rl  R
l  RGl  f  invalid start index Rl  g  assert-valid-range PPPPP  g  end WY  g  m-46961e513c-47 T  UUUU  f  l-46961e513c-4c f  l-46961e513c-4d f  l-46961e513c-4e f  l-46961e513c-4f f  l-46961e513c-50   V    f  l-46961e513c-49   Ve  Uc  RSl  Rnl  Rpl  Rl  R
l  RGl  f  invalid index range Rl  g  assert-vectors g  let g  vs WY  g  m-46961e513c-57 T  UU  f  l-46961e513c-5c f  l-46961e513c-5df  l-46961e513c-5e  V  f  l-46961e513c-59 Ve Uc 	Rl 
g  loopR
l RSl g  null?Rl Rl g  carRl g  cdrRl g  ming  
min-lengthg  reverse!g  vectors-refg  apply8 8 g  guile-vector-copyg  vector-move-left!g  %vector-concatenate9 9  g  %vector-reverse!!g  define-vector-copier!"g  define#g  copy!$g  	docstring%g  
inner-proc&W#$% 'g  m-46961e513c-5ea('T )(UUU *f  l-46961e513c-5ef+f  l-46961e513c-5f0,f  l-46961e513c-5f1-f  l-46961e513c-5f2.*+,- /V&). 0( 1f  l-46961e513c-5ec21 3Ve02 4U/c3 5R"4l 6R4l 7g  %copy!8R74l 9g  case-lambda:R94l ;g  target<R;4l =g  tstart>R=4l ?g  source@R?4l A<>@ BR4l Cg  quoteDRC4l Eg  tlenFRE4l GR54l HG< IFH Jg  slenKRJ4l LG@ MKL NIM OR4l PRS4l Qg  >=RRQ4l Sg  +TRS4l UT>K VRFU WRG4l Xf  would write past end of targetYRX4l ZY [R
4l \8<>@[K ]\ ^g  sstart_R^4l `<>@_ ag  -bRa4l cbK_ dT>c eRFd f8<>@_K gf hg  sendiRh4l j<>@_i kR4l lbi_ mT>l nRFm o8<>@_i po qg  vector-move-right!rg  lengthsg  dropC 5      hh  l  ]4	
./67<5 4? >  "  G   4@i4Ai5 B>  "  G  CDEF     h       - 1 3 44 55@        g  who
			 g  msg			 g  args				  g  filenamef  srfi/srfi-43.scm
	+
		-				-			-	-		-				,	 				
	  g  nameg  
error-from CGR4JKLOQmoqsuvx      h0   M   ]      C     E       g  dummy
		+ g  k		+ g  who			+  		+	   C{|    h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-43.scm
	0
 		"  g  
macro-typeg  syntax-rulesg  patternsg  kg  who   C5KR4J}LOQ    h    M   ]   C      E       g  dummy
		 g  f		 g  who			  			   C{|    h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-43.scm
	5
 		"  g  
macro-typeg  syntax-rulesg  patternsg  fg  who   C5}R4JLOQ    h    M   ]   C      E       g  dummy
		 g  v		 g  who			  			   C{|    h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-43.scm
	9
 		"  g  
macro-typeg  syntax-rulesg  patternsg  vg  who   C5R4JLO      h0   ^   ]     C      V       g  dummy
		* g  i		* g  len			* g  who			*  		*	   C{|   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-43.scm
	=
 		"  g  
macro-typeg  syntax-rulesg  patternsg  ig  leng  who   C5R4JLO       h0   b   ]     C      Z       g  dummy
		* g  start		* g  len			* g  who			*  		*	   C{|       h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-43.scm
	B
 		"  g  
macro-typeg  syntax-rulesg  patternsg  startg  leng  who   C5R4JLO   h8   s   ]      C   k       g  dummy
		5 g  start		5 g  end			5 g  len			5 g  who			5  		5	   C{|      h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-43.scm
	G
 		"  g  
macro-typeg  syntax-rulesg  patternsg  startg  endg  leng  who   C5R4JLOQ	     h@   N   ]         C      F       g  dummy
		: g  vs		: g  who			:  		:	   C{|   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-43.scm
	M
 		"  g  
macro-typeg  syntax-rulesg  patternsg  vsg  who   C5R5  h@     ]"  #(  C4455" 4 5"           g  vs
		< g  vs		) g  result			)  g  filenamef  srfi/srfi-43.scm
	U
		V			X			Z			Z			Z	#		Z	2		Z	#	!	Z		)	Z		)	V		,	V		-	W		2	W	$	4	W		<	V	 		<  g  nameg  
min-length CR        h8      ]"   (  6" "              g  vs
		1 g  i		1 g  vs			& g  xs			&  g  filenamef  srfi/srfi-43.scm
	]
		^			_			`			a			a	)		a			a		&	a		&	^		)	^		1	^	 		1	  g  nameg  vectors-ref CRGwp0 h8      ] L$  C4L  >  G L   "          g  i
		5 g  seed		5 g  x			5 g  seed			5  g  filenamef  srfi/srfi-43.scm
	{			|			|				}			}		(	~		+			5		 			5	  g  nameg  loop C       h@      ] L$  C4L  >  G L   "          g  i
		= g  seed1		= g  seed2			= g  x			= g  seed1			= g  seed2			=  g  filenamef  srfi/srfi-43.scm
 		 		 			 	$	 		, 		/ 		= 	 			=	  g  nameg  loop C  h8      ] L$  C4L  >  GL   "        g  i
		7 g  seeds		7 g  x			7 g  seeds			7  g  filenamef  srfi/srfi-43.scm
 		 		 			 	 	 		* 		- 		7 	 			7	  g  nameg  loop C    h  s  )   3 4 5$  "  4 >  "  G  "  4>  "  *G  "  #45$  
$  ""   "  "45"  "$  "  4 5"
"C)   3 4 5$  "  4 >  "  G  "  4>  "  *G  "  #45$  
$  ""   "  "45O  Q 4
>  "  G  C)   3 4 5$  "  4 >  "  G  "  4>  "  *G  "  #45$  
$  ""   "  "45	O  Q 4
>  "  G  C- 1 3 4 5$  "  4 >  "  G  "  4>  "  *G  "  #45$  
$  ""   "  "45
O  Q 4
>  "  G  C k      g  f
		  g  len		  g  v		v  g  i		|  g  f
 O g  len O g  seed	 O g  v	O g  loop	+L g  f
X g  lenX g  seed1	X g  seed2	X g  v	 g  loop	 g  f
 g  len g  seeds	 g  v	n g  loop	{  g  filenamef  srfi/srfi-43.scm
	e		
	o			o			o		3	p		7	p	&	9	p		p	q		v	q		|	r	 	s	 	s		 	t	 	t	 	u	 	u	 	r	 	e	 	x	 	x	 	x	 	y	 	y	& 	y		z		z	+	{	X	e	Y 	l 	n 	 	 	& 	 	 	 		e	 	 	 	+ 	/ 	&1 	h 	n 	{ 	 0		 	  O	 X	 	
	  g  nameg  vector-unfoldg  documentationf (vector-unfold f length initial-seed ...) -> vector

The fundamental vector constructor.  Create a vector whose length is
LENGTH and iterates across each index k from 0 up to LENGTH - 1,
applying F at each iteration to the current index and current seeds, in
that order, to receive n + 1 values: the element to put in the kth slot
of the new vector, and n new seeds for the next iteration.  It is an
error for the number of seeds to vary between iterations. CRGwp0 h8      ] 
$  C4L  >  G L   "           g  i
		4 g  seed		4 g  x			4 g  seed			4  g  filenamef  srfi/srfi-43.scm
 		 		
 			 		 		' 		* 		4 	 			4	  g  nameg  loop C       h@      ] 
$  C4L  >  G L   "           g  i
		< g  seed1		< g  seed2			< g  x			< g  seed1			< g  seed2			<  g  filenamef  srfi/srfi-43.scm
 		 		
 			 	$	 		+ 		. 		< 	 			<	  g  nameg  loop C  h8      ] 
$  C4L  >  GL   "         g  i
		6 g  seeds		6 g  x			6 g  seeds			6  g  filenamef  srfi/srfi-43.scm
 		 		
 			 	 	 		) 		, 		6 	 			6	  g  nameg  loop C    h    )   3 4 5$  "  4 >  "  G  "  4>  "  *G  "  #45$  
$  ""   "  "45"  !
$  "  4 5""C)   3 4 5$  "  4 >  "  G  "  4>  "  *G  "  #45$  
$  ""   "  "45O  Q 4>  "  G  C)   3 4 5$  "  4 >  "  G  "  4>  "  *G  "  #45$  
$  ""   "  "45	O  Q 4>  "  G  C- 1 3 4 5$  "  4 >  "  G  "  4>  "  *G  "  #45$  
$  ""   "  "45
O  Q 4>  "  G  C         g  f
		  g  len		  g  v		v  g  i		|  g  f
 O g  len O g  seed	 O g  v	O g  loop	+L g  f
X g  lenX g  seed1	X g  seed2	X g  v	 g  loop	 g  f
  g  len  g  seeds	  g  v	m g  loop	y  g  filenamef  srfi/srfi-43.scm
 		
 		 		 		3 		7 	&	9 		p 		v 		| 		 	  		  	  	  	  	  	  	  	  	  	  	  	  	  	&  	 	 	+ 	: 	A 	X 	Y 	l 	n 	 	 	& 	 	 	 	 	 	  	 	 	 	* 	. 	&0 	g 	m 	y 	 	 	 8		 	  O	 X	  	
	  g  nameg  vector-unfold-rightg  documentationf (vector-unfold-right f length initial-seed ...) -> vector

The fundamental vector constructor.  Create a vector whose length is
LENGTH and iterates across each index k from LENGTH - 1 down to 0,
applying F at each iteration to the current index and current seeds, in
that order, to receive n + 1 values: the element to put in the kth slot
of the new vector, and n new seeds for the next iteration.  It is an
error for the number of seeds to vary between iterations. CRRG85p0    h    )   	3  6)   3  $  "  4 >  "  G  4 5"  4>  "  ;G  "  445$  %
$  $  "  ""  ""  "454	 
>  "  G  C- . , 3 #   $  "  4 >  "  G  4 5"  4
>  "  NG  "  G45$  845$  %
$  $  "  ""  ""  ""  "454	 45
>  "  G  C           g  v
			 g  v
	  g  start	  g  len		@  g  result	   g  v
  g  start  g  end	  g  fill	  g  len	  g  result	n  g  filenamef  srfi/srfi-43.scm
 		 		 		 		( 		* 		: 		@ 		G 		K 	$	M 	  	  	!  	  	  	  	  	  	  	  	  	  	 	 	! 	 	 	& 	' 	1 	5 	9 	> 	c 	j 	!n 	n 	q 	x 	# 	 *			 	 	  	  g  nameg  vector-copyg  documentationf (vector-copy vec [start [end [fill]]]) -> vector

Allocate a new vector whose length is END - START and fills it with
elements from vec, taking elements from vec starting at index START
and stopping at index END.  START defaults to 0 and END defaults to
the value of (vector-length VEC).  If END extends beyond the length of
VEC, the slots in the new vector that obviously cannot be filled by
elements from VEC are filled with FILL, whose default value is
unspecified. C8R0       hP   e  ]#45"  %$  "  $ "
"C      ]      g  vec
		J g  start		J g  end			J g  len			J g  result			J g  i			; g  j			;  g  filenamef  srfi/srfi-43.scm
 		 		 		
 		 		 		 		 	
	, 	"	- 		0 		3 		; 		; 		? 		G 	 		J	  g  nameg  %vector-reverse-copy C G5p       hx     )   23  $  "  4 >  "  G  L  
4 56)   3  $  "  4 >  "  G  4 5"  4>  "  ;G  "  445$  %
$  $  "  ""  ""  "L  6] $  "  4 >  "  G  4 5"  4>  "  _G  "  X45$  I45$  6
$  &$  $  "  ""  ""  ""  ""  "L  6         g  vec
			8 g  vec
	A  g  start	A  g  len		i  g  vec
 u g  start u g  end	 u g  len	 u  g  filenamef  srfi/srfi-43.scm
 		 		 		 		0 	#	8 		A 		D 		Q 		S 		c 		i 		p 			t 	'	v 		 		  	 	 	 	 	 	 		 	+ 		u		 			8 	A 	  u	  g  documentationf 1(vector-reverse-copy vec [start [end]]) -> vector

Allocate a new vector whose length is END - START and fills it with
elements from vec, taking elements from vec in reverse order starting
at index START and stopping at index END.  START defaults to 0 and END
defaults to the value of (vector-length VEC). C O  R50  h     ]1"  "(  "  !45" 
"45"  G(  "  H454
>  "  G  " 
"C       g  vs
	  g  vs		( g  len			( g  
result-len	3  g  result		<  g  vs		B  g  pos		B  g  v		O  g  len		X   	g  filenamef  srfi/srfi-43.scm

				
			!		1		@		1	 	*	(		(			3			6		<			B		H		O		O		R		X		[	
	v		{	 	
 	 	   g  nameg  %vector-concatenate CRG50 	   h0    )    3    C)   *3  $  "  4 >  "  G   6)   3  $  "  4 >  "  G  $  "  4>  "  G  4 545454 

>  "  G  4
>  "  G  C-  1  3 "  6(  "  4$  "  4>  "  G  " " 6           g  v
		= g  v1
	F  g  v2	F  g  len1	   g  len2	   g  result	   g  vs
 + g  vs   g  filenamef  srfi/srfi-43.scm
								&		(		=		F		I!		V!		X!		j"		w"		y"	 #	 $	 #	 %	 %	" %	 %	 &		 '		 	 *	*	*	++	 			
 		= 	F 	  +


  g  nameg  vector-appendg  documentationf  (vector-append vec ...) -> vector

Return a newly allocated vector that contains all elements in order
from the subsequent locations in VEC ... CRG      hP   J  ]	"  6(  "  4$  "  4>  "  G  " " 6      B      g  vs
		J g  vs		<  g  filenamef  srfi/srfi-43.scm
-
	2		!2		#2		J3	 		J  g  nameg  vector-concatenateg  documentationf  (vector-concatenate list-of-vectors) -> vector

Append each vector in LIST-OF-VECTORS.  Equivalent to:
  (apply vector-append LIST-OF-VECTORS) CRG5       h0     ] $  "  4 >  "  G  4 5
C         g  vec
		-  g  filenamef  srfi/srfi-43.scm
5
	9		9		9		$:			+:	 		-  g  nameg  vector-empty?g  documentationf  d(vector-empty? vec) -> boolean

Return true if VEC is empty, i.e. its length is 0, and false if not. CR5 h(      ](  C 45$    "C       g  len
		( g  vs		(  g  filenamef  srfi/srfi-43.scm
>		?			?	
	@		@	%	@		@		@	
	A	#	&A	 		(	  g  nameg  all-of-length? CO        hP   -  ] 
$  C  &  "  	45$    "C%      g  i
		P g  elt=?		P g  v1			P g  v2			P g  t			P g  x1			P g  x2			P  g  filenamef  srfi/srfi-43.scm
B		C	
	C		D		E		D	
	'F		(F		-F	!	9F		<G		NG	 		P	  g  nameg  =up-to? CO  Q  Q G5   h    )   *3 4 5$  "  4 >  "  G  C)   K3 4 5$  "  4 >  "  G  $  "  4>  "  G  C)   3 4 5$  "  4 >  "  G  $  "  4>  "  G  $  "  4>  "  G  4545$  L 6C- 1 3 4 5$  "  4 >  "  G  $  "  4>  "  G  "  6(  "  4$  "  4>  "  G  ""454L 5$  2"  &(  C4L 5$  	"C"C            g  elt=?
			0 g  elt=?
	9  g  v	9  g  elt=?
  g  v1  g  v2	  g  len	  g  elt=?
  g  v1  g  vs	  g  vs	j g  len	 g  vs	  g  filenamef  srfi/srfi-43.scm
H		
R		R		R		9H		:U		MU		OU		aV		nV		pV	 H	 Y	 Y	 Y	 Z	 Z	 Z	 [	 [	 [	 \	 \	 ]	]	]		^	^	 H	!`	4`	6`	Ha	Ua	Wa	jb	b	b	c	c	d	d		e	f	f	g	g	"g	5g	g	h	h	e	 6			0 	9 	  	  	
	  g  documentationf u(vector= elt=? vec ...) -> boolean

Return true if the vectors VEC ... have equal lengths and equal
elements according to ELT=?.  ELT=? is always applied to two
arguments.  Element comparison must be consistent with eq?, in the
following sense: if (eq? a b) returns true, then (elt=? a b) must also
return true.  The order in which comparisons are performed is
unspecified. C O  RG5 
h     )   3 4 5$  "  4 >  "  G  $  "  4>  "  G  45"  %$  C4 5"
")   3 4 5$  "  4 >  "  G  $  "  4>  "  G  $  "  4>  "  G  445455"  *$  C4 5"
"- 1 3 4 5$  "  4 >  "  G  "  6(  "  4$  "  4>  "  G  ""45"  )$  C4 4	5?"
"           g  kcons
		  g  knil		  g  v			  g  len		V  g  i		\  g  state		\  g  kcons
 J g  knil J g  v1	 J g  v2	 J g  len	J g  i	? g  state	? g  kcons
S g  knilS g  vs	S g  vs	| g  len	 g  i	 g  state	  g  filenamef  srfi/srfi-43.scm
k		
v		v		v		1w		>w		@w		Px		Vx		\y		az		ez			k|		l|		w|	*	y|	 |	 y	 k	 ~	 ~	 ~	 	 	 	 	 	 	 	 		(						$	%	0	"5	47	?	?	Sk	T	g	i	|												0			 >		 	  J	 S	
	  g  nameg  vector-foldg  documentationf (vector-fold kons knil vec1 vec2 ...) -> value

The fundamental vector iterator.  KONS is iterated over each index in
all of the vectors, stopping at the end of the shortest; KONS is
applied as (KONS i state (vector-ref VEC1 i) (vector-ref VEC2 i) ...)
where STATE is the current state value, and I is the current index.
The current state value begins with KNIL, and becomes whatever KONS
returned at the respective iteration.  The iteration is strictly
left-to-right. CRG5 
    h   g  )   3 4 5$  "  4 >  "  G  $  "  4>  "  G  45"  $
$  C4 5"")   3 4 5$  "  4 >  "  G  $  "  4>  "  G  $  "  4>  "  G  445455"  )
$  C4 5""- 1 3 4 5$  "  4 >  "  G  "  6(  "  4$  "  4>  "  G  ""45"  (
$  C4 4	5?""  _      g  kcons
		  g  knil		  g  v			  g  len		V  g  i		\  g  state		\  g  kcons
 L g  knil L g  v1	 L g  v2	 L g  len	L g  i	? g  state	? g  kcons
U g  knilU g  vs	U g  vs	~ g  len	 g  i	 g  state	  g  filenamef  srfi/srfi-43.scm
		
						1		>		@		P		V		\		_		d			j		k		v	*	x	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 			(						$	%	0	"5	47	?	?	B	L	U	V	i	k	~												0					 D		 	  L	 U	
	  g  nameg  vector-fold-rightg  documentationf (vector-fold-right kons knil vec1 vec2 ...) -> value

The fundamental vector iterator.  KONS is iterated over each index in
all of the vectors, starting at the end of the shortest; KONS is
applied as (KONS i state (vector-ref VEC1 i) (vector-ref VEC2 i) ...)
where STATE is the current state value, and I is the current index.
The current state value begins with KNIL, and becomes whatever KONS
returned at the respective iteration.  The iteration is strictly
right-to-left. CRG50   h   ~  )   3 4 5$  "  4 >  "  G  $  "  4>  "  G  4545"  '$  "  !4 5"
"C)   3 4 5$  "  4 >  "  G  $  "  4>  "  G  $  "  4>  "  G  44545545"  ,$  "  &4 5"
"C- 1 3 4 5$  "  4 >  "  G  "  6(  "  4$  "  4>  "  G  ""4	545"  +$  "  %4 4
5?"
"C       v      g  f
		  g  v		  g  len		V  g  result		_  g  i		e  g  f
 ^ g  v1 ^ g  v2	 ^ g  len	^ g  result	"^ g  i	(T g  f
g g  vsg g  vs	 g  len	 g  result	 g  i	  g  filenamef  srfi/srfi-43.scm
		
						1		>		@		P		V		Y		_		e		j		n			w	! 	& 	! 	 	 	 	 	 	 	 	 	 	 	 	 	 		
		)			"	(	-	1		:	!C	&H	8J	!K	N	T	T	g	h	{	}													!	,	!					 G		 	  ^	 g
  g  nameg  
vector-mapg  documentationf (vector-map f vec2 vec2 ...) -> vector

Return a new vector of the shortest size of the vector arguments.
Each element at index i of the new vector is mapped from the old
vectors by (F i (vector-ref VEC1 i) (vector-ref VEC2 i) ...).  The
dynamic order of application of F is unspecified. CRG5 
     h    )   3 4 5$  "  4 >  "  G  $  "  4>  "  G  45"  %$  C4 5"
")   3 4 5$  "  4 >  "  G  $  "  4>  "  G  $  "  4>  "  G  445455"  *$  C4 5"
"- 1 3 4 5$  "  4 >  "  G  "  6(  "  4$  "  4>  "  G  ""45"  )$  C4 4	5?"
"          g  f
		  g  v		  g  len		V  g  i		\  g  f
 B g  v1 B g  v2	 B g  len	B g  i	; g  f
K g  vsK g  vs	t g  len	 g  v1	 g  i	  g  filenamef  srfi/srfi-43.scm
		
						1		>		@		P		V		\		a		e			l		u	!	w		x		{	 	 	 	 	 	 	 	 	 	 	 	 	 	 		(						!	*	"/	41	2	5	;	;	K	L	_	a	t												(					 B		 	  B	 K
  g  nameg  vector-map!g  documentationf  (vector-map! f vec2 vec2 ...) -> unspecified

Similar to vector-map, but rather than mapping the new elements into a
new vector, the new mapped elements are destructively inserted into
VEC1.  The dynamic order of application of F is unspecified. CRG5       h    )   3 4 5$  "  4 >  "  G  $  "  4>  "  G  45"  +$  C4 >  "  G  "
")   3 4 5$  "  4 >  "  G  $  "  4>  "  G  $  "  4>  "  G  445455"  0$  C4 >  "  G  "
"- 1 3 4 5$  "  4 >  "  G  "  6(  "  4$  "  4>  "  G  ""45"  1$  C4	 4
5>  "  G  "
"           g  f
		  g  v		  g  len		V  g  i		\  g  f
 N g  v1 N g  v2	 N g  len	N g  i	G g  f
W g  vsW g  vs	 g  len	 g  i	  g  filenamef  srfi/srfi-43.scm
		
						1			>			@			P
		V
		\		a		e			h		q		v	 	 	 	 	 	 	 	 	 	 	 	 	 	 								 		#	,	1	"6	A	G	G	W	X	k	m													 	 		 >		 	  N	 W
  g  nameg  vector-for-eachg  documentationf  (vector-for-each f vec1 vec2 ...) -> unspecified

Call (F i VEC1[i] VEC2[i] ...) for each index i less than the length
of the shortest vector passed.  The iteration is strictly
left-to-right. CRG 5 
   h0  V  )   3 4 5$  "  4 >  "  G  $  "  4>  "  G  45"  7$  C4 5$  ""

")   3 4 5$  "  4 >  "  G  $  "  4>  "  G  $  "  4>  "  G  445455"  <$  C4 5$  ""

"- 1 3 4 5$  "  4 >  "  G  "  6(  "  4$  "  4>  "  G  ""45"  ;$  C4 4	5?$  ""

"  N      g  pred?
		  g  v		  g  len		V  g  i		\  g  count		\  g  pred?
 l g  v1 l g  v2	 l g  len	 l g  i	&b g  count	&b g  pred?
u. g  vsu. g  vs	 g  len	. g  i	$ g  count	$  g  filenamef  srfi/srfi-43.scm
#		
*		*		*		1+		>+		@+		P,		V,		\-		a.		e.			i/		r/		t/		x.			{0		~0	 0	 2	 2	 -	 #	 4	 4	 4	 5	 5	 5	 6	 6	 6	7	7	8	 7	 7	&9	+:	/:		3;	<;	A;	+C;	G:		J<	M<	U<	X>	b>	b9	u#	v@	@	@	A	A	A	B	B	C	D	D		E	E	E		D		F	F	F	H	$H	$C	 J		 	  l	 u.
  g  nameg  vector-countg  documentationf  (vector-count pred? vec1 vec2 ...) -> exact nonnegative integer

Count the number of indices i for which (PRED? VEC1[i] VEC2[i] ...)
returns true, where i is less than the length of the shortest vector
passed. C RG!5 
     h    )   3 4 5$  "  4 >  "  G  $  "  4>  "  G  45"  %$  4 5$  C"C
")   3 4 5$  "  4 >  "  G  $  "  4>  "  G  $  "  4>  "  G  445455"  *$  4 5$  C"C
"- 1 3 4 5$  "  4 >  "  G  "  6(  "  4$  "  4>  "  G  ""45"  )$  4 4	5?$  C"C
"       g  pred?
		  g  v		  g  len		V  g  i		\  g  pred?
 B g  v1 B g  v2	 B g  len	B g  i	; g  pred?
K g  vsK g  vs	t g  len	 g  i	  g  filenamef  srfi/srfi-43.scm
K		
R		R		R		1S		>S		@S		PT		VT		\U		aV		eV			fW		mW		oW		sW		yY		Y	 U	 K	 [	 [	 [	 \	 \	 \	 ]	 ]	 ]	 ^	 ^	_	^	^	`	a	a		b	"b	'c	)b	-b	3e	9e	;`	KK	Lg	_g	ag	th	h	h	i	i	j	k	k		l	l	l	l	n	n	j	 A		 	  B	 K
  g  nameg  vector-indexg  documentationf  (vector-index pred? vec1 vec2 ...) -> exact nonnegative integer or #f

Find and return the index of the first elements in VEC1 VEC2 ... that
satisfy PRED?.  If no matching element is found by the end of the
shortest vector, return #f. C!RG"5 
    h  @  )   3 4 5$  "  4 >  "  G  $  "  4>  "  G  45"  $
$  4 5$  C"C")   3 4 5$  "  4 >  "  G  $  "  4>  "  G  $  "  4>  "  G  445455"  )
$  4 5$  C"C"- 1 3 4 5$  "  4 >  "  G  "  6(  "  4$  "  4>  "  G  ""45"  (
$  4 4	5?$  C"C"      8      g  pred?
		  g  v		  g  len		V  g  i		\  g  pred?
 D g  v1 D g  v2	 D g  len	D g  i	; g  pred?
M g  vsM g  vs	v g  len	 g  i	  g  filenamef  srfi/srfi-43.scm
q		
x		x		x		1y		>y		@y		Pz		Vz		\{		`|		d|			e}		l}		n}		r}		x		~	 {	 {	 {	 q	 	 	 	 	 	 	 	 	 	 	 									"	'	)	-	3	9	;	>	D	Mq	N	a	c	v																		 G		 	  D	 M
  g  nameg  vector-index-rightg  documentationf (vector-index-right pred? vec1 vec2 ...) -> exact nonnegative integer or #f

Find and return the index of the last elements in VEC1 VEC2 ... that
satisfy PRED?, searching from right-to-left.  If no matching element
is found before the end of the shortest vector, return #f. C"RG#5 
   h    )   3 4 5$  "  4 >  "  G  $  "  4>  "  G  45"  %$  4 5$  	"CC
")   3 4 5$  "  4 >  "  G  $  "  4>  "  G  $  "  4>  "  G  445455"  *$  4 5$  	"CC
"- 1 3 4 5$  "  4 >  "  G  "  6(  "  4$  "  4>  "  G  ""45"  )$  4 4	5?$  	"CC
"       g  pred?
		  g  v		  g  len		V  g  i		\  g  pred?
 B g  v1 B g  v2	 B g  len	B g  i	; g  pred?
K g  vsK g  vs	t g  len	 g  i	  g  filenamef  srfi/srfi-43.scm
		
						1		>		@		P		V		\		a		e			f		m		o		s		v		|	 	 	 	 	 	 	 	 	 	 	 	 	 									"	'	)	-	0	6	;	K	L	_	a	t																 A		 	  B	 K
  g  nameg  vector-skipg  documentationf  (vector-skip pred? vec1 vec2 ...) -> exact nonnegative integer or #f

Find and return the index of the first elements in VEC1 VEC2 ... that
do not satisfy PRED?.  If no matching element is found by the end of
the shortest vector, return #f. C#RG$5 
       h  E  )   3 4 5$  "  4 >  "  G  $  "  4>  "  G  45"  $
$  C4 5$  	"C")   3 4 5$  "  4 >  "  G  $  "  4>  "  G  $  "  4>  "  G  445455"  )
$  C4 5$  	"C"- 1 3 4 5$  "  4 >  "  G  "  6(  "  4$  "  4>  "  G  ""45"  (
$  C4 4	5?$  	"C"      =      g  pred?
		  g  v		  g  len		V  g  i		\  g  pred?
 D g  v1 D g  v2	 D g  len	D g  i	; g  pred?
M g  vsM g  vs	v g  len	 g  i	  g  filenamef  srfi/srfi-43.scm
		
						1		>		@		P		V		\		_		d			g		n		p		t		w		}	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 									$	)	+	/	2	8	;	>	D	M	N	a	c	v																		 G		 	  D	 M
  g  nameg  vector-skip-rightg  documentationf (vector-skip-right pred? vec1 vec2 ...) -> exact nonnegative integer or #f

Find and return the index of the last elements in VEC1 VEC2 ... that
do not satisfy PRED?, searching from right-to-left.  If no matching
element is found before the end of the shortest vector, return #f. C$R      hp     ]-"  ]$  R	 45		
$  C	
$  "	
$  "CC"       g  vec
		o g  value		o g  cmp			o g  start			o g  end			o g  lo			c g  hi			c g  i			a g  x			a g  c			)	a  
g  filenamef  srfi/srfi-43.scm
									!									!		)		.		3		9		>		J	$	M		R		U	*	_	$	c	 		o	  g  nameg  %vector-binary-search C G%5p 
      h    )   [3  $  "  4 >  "  G  45$  "  4>  "  G  L  
4 56)   3  $  "  4 >  "  G  4 5"  4>  "  ;G  "  445$  %
$  $  "  ""  ""  "L  6] $  "  4 >  "  G  4 5"  4	>  "  _G  "  X45$  I45$  6
$  &$  $  "  ""  ""  ""  ""  "L  6        g  vec
			a g  value			a g  cmp				a g  vec
	j  g  value	j  g  cmp		j  g  start		j  g  len	   g  vec
  g  value  g  cmp	  g  start	  g  end	  g  len	  g  filenamef  srfi/srfi-43.scm
								+		>		@		Y	.	a		j		m		z		|	 	 	 		 	' 		  		 	 					%		)	++				 			a	 	j 	  	  g  documentationf (vector-binary-search vec value cmp [start [end]]) -> exact nonnegative integer or #f

Find and return an index of VEC between START and END whose value is
VALUE using a binary search.  If no matching element is found, return
#f.  The default START is 0 and the default END is the length of VEC.
CMP must be a procedure of two arguments such that (CMP A B) returns
a negative integer if A < B, a positive integer if A > B, or zero if
A = B.  The elements of VEC must be sorted in non-decreasing order
according to CMP. C O  %RG&5 
   h   P  )   3 4 5$  "  4 >  "  G  $  "  4>  "  G  45"  )$  4 5$  C"C
")   3 4 5$  "  4 >  "  G  $  "  4>  "  G  $  "  4>  "  G  445455"  .$  #4 5$  C"C
"- 1 3 4 5$  "  4 >  "  G  "  6(  "  4$  "  4>  "  G  ""45"  -$  "4 4	5?$  C"C
"     H      g  pred?
		  g  v		  g  len		V  g  i		\  g  t		o  g  pred?
 J g  v1 J g  v2	 J g  len	J g  i	C g  t	-A g  pred?
S g  vsS g  vs	| g  len	 g  i	 g  t	  g  filenamef  srfi/srfi-43.scm
			
						1		>		@		P		V		\		a		e			f		m		o		o		}	 	 	 		 	 	 	 	 	 	 	 	 	 	 								 	& 	+!	- 	- 	;"	A"	C	S		T$	g$	i$	|%	%	%	&	&	'	(	(		)	)	)	)	*	*	'	 A		 	  J	 S
  g  nameg  
vector-anyg  documentationf 2(vector-any pred? vec1 vec2 ...) -> value or #f

Find the first parallel set of elements from VEC1 VEC2 ... for which
PRED? returns a true value.  If such a parallel set of elements
exists, vector-any returns the value that PRED? returned for that set
of elements.  The iteration is strictly left-to-right. C&RG'5 
   h@  m  )   3 4 5$  "  4 >  "  G  $  "  4>  "  G  45
$  C"  04 5$  	"  $  C"
")   3 4 5$  "  4 >  "  G  $  "  4>  "  G  $  "  4>  "  G  445455
$  C"  54 5$  	"  $  C"
"- 1 3 4 5$  "  4 >  "  G  "  6(  "  4$  "  4>  "  G  ""45
$  C"  44 4	5?$  	"  $  C"
"   e      g  pred?
		  g  v		  g  len		V  g  t		\  g  i		k  g  val		x  g  next-i		x  g  pred?
 v g  v1 v g  v2	 v g  len	%v g  t	+v g  i	:o g  val	Lo g  next-i	Lo g  pred?
= g  vs= g  vs	 g  len	= g  t	= g  i	6 g  val	6 g  next-i	6  g  filenamef  srfi/srfi-43.scm
-		
6		6		6		17		>7		@7		P8		V8		[9		\9		k:		l;		s;		u;		x<		x;	 =	 =	! =	 =	 ?	 :	 -	 A	 A	 A	 B	 B	 B	 C	C	C	D	D	E	%D	%D	*F	+F	:G	;H	BH	GI	IH	LJ	LH	VK	[K	!`K	dK	oM	oG	-	O	O	O	P	P	P	Q	Q	R	R	S	T	T	%T	U	T	V	"V	!'V	+V	6X	6S	 M		 	  v	 =
  g  nameg  vector-everyg  documentationf \(vector-every pred? vec1 vec2 ...) -> value or #f

If, for every index i less than the length of the shortest vector
argument, the set of elements VEC1[i] VEC2[i] ... satisfies PRED?,
vector-every returns the value that PRED? returned for the last set of
elements, at the last index of the shortest vector.  The iteration is
strictly left-to-right. C'RG(5p        h     ] $  "  4 >  "  G  4 5"  4>  "  ;G  "  445$  %
$  $  "  ""  ""  ""  4>  "  ;G  "  445$  %
$  $  "  ""  ""  "    C            g  vec
	  g  i	  g  j		  g  len		*  g  tmp	    g  filenamef  srfi/srfi-43.scm
Z
	^		^		^		$_		*_		1`		5`		7`	 a	 a	 a	 b	 b	 c	 c	 d	 	 	  g  nameg  vector-swap!g  documentationf  Z(vector-swap! vec i j) -> unspecified

Swap the values of the locations in VEC at I and J. C(RH    h0      ]"  $   "C"              g  vec
		) g  fill		) g  start			) g  end			) g  i			!  g  filenamef  srfi/srfi-43.scm
k		l		m		m		n	
	o		o	
	!l	 			)	  g  nameg  %vector-fill! CK G95p   hX    )   3 M 6)   3  $  "  4 >  "  G  4 5"  4>  "  ;G  "  445$  %
$  $  "  ""  ""  "L  6] $  "  4 >  "  G  4 5"  4>  "  _G  "  X45$  I45$  6
$  &$  $  "  ""  ""  ""  ""  "L  6            g  vec
			 g  fill			 g  vec
	  g  fill	  g  start		  g  len		B  g  vec
 R g  fill R g  start	 R g  end	 R g  len	 R  g  filenamef  srfi/srfi-43.scm
p		v		p		x		*x		,x		<y		By		Iz			Mz	'	Oz		 {		 p	 }	 }	 }	 ~	 ~	 		 	+ 		R		 				 	 	  R	  g  documentationf  (vector-fill! vec fill [start [end]]) -> unspecified

Assign the value of every location in VEC between START and END to
FILL.  START defaults to 0 and END defaults to the length of VEC. C O  9RhH   C  ]"  1$  &    "C"    ;      g  vec
		D g  start		D g  end			D g  i			7 g  j			7 g  tmp			5  g  filenamef  srfi/srfi-43.scm

				
									 		'		*		-		5		7		<		D	 		D	  g  nameg  %vector-reverse! C RG) 5p 	   hx    )   23  $  "  4 >  "  G   
4 56)   3  $  "  4 >  "  G  4 5"  4>  "  ;G  "  445$  %
$  $  "  ""  ""  " 6] $  "  4 >  "  G  4 5"  4>  "  _G  "  X45$  I45$  6
$  &$  $  "  ""  ""  ""  ""  " 6         g  vec
			8 g  vec
	A  g  start	A  g  len		i  g  vec
 u g  start u g  end	 u g  len	 u  g  filenamef  srfi/srfi-43.scm
								0		8		A		D		Q		S		c		i		p		t	%	v	 	 	 	 	 	 	 	 	 	) 	u	 			8 	A 	  u	  g  nameg  vector-reverse!g  documentationf  (vector-reverse! vec [start [end]]) -> unspecified

Destructively reverse the contents of VEC between START and END.
START defaults to 0 and END defaults to the length of VEC. C)R4J!LO568:AB<D@NO>FPVWZ]`_Kegjkinp      h8  t   ]    	  
       	  
         	  
          C       l       g  dummy
	1 g  copy!	1 g  	docstring		1 g  
inner-proc		1  	1	   C{|     h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-43.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  copy!g  	docstringg  
inner-proc   C5!RG*5pXq       h    )   3  $  "  4 >  "  G  $  "  4>  "  G  4 545"  4>  "  ;G  "  445$  %
$  $  "  ""  ""  "$  "  4>  "  G  
$  
 6	
 6)  G3  $  "  4 >  "  G  $  "  4>  "  G  4 545"  4>  "  ;G  "  445$  %
$  $  "  ""  ""  ""  4>  "  ;G  "  445$  %
$  $  "  ""  ""  "$  "  4>  "  G  $   6	 6] $  "  4 >  "  G  $  "  4>  "  G  4 545"  4>  "  ;G  "  445$  %
$  $  "  ""  ""  ""  4
>  "  _G  "  X45$  I45$  6
$  &$  $  "  ""  ""  ""  ""  "$  "  4>  "  G  $   6	 6        g  target
		  g  tstart		  g  source			  g  tlen		Y  g  slen		Y  g  target
 B g  tstart B g  source	 B g  sstart	 B g  tlen	NB g  slen	NB g  target
D g  tstartD g  source	D g  sstart	D g  send	D g  tlen	 g  slen	  g  filenamef  srfi/srfi-43.scm

 	 	 	 	 
"	&	4	B	D
				 		 	  B	 D	  g  documentationf (vector-copy! target tstart source [sstart [send]]) -> unspecified

Copy a block of elements from SOURCE to TARGET, both of which must be
vectors, starting in TARGET at TSTART and starting in SOURCE at
SSTART, ending when SEND - SSTART elements have been copied.  It is an
error for TARGET to have a length less than TSTART + (SEND - SSTART).
SSTART defaults to 0 and SEND defaults to the length of SOURCE. C*R         h`   _  ]"  4"  #$   "C" &  $  
 6""   W      g  target
		] g  tstart		] g  source			] g  sstart			] g  send			] g  i		
	- g  j		
	-  g  filenamef  srfi/srfi-43.scm
		
					
		"			 		#		+		-		2	!	:		:		G	!	K		U	 		]	  g  nameg  %copy! C G+5pX 	 hp  >  )   3  $  "  4 >  "  G  $  "  4>  "  G  4 545"  4>  "  ;G  "  445$  %
$  $  "  ""  ""  "$  "  4>  "  G  L  
6)  03  $  "  4 >  "  G  $  "  4>  "  G  4 545"  4>  "  ;G  "  445$  %
$  $  "  ""  ""  ""  4>  "  ;G  "  445$  %
$  $  "  ""  ""  "$  "  4>  "  G  L  6] $  "  4 >  "  G  $  "  4>  "  G  4 545"  4>  "  ;G  "  445$  %
$  $  "  ""  ""  ""  4>  "  _G  "  X45$  I45$  6
$  &$  $  "  ""  ""  ""  ""  "$  "  4>  "  G  L  6     6      g  target
		  g  tstart		  g  source			  g  tlen		Y  g  slen		Y  g  target
  g  tstart  g  source	  g  sstart	  g  tlen	9 g  slen	9 g  target
k g  tstartk g  source	k g  sstart	k g  send	k g  tlen	hk g  slen	hk  g  filenamef  srfi/srfi-43.scm

 		 	  	 k	  g  documentationf X(vector-reverse-copy! target tstart source [sstart [send]]) -> unspecified

Like vector-copy!, but copy the elements in the reverse order.  It is
an error if TARGET and SOURCE are identical vectors and the TARGET and
SOURCE ranges overlap; however, if TSTART = SSTART,
vector-reverse-copy! behaves as (vector-reverse! TARGET TSTART SEND)
would. C O  +R     h8     ]"  $  C ""             g  vec
		1 g  start		1 g  end			1 g  i			% g  result			%  g  filenamef  srfi/srfi-43.scm
											 			%		%		(		)		1	 		1	  g  nameg  %vector->list C G;5p  hx    )   23  $  "  4 >  "  G  L  
4 56)   3  $  "  4 >  "  G  4 5"  4>  "  ;G  "  445$  %
$  $  "  ""  ""  "L  6] $  "  4 >  "  G  4 5"  4>  "  _G  "  X45$  I45$  6
$  &$  $  "  ""  ""  ""  ""  "L  6         g  vec
			8 g  vec
	A  g  start	A  g  len		i  g  vec
 u g  start u g  end	 u g  len	 u  g  filenamef  srfi/srfi-43.scm
								0		8		A		D		Q		S		c		i		p			t	'	v		 		 	 	 	 	 	 	 		 	+ 		u		 			8 	A 	  u	  g  documentationf  (vector->list vec [start [end]]) -> proper-list

Return a newly allocated list containing the elements in VEC between
START and END.  START defaults to 0 and END defaults to the length of
VEC. C O  ;R    h0     ]"  $  C ""      g  vec
		0 g  start		0 g  end			0 g  i			% g  result			%  g  filenamef  srfi/srfi-43.scm
											 			%		%		( 		0	 		0	  g  nameg  %reverse-vector->list C G,5p   hx    )   23  $  "  4 >  "  G  L  
4 56)   3  $  "  4 >  "  G  4 5"  4>  "  ;G  "  445$  %
$  $  "  ""  ""  "L  6] $  "  4 >  "  G  4 5"  4>  "  _G  "  X45$  I45$  6
$  &$  $  "  ""  ""  ""  ""  "L  6         g  vec
			8 g  vec
	A  g  start	A  g  len		i  g  vec
 u g  start u g  end	 u g  len	 u  g  filenamef  srfi/srfi-43.scm
								0	$	8		A		D		Q		S		c		i		p			t	'	v		 		 	 	 	 	 	 	 		 	+ 		u		 			8 	A 	  u	  g  documentationf  (reverse-vector->list vec [start [end]]) -> proper-list

Return a newly allocated list containing the elements in VEC between
START and END in reverse order.  START defaults to 0 and END defaults
to the length of VEC. C O  ,Rr0s hp   Z  - . , 3 #  
#  	4 545"  "$  C"
4 5"    R      g  lst
		l g  start		l g  end			l g  len		)	l g  result		2	l g  i		8	Z g  lst		8	Z  g  filenamef  srfi/srfi-43.scm

		5	)		)		, 		2		8!		="	
	A"		K$	'	L$		O%		R%		Z%		Z!		\!		l!	 		l	  g  nameg  list->vectorg  documentationf  (list->vector proper-list [start [end]]) -> vector

Return a newly allocated vector of the elements from PROPER-LIST with
indices between START and END.  START defaults to 0 and END defaults
to the length of PROPER-LIST. C:Rr0s       hp     - . , 3 #  
#  	4 545"  !
$  C"4 5"   }      g  lst
		m g  start		m g  end			m g  len		)	m g  result		2	m g  i		8	Y g  lst		8	Y  g  filenamef  srfi/srfi-43.scm
(
	(	=	).		).		,/		2.		80		;1	
	@1		J3	'	K3		N4		Q4		Y4		Y0		\0		]0	"	m0	 		m	  g  nameg  reverse-list->vectorg  documentationf  (reverse-list->vector proper-list [start [end]]) -> vector

Return a newly allocated vector of the elements from PROPER-LIST with
indices between START and END, in reverse order.  START defaults to 0
and END defaults to the length of PROPER-LIST. C-RC      d      g  m
		4 g  %vector-reverse-copy
/73 g  all-of-length?
@KGS g  =up-to?@KGS g  %vector-binary-search
      c       g  guile-vector-fill!
            [ g  %vector-fill!            X g  %copy!
      !       g  %vector->list
      \      ҧ g  %reverse-vector->list
            h  
g  filenamef  srfi/srfi-43.scm		
	5	)
	:	)		B	)	&	G	)
D	+
	U
	]
	d
& 
& 
-k 
3 
6
:
<E-
=5
GV<
Oj
X*
_
g
m 
uq"
|bJ
      p
      
       
      
      ;
      ,
      Z
      ^g
      
      M
      I
      !
      Ҫ
      k
      M
      `(
 *	      b
   C6                                                                                                                                                                                                   ccache/srfi/srfi-64.go                                                                              0000644                 00000527654 15154557173 0010476 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0     ] 4    hC     ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-64	 		g  filenameS	
f  srfi/srfi-64.scm	g  exportsS	g  
test-begin	g  test-end	g  test-assert	g  test-eqv	g  test-eq	g  
test-equal	g  test-approximate	g  
test-error	g  
test-apply	g  test-with-runner	g  test-match-nth	g  test-match-all	g  test-match-any	g  test-match-name	g  	test-skip	g  test-expect-fail	g  test-read-eval-string	g  test-runner-group-path	g  
test-group	g  test-group-with-cleanup	 g  test-result-ref	!g  test-result-set!	"g  test-result-clear	#g  test-result-remove	$g  test-result-kind	%g  test-passed?	&g  test-log-to-file	'g  test-runner?	(g  test-runner-reset	)g  test-runner-null	*g  test-runner-simple	+g  test-runner-current	,g  test-runner-factory	-g  test-runner-get	.g  test-runner-create	/g  test-runner-test-name	0g  test-runner-pass-count	1g  test-runner-pass-count!	2g  test-runner-fail-count	3g  test-runner-fail-count!	4g  test-runner-xpass-count	5g  test-runner-xpass-count!	6g  test-runner-xfail-count	7g  test-runner-xfail-count!	8g  test-runner-skip-count	9g  test-runner-skip-count!	:g  test-runner-group-stack	;g  test-runner-group-stack!	<g  test-runner-on-test-begin	=g  test-runner-on-test-begin!	>g  test-runner-on-test-end	?g  test-runner-on-test-end!	@g  test-runner-on-group-begin	Ag  test-runner-on-group-begin!	Bg  test-runner-on-group-end	Cg  test-runner-on-group-end!	Dg  test-runner-on-final	Eg  test-runner-on-final!	Fg  test-runner-on-bad-count	Gg  test-runner-on-bad-count!	Hg  test-runner-on-bad-end-name	Ig  test-runner-on-bad-end-name!	Jg  test-result-alist	Kg  test-result-alist!	Lg  test-runner-aux-value	Mg  test-runner-aux-value!	Ng  test-on-group-begin-simple	Og  test-on-group-end-simple	Pg  test-on-bad-count-simple	Qg  test-on-bad-end-name-simple	Rg  test-on-final-simple	Sg  test-on-test-end-simple	T !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSR J	Ug  set-current-module	VU 	WU 	Xg  cond-expand-provide	Yg  current-module	Z 	[g  process-use-modules	\[ 	][ 	^g  srfi-9	_^ 	`_ 	ag  srfi-39	ba 	cb 	dg  make-syntax-transformer	ed 	fd 	gg  %test-export	hg  macro	ig  $sc-dispatch	ji 	ki 	lg  any	mll	ng  syntax-object	og  if	pg  top	qp 	rg  ribcage	sg  dummy	tg  names	ust 	vg  m-46961e5187-6	wvp 	xwq 	yf  l-46961e5187-b	zf  l-46961e5187-c	{yz 	|rux{ 	}r 	~g  x	~  w  f  l-46961e5187-8   r  q|}  g  hygiene   no  n    g  syntax-violation     f  -source expression failed to match any pattern g  %test-record-define g  each llll    l l l g  define-record-type g  alloc g  runner? g  name g  index g  setter g  getter s  g  m-46961e5187-11 p  qqqqqq  f  l-46961e5187-16 f  l-46961e5187-17 f  l-46961e5187-18 f  l-46961e5187-19 f  l-46961e5187-1a f  l-46961e5187-1b f  l-46961e5187-1c   r    f  l-46961e5187-13   r  q}  n  g  test-runner n  g  map     g  list g  %%test-runner-alloc-procedure g  %test-runner-alloc g  _   g  lambda g  m-46961e5187-2b p    f  l-46961e5187-2d   r  g  shift g  	proc-name g  args   qq  f  l-1e8ba8b5a-2ba f  l-1e8ba8b5a-2bb   r  g  key g  value g  formals g  body   qqqqq  f  l-1e8ba8b5a-2ad f  l-1e8ba8b5a-2ae f  l-1e8ba8b5a-2af f  l-1e8ba8b5a-2b0 f  l-1e8ba8b5a-2b1   r  g  make-procedure-name   q  f  l-1e8ba8b5a-29d   r  q  f  l-1e8ba8b5a-29c   r  }}}}}  ^  n  g  make-struct g  m-46961e5187-29 p  g  t-1e8ba8b5a-38d g  t-1e8ba8b5a-38c g  t-1e8ba8b5a-38b   g  m-1e8ba8b5a-38e p    f  l-1e8ba8b5a-392 f  l-1e8ba8b5a-393 f  l-1e8ba8b5a-394   r  g  	ctor-args   f  l-1e8ba8b5a-37a   r  g  ctor g  field   f  l-1e8ba8b5a-376 f  l-1e8ba8b5a-377   r  g  form g  	type-name g  constructor-specg  field-names  qqqq f  l-1e8ba8b5a-36bf  l-1e8ba8b5a-36cf  l-1e8ba8b5a-36df  l-1e8ba8b5a-36e 	r 
g  record-layoutg  functional-settersg  settersg  copierg  gettersg  constructorg  getter-identifiersg  field-identifiers
 qqqqqqqq f  l-1e8ba8b5a-343f  l-1e8ba8b5a-341f  l-1e8ba8b5a-33ff  l-1e8ba8b5a-33df  l-1e8ba8b5a-33bf  l-1e8ba8b5a-339f  l-1e8ba8b5a-337f  l-1e8ba8b5a-335 r f  l-1e8ba8b5a-334  r !}}}}}}	  "n! #g  m-46961e5187-27$#p %$}} &n% 'n
! (} )n( *"&')))))))))))))))))))))) +* ,+ -g  each-any.-/_ 0_ 1f  Wrong number of arguments2g  identifier?3_2 4_2 5q} 6n5 7g  record-type-vtable8_7 9_7 :g  ,pwpwpwpwpwpwpwpwpwpwpwpwpwpwpwpwpwpwpwpwpwpw;g  default-record-printer<_; =_; >g  
pass-count?g  
fail-count@g  xpass-countAg  xfail-countBg  
skip-countCg  	skip-listDg  	fail-listEg  run-listFg  	skip-saveGg  	fail-saveHg  group-stackIg  on-test-beginJg  on-test-endKg  on-group-beginLg  on-group-endMg  on-finalNg  on-bad-countOg  on-bad-end-namePg  total-countQg  
count-listRg  result-alistSg  	aux-valueT>?@ABCDEFGHIJKLMNOPQRS Ug  set-struct-vtable-name!V_U W_U Xg  vtable-offset-userY_X Z_X [g  %test-runner?-procedure\l ]g  m-46961e5187-36^]p _g  t-46961e5187-35`_ a^ bf  l-46961e5187-3bcb dr`ac ef  l-46961e5187-38fe graf h^d}g}}}} inh jg  objkg  t-1e8ba8b5a-47elg  t-1e8ba8b5a-478mg  t-1e8ba8b5a-479ng  t-1e8ba8b5a-47aog  t-1e8ba8b5a-47dpg  t-1e8ba8b5a-47cqg  t-1e8ba8b5a-47brklmnopq sg  m-1e8ba8b5a-47ftsp uttttttt vf  l-1e8ba8b5a-483wf  l-1e8ba8b5a-484xf  l-1e8ba8b5a-485yf  l-1e8ba8b5a-486zf  l-1e8ba8b5a-487{f  l-1e8ba8b5a-488|f  l-1e8ba8b5a-489}vwxyz{| ~rru} g  	copier-id f  l-1e8ba8b5a-476 r g  	ctor-name f  l-1e8ba8b5a-46e r  f  l-1e8ba8b5a-46c r g  layout f  l-1e8ba8b5a-46a r g  
immutable? f  l-1e8ba8b5a-468 r g  field-count f  l-1e8ba8b5a-466 r g  
getter-ids f  l-1e8ba8b5a-463 r g  	field-ids f  l-1e8ba8b5a-460 r g  predicate-nameg  
field-spec  qqqqqq f  l-1e8ba8b5a-453f  l-1e8ba8b5a-454f  l-1e8ba8b5a-455f  l-1e8ba8b5a-456f  l-1e8ba8b5a-457f  l-1e8ba8b5a-458 r d}g}~}}}}}}}}}}}  nj  g  andn g  struct?n  g  eq?n g  struct-vtablen  $d}g} n   i q}g n[ g  throw-bad-struct_ _ g  !%test-runner-pass-count-procedureg  free-idg  
%%on-errorg  m-46961e5187-42p  f  l-46961e5187-44 r }}}}} n  l g  %%typeg  t-1e8ba8b5a-3a5g  t-1e8ba8b5a-3a6g  t-1e8ba8b5a-3a7g  t-1e8ba8b5a-3a8g  t-1e8ba8b5a-3a9g  t-1e8ba8b5a-3aag  t-1e8ba8b5a-3ab g  m-1e8ba8b5a-3acp  f  l-1e8ba8b5a-3b0f  l-1e8ba8b5a-3b1f  l-1e8ba8b5a-3b2f  l-1e8ba8b5a-3b3f  l-1e8ba8b5a-3b4f  l-1e8ba8b5a-3b5f  l-1e8ba8b5a-3b6 r  f  l-1e8ba8b5a-3a3f  l-1e8ba8b5a-3a4 r  qqq f  l-1e8ba8b5a-39ef  l-1e8ba8b5a-39ff  l-1e8ba8b5a-3a0 r }}}}}}  n  l g  ckg  errg  s   f  l-46961e5187-47f  l-46961e5187-48  r }}}}} n g  quoten $}} 	n 
	 
 g  %%indexn  l f  l-46961e5187-4cf  l-46961e5187-4d r }}}}} n n } n
   g  %%copiern  l f  l-46961e5187-51 f  l-46961e5187-52!  "r! #"}}}}} $n# %n# &g  %%test-runner-set-fields'$"}} (n&' )%( *) +g  t-46961e5187-41,+ -f  l-46961e5187-56.- /r,. 0/}}}}} 1n0 2/}}}}}}  3n2 43 5no2 6n2 7n2 873 9$/}} :n9 ;68: <g  
struct-ref=n<2 >/} ?n
> @=3? An2 Bn2 Cq/} Dn0C EBD FA3E G5;@F H14G Iq} JnI Kg  !%test-runner-fail-count-procedureLg  m-46961e5187-5dMLp NM Of  l-46961e5187-5fPO QrNP RM}Q}}}} SnR TS UTl V}Q}}}}}  WnV XW YUXl ZMM [f  l-46961e5187-62\f  l-46961e5187-63][\ ^rZ] _M^}Q}}}} `n_ an_ b$^}Q} cnb dac ed fnV gf hUgl if  l-46961e5187-67jf  l-46961e5187-68kij lrZk mMl}Q}}}} nnm onm pl}Q qnp roq sr tnV ut vUul wf  l-46961e5187-6cxf  l-46961e5187-6dywx zrZy {Mz}Q}}}} |n{ }n{ ~$z}Q} n&~ }  g  t-46961e5187-5c f  l-46961e5187-71 rN M}Q}}}} n }Q}}}}}  n  no n n  $}Q} n  n< }Q n  n n q}Q n2     q}Q nK g  "%test-runner-xpass-count-procedureg  m-46961e5187-78p  f  l-46961e5187-7a r }}}}} n  l }}}}}}  n  l  f  l-46961e5187-7df  l-46961e5187-7e r }}}}} n n $}} n   n  l f  l-46961e5187-82f  l-46961e5187-83 r }}}}} n n } n	   n  l f  l-46961e5187-87f  l-46961e5187-88 r }}}}} n n $}} n&   g  t-46961e5187-77 f  l-46961e5187-8c r }}}}} n }}}}}}  n  no n n  $}} n  n< } n	  n n q} n4     q} n g  "%test-runner-xfail-count-procedureg  m-46961e5187-93p  f  l-46961e5187-95 r }}}}} n    l }}}}}}  n  l  f  l-46961e5187-98f  l-46961e5187-99	 
r	 
}}}}} n n $
}} n   n  l f  l-46961e5187-9df  l-46961e5187-9e r }}}}} n n } n	    n !  "!l #f  l-46961e5187-a2$f  l-46961e5187-a3%#$ &r% '&}}}}} (n' )n' *$&}} +n&* ,)+ -, .g  t-46961e5187-92/. 0f  l-46961e5187-a710 2r/1 32}}}}} 4n3 52}}}}}}  6n5 76 8no5 9n5 :n5 ;:6 <$2}} =n< >9;= ?n<5 @2} An	@ B?6A Cn5 Dn5 Eq2} Fn6E GDF HC6G I8>BH J47I Kq} LnK Mg  !%test-runner-skip-count-procedureNg  m-46961e5187-aeONp PO Qf  l-46961e5187-b0RQ SrPR TO}S}}}} UnT VU WVl X}S}}}}}  YnX ZY [WZl \OO ]f  l-46961e5187-b3^f  l-46961e5187-b4_]^ `r\_ aO`}S}}}} bna cna d$`}S} end fce gf hnX ih jWil kf  l-46961e5187-b8lf  l-46961e5187-b9mkl nr\m oOn}S}}}} pno qno rn}S sn	r tqs ut vnX wv xWwl yf  l-46961e5187-bdzf  l-46961e5187-be{yz |r\{ }O|}S}}}} ~n} n} $|}S} n&   g  t-46961e5187-ad f  l-46961e5187-c2 rP O}S}}}} n }S}}}}}  n  no n n  $}S} n  n< }S n	  n n q}S n8     q}S nM g  %test-runner-skip-listg  !%%test-runner-skip-list-procedureg  m-46961e5187-c9p  f  l-46961e5187-cb r }}}}} n  l }}}}}}  n  l  f  l-46961e5187-cef  l-46961e5187-cf r }}}}} n n $}} n   n  l f  l-46961e5187-d3f  l-46961e5187-d4 r }}}}} n n } n	   n  l f  l-46961e5187-d8f  l-46961e5187-d9 r }}}}} n n $}} n&   g  t-46961e5187-c8 f  l-46961e5187-dd r }}}}} n }}}}}}  n  no n n  $}} n  n< } n	  n n q} n     q} n g  %test-runner-fail-listg  !%%test-runner-fail-list-procedureg  m-46961e5187-e4p  f  l-46961e5187-e6  r  }}}}} n  l }}}}}}  n  	l 
 f  l-46961e5187-e9f  l-46961e5187-ea r
 }}}}} n n $}} n   n  l f  l-46961e5187-eef  l-46961e5187-ef r
 }}}}} n n  } !n	  "! #" $n %$ &%l 'f  l-46961e5187-f3(f  l-46961e5187-f4)'( *r
) +*}}}}} ,n+ -n+ .$*}} /n&. 0-/ 10 2g  t-46961e5187-e332 4f  l-46961e5187-f854 6r35 76}}}}} 8n7 96}}}}}}  :n9 ;: <no9 =n9 >n9 ?>: @$6}} An@ B=?A Cn<9 D6} En	D FC:E Gn9 Hn9 Iq6} JnI KHJ LG:K M<BFL N8;M Oq} PnO Qg  %test-runner-run-listRg   %%test-runner-run-list-procedureSg  m-46961e5187-ffTSp UT Vf  l-46961e5187-101WV XrUW YT}X}}}} ZnY [Z \[l ]}X}}}}}  ^n] _^ `\_l aTT bf  l-46961e5187-104cf  l-46961e5187-105dbc erad fTe}X}}}} gnf hnf i$e}X} jni khj lk mn] nm o\nl pf  l-46961e5187-109qf  l-46961e5187-10arpq srar tTs}X}}}} unt vnt ws}X xn	w yvx zy {n] |{ }\|l ~f  l-46961e5187-10ef  l-46961e5187-10f~ ra T}X}}}} n n $}X} n&   g  t-46961e5187-fe f  l-46961e5187-113 rU T}X}}}} n }X}}}}}  n  no n n  $}X} n  n< }X n	  n n q}X nQ     q}X nR g  %test-runner-skip-saveg  !%%test-runner-skip-save-procedureg  m-46961e5187-11ap  f  l-46961e5187-11c r }}}}} n  l }}}}}}  n  l  f  l-46961e5187-11ff  l-46961e5187-120 r }}}}} n n $}} n   n  l f  l-46961e5187-124f  l-46961e5187-125 r }}}}} n n } n	   n  l f  l-46961e5187-129f  l-46961e5187-12a r }}}}} n n $}} n&   g  t-46961e5187-119 f  l-46961e5187-12e r }}}}} n }}}}}}  n  no n n  $}} n  n< } n	  n n q} n     q} n g  %test-runner-fail-save g  !%%test-runner-fail-save-procedureg  m-46961e5187-135p  f  l-46961e5187-137 r }}}}} n 	 
	l }}}}}}  n  
l  f  l-46961e5187-13af  l-46961e5187-13b r }}}}} n n $}} n   n  
l f  l-46961e5187-13ff  l-46961e5187-140  !r  "!}}}}} #n" $n" %!} &n		% '$& (' )n *) +
*l ,f  l-46961e5187-144-f  l-46961e5187-145.,- /r. 0/}}}}} 1n0 2n0 3$/}} 4n&3 524 65 7g  t-46961e5187-13487 9f  l-46961e5187-149:9 ;r8: <;}}}}} =n< >;}}}}}}  ?n> @? Ano> Bn> Cn> DC? E$;}} FnE GBDF Hn<> I;} Jn		I KH?J Ln> Mn> Nq;} OnN PMO QL?P RAGKQ S=@R Tq} Un T Vg  "%test-runner-group-stack-procedureWg  m-46961e5187-150XWp YX Zf  l-46961e5187-152[Z \rY[ ]X}\}}}} ^n] _^ `_l a}\}}}}}  bna cb d`cl eXX ff  l-46961e5187-155gf  l-46961e5187-156hfg ireh jXi}\}}}} knj lnj m$i}\} nnm oln po qna rq s`rl tf  l-46961e5187-15auf  l-46961e5187-15bvtu wrev xXw}\}}}} ynx znx {w}\ |n	
{ }z| ~} na  `l f  l-46961e5187-15ff  l-46961e5187-160 re X}\}}}} n n $}\} n&   g  t-46961e5187-14f f  l-46961e5187-164 rY X}\}}}} n }\}}}}}  n  no n n  $}\} n  n< }\ n	
  n n q}\ n:     q}\ nV g  $%test-runner-on-test-begin-procedureg  m-46961e5187-16bp  f  l-46961e5187-16d r }}}}} n  l }}}}}}  n  l  f  l-46961e5187-170f  l-46961e5187-171 r }}}}} n n $}} n   n  l f  l-46961e5187-175f  l-46961e5187-176 r }}}}} n n } n	   n  l f  l-46961e5187-17af  l-46961e5187-17b r }}}}} n n $}} n&   g  t-46961e5187-16a f  l-46961e5187-17f r }}}}} n }}}}}}  n  no n n  $}} n  n< } n	  n n q} n<      q} n  g  "%test-runner-on-test-end-procedureg  m-46961e5187-186p  f  l-46961e5187-188 r 	}}}}} 
n	 
 l }}}}}}  n  l  f  l-46961e5187-18bf  l-46961e5187-18c r }}}}} n n $}} n   n  l  f  l-46961e5187-190!f  l-46961e5187-191" ! #r" $#}}}}} %n$ &n$ '#} (n	' )&( *) +n ,+ -,l .f  l-46961e5187-195/f  l-46961e5187-1960./ 1r0 21}}}}} 3n2 4n2 5$1}} 6n&5 746 87 9g  t-46961e5187-185:9 ;f  l-46961e5187-19a<; =r:< >=}}}}} ?n> @=}}}}}}  An@ BA Cno@ Dn@ En@ FEA G$=}} HnG IDFH Jn<@ K=} Ln	K MJAL Nn@ On@ Pq=} Qn>P ROQ SNAR TCIMS U?BT Vq} WnV Xg  %%test-runner-on-group-begin-procedureYg  m-46961e5187-1a1ZYp [Z \f  l-46961e5187-1a3]\ ^r[] _Z}^}}}} `n_ a` bal c}^}}}}}  dnc ed fbel gZZ hf  l-46961e5187-1a6if  l-46961e5187-1a7jhi krgj lZk}^}}}} mnl nnl o$k}^} pno qnp rq snc ts ubtl vf  l-46961e5187-1abwf  l-46961e5187-1acxvw yrgx zZy}^}}}} {nz |nz }y}^ ~n	} |~  nc  bl f  l-46961e5187-1b0f  l-46961e5187-1b1 rg Z}^}}}} n n $}^} n&   g  t-46961e5187-1a0 f  l-46961e5187-1b5 r[ Z}^}}}} n }^}}}}}  n  no n n  $}^} n  n< }^ n	  n n q}^ n@     q}^ nX g  #%test-runner-on-group-end-procedureg  m-46961e5187-1bcp  f  l-46961e5187-1be r }}}}} n  l }}}}}}  n  l  f  l-46961e5187-1c1f  l-46961e5187-1c2 r }}}}} n n $}} n   n  l f  l-46961e5187-1c6f  l-46961e5187-1c7 r }}}}} n n } n	   n  l f  l-46961e5187-1cbf  l-46961e5187-1cc r }}}}} n n $}} n&   g  t-46961e5187-1bb f  l-46961e5187-1d0 r }}}}} n }}}}}}  n  no n n  $}} n  n< } n	  n n q} nB       q} n g  %test-runner-on-final-procedureg  m-46961e5187-1d7p  f  l-46961e5187-1d9	 
r	 }
}}}} n  l }
}}}}}  n  l  f  l-46961e5187-1dcf  l-46961e5187-1dd r }
}}}} n n $}
} n   n   ! l "f  l-46961e5187-1e1#f  l-46961e5187-1e2$"# %r$ &%}
}}}} 'n& (n& )%}
 *n	) +(* ,+ -n .- /.l 0f  l-46961e5187-1e61f  l-46961e5187-1e7201 3r2 43}
}}}} 5n4 6n4 7$3}
} 8n&7 968 :9 ;g  t-46961e5187-1d6<; =f  l-46961e5187-1eb>= ?r<> @?}
}}}} An@ B?}
}}}}}  CnB DC EnoB FnB GnB HGC I$?}
} JnI KFHJ Ln<B M?}
 Nn	M OLCN PnB QnB Rq?}
 SnDR TQS UPCT VEKOU WADV Xq}
 YnX Zg  #%test-runner-on-bad-count-procedure[g  m-46961e5187-1f2\[p ]\ ^f  l-46961e5187-1f4_^ `r]_ a\}`}}}} bna cb dcl e}`}}}}}  fne gf hdgl i\\ jf  l-46961e5187-1f7kf  l-46961e5187-1f8ljk mril n\m}`}}}} onn pnn q$m}`} rnq spr ts une vu wdvl xf  l-46961e5187-1fcyf  l-46961e5187-1fdzxy {riz |\{}`}}}} }n| ~n| {}` n	 ~  ne  dl f  l-46961e5187-201f  l-46961e5187-202 ri \}`}}}} n n $}`} n&   g  t-46961e5187-1f1 f  l-46961e5187-206 r] \}`}}}} n }`}}}}}  n  no n n  $}`} n  n< }` n	  n n q}` nF     q}` nZ g  &%test-runner-on-bad-end-name-procedureg  m-46961e5187-20dp  f  l-46961e5187-20f r }}}}} n  l }}}}}}  n  l  f  l-46961e5187-212f  l-46961e5187-213 r }}}}} n n $}} n   n  l f  l-46961e5187-217f  l-46961e5187-218 r }}}}} n n } n	   n  l f  l-46961e5187-21cf  l-46961e5187-21d r }}}}} n n $}} n&   g  t-46961e5187-20c f  l-46961e5187-221 r }}}}} n }}}}}}  n  no n n  $}} n  n< } n	  n n q} nH       q} n g  %test-runner-total-countg  #%%test-runner-total-count-procedureg  m-46961e5187-228	p 
	 f  l-46961e5187-22a r
 	}}}}} n  l }}}}}}  n  l 		 f  l-46961e5187-22df  l-46961e5187-22e r 	}}}}} n n $}} n   !  "n #" $#l %f  l-46961e5187-232&f  l-46961e5187-233'%& (r' )	(}}}}} *n) +n) ,(} -n	, .+- /. 0n 10 21l 3f  l-46961e5187-2374f  l-46961e5187-238534 6r5 7	6}}}}} 8n7 9n7 :$6}} ;n&: <9; =< >g  t-46961e5187-227?> @f  l-46961e5187-23cA@ Br?
A C	B}}}}} DnC EB}}}}}}  FnE GF HnoE InE JnE KJF L$B}} MnL NIKM On<E PB} Qn	P ROFQ SnE TnE UqB} VnU WTV XSFW YHNRX ZDGY [q} \n[ ]g  %test-runner-count-list^g  "%%test-runner-count-list-procedure_g  m-46961e5187-243`_p a` bf  l-46961e5187-245cb drac e`}d}}}} fne gf hgl i}d}}}}}  jni kj lhkl m`` nf  l-46961e5187-248of  l-46961e5187-249pno qrmp r`q}d}}}} snr tnr u$q}d} vnu wtv xw yni zy {hzl |f  l-46961e5187-24d}f  l-46961e5187-24e~|} rm~ `}d}}}} n n }d n	   ni  hl f  l-46961e5187-252f  l-46961e5187-253 rm `}d}}}} n n $}d} n&   g  t-46961e5187-242 f  l-46961e5187-257 ra `}d}}}} n }d}}}}}  n  no n n  $}d} n  n< }d n	  n n q}d n]     q}d n^ g  %test-result-alist-procedureg  m-46961e5187-25ep  f  l-46961e5187-260 r }}}}} n  l }}}}}}  n  l  f  l-46961e5187-263f  l-46961e5187-264 r }}}}} n n $}} n   n  l f  l-46961e5187-268f  l-46961e5187-269 r }}}}} n n } n	   n  l f  l-46961e5187-26df  l-46961e5187-26e r }}}}} n n $}} n&   g  t-46961e5187-25d f  l-46961e5187-272 r }}}}} n }}}}}}  n  no n n  $}} n  n< } n	  	 n 	n 	q} 	nJ	 			 		 	 		 		 	q} 		n	 	
g   %test-runner-aux-value-procedure	g  m-46961e5187-279		p 		 	f  l-46961e5187-27b		 	r		 		}	}}}} 	n	 		 		l 	}	}}}}}  	n	 		 			l 			 	f  l-46961e5187-27e	f  l-46961e5187-27f			 	r		 			}	}}}} 	n	 	 n	 	!$	}	} 	"n	! 	#	 	" 	$	# 	%n	 	&	% 	'		&l 	(f  l-46961e5187-283	)f  l-46961e5187-284	*	(	) 	+r		* 	,		+}	}}}} 	-n	, 	.n	, 	/	+}	 	0n		/ 	1	.	0 	2	1 	3n	 	4	3 	5		4l 	6f  l-46961e5187-288	7f  l-46961e5187-289	8	6	7 	9r		8 	:		9}	}}}} 	;n	: 	<n	: 	=$	9}	} 	>n&	= 	?	<	> 	@	? 	Ag  t-46961e5187-278	B	A 	Cf  l-46961e5187-28d	D	C 	Er	B		D 	F		E}	}}}} 	Gn	F 	H	E}	}}}}}  	In	H 	J	I 	Kno	H 	Ln	H 	Mn	H 	N	M	I 	O$	E}	} 	Pn	O 	Q	L	N	P 	Rn<	H 	S	E}	 	Tn		S 	U	R	I	T 	Vn	H 	Wn	H 	Xq	E}	 	YnL	X 	Z	W	Y 	[	V	I	Z 	\	K	Q	U	[ 	]	G	J	\ 	^q}	 	_n	
	^ 	`ll 	a	` 	bl	a	cl	b	dl	c	eg  %%set-fields	fg  check?	gg  expr	hs	f	g 	ig  m-46961e5187-294	j	ip 	k	j 	lf  l-46961e5187-299	mf  l-46961e5187-29a	nf  l-46961e5187-29b	of  l-46961e5187-29c	pf  l-46961e5187-29d	q	l	m	n	o	p 	rr	h	k	q 	s	j 	tf  l-46961e5187-296	u	t 	vr	s	u 	wg  t-1e8ba8b5a-3c4	xg  t-1e8ba8b5a-3c6	yg  t-1e8ba8b5a-3c5	z	w	x	y 	{g  m-1e8ba8b5a-3c7	|	{p 	}	|	|	| 	~f  l-1e8ba8b5a-3cb	f  l-1e8ba8b5a-3cc	f  l-1e8ba8b5a-3cd		~		 	r	z	}	 	f  l-1e8ba8b5a-3c1	f  l-1e8ba8b5a-3c2	f  l-1e8ba8b5a-3c3				 	r	 		r}	v}	}}}	  	n	e	 	$	r}	v} 	n	 	q	r}	v 	n0	 	n2	 	n4	 	n6	 	n8	 	n	 	n	 	nQ	 	n	 	n	 	n:	 	n<	 	n>	 	n@	 	nB	 	nD	 	nF	 	nH	 	n	 	n]	 	nJ	 	nL	 																							 	g  "%test-runner-pass-count!-procedure	ll 	g  m-46961e5187-2a8		p 	g  t-46961e5187-2a6	g  t-46961e5187-2a7			 			 	f  l-46961e5187-2ad	f  l-46961e5187-2ae			 	r			 		 	f  l-46961e5187-2aa		 	r		 			}	}}}} 	n	 	g  t-1e8ba8b5a-3e6	g  t-1e8ba8b5a-3e7			 	g  m-1e8ba8b5a-3e8		p 			 	f  l-1e8ba8b5a-3ec	f  l-1e8ba8b5a-3ed			 	r			 	 	f  l-1e8ba8b5a-3e0	f  l-1e8ba8b5a-3e1	f  l-1e8ba8b5a-3e2				 	r		 	 	f  l-1e8ba8b5a-3d7	f  l-1e8ba8b5a-3d8			 	r		 	g  field-specs		 	f  l-1e8ba8b5a-3d3	f  l-1e8ba8b5a-3d4			 	r		 		}	}		}	}	  	n	 	g  val	n		 			 	no	 	n	 	n	 			 	$	}	} 	n	 				 	g  struct-set!	n		 		}	 	n
	 					 	n	 	n	 	q	}	 	n1	 			 				 					 				 	q}	 	n		 	g  "%test-runner-fail-count!-procedure	g  m-46961e5187-2b8		p 	g  t-46961e5187-2b6	g  t-46961e5187-2b7			 			 	f  l-46961e5187-2bd	f  l-46961e5187-2be			 	r			 		 	f  l-46961e5187-2ba		 	r		 			}	}}}} 	n	 		}	}		}	}	  	n	 	n		 
 		 
no	 
n	 
n	 

	 
$	}	} 
n
 



 
n		 
		}	 

n
	 

	

	 
n	 
n	 
q	}	 
n3
 


 

	
 




 
	
 
 
q}	 
n	
 
g  #%test-runner-xpass-count!-procedure
g  m-46961e5187-2c8

p 
g  t-46961e5187-2c6
g  t-46961e5187-2c7


 


 
f  l-46961e5187-2cd
f  l-46961e5187-2ce


 
 r


 
!
 
"f  l-46961e5187-2ca
#
" 
$r
!
# 
%

 }
$}}}} 
&n
% 
'
 }
$}		}	}	  
(n
' 
)n	
' 
*
(
) 
+no
' 
,n
' 
-n
' 
.
-
( 
/$
 }
$} 
0n
/ 
1
,
.
0 
2n	
' 
3
 }
$ 
4n	
3 
5
2
(
4
) 
6n
' 
7n
' 
8q
 }
$ 
9n5
8 
:
7
9 
;
6
(
: 
<
+
1
5
; 
=
&
*
< 
>q}
$ 
?n

> 
@g  #%test-runner-xfail-count!-procedure
Ag  m-46961e5187-2d8
B
Ap 
Cg  t-46961e5187-2d6
Dg  t-46961e5187-2d7
E
C
D 
F
B
B 
Gf  l-46961e5187-2dd
Hf  l-46961e5187-2de
I
G
H 
Jr
E
F
I 
K
B 
Lf  l-46961e5187-2da
M
L 
Nr
K
M 
O
B
J}
N}}}} 
Pn
O 
Q
J}
N}		}	}	  
Rn
Q 
Sn	
Q 
T
R
S 
Uno
Q 
Vn
Q 
Wn
Q 
X
W
R 
Y$
J}
N} 
Zn
Y 
[
V
X
Z 
\n	
Q 
]
J}
N 
^n	
] 
_
\
R
^
S 
`n
Q 
an
Q 
bq
J}
N 
cn7
b 
d
a
c 
e
`
R
d 
f
U
[
_
e 
g
P
T
f 
hq}
N 
in
@
h 
jg  "%test-runner-skip-count!-procedure
kg  m-46961e5187-2e8
l
kp 
mg  t-46961e5187-2e6
ng  t-46961e5187-2e7
o
m
n 
p
l
l 
qf  l-46961e5187-2ed
rf  l-46961e5187-2ee
s
q
r 
tr
o
p
s 
u
l 
vf  l-46961e5187-2ea
w
v 
xr
u
w 
y
l
t}
x}}}} 
zn
y 
{
t}
x}		}	}	  
|n
{ 
}n	
{ 
~
|
} 
no
{ 
n
{ 
n
{ 


| 
$
t}
x} 
n
 



 
n	
{ 

t}
x 
n	
 


|

} 
n
{ 
n
{ 
q
t}
x 
n9
 


 


|
 




 

z
~
 
q}
x 
n
j
 
g  %test-runner-skip-list!
g  "%%test-runner-skip-list!-procedure
g  m-46961e5187-2f8

p 
g  t-46961e5187-2f6
g  t-46961e5187-2f7


 


 
f  l-46961e5187-2fd
f  l-46961e5187-2fe


 
r


 

 
f  l-46961e5187-2fa

 
r

 


}
}}}} 
n
 

}
}		}	}	  
n
 
n	
 


 
no
 
n
 
n
 


 
$
}
} 
n
 



 
n	
 

}
 
n	
 




 
n
 
n
 
q
}
 
n

 


 



 




 



 
q}
 
n

 
g  %test-runner-fail-list!
g  "%%test-runner-fail-list!-procedure
g  m-46961e5187-308

p 
g  t-46961e5187-306
g  t-46961e5187-307


 


 
f  l-46961e5187-30d
f  l-46961e5187-30e


 
r


 

 
f  l-46961e5187-30a

 
r

 


}
}}}} 
n
 

}
}		}	}	  
n
 
n	
 


 
no
 
n
 
n
 


 
$
}
} 
n
 



 
n	
 

}
 
n	
 




 
n
 
n
 
q
}
 
n

 


 



 




 



 
q}
 
n

 
g  %test-runner-run-list!
g  !%%test-runner-run-list!-procedure
g  m-46961e5187-318

p 
g  t-46961e5187-316
g  t-46961e5187-317


 


 
f  l-46961e5187-31d
f  l-46961e5187-31e


 
r


 

 
f  l-46961e5187-31a

 
r

 


}
}}}} 
n
 

}
}		}	}	  
n
 
n	
 


  no
 n
 n
 
 $
}
} n  n	
 
}
 	n	 

	
 n
 n
 q
}
 n
  
  
 

 q}
 n
 g  %test-runner-skip-save!g  "%%test-runner-skip-save!-procedureg  m-46961e5187-328p g  t-46961e5187-326g  t-46961e5187-327  f  l-46961e5187-32df  l-46961e5187-32e  r ! "f  l-46961e5187-32a#" $r!# % }$}}}} &n% ' }$}		}	}	  (n' )n	' *() +no' ,n' -n' .-( /$ }$} 0n/ 1,.0 2n	' 3 }$ 4n	3 52(4) 6n' 7n' 8q }$ 9n8 :79 ;6(: <+15; =&*< >q}$ ?n> @g  %test-runner-fail-save!Ag  "%%test-runner-fail-save!-procedureBg  m-46961e5187-338CBp Dg  t-46961e5187-336Eg  t-46961e5187-337FDE GCC Hf  l-46961e5187-33dIf  l-46961e5187-33eJHI KrFGJ LC Mf  l-46961e5187-33aNM OrLN PCK}O}}}} QnP RK}O}		}	}	  SnR Tn	R UST VnoR WnR XnR YXS Z$K}O} [nZ \WY[ ]n	R ^K}O _n		^ `]S_T anR bnR cqK}O dn@c ebd faSe gV\`f hQUg iq}O jnAi kg  #%test-runner-group-stack!-procedurelg  m-46961e5187-348mlp ng  t-46961e5187-346og  t-46961e5187-347pno qmm rf  l-46961e5187-34dsf  l-46961e5187-34etrs urpqt vm wf  l-46961e5187-34axw yrvx zmu}y}}}} {nz |u}y}		}	}	  }n| ~n	| }~ no| n| n| } $u}y} n  n	| u}y n	
 }~ n| n| qu}y n;  }  { q}y nk g  %%test-runner-on-test-begin!-procedureg  m-46961e5187-358p g  t-46961e5187-356g  t-46961e5187-357  f  l-46961e5187-35df  l-46961e5187-35e r  f  l-46961e5187-35a r }}}}} n }}		}	}	  n n	  no n n  $}} n  n	 } n	  n n q} n=     q} n g  #%test-runner-on-test-end!-procedureg  m-46961e5187-368p g  t-46961e5187-366g  t-46961e5187-367  f  l-46961e5187-36df  l-46961e5187-36e r  f  l-46961e5187-36a r }}}}} n }}		}	}	  n n	  no n n  $}} n  n	 } n	  n n q} n?     q} n g  &%test-runner-on-group-begin!-procedureg  m-46961e5187-378p g  t-46961e5187-376g  t-46961e5187-377  f  l-46961e5187-37df  l-46961e5187-37e r  f  l-46961e5187-37a r }}}}} n }}		}	}	  n n	  no n  n   $}} n  n	 } n	  	n 
n q} nA 
 	   q} n g  $%test-runner-on-group-end!-procedureg  m-46961e5187-388p g  t-46961e5187-386g  t-46961e5187-387  f  l-46961e5187-38df  l-46961e5187-38e r  f  l-46961e5187-38a  !r  "}!}}}} #n" $}!}		}	}	  %n$ &n	$ '%& (no$ )n$ *n$ +*% ,$}!} -n, .)+- /n	$ 0}! 1n	0 2/%1& 3n$ 4n$ 5q}! 6nC5 746 83%7 9(.28 :#'9 ;q}! <n; =g   %test-runner-on-final!-procedure>g  m-46961e5187-398?>p @g  t-46961e5187-396Ag  t-46961e5187-397B@A C?? Df  l-46961e5187-39dEf  l-46961e5187-39eFDE GrBCF H? If  l-46961e5187-39aJI KrHJ L?G}K}}}} MnL NG}K}		}	}	  OnN Pn	N QOP RnoN SnN TnN UTO V$G}K} WnV XSUW Yn	N ZG}K [n	Z \YO[P ]nN ^nN _qG}K `nE_ a^` b]Oa cRX\b dMQc eq}K fn=e gg  $%test-runner-on-bad-count!-procedurehg  m-46961e5187-3a8ihp jg  t-46961e5187-3a6kg  t-46961e5187-3a7ljk mii nf  l-46961e5187-3adof  l-46961e5187-3aepno qrlmp ri sf  l-46961e5187-3aats urrt viq}u}}}} wnv xq}u}		}	}	  ynx zn	x {yz |nox }nx ~nx ~y $q}u} n } n	x q}u n	 yz nx nx qq}u nG  y | w{ q}u ng g  '%test-runner-on-bad-end-name!-procedureg  m-46961e5187-3b8p g  t-46961e5187-3b6g  t-46961e5187-3b7  f  l-46961e5187-3bdf  l-46961e5187-3be r  f  l-46961e5187-3ba r }}}}} n }}		}	}	  n n	  no n n  $}} n  n	 } n	  n n q} nI     q} n g  %test-runner-total-count!g  $%%test-runner-total-count!-procedureg  m-46961e5187-3c8p g  t-46961e5187-3c6g  t-46961e5187-3c7  f  l-46961e5187-3cdf  l-46961e5187-3ce r  f  l-46961e5187-3ca r }}}}} n }}		}	}	  n n	  no n n  $}} n  n	 } n	  n n q} n     q} n g  %test-runner-count-list!g  #%%test-runner-count-list!-procedureg  m-46961e5187-3d8p g  t-46961e5187-3d6g  t-46961e5187-3d7  f  l-46961e5187-3ddf  l-46961e5187-3de r  f  l-46961e5187-3da r }}}}} n }}		}	}	  n n	  no n n   $}} n   n	 } n	  n n 	q} 
n	 
    q} n g  %test-result-alist!-procedureg  m-46961e5187-3e8p g  t-46961e5187-3e6g  t-46961e5187-3e7  f  l-46961e5187-3edf  l-46961e5187-3ee r  f  l-46961e5187-3ea r  }}}}} !n  "}}		}	}	  #n" $n	" %#$ &no" 'n" (n" )(# *$}} +n* ,')+ -n	" .} /n	. 0-#/$ 1n" 2n" 3q} 4nK3 524 61#5 7&,06 8!%7 9q} :n9 ;g  !%test-runner-aux-value!-procedure<g  m-46961e5187-3f8=<p >g  t-46961e5187-3f6?g  t-46961e5187-3f7@>? A== Bf  l-46961e5187-3fdCf  l-46961e5187-3feDBC Er@AD F= Gf  l-46961e5187-3faHG IrFH J=E}I}}}} KnJ LE}I}		}	}	  MnL Nn	L OMN PnoL QnL RnL SRM T$E}I} UnT VQSU Wn	L XE}I Yn	X ZWMYN [nL \nL ]qE}I ^nM] _\^ `[M_ aPVZ` bKOa cq}I dn;c eg  reversefg  %test-null-callbackgg  test-on-test-begin-simplehg  make-parameterig  errorjf  1test-runner not initialized - test-begin missing?kg  %test-specifier-matcheslg  %test-any-specifier-matchesmg  result-kindng  skipog  xfailpg  %test-should-executeqg  %test-beginrg  
suite-namessr tg  m-46961e5187-407utp vuq wf  l-46961e5187-40cxf  l-46961e5187-40dywx zrsvy {u |f  l-46961e5187-409}| ~r{} qz}~ nq n  lll g  countsr uqq f  l-46961e5187-411f  l-46961e5187-412f  l-46961e5187-413 r q}~ nq g  displayf  %%%% Starting test g  string?g  string-appendf  .logg  open-output-fileg  newlinef    (Writing full log to "f  ")g  output-port?f  Group begin: f  Group end: f  *** Total number of tests was f   but should be f  . ***f  <*** Discrepancy indicates testsuite error or exceptions. ***g  %test-on-bad-count-writeg  current-output-portg  %test-format-linef  	test-end f   does not match test-begin g  %test-final-report1f  # of expected passes      f  # of expected failures    f  # of unexpected successes f  # of unexpected failures  f  # of skipped tests        g  %test-final-report-simpleg  assqg  source-fileg  source-linef   f  :g  number->stringf  : f  test-end not in a groupg  	%test-endlmg  letsr g  m-46961e5187-417p qq f  l-46961e5187-41cf  l-46961e5187-41df  l-46961e5187-41e r  f  l-46961e5187-419 r q} n g  rn n+    nK n g  consn n g  	test-namen  no np  g  dynamic-windn n n n g  cleanup-formsr g  m-46961e5187-422p qqq f  l-46961e5187-427f  l-46961e5187-428f  l-46961e5187-429f  l-46961e5187-42a r  f  l-46961e5187-424 r q} n n n n  sr qq f  l-46961e5187-430f  l-46961e5187-431f  l-46961e5187-432 r q} n n lllg  form1g  form2g  form3g  rest sr qqqqq f  l-46961e5187-437f  l-46961e5187-438f  l-46961e5187-439f  l-46961e5187-43af  l-46961e5187-43bf  l-46961e5187-43c 	r  
q	} n
 g  beginn
 g  source-formf  Test begin:g  %test-write-result1g  runnerg  pnames g  m-46961e5187-443p qq f  l-46961e5187-448f  l-46961e5187-449f  l-46961e5187-44a r  f  l-46961e5187-445 r  q} !n   "n  #" $g  default%s$ &qqq 'f  l-46961e5187-44f(f  l-46961e5187-450)f  l-46961e5187-451*f  l-46961e5187-452+'()* ,r%&+ -q,} .n- /g  p0n/- 1n- 2nJ- 3no- 4g  cdr5n4- 650 7g  fail8g  xpass9f  XPASS:f  FAIL;f   <f  	Test end:=g  memq> ?f    @g  writeAg  passBA8 Cg  %test-report-resultDg  %test-evaluate-with-catchEg  catchFg  test-expressionGsF Hg  m-46961e5187-458IHp JIq Kf  l-46961e5187-45dLf  l-46961e5187-45eMKL NrGJM OI Pf  l-46961e5187-45aQP RrOQ SqN}R TnES UnS VnS WnS XnS YWXZn!S [n+S \[ ]nS ^g  actual-error_n^S `]_ anS baWX cZ\`b dnS eVYcd fe gg  syntax-sourcehg  assq-refig  filenamejg  linekg  datum->syntaxlg  heremg  
line-alistnm of  l-46961e5187-5ebpo qrnp rg  
file-alistsr tf  l-46961e5187-5e8ut vrsu wj xf  l-46961e5187-5e4yx zrwy {g  file|{ }f  l-46961e5187-5e0~} r|~ g  	src-props f  l-46961e5187-5de r  f  l-46961e5187-5dc r q}}q}v}z}}}} nl g  syntax->datumg  append  g  %test-source-line2g  %test-on-test-beging  %test-on-test-endg  %test-comp2bodylllll g  compg  expecteds	g g  m-46961e5187-462p qqqq f  l-46961e5187-467f  l-46961e5187-468f  l-46961e5187-469f  l-46961e5187-46af  l-46961e5187-46b r  f  l-46961e5187-464 r q} n no n g  expn n! n g  expected-valuen   g  resn nD g  actual-valuen   n  nC   g  	real-partg  	imag-partg  %test-approximate=g  %test-comp1bodys	g g  m-46961e5187-471p qq f  l-46961e5187-476f  l-46961e5187-477f  l-46961e5187-478 r  f  l-46961e5187-473 r q} n no n n nD n! n n   n  nC   f  l-46961e5187-47e r q} n 	`l g  macrj f  l-46961e5187-481f  l-46961e5187-482f  l-46961e5187-483 r q} n l l j f  l-46961e5187-488f  l-46961e5187-489 r q} n n f  l-46961e5187-48d r q} n l g  let*g  tname	gj  f  l-46961e5187-490f  l-46961e5187-491f  l-46961e5187-492f  l-46961e5187-493  r q} n n 	n- 
	 
 n nK n n n  n 	gj f  l-46961e5187-499f  l-46961e5187-49af  l-46961e5187-49b r q} n n n-     nK !n "~ #f  l-46961e5187-58e$f  l-46961e5187-58f%#$ &r"% 'q}& (n' )ll *	gj +f  l-46961e5187-592,f  l-46961e5187-593-f  l-46961e5187-594.f  l-46961e5187-595/f  l-46961e5187-5960f  l-46961e5187-5971+,-./0 2r*1 3q2}& 4n3 5n3 6n-3 76 857 9n3 :nK3 ;n3 <n3 =n3 ><= ?n3 @ll A	gj Bf  l-46961e5187-59fCf  l-46961e5187-5a0Df  l-46961e5187-5a1Ef  l-46961e5187-5a2Ff  l-46961e5187-5a3GBCDEF HrAG IqH}& JnI KnI Ln-I ML NKM ON PnKI QnI Rg  %test-comp2Sg  eqv?Tf  l-46961e5187-4a0UT VrU Wq}V XnSW Yf  l-46961e5187-4a2ZY [rZ \q}[ ]n\ ^g  equal?_f  l-46961e5187-4a4`_ ar` bq}a cn^b df  l-46961e5187-4a6ed fre gq}f hng il j	gij kf  l-46961e5187-4a9lf  l-46961e5187-4aamf  l-46961e5187-4abnf  l-46961e5187-4acof  l-46961e5187-4adpf  l-46961e5187-4aeqklmnop rrjq sqr}f tns uns vn-s wv xuw yns znKs {ns |ns }ns ~|} ns ns l 	gij f  l-46961e5187-4b6f  l-46961e5187-4b7f  l-46961e5187-4b8f  l-46961e5187-4b9f  l-46961e5187-4ba r q}f n n n-    nK n n g  %test-errorg  condg  etypes	g g  m-46961e5187-4c1p qqq f  l-46961e5187-4c6f  l-46961e5187-4c7f  l-46961e5187-4c8f  l-46961e5187-4c9 r  f  l-46961e5187-4c3 r q} n n n g  etn n! n g  expected-errorn   n nE n n n  n  n n n^  n    nC   f  l-46961e5187-4d0 r q} n 	gj f  l-46961e5187-4d3f  l-46961e5187-4d4f  l-46961e5187-4d5f  l-46961e5187-4d6f  l-46961e5187-4d7 r q} n n n-   n nK n n n  n 	gj f  l-46961e5187-4def  l-46961e5187-4dff  l-46961e5187-4e0f  l-46961e5187-4e1 r q} n n n-    nK n f  l-46961e5187-4e7f  l-46961e5187-4e8f  l-46961e5187-4e9 r q} n n n-    nK n n g  applyl- ls g  m-46961e5187-4edp qq f  l-46961e5187-4f2f  l-46961e5187-4f3f  l-46961e5187-4f4 	r 
 f  l-46961e5187-4ef r
 q	} n g  saved-runnern n+    n n    g  %test-match-nthg  ns g  m-46961e5187-4f9p  q !f  l-46961e5187-4fe"f  l-46961e5187-4ff#!" $r # % &f  l-46961e5187-4fb'& (r%' )q$}( *n) +n) ,+ -s .qq /f  l-46961e5187-5030f  l-46961e5187-5041f  l-46961e5187-5052/01 3r-.2 4q3}( 5n4 6g  %test-match-all7g  pred8s7 9g  m-46961e5187-509:9p ;:q <f  l-46961e5187-50e=f  l-46961e5187-50f><= ?r8;> @: Af  l-46961e5187-50bBA Cr@B Dq?}C En6D Fg  %test-as-specifierGnFD Hg  %test-match-anyIg  m-46961e5187-513JIp KJq Lf  l-46961e5187-518Mf  l-46961e5187-519NLM Or8KN PJ Qf  l-46961e5187-515RQ SrPR TqO}S UnHT VnFT Wg  
procedure?Xg  integer?Yf  not a valid test specifierZg  m-46961e5187-51d[Zp \[q ]f  l-46961e5187-522^f  l-46961e5187-523_]^ `r8\_ a[ bf  l-46961e5187-51fcb drac eq`}d fne gne hn-e ih jgi kj ln
e mne nne onFe pne qpg rq sg  m-46961e5187-527tsp utq vf  l-46961e5187-52cwf  l-46961e5187-52dxvw yr8ux zt {f  l-46961e5187-529|{ }rz| ~qy}} n~ n~ n-~    n
~ n~ n~ nF~ n~   g  open-input-stringg  readg  eof-object?g  	read-charg  evalf  (not at eof)C 5  h(X   ]4	
T5 4W >  "  G   4Xi4Yi5 Z>  "  G  4]`c >  "  G  4fghkm    h   @   ]C   8       g  dummy
		 g  names		  			   C h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-64/testing.scm
	;	 		"  g  
macro-typeg  syntax-rulesg  patternsg  names  C5gR4fhk h       ] 45C        g  dummy
		 g  alloc		 g  runner?			 g  name			 g  index			 g  setter			 g  getter			  			   C       h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-64/testing.scm
	g	 		"  g  
macro-typeg  syntax-rulesg  patternsg  allocg  runner?g  nameg  indexg  setterg  getter g  ...   C5R      h    u   ]  C  m       g  filenamef  srfi/srfi-64/testing.scm
 
 		
  g  nameg  %%test-runner-alloc-procedure CR4fhk,     h      ] C          		
   C.01        h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C6     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C5R9:=T  4W >  "  G   	Zi  R  h      ] $   CC      y       g  obj
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  %test-runner?-procedure C[R4f'hk\       h   7   ]  C      /       g  t-46961e5187-35
		
  		
   C.0'1  h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C5'R0   h      ] &   
C 6       g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  !%test-runner-pass-count-procedure CR4f0hk    h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C$* h   :   ]C     2       g  err
		 g  s		  			   C\H    h   7   ]  C      /       g  t-46961e5187-41
		
  		
   C.001  h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   CJ     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C50R2       h      ] &   C 6       g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  !%test-runner-fail-count-procedure CKR4f2hkY`e    h   :   ]C     2       g  err
		 g  s		  			   Chns h   :   ]C     2       g  err
		 g  s		  			   Cv| h   :   ]C     2       g  err
		 g  s		  			   C\    h   7   ]  C      /       g  t-46961e5187-5c
		
  		
   C.021  h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C52R4       h       ] &   	C 6              g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  "%test-runner-xpass-count-procedure CR4f4hk   h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C\    h   7   ]  C      /       g  t-46961e5187-77
		
  		
   C.041  h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C54R6       h       ] &   	C 6              g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  "%test-runner-xfail-count-procedure CR4f6hk   h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C"(- h   :   ]C     2       g  err
		 g  s		  			   C\J    h   7   ]  C      /       g  t-46961e5187-92
		
  		
   C.061  h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   CL     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C56R8       h       ] &   	C 6              g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  !%test-runner-skip-count-procedure CMR4f8hk[bg    h   :   ]C     2       g  err
		 g  s		  			   Cjpu h   :   ]C     2       g  err
		 g  s		  			   Cx~ h   :   ]C     2       g  err
		 g  s		  			   C\    h   7   ]  C      /       g  t-46961e5187-ad
		
  		
   C.081  h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C58R      h       ] &   	C 6              g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  !%%test-runner-skip-list-procedure CR4fhk   h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C\    h   7   ]  C      /       g  t-46961e5187-c8
		
  		
   C.01 h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C5R     h       ] &   	C 6              g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  !%%test-runner-fail-list-procedure CR4fhk	   h   :   ]C     2       g  err
		 g  s		  			   C# h   :   ]C     2       g  err
		 g  s		  			   C&,1 h   :   ]C     2       g  err
		 g  s		  			   C\N    h   7   ]  C      /       g  t-46961e5187-e3
		
  		
   C.01 h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   CP     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C5RQ     h       ] &   	C 6              g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg   %%test-runner-run-list-procedure CRR4fQhk`gl    h   :   ]C     2       g  err
		 g  s		  			   Couz h   :   ]C     2       g  err
		 g  s		  			   C} h   :   ]C     2       g  err
		 g  s		  			   C\    h   7   ]  C      /       g  t-46961e5187-fe
		
  		
   C.0Q1 h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C5QR     h       ] &   	C 6              g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  !%%test-runner-skip-save-procedure CR4fhk   h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C\    h   8   ]  C      0       g  t-46961e5187-119
		
  		
   C.01        h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C5R     h       ] &   		C 6              g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  !%%test-runner-fail-save-procedure C R4fhk   h   :   ]C     2       g  err
		 g  s		  			   C#( h   :   ]C     2       g  err
		 g  s		  			   C+16 h   :   ]C     2       g  err
		 g  s		  			   C\S    h   8   ]  C      0       g  t-46961e5187-134
		
  		
   C.01        h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   CU     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C5R:      h       ] &   	
C 6              g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  "%test-runner-group-stack-procedure CVR4f:hkdkp   h   :   ]C     2       g  err
		 g  s		  			   Csy~ h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C\    h   8   ]  C      0       g  t-46961e5187-14f
		
  		
   C.0:1 h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C5:R<       h       ] &   	C 6              g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  $%test-runner-on-test-begin-procedure CR4f<hk h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C\    h   8   ]  C      0       g  t-46961e5187-16a
		
  		
   C.0<1 h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C5<R>       h       ] &   	C 6              g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  "%test-runner-on-test-end-procedure CR4f>hk   h   :   ]C     2       g  err
		 g  s		  			   C%* h   :   ]C     2       g  err
		 g  s		  			   C-38 h   :   ]C     2       g  err
		 g  s		  			   C\U    h   8   ]  C      0       g  t-46961e5187-185
		
  		
   C.0>1 h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   CW     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C5>R@       h       ] &   	C 6              g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  %%test-runner-on-group-begin-procedure CXR4f@hkfmr        h   :   ]C     2       g  err
		 g  s		  			   Cu{ h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C\    h   8   ]  C      0       g  t-46961e5187-1a0
		
  		
   C.0@1 h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C5@RB       h       ] &   	C 6              g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  #%test-runner-on-group-end-procedure CR4fBhk  h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C\    h   8   ]  C      0       g  t-46961e5187-1bb
		
  		
   C.0B1 h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C5BRD       h       ] &   	C 6              g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  %test-runner-on-final-procedure CR4fDhk      h   :   ]C     2       g  err
		 g  s		  			   C!', h   :   ]C     2       g  err
		 g  s		  			   C/5: h   :   ]C     2       g  err
		 g  s		  			   C\W    h   8   ]  C      0       g  t-46961e5187-1d6
		
  		
   C.0D1 h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   CY     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C5DRF       h       ] &   	C 6              g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  #%test-runner-on-bad-count-procedure CZR4fFhkhot  h   :   ]C     2       g  err
		 g  s		  			   Cw} h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C\    h   8   ]  C      0       g  t-46961e5187-1f1
		
  		
   C.0F1 h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C5FRH       h       ] &   	C 6              g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  &%test-runner-on-bad-end-name-procedure CR4fHhk       h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C\    h   8   ]  C      0       g  t-46961e5187-20c
		
  		
   C.0H1 h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C5HR      h       ] &   	C 6              g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  #%%test-runner-total-count-procedure CR4fhk! h   :   ]C     2       g  err
		 g  s		  			   C$*/ h   :   ]C     2       g  err
		 g  s		  			   C28= h   :   ]C     2       g  err
		 g  s		  			   C\Z    h   8   ]  C      0       g  t-46961e5187-227
		
  		
   C.01        h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C\     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C5R]     h       ] &   	C 6              g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  "%%test-runner-count-list-procedure C^R4f]hklsx  h   :   ]C     2       g  err
		 g  s		  			   C{ h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C\    h   8   ]  C      0       g  t-46961e5187-242
		
  		
   C.0]1        h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C5]RJ      h       ] &   	C 6       |       g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  %test-result-alist-procedure CR4fJhk h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C\	    h   8   ]  C      0       g  t-46961e5187-25d
		
  		
   C.0J1 h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C		     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C5JRL       h       ] &   	C 6              g  s
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg   %test-runner-aux-value-procedure C	
R4fLhk			$     h   :   ]C     2       g  err
		 g  s		  			   C	'	-	2 h   :   ]C     2       g  err
		 g  s		  			   C	5	;	@ h   :   ]C     2       g  err
		 g  s		  			   C\	]    h   8   ]  C      0       g  t-46961e5187-278
		
  		
   C.0L1 h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C	_     h      ] C          		
   C    h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5"  	 6$  4 O ?$  @""         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-64/testing.scm
 
 	    C5LR4f&hk	d			   h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-64/testing.scm
 
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5&R1        h       ] &   
C 6             g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  "%test-runner-pass-count!-procedure C	R4f1hk		     h   V   ]  C    N       g  t-46961e5187-2a6
		 g  t-46961e5187-2a7		  			   C.011   h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C	     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C51R3   h       ] &   C 6             g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  "%test-runner-fail-count!-procedure C	R4f3hk	
     h   V   ]  C    N       g  t-46961e5187-2b6
		 g  t-46961e5187-2b7		  			   C.031   h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C
     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C53R5   h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  #%test-runner-xpass-count!-procedure C
R4f5hk	
=    h   V   ]  C    N       g  t-46961e5187-2c6
		 g  t-46961e5187-2c7		  			   C.051   h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C
?     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C55R7   h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  #%test-runner-xfail-count!-procedure C
@R4f7hk	
g    h   V   ]  C    N       g  t-46961e5187-2d6
		 g  t-46961e5187-2d7		  			   C.071   h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C
i     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C57R9   h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  "%test-runner-skip-count!-procedure C
jR4f9hk	
     h   V   ]  C    N       g  t-46961e5187-2e6
		 g  t-46961e5187-2e7		  			   C.091   h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C
     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C59R
  h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  "%%test-runner-skip-list!-procedure C
R4f
hk	
    h   V   ]  C    N       g  t-46961e5187-2f6
		 g  t-46961e5187-2f7		  			   C.0
1  h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C
     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C5
R
 h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  "%%test-runner-fail-list!-procedure C
R4f
hk	
    h   V   ]  C    N       g  t-46961e5187-306
		 g  t-46961e5187-307		  			   C.0
1  h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C
     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C5
R
 h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  !%%test-runner-run-list!-procedure C
R4f
hk	     h   V   ]  C    N       g  t-46961e5187-316
		 g  t-46961e5187-317		  			   C.0
1  h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C5
R h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  "%%test-runner-skip-save!-procedure CR4fhk	=    h   V   ]  C    N       g  t-46961e5187-326
		 g  t-46961e5187-327		  			   C.01  h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C?     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C5R@ h       ] &   		C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  "%%test-runner-fail-save!-procedure CAR4f@hk	h    h   V   ]  C    N       g  t-46961e5187-336
		 g  t-46961e5187-337		  			   C.0@1  h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   Cj     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C5@R;  h       ] &   	
C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  #%test-runner-group-stack!-procedure CkR4f;hk	    h   V   ]  C    N       g  t-46961e5187-346
		 g  t-46961e5187-347		  			   C.0;1   h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C5;R=   h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  %%test-runner-on-test-begin!-procedure CR4f=hk	  h   V   ]  C    N       g  t-46961e5187-356
		 g  t-46961e5187-357		  			   C.0=1   h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C5=R?   h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  #%test-runner-on-test-end!-procedure CR4f?hk	    h   V   ]  C    N       g  t-46961e5187-366
		 g  t-46961e5187-367		  			   C.0?1   h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C5?RA   h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  &%test-runner-on-group-begin!-procedure CR4fAhk	 h   V   ]  C    N       g  t-46961e5187-376
		 g  t-46961e5187-377		  			   C.0A1   h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C5ARC   h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  $%test-runner-on-group-end!-procedure CR4fChk	:   h   V   ]  C    N       g  t-46961e5187-386
		 g  t-46961e5187-387		  			   C.0C1   h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C<     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C5CRE   h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg   %test-runner-on-final!-procedure C=R4fEhk	d       h   V   ]  C    N       g  t-46961e5187-396
		 g  t-46961e5187-397		  			   C.0E1   h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   Cf     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C5ERG   h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  $%test-runner-on-bad-count!-procedure CgR4fGhk	   h   V   ]  C    N       g  t-46961e5187-3a6
		 g  t-46961e5187-3a7		  			   C.0G1   h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C5GRI   h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  '%test-runner-on-bad-end-name!-procedure CR4fIhk	        h   V   ]  C    N       g  t-46961e5187-3b6
		 g  t-46961e5187-3b7		  			   C.0I1   h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C5IR  h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  $%%test-runner-total-count!-procedure CR4fhk	  h   V   ]  C    N       g  t-46961e5187-3c6
		 g  t-46961e5187-3c7		  			   C.01  h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C5R h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  #%%test-runner-count-list!-procedure CR4fhk	   h   V   ]  C    N       g  t-46961e5187-3d6
		 g  t-46961e5187-3d7		  			   C.01  h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C5RK  h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  %test-result-alist!-procedure CR4fKhk	8  h   V   ]  C    N       g  t-46961e5187-3e6
		 g  t-46961e5187-3e7		  			   C.0K1   h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   C:     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C5KRM   h       ] &   	C 6            g  s
		 g  val		  g  filenamef  srfi/srfi-64/testing.scm
 
 			  g  nameg  !%test-runner-aux-value!-procedure C;R4fMhk	b      h   V   ]  C    N       g  t-46961e5187-3f6
		 g  t-46961e5187-3f7		  			   C.0M1   h   \   ]L 6    T       g  a
		  g  filenamef  srfi/srfi-64/testing.scm	 
 		   C4       h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm	 
 		
   Cd     h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  srfi/srfi-64/testing.scm
 
 		q   C5MRK13579


@;  h     ] &   	"  4 >  "  G   &  
 

"  4 >  "  G   &  
 
"  4 >  "  G   &   	
"  4 >  "  G   &   	
"  4 >  "  G   &   	
"  4 >  "  G   &   	
"  4 	>  "  G   &   	"  4 
>  "  G   &   	"  4 >  "  G   &   	"  4 >  "  G   &   	"  4 >  "  G   &   	"  4 >  "  G   &   		"  4 >  "  G   &   	
C 6      g  runner
	   g  filenamef  srfi/srfi-64/testing.scm
 
	 		 		 		- 		T 		{ 	  	  	  	 	& 	#' 	C 	k 	v 	"w 	 	 	" 	 	 	" 	 	 	" 	 	 	# 	 	   g  nameg  test-runner-reset C(Re:     h(      ] &  	 	
"  	4 56              g  runner
		!  g  filenamef  srfi/srfi-64/testing.scm
 
	 		! 	 		!  g  nameg  test-runner-group-path CR      h      ]C    x       g  runner
		  g  filenamef  srfi/srfi-64/testing.scm
 
 		  g  nameg  %test-null-callback CfR(     h      ]C    ~       g  runner
		 g  name		 g  count			  g  filenamef  srfi/srfi-64/testing.scm
 	( 			   CAfCE=?h      ]C           g  runner
		 g  count		 g  expected			  g  filenamef  srfi/srfi-64/testing.scm
 	& 			   CG  h      ]C    }       g  runner
		 g  begin		 g  end			  g  filenamef  srfi/srfi-64/testing.scm
 	) 			   CI      hp  %  ]  4 >  "  G   &   	"  4 >  "  G   &   	"  4 >  "  G   &   	"  4 >  "  G   &   	"  4 	>  "  G   &   	"  4 
>  "  G   &   	"  4 >  "  G   &   	"  4 >  "  G   C       g  runner
	o g  val	\  g  val   g  val   g  val   g  filenamef  srfi/srfi-64/testing.scm
 
	 		 		  		4 		\ 	  	  	  	 	F 	 	o
  g  nameg  test-runner-null C)R&R(NAOCREg=S?PGQI    h  [  ]  4 >  "  G   &   	"  4 >  "  G   &   	"  4 >  "  G   &   	"  4 	>  "  G  
 &   	"  4 >  "  G   &   	"  4 >  "  G   &   	"  4 >  "  G   &   	"  4 >  "  G   C    S      g  runner
	 g  val	3	a g  val	c  g  val   g  val   g  val ! g  val#Q g  valS  g  filenamef  srfi/srfi-64/testing.scm
 
	 		 		  		3 		c 	  	  	  	# 	S 	 	
  g  nameg  test-runner-simple C*R4hi5+R4hi*i5,R+ij   h(      ]45   $  "  4>  "  G   C       g  r
		(  g  filenamef  srfi/srfi-64/testing.scm
 
	 		 		 		 		 		 	 		(
  g  nameg  test-runner-get C-R      h      ] 6       g  spec
		 g  runner		  g  filenamef  srfi/srfi-64/testing.scm
 
	 	 			  g  nameg  %test-specifier-matches CkR,       h   |   ] 45 6        t       g  filenamef  srfi/srfi-64/testing.scm
 
	 			 	 			
  g  nameg  test-runner-create C.Rk  h8      ]H"  '(  JC45$  K"   " "      g  list
		8 g  runner		8 g  result			8 g  l				0  g  filenamef  srfi/srfi-64/testing.scm
 
	 			 		 		 		 	*	 		  		#		*		0		0 	 		8	  g  nameg  %test-any-specifier-matches ClRQl!mno    h     ] &  	 	"  	4 5&  "  	4 5$  "  "4 &  	 	"  	4 5 5$  4 >  "  G  C4 &  	 	"  	4 	5 5$  4 
>  "  G  
CC    |      g  runner
	  g  run	  g  t		5	g  g  filenamef  srfi/srfi-64/testing.scm

					&		'		,			5		5		C
		H		d
		k		l		r	%	t	2	y	 	 	 	 	 	 	$ 	1 	 	 	   g  nameg  %test-should-execute CpR+.@@]:;  h    ]45 $  "  445 >  "  G  45 4&  		"  	45 >  "  G  &  		"  	45&  		"  	45&  	"  4>  "  G  &  		"  	4	5&  			"  	4
5&  		"  4>  "  G  &  		"  	45&  		"  	45&  	"  4>  "  G   &  		
"  	45&  	
C6         g  
suite-name
	 g  count	 g  runner		) g  val	   g  val	 $ g  val	^ g  val	  g  filenamef  srfi/srfi-64/testing.scm

											%		)		,		]	%	x	% 	 	 	%  	% 	 	'"	)B"	#E$	#^"	^!	&	(%	%%	 		  g  nameg  %test-begin CqR4fhk	`    h   E   ]C     =       g  dummy
		 g  
suite-name		  			   C h   X   ] C    P       g  dummy
		 g  
suite-name		 g  count			  			   C h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-64/testing.scm
2	 		9  g  
macro-typeg  syntax-rulesg  patternsg  
suite-name g  
suite-nameg  count   C5R:&ML   h  f  ] &  	 	
"  	4 5( 4>  "  G  4>  "  G  $  45$  "  	4	54
54>  "  G  4>  "  G  4>  "  G   &   	"  4 >  "  G  4>  "  G  4>  "  G  4>  "  G  "   4>   "  G  "    &  	 	"  	4 545$  >4>  "  G  4>  "  G  4>  "  G  "   C      ^      g  runner
	 g  
suite-name	 g  count		 g  log-file-name		e g  log-file		n g  log	B  g  filenamef  srfi/srfi-64/testing.scm
8
	9		!9		";		&;		+;		4<		K=		L?		V?		]@		c@	2	e@		e>		hD	'	n>		qE		uE		|E	 F	 G	 H	 I	 I	 I	 J	 K	 K	K	L	*M	BM	EN	ON	PP	
TP	[P	
dQ	
xR	
 (		  g  nameg  test-on-group-begin-simple CNRL: 	     h     ]	 &  	 	"  	4 545$  X4>  "  G  4 &  	 	
"  	4 5>  "  G  4>  "  G  "   C        g  runner
	  g  log	   g  filenamef  srfi/srfi-64/testing.scm
U
	V		V		 W		*W		+Y	
	/Y		6Y	
	?Z	
	DZ		]Z		dZ	
	m[	
 	   g  nameg  test-on-group-end-simple COR   h   ]  ]4>  "  G  4>  "  G  4>  "  G  4>  "  G  4>  "  G  4>  "  G  4>  "  G  6      U      g  runner
	  g  count	  g  expected-count		  g  port		   g  filenamef  srfi/srfi-64/testing.scm
^
	_		_		_		`		+a		/a		6a		?b		Sc		Wc		^c		gd		ye		}e	 e	 f	 	 	  g  nameg  %test-on-bad-count-write CRL   hX     ]4 45 >  "  G   &  	 	"  	4 545$   6C           g  runner
		S g  count		S g  expected-count			S g  log		8	S  g  filenamef  srfi/srfi-64/testing.scm
h
	i		i	8	i		 j		8j		;k		Ek		Ql	 
		S	  g  nameg  test-on-bad-count-simple CPRi     h      ]44 556         g  runner
		 g  
begin-name		 g  end-name			 g  msg			  g  filenamef  srfi/srfi-64/testing.scm
n
	o		o		o	7	p		o		o		r	 				  g  nameg  test-on-bad-end-name-simple CQR     h@      ] 
$  .4>  "  G  4 >  "  G  6C             g  value
		: g  label		: g  port			:  g  filenamef  srfi/srfi-64/testing.scm
v
	w		
w		y		z		8{	 		:	  g  nameg  %test-final-report1 CR06428      h   N  ]4 &   
"  	4 5>  "  G  4 &  	 	"  	4 5>  "  G  4 &  	 	"  	4 5	>  "  G  4 &   "  	4 
5>  "  G   &  	 	"  	4 56 F      g  runner
	  g  port	   g  filenamef  srfi/srfi-64/testing.scm
}
	~		~		!		(~		1		6		P		W		`		e			 	 	 	 	 	 	 	 	 	 	  g  nameg  %test-final-report-simple CRL  hP      ]	4 45 >  "  G   &  	 	"  	4 545$   6C            g  runner
		K g  log	4	K  g  filenamef  srfi/srfi-64/testing.scm

				$					4		7		A		I	 
		K  g  nameg  test-on-final-simple CRRJ hh     ]! &  	 	"  	4 54545$  "  $  	4
56C             g  runner
		a g  	line-info		a g  source-file		(	a g  source-line		3	a g  file		D	a  g  filenamef  srfi/srfi-64/testing.scm

					 		$		(		(		+		/		3		3		;		>	 	D	2	D		L		R		S		X	(	Z		\	;	^			`		 		a  g  nameg  %test-format-line CR-:KiH]FB;

@D      hh    ]B45 &  		
"  	4545&  	"  4>  "  G  (  $454	>  "  G  "    $  B $  "  04&  		"  	4
5 >  "  G  "   &  		"  	45&  		"  	45$  @$  "  /4&  		"  	45>  "  G  "   4&  		"  	45>  "  G  &  		
"  	45	&  	
	"  4>  "  G  	&  		"  	45	&  		"  4>  "  G  	&  		"  	45	&  		"  4>  "  G  	&  			"  	45	&  		"  4>  "  G  	&  			"  	45	&  			"  4>  "  G  		&  		"  4>  "  G  	&  		
"  	45(  &  		"  	456C       g  
suite-name
	g g  	line-info	g g  r		g g  groups		$g g  line		-g g  msg		g	~ g  
count-list	 g g  expected-count	 g g  saved-count	 g g  group-count	g g  val		 g  val		 g  val		4b g  val		~ g  val		 g  val		'  g  filenamef  srfi/srfi-64/testing.scm

							$		'		-		2		^		_		e	'	g		g		j	 	 	0 	 	 	 	6 	 	 	 	 	 	 	 					"	
'	
Z		'	"		&	!		&4	!4	e	&~	!~		&	!		"	*	F	I	
 8	g	  g  nameg  	%test-end CR4fhk        hP   W   ]   	
       C    O       g  dummy
		L g  
suite-name		L g  body			L  		L	   C  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-64/testing.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  
suite-nameg  body  C5R4fhk      h(   q   ]    C       i       g  dummy
		! g  
suite-name		! g  form			! g  cleanup-form			!  		!	   C  h   _   ] C  W       g  dummy
		 g  
suite-name		 g  cleanup-form			  			   C    h      ] C       g  dummy
		 g  
suite-name		 g  form1			 g  form2			 g  form3			 g  rest			  			   C 
hP   ;  ]4 5$  @4 5$  @4 5$  @	 63      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  srfi/srfi-64/testing.scm
	 		P  g  
macro-typeg  syntax-rulesg  patternsg  
suite-nameg  formg  cleanup-form g  
suite-nameg  cleanup-form g  
suite-nameg  form1g  form2g  form3g  rest  C5RLJ     h  O  ]1 &  	 	"  	4 545$   &  	 	"  	4 545454	54
54>  "  G  4>  "  G  $  4>  "  G  "   $  4>  "  G  "   $  4>  "  G  "   $  6CC   G      g  runner
	 g  log	 g  results		E g  source-file		P g  source-line		[ g  source-form		f g  	test-name		q  g  filenamef  srfi/srfi-64/testing.scm

				 		*		-		E		H		L	"	P		P		S		W	"	[		[		^		b	"	f		f		i		m	 	q		q		t	
	x			
 	
 	
 	 	
 	 	
 	 	
	 $	  g  nameg  test-on-test-begin-simple CgR4f hk!#      h   T   ]C  L       g  dummy
		 g  runner		 g  pname			  			   C.01236    h0   i   ]      C       a       g  dummy
		) g  runner		) g  pname			) g  default			)  		)	   C        h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-64/testing.scm
	 		9  g  
macro-typeg  syntax-rulesg  patternsg  runnerg  pname g  runnerg  pnameg  default   C5 RLmJ789:;<=>   h(    ]1 &  	 	"  	4 54 &  	 	"  	4 55$  "  &  "  $   &  	 	"  	4 54	54
545$  "  $  b$  4>  "  G  "   4>  "  G  $  4>  "  G  "   4>  "  G  "   4&  "  >  "  G  $  )4>  "  G  4>  "  G  "   4>   "  G  "   45$  4>  "  G  4>  "  G  "  =$  445$  "  4>  "  G  "C &  	 	"  	4 5"C             g  runner
	! g  p	?	R g  log	R! g  kind		R! g  results	  g  source-file	  g  source-line	  g  	test-name	  g  list	 g  pair	  
g  filenamef  srfi/srfi-64/testing.scm

					"	&	%		R		^		l		o	 	 	 	" 	 	 	 	" 	 	 	 	  	 	 	 	
 	 	  	) 	  	 	 	 	 	  	) 	 				
$	!(	*	)0	15	
C	
D	H	M	V	[	`	m	
			
		
	
	
		 	 			!						
		
 J	!  g  nameg  test-on-test-end-simple CSR?@    h`     ]4>  "  G  4 >  "  G  4>  "  G  4 >  "  G  6             g  pair
		Z g  port		Z  g  filenamef  srfi/srfi-64/testing.scm

													#			,
		0
		7
		@		E			L		Z	 		Z	  g  nameg  %test-write-result1 CRJK       h`   '  ] &  	 	"  	4 545$  C &   	C 6            g  runner
		Z g  pname		Z g  value			Z g  alist			Z g  p		(	Z g  val		?	Z  g  filenamef  srfi/srfi-64/testing.scm

					 		(		0		5		<	)	?	#	?	 		Z	  g  nameg  test-result-set! C!RK   h       ] &   	C 6             g  runner
		  g  filenamef  srfi/srfi-64/testing.scm

						 		  g  nameg  test-result-clear C"RJ       h       ] L&   C 4L  5C            g  r
		  g  filenamef  srfi/srfi-64/testing.scm
	#	
	%		3		/		7		=		7		) 			  g  nameg  loop CK       hh     ] &  	 	"  	4 545$  5O Q 45 &   	C 6C       g  runner
		g g  pname		g g  alist			g g  p		(	g g  loop		9	J g  val		J	e  g  filenamef  srfi/srfi-64/testing.scm

					 		(		0		9	#	J	 			g	  g  nameg  test-result-remove C#R+mJ    hP      -  1  3  $   "  45 4&  		"  	455$  CC         g  rest
			N g  runner		N g  p		@	N  g  filenamef  srfi/srfi-64/testing.scm
!
	"		"		"	!	"	,	"		#		##		&#	 
			N


  g  nameg  test-result-kind C$R-=mJB 	    h`      -  1  3  $   "  45 4&  		"  	455$  "  6              g  rest
			Y g  runner		Y g  p		B	U  g  filenamef  srfi/srfi-64/testing.scm
%
	&		&		&	!	&	,	&		!'	
	%'	"	('	
	Y'	 			Y


  g  nameg  test-passed? C%R-$A01723845o6789>    h   
  ]45  4 5$  L &   
"  	4 5 &   
"  4 >  "  G  " M$  L &   "  	4 	5 &   "  4 
>  "  G  "  $  N &  	 	"  	4 5 &   	"  4 >  "  G  "  $  N &  	 	"  	4 5 &   	"  4 >  "  G  "  J &  	 	"  	4 5 &   	"  4 >  "  G   &  	 	"  	4 5 &   	"  4 >  "  G   &  	 	"  	4 5 6         g  r
	 g  result-kind	 g  val		6	c g  val	   g  val	  g  val	8f g  val	 g  val	  g  filenamef  srfi/srfi-64/testing.scm
)
	*		*		
+		*		,		.	'	6.	"	6.		p,		s0	' 0	" 0	 ,	 2	( 2	# 2	,	4	(84	#84	m6	'6	"6	7	&7	!7	8	 	
  g  nameg  %test-report-result CCR4fDhk	`TUVf    h   J   ] C    B       g  dummy
		 g  test-expression		  			   C       h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-64/testing.scm
=	 		"  g  
macro-typeg  syntax-rulesg  patternsg  test-expression   C5DRghijk     h     ])4 5$  45"  $  45"  $   "  $   "  	4
 5456          g  form
		| g  	src-props			| g  file			| g  line		5	| g  
file-alist		J	| g  
line-alist		`	|  g  filenamef  srfi/srfi-64/testing.scm
p		q			q		r		r	 	r	4	r	 	q		's		(s	 	.s	4	0s	 	5q		=t		?u		Jv		Jq		Rw		Tx		Wx	-	Xx		`y		`q		h{		i{	'	p{		|z	 		|  g  nameg  %test-source-line2 CRp<nmJ 	h      ]	4 >  "  G  4 &  	 	"  	4 5 >  "  G  4 &  	 	"  	4 55$  "  C              g  r
		y g  p	c	v  g  filenamef  srfi/srfi-64/testing.scm

					A		B		F	%	I		w		x	 
		y  g  nameg  %test-on-test-begin CR!mJo8A7    hh     ]
 4 &  	 	"  	4 55$  "  &  $  "  "  $  	"  
6   	      g  r
		e g  result		e g  p		*	=  g  filenamef  srfi/srfi-64/testing.scm

							2			?	@	C		I		K	%	Q	,	[		]	%	c	+	e	 		e	  g  nameg  %test-on-test-end CRJ       h8      ]	4 &  	 	"  	4 55$  CC            g  runner
		3 g  p	$	3  g  filenamef  srfi/srfi-64/testing.scm

					
		2	% 		3  g  nameg  test-runner-test-name C/R4fhk   hX   v   ]      	
    C  n       g  dummy
		V g  r		V g  comp			V g  expected			V g  expr			V  		V	   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-64/testing.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  rg  compg  expectedg  expr   C5R h`   N  ]"4 54 54545L $  %L $  L $  	L CCCC       F      g  value
		Y g  expected		Y g  rval			Y g  ival			Y g  rexp			Y g  iexp			Y  g  filenamef  srfi/srfi-64/testing.scm
				
								-		.		2		9		:		>		E		F		J		Q		R	 		Y	   C       h   ~   ] O C      v       g  error
		
  g  filenamef  srfi/srfi-64/testing.scm

 		
  g  nameg  %test-approximate= CR4fhk      hH   N   ]    	   
C       F       g  dummy
		A g  r		A g  expr			A  		A	   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-64/testing.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  rg  expr   C5R4fhk      h   U   ] C    M       g  mac
		 g  
suite-name		 g  line			  			   C      h   =   ] C    5       g  mac
		 g  line		  			   C 
   hP      ] 4 5  45$  @45$  @	6           g  x
		L g  tmp		L g  tmp			L g  tmp		5	L  g  filenamef  srfi/srfi-64/testing.scm
			0						 		L   C5R4fhk 	 h8   b   ]       C    Z       g  mac
		4 g  tname		4 g  expr			4 g  line			4  		4	   C !        h    O   ]   C    G       g  mac
		 g  expr		 g  line			  			   C 
 hP      ] 4 5  45$  @45$  @	6           g  x
		L g  tmp		L g  tmp			L g  tmp		5	L  g  filenamef  srfi/srfi-64/testing.scm
			0						 		L   C5R(k)489:5;>? 	h8      ]       C       g  mac
		8 g  tname		8 g  expected			8 g  expr			8 g  line			8 g  comp			8  		8	   C@JOPKQ        h    w   ]   Co       g  mac
		  g  expected		  g  expr			  g  line			  g  comp			   		 	   C 
 hP      ]45   45$  @45$  @	6         g  comp
		N g  x		N g  tmp			N g  tmp		 	N g  tmp		7	N  g  filenamef  srfi/srfi-64/testing.scm
			.						 		N	  g  nameg  %test-comp2 CRR4fhRX      h   e   ] 6      ]       g  x
		
  g  filenamef  srfi/srfi-64/testing.scm
		
	 		
   C5R4fhR]     h   e   ] 6      ]       g  x
		
  g  filenamef  srfi/srfi-64/testing.scm
		
	 		
   C5R4fhRc     h   e   ] 6      ]       g  x
		
  g  filenamef  srfi/srfi-64/testing.scm
		
	 		
   C5R4fhhkitxyzu{~ 
   h@      ]     	   C          g  mac
		= g  tname		= g  expected			= g  expr			= g  error			= g  line			=  		=	   C    h(   x   ]    C   p       g  mac
		% g  expected		% g  expr			% g  error			% g  line			%  		%	   C 
hP      ] 4 5  45$  @45$  @	6           g  x
		L g  tmp		L g  tmp			L g  tmp		5	L  g  filenamef  srfi/srfi-64/testing.scm
			0						 		L   C5R4fhk        h`   a   ]   	
 
    C  Y       g  dummy
		^ g  r		^ g  etype			^ g  expr			^  		^	   C        h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-64/testing.scm
!	 		"  g  
macro-typeg  syntax-rulesg  patternsg  rg  etypeg  expr   C5R4fhk 	       h8   u   ]       C  m       g  mac
		6 g  tname		6 g  etype			6 g  expr			6 g  line			6  		6	   C     h    b   ]   C  Z       g  mac
		 g  etype		 g  expr			 g  line			  			   C     h    O   ]   C  G       g  mac
		 g  expr		 g  line			  			   C  hh      ]! 4 5  45$  @45$  @45$  	@
6            g  x
		c g  tmp		c g  tmp			c g  tmp		5	c g  tmp		L	c  g  filenamef  srfi/srfi-64/testing.scm
|		}	0	}		}		}	 		c   C5R+Qe
.+  h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm
	 		
   C+      h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm
	 		
   CD+    h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm
	 		
   C+      h   L   ] L 6D       g  filenamef  srfi/srfi-64/testing.scm
	 		
   C h  .  - 1 3 " Y45 $  &  		"  	45(  945&  	"  4>  "  G   6 &  	  "   &  	"  4>  "  G  4>  "  G  &  	C64	5 45 
O O 4
O >   "  G  V4 >  "  G  X4O >   "  G  &  		"  	456 $  r &  e45  O O 4 O >   "  G  V4>  X4O >   "  G  CX4O >   "  G  F"."*     &      g  first
		 g  rest		 g  r		f g  run-list		5  g  val		D	r g  val	   g  r	 f g  saved-runner	 G g  saved-runner	{  	g  filenamef  srfi/srfi-64/testing.scm

									5		=		>	/	D		v		}	 	, 	9 	 	 	 	 	 		"0	J	f	i	m	p	w			 		
  g  nameg  
test-apply CR4fhk     h(   S   ]   C   K       g  dummy
		% g  runner		% g  form			%  		%	   C      h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-64/testing.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  runnerg  formg  ...   C5R  h       ]MNML $  	ML LCC            g  runner
		  g  filenamef  srfi/srfi-64/testing.scm
													 		   C      h      ]

H O C              g  n
		 g  count		 g  i			  g  filenamef  srfi/srfi-64/testing.scm

		 			  g  nameg  %test-match-nth CR4fhk	`*,   h   <   ]C     4       g  dummy
		 g  n		  			   C5  h   O   ] C    G       g  dummy
		 g  n		 g  count			  			   C  h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-64/testing.scm
	 		9  g  
macro-typeg  syntax-rulesg  patternsg  n g  ng  count   C5R    h8      ]H"  %(  JC4 5$  "  K"L "         g  runner
		6 g  result		6 g  l				.  g  filenamef  srfi/srfi-64/testing.scm
																	%		(		.		.	 		6   C       h      -  1  3  O C       y       g  	pred-list
			  g  filenamef  srfi/srfi-64/testing.scm

 			


  g  nameg  %test-match-all C6R4fhkEG h   :   ]  C      2       g  tmp-46961e5187-512
		
  		
   C   h   ?   ]45C 7       g  dummy
		 g  pred		  			   C  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-64/testing.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  predg  ...   C5R    h8      ]H"  %(  JC4 5$  K"   "L "         g  runner
		6 g  result		6 g  l				.  g  filenamef  srfi/srfi-64/testing.scm
																	!		(		.		.	 		6   C       h      -  1  3  O C       y       g  	pred-list
			  g  filenamef  srfi/srfi-64/testing.scm

 			


  g  nameg  %test-match-any CHR4fhkUV h   :   ]  C      2       g  tmp-46961e5187-51c
		
  		
   C   h   ?   ]45C 7       g  dummy
		 g  pred		  			   C  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-64/testing.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  predg  ...   C5RWXiY       h@      ]4 5$   C4 5$   64 5$   66              g  	specifier
		9  g  filenamef  srfi/srfi-64/testing.scm

											"		#			-		3		7		9		 		9  g  nameg  %test-as-specifier CFR4fhkfklgmno       h   :   ]  C      2       g  tmp-46961e5187-526
		
  		
   Cr 
       h(   ?   ]45	  C     7       g  dummy
		# g  pred		#  		#	   C  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-64/testing.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  predg  ...   C5R4fhk      h   :   ]  C      2       g  tmp-46961e5187-530
		
  		
   C 
       h(   ?   ]45	  C     7       g  dummy
		# g  pred		#  		#	   C  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-64/testing.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  predg  ...   C5R/        h   s   ]L 4 5C   k       g  runner
		  g  filenamef  srfi/srfi-64/testing.scm
					 		   C  h   z   ] O C      r       g  name
		
  g  filenamef  srfi/srfi-64/testing.scm

 		
  g  nameg  test-match-name CRYi 	       h8     ]4 5454455$  45 66   	      g  string
		5 g  port			5 g  form			5  g  filenamef  srfi/srfi-64/testing.scm

														 		$		)
		/
		3		5	 		5  g  nameg  test-read-eval-string CRC        g  m
		( g  rtd
  g  filenamef  srfi/srfi-64.scm		
	)	4
	.	4		6	4	&	;	4
g  filenamef  srfi/srfi-64/testing.scm	D		P 
      ] 
      8 
       
      h 
      l 
      ؆ 
      ؇ 	      ؒ 	      ؓ 	      ء 	      ِ 
      K 
       
      \ 
      
      
      8
      U
      ^
      hh
      n
      v
      B}
      
      
      H
     c
     q
     
     
     t
     
     J!
     %
     .)
     "6p	     #
     %U
     &g
     *
     4	     D
     GF
     K
     N
     Q
     V
     X$
 9	     X&
   C6                                                                                     ccache/srfi/srfi-37.go                                                                              0000644                 00000072526 15154557173 0010467 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0>u      ] 4  h6:      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-37	 		g  filenameS	
f  srfi/srfi-37.scm	g  importsS	g  srfi-9	 	 	 	g  exportsS	g  option	g  option-names	g  option-required-arg?	g  option-optional-arg?	g  option-processor	g  	args-fold	 	g  set-current-module	 	 	g  cond-expand-provide	g  current-module	 	g  srfi-37:option	g  %option-procedure	 g  make-syntax-transformer	!  	"  	#g  macro	$g  $sc-dispatch	%$ 	&$ 	'g  _	(g  any	)'(((( 	*g  syntax-object	+g  lambda	,g  m-46961e511b-153	-g  top	.,- 	/g  ribcage	0g  t-46961e511b-14f	1g  t-46961e511b-150	2g  t-46961e511b-151	3g  t-46961e511b-152	40123 	5.... 	6f  l-46961e511b-158	7f  l-46961e511b-159	8f  l-46961e511b-15a	9f  l-46961e511b-15b	:6789 	;/45: 	</ 	=g  x	>= 	?. 	@f  l-46961e511b-155	A@ 	B/>?A 	Cg  shift	Dg  	proc-name	Eg  args	FDE 	G- 	HGG 	If  l-1e8ba8b5a-2ba	Jf  l-1e8ba8b5a-2bb	KIJ 	L/FHK 	Mg  key	Ng  value	Og  name	Pg  formals	Qg  body	RMNOPQ 	SGGGGG 	Tf  l-1e8ba8b5a-2ad	Uf  l-1e8ba8b5a-2ae	Vf  l-1e8ba8b5a-2af	Wf  l-1e8ba8b5a-2b0	Xf  l-1e8ba8b5a-2b1	YTUVWX 	Z/RSY 	[g  make-procedure-name	\[ 	]G 	^f  l-1e8ba8b5a-29d	_^ 	`/\]_ 	aG 	bf  l-1e8ba8b5a-29c	cb 	d/>ac 	e.;<BC<<<<LZ`d 	fg  hygiene	gf 	h*+eg 	ig  names	jG;<B 	kf 	l*ijk 	mg  required-arg?	n*mjk 	og  optional-arg?	p*ojk 	qg  	processor	r*qjk 	slnpr 	tg  make-struct	ug  m-46961e511b-14d	vu- 	wg  t-1e8ba8b5a-38d	xg  t-1e8ba8b5a-38c	yg  t-1e8ba8b5a-38b	zwxy 	{g  m-1e8ba8b5a-38e	|{- 	}||| 	~f  l-1e8ba8b5a-392	f  l-1e8ba8b5a-393 f  l-1e8ba8b5a-394 ~  /z}  g  	ctor-args   f  l-1e8ba8b5a-37a   /a  g  ctor g  field   f  l-1e8ba8b5a-376 f  l-1e8ba8b5a-377   /H  g  form g  	type-name g  constructor-spec g  field-names   GGGG  f  l-1e8ba8b5a-36b f  l-1e8ba8b5a-36c f  l-1e8ba8b5a-36d f  l-1e8ba8b5a-36e   /  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers   GGGGGGGG  f  l-1e8ba8b5a-343 f  l-1e8ba8b5a-341 f  l-1e8ba8b5a-33f f  l-1e8ba8b5a-33d f  l-1e8ba8b5a-33b f  l-1e8ba8b5a-339 f  l-1e8ba8b5a-337 f  l-1e8ba8b5a-335   /  f  l-1e8ba8b5a-334   />a  v;<BC<<<<<  *tg  *jk  *
g  lnpr  hs  g  each-any ' g  syntax-violation     f  Wrong number of arguments g  identifier?     G<B  *k      f  -source expression failed to match any pattern g  record-type-vtable     g  pwpwpwpw g  default-record-printer     imoq  g  set-struct-vtable-name!     g  vtable-offset-user     g  %option?-procedure g  option? '(  g  m-46961e511b-166 -  g  t-46961e511b-165     f  l-46961e511b-16b   /  f  l-46961e511b-168   />  <C<<<<LZ`d  *+g  g  obj g  t-1e8ba8b5a-47e g  t-1e8ba8b5a-478 g  t-1e8ba8b5a-479 g  t-1e8ba8b5a-47a g  t-1e8ba8b5a-47d g  t-1e8ba8b5a-47c g  t-1e8ba8b5a-47b   g  m-1e8ba8b5a-47f -    f  l-1e8ba8b5a-483 f  l-1e8ba8b5a-484 f  l-1e8ba8b5a-485 f  l-1e8ba8b5a-486 f  l-1e8ba8b5a-487 f  l-1e8ba8b5a-488 f  l-1e8ba8b5a-489   /  g  	copier-id   f  l-1e8ba8b5a-476   /a  g  	ctor-name   f  l-1e8ba8b5a-46e  /a  f  l-1e8ba8b5a-46c /a g  layout 	f  l-1e8ba8b5a-46a
	 /a
 g  
immutable? f  l-1e8ba8b5a-468 /a g  field-count f  l-1e8ba8b5a-466 /a g  
getter-ids f  l-1e8ba8b5a-463 /a g  	field-ids f  l-1e8ba8b5a-460 /a  g  predicate-name!g  
field-spec" ! #GGGGGG $f  l-1e8ba8b5a-453%f  l-1e8ba8b5a-454&f  l-1e8ba8b5a-455'f  l-1e8ba8b5a-456(f  l-1e8ba8b5a-457)f  l-1e8ba8b5a-458*$%&'() +/"#* ,v<C<<<<<<<<<<<<+ -*,g .- /g  and0*/,g 1g  struct?2*1,g 32- 4g  eq?5*4,g 6g  struct-vtable7*6,g 87- 9G< :*9k ;58: <03; =.< >G< ?*>k @g  throw-bad-structA@ B@ Cg  %option-names-procedureDg  free-idEg  
%%on-errorFg  m-46961e511b-172GF- HG If  l-46961e511b-174JI K/>HJ LG<KC<<<<LZ`d M*ELg NDM ON( Pg  %%typeQg  t-1e8ba8b5a-3a5Rg  t-1e8ba8b5a-3a6Sg  t-1e8ba8b5a-3a7Tg  t-1e8ba8b5a-3a8Ug  t-1e8ba8b5a-3a9Vg  t-1e8ba8b5a-3aaWg  t-1e8ba8b5a-3abXQRSTUVW Yg  m-1e8ba8b5a-3acZY- [ZZZZZZZ \f  l-1e8ba8b5a-3b0]f  l-1e8ba8b5a-3b1^f  l-1e8ba8b5a-3b2_f  l-1e8ba8b5a-3b3`f  l-1e8ba8b5a-3b4af  l-1e8ba8b5a-3b5bf  l-1e8ba8b5a-3b6c\]^_`ab d/X[c eg  getterfg  indexgef hf  l-1e8ba8b5a-3a3if  l-1e8ba8b5a-3a4jhi k/gHj l mGGG nf  l-1e8ba8b5a-39eof  l-1e8ba8b5a-39fpf  l-1e8ba8b5a-3a0qnop r/lmq sv<KC<d<<<k<r t*Psg uDt v'Ou( wg  ckxg  erryg  szxy {GG |f  l-46961e511b-177}f  l-46961e511b-178~|} /z{~ G<KC<<<<LZ`d *wg g  quote*g G<K *k   g  %%index*sg D 'O( f  l-46961e511b-17cf  l-46961e511b-17d /z{ G<KC<<<<LZ`d *wg *g <K *
k   g  %%copier*sg D 'O( f  l-46961e511b-181f  l-46961e511b-182 /z{ G<KC<<<<LZ`d *wg *g g  %%srfi-37:option-set-fieldsG<K *k   g  t-46961e511b-171 f  l-46961e511b-186 /H G<KC<<<<LZ`d *+g v<KC<d<<<k<r *yg  g  if*g *4g *6g  G<K *k  g  
struct-ref*g <K *
k  *@g *g *k     G<K *Ck g  %option-required-arg?-procedureg  m-46961e511b-18d-  f  l-46961e511b-18f /> <C<<<<LZ`d *Eg D ( v<C<d<<<k<r *Pg D '(  f  l-46961e511b-192f  l-46961e511b-193 /z <C<<<<LZ`d *wg *g G< *k   *g D '( f  l-46961e511b-197f  l-46961e511b-198 /z <C<<<<LZ`d *wg *g < *k   *g D '( f  l-46961e511b-19cf  l-46961e511b-19d /z <C<<<<LZ`d *wg *g G< *k   g  t-46961e511b-18c  f  l-46961e511b-1a1  / <C<<<<LZ`d *+g v<C<d<<<k<r *yg  *g 	*4g 
*6g 
 G< *k 	 *g < *k  *@g *g *k     G< *k g  %option-optional-arg?-procedureg  m-46961e511b-1a8-   f  l-46961e511b-1aa!  "/>! #<"C<<<<LZ`d $*E#g %D$ &%( 'v<"C<d<<<k<r (*P'g )D( *'&)( + ,f  l-46961e511b-1ad-f  l-46961e511b-1ae.,- //z+. 0/<"C<<<<LZ`d 1*w0g 2*0g 3G/<" 4*3k 524 65 7*'g 8D7 9'&8( :f  l-46961e511b-1b2;f  l-46961e511b-1b3<:; =/z+< >=<"C<<<<LZ`d ?*w>g @*>g A=<" B*	Ak C@B DC E*'g FDE G'&F( Hf  l-46961e511b-1b7If  l-46961e511b-1b8JHI K/z+J LK<"C<<<<LZ`d M*wLg N*Lg OGK<" P*Ok QNP RQ Sg  t-46961e511b-1a7TS Uf  l-46961e511b-1bcVU W/TV XW<"C<<<<LZ`d Y*+Xg ZvW<"C<d<<<k<r [*yZg \[ ]*Zg ^*4Zg _*6Zg `_[ aGW<" b*ak c^`b d*Zg eW<" f*	ek gd[f h*@Zg i*Zg j*ak kij lh[k m]cgl nY\m oG<" p*ok qg  %option-processor-procedurerg  m-46961e511b-1c3sr- ts uf  l-46961e511b-1c5vu w/>tv xs<wC<<<<LZ`d y*Exg zDy {z( |v<wC<d<<<k<r }*P|g ~D} '{~( ss f  l-46961e511b-1c8f  l-46961e511b-1c9 /z s<wC<<<<LZ`d *wg *g G<w *k   *|g D '{( f  l-46961e511b-1cdf  l-46961e511b-1ce /z s<wC<<<<LZ`d *wg *g <w *	k   *|g D '{( f  l-46961e511b-1d2f  l-46961e511b-1d3 /z s<wC<<<<LZ`d *wg *g G<w *k   g  t-46961e511b-1c2 f  l-46961e511b-1d7 /t s<wC<<<<LZ`d *+g v<wC<d<<<k<r *yg  *g *4g *6g  G<w *k  *g <w *	k  *@g *g *k     G<w *qk g  each((  (Ȍ(Ɍ(ʌg  %%set-fieldsg  dummyg  check?g  exprye g  m-46961e511b-1de- vvvv f  l-46961e511b-1e3f  l-46961e511b-1e4f  l-46961e511b-1e5f  l-46961e511b-1e6f  l-46961e511b-1e7 /  f  l-46961e511b-1e0 /> g  t-1e8ba8b5a-3c4g  t-1e8ba8b5a-3c6g  t-1e8ba8b5a-3c5 g  m-1e8ba8b5a-3c7-  f  l-1e8ba8b5a-3cbf  l-1e8ba8b5a-3ccf  l-1e8ba8b5a-3cd / f  l-1e8ba8b5a-3c1f  l-1e8ba8b5a-3c2f  l-1e8ba8b5a-3c3 /lm v<C<<<< *g G< *k *k *k *k *k  g  map  g  listg  	scm-errorg  program-errorf  	args-fold f  Duplicate option name `~A~A'g  char?f  --g  error-duplicate-optiong  make-hash-tableg  lengthg  for-eachg  hash-create-handle!g  build-options-lookup	g  append
g  string-lengthg  	substringg  
string-refg  hash-refg  
misc-errorf  %Missing required argument after `-~A'g  char=?g  string-indexf  &Missing required argument after `--~A'f   Extraneous argument after `--~A'C 5     h(7     ]4	
5 4 >  "  G   4i4i5 >  "  G     h      ]  C       g  names
		 g  required-arg?		 g  optional-arg?			 g  	processor			  g  filenamef  srfi/srfi-37.scm
	E
 			  g  nameg  %option-procedure CR4"#&)  h      ]  C       g  t-46961e511b-14f
		 g  t-46961e511b-150		 g  t-46961e511b-151			 g  t-46961e511b-152			  			   C  h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-37.scm		E
 		   C'     h   C   ] L 6;       g  filenamef  srfi/srfi-37.scm		E
 		
   C       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-37.scm
	E
 		n   C5Rͨ  4 >  "  G   	Ӗi  R h   s   ] $   CC      k       g  obj
		  g  filenamef  srfi/srfi-37.scm
	E
 		  g  nameg  %option?-procedure CR4"#&=       h   8   ]  C      0       g  t-46961e511b-165
		
  		
   C    h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-37.scm		E
 		   C'     h   C   ] L 6;       g  filenamef  srfi/srfi-37.scm		E
 		
   C?      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-37.scm
	E
 		n   C5RB    h   v   ] &   
C 6n       g  s
		  g  filenamef  srfi/srfi-37.scm
	E
 		  g  nameg  %option-names-procedure CCR4"#&v       h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   8   ]  C      0       g  t-46961e511b-171
		
  		
   C    h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-37.scm		E
 		   C'     h   C   ] L 6;       g  filenamef  srfi/srfi-37.scm		E
 		
   C      h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-37.scm
	E
 	    C5RB        h   ~   ] &   C 6v       g  s
		  g  filenamef  srfi/srfi-37.scm
	E
 		  g  nameg  %option-required-arg?-procedure CR4"#&       h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   8   ]  C      0       g  t-46961e511b-18c
		
  		
   C    h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-37.scm		E
 		   C'     h   C   ] L 6;       g  filenamef  srfi/srfi-37.scm		E
 		
   C      h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-37.scm
	E
 	    C5RB        h    ~   ] &   	C 6       v       g  s
		  g  filenamef  srfi/srfi-37.scm
	E
 		  g  nameg  %option-optional-arg?-procedure CR4"#&*16       h   :   ]C     2       g  err
		 g  s		  			   C9?D h   :   ]C     2       g  err
		 g  s		  			   CGMR h   :   ]C     2       g  err
		 g  s		  			   Cn     h   8   ]  C      0       g  t-46961e511b-1a7
		
  		
   C    h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-37.scm		E
 		   C'     h   C   ] L 6;       g  filenamef  srfi/srfi-37.scm		E
 		
   Cp      h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-37.scm
	E
 	    C5RB        h    z   ] &   	C 6       r       g  s
		  g  filenamef  srfi/srfi-37.scm
	E
 		  g  nameg  %option-processor-procedure CqR4"#&   h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   8   ]  C      0       g  t-46961e511b-1c2
		
  		
   C    h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-37.scm		E
 		   C'     h   C   ] L 6;       g  filenamef  srfi/srfi-37.scm		E
 		
   C      h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-37.scm
	E
 	    C5R4"#&  h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-37.scm
	E
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R       h(      ]4 5$  -"    6          g  option-name
		%  g  filenamef  srfi/srfi-37.scm
	M
		N			N		
	O			P			P			P	/	"	P		%	N	 
		%  g  nameg  error-duplicate-option CR     h(      ]	4L  5$  6LC            g  name
		# g  assoc		#  g  filenamef  srfi/srfi-37.scm
	[			\	 		\			^			^			_	1		_		!	`	 			#   CB      h0   e   ]L  O  &   
"  	4 56       ]       g  opt
		)  g  filenamef  srfi/srfi-37.scm
	Z			a		)	[	 		)   C        h0   k  ]	4	4 554O  >  "  G  C c      g  options
		/ g  lookup		/  g  filenamef  srfi/srfi-37.scm
	T
		X			X	&		X	!		X			X			Y	 		/  g  nameg  build-options-lookupg  documentationf  Answer an `equal?' Guile hash-table that maps OPTIONS' names back
to the containing options, signalling an error if a name is
encountered more than once. CRB	       h   S   ] L4L M5@ K       g  filenamef  srfi/srfi-37.scm
	q			r	)		r	 		
   C  h   q  ] &  	 	"  	4 5  &   "  	4 5$  	45 "  9 &  	 	"  	4 5$  	45 "  4>   "  G   44L O >   5"  =N C i      g  opt
	  g  name	  g  req-arg-proc		  g  opt-arg-proc		  g  no-arg-proc		  g  	procedure	   g  params	    g  filenamef  srfi/srfi-37.scm
			 		$ 		? 		@ 	)	K 		g 		h 	)	q 	  	 	p	 	p	 	 	  g  nameg  invoke-option-processor C
     hP   {  ]	 4M 5$  4M  5M N CM $  M M N CM $  M N CC  s      g  position
		N g  result		' g  result	3	>  g  filenamef  srfi/srfi-37.scm
 		 		 		 	-	 		 		 		 		 	&	 	1	 		 		" 		$ 		* 		+ 		/ 		2 		3 		8 		; 		A 		E 		H 		J 	 		N  g  nameg  short-option-argument C
   h(      ]4L L5  $   CL   6       g  t
			( g  args
		(  g  filenamef  srfi/srfi-37.scm
 		 			 		 			m		!	m		# 	!	(	m	 			(
   C     h   M   ] LL 6E       g  filenamef  srfi/srfi-37.scm
 		 	 		
   C h   D   ] C    <       g  filenamef  srfi/srfi-37.scm
 	 		
   CB	 h   S   ] L4L M5@ K       g  filenamef  srfi/srfi-37.scm
	q			r	)		r	 		
   C  h     ] 4M5$  	MNL6 4M 54L5$  ~4LL O  LO >  "  G  &  "  	4	5$  "  &  		"  	4
5$  C  "M L  44LLO >   5"  =N  "           g  position
	  g  opt-name	$  g  option-here		/  g  t		{  g  names	   g  params	    g  filenamef  srfi/srfi-37.scm
 		 		
 	&	 		 	
	 		 		 		 		 		  	'	$ 		$ 	
	' 		/ 	
	7 		8 		d 	 	{ 	  	   	  	%  	  	*  	"  	 	p	 	p	  	!  	 	   g  nameg  short-option C
	     h   S   ] L4L M5@ K       g  filenamef  srfi/srfi-37.scm
	q			r	)		r	 		
   C	       h   S   ] L4L M5@ K       g  filenamef  srfi/srfi-37.scm
	q			r	)		r	 		
   C  h(      ]	  44L LO >   5"  =N Cx       g  arg
		( g  params		(  g  filenamef  srfi/srfi-37.scm
	w			w		
	p		&	p	 		(   C    h(      ]L$  	LL6L    6          g  args
		%  g  filenamef  srfi/srfi-37.scm
 		 		 	&	 		 			m			m		  		%	m	 
		%
   C     h   _   ] L$  	L L6C     W       g  filenamef  srfi/srfi-37.scm
 		 		 	6	 	' 		
   C h       ]L$  L    6C         g  args
		  g  filenamef  srfi/srfi-37.scm
 		 		 			m			m		 			m	 		
   C	     h   S   ] L4L M5@ K       g  filenamef  srfi/srfi-37.scm
	q			r	)		r	 		
   C  h  A  ]8M(  MEM 4-4 
55$  "  	4 5$  0  44LL O >   5"  =NMN" @4-4 55$ 	4 5$  'MN4LL O M>  "  G  N"  M"  4=54		$  "  4554
L5$  54LO O O >  "  hG  "  a$  	" L  44LLO >   5"  =N"  	".MN"  4L>  "  G  "P      9      g  arg
	 g  t	!	: g  params	C	e g  arg  g  	start-pos	  g  index	  g  opt-name	  g  option-here	  g  names	DT g  params	Z  
g  filenamef  srfi/srfi-37.scm
 		 		 	
	 		 	
	 		 	(	  		! 		! 		0 		7 		> 		C 		F	p		b	p		h 		j 		o 		t 		} 	  	  	  	  	  	)  	 	w	 	y	 	y	  	  	  	  	  	
  	  	,  	6  	  	
  	  	
  	  	6 	9 	#? 	D 	D 	Z 	]	p	y	p	 	 	 	 	 	 :	
  g  nameg  next-arg C    h   J  - 1 3 
 H H45O O O O 	Q  Q 	 Q 	 Q 		6     B      g  args
		| g  options		| g  unrecognized-option-proc			| g  operand-proc			| g  seeds			| g  lookup			| g  invoke-option-processor		H	| g  short-option-argument		H	| g  short-option		H	| g  next-arg			H	|  
g  filenamef  srfi/srfi-37.scm
	e
		j			j		| 	 			|	
	  g  nameg  	args-foldg  documentationf  Answer the results of folding SEEDS as multiple values against the
program-arguments in ARGS, as decided by the OPTIONS'
`option-processor's, UNRECOGNIZED-OPTION-PROC, and OPERAND-PROC. CRC        g  m
		, g  rtd
>  g  filenamef  srfi/srfi-37.scm		*
	-	0
	2	0		:	0	&	?	0
,	E
	M
!	T
7%	e
 
	7'
   C6                                                                                                                                                                           ccache/srfi/srfi-67.go                                                                              0000644                 00000207571 15154557173 0010472 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0a     ] 4     h4      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-67	 		g  filenameS	
f  srfi/srfi-67.scm	g  importsS	g  srfi-27	 	 	 	g  exportsS	g  </<=?	g  </<?	g  <=/<=?	g  <=/<?	g  <=?	g  <?	g  =?	g  >/>=?	g  >/>?	g  >=/>=?	g  >=/>?	g  >=?	g  >?	g  boolean-compare	g  chain<=?	 g  chain<?	!g  chain=?	"g  chain>=?	#g  chain>?	$g  char-compare	%g  char-compare-ci	&g  compare-by<	'g  compare-by<=	(g  compare-by=/<	)g  compare-by=/>	*g  compare-by>	+g  compare-by>=	,g  complex-compare	-g  cond-compare	.g  debug-compare	/g  default-compare	0g  if-not=?	1g  if3	2g  if<=?	3g  if<?	4g  if=?	5g  if>=?	6g  if>?	7g  integer-compare	8g  kth-largest	9g  list-compare	:g  list-compare-as-vector	;g  max-compare	<g  min-compare	=g  not=?	>g  number-compare	?g  pair-compare	@g  pair-compare-car	Ag  pair-compare-cdr	Bg  pairwise-not=?	Cg  rational-compare	Dg  real-compare	Eg  refine-compare	Fg  select-compare	Gg  symbol-compare	Hg  vector-compare	Ig  vector-compare-as-list	J !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHI 9	Kg  replacementsS	Lg  string-compare	Mg  string-compare-ci	NLM 	Og  set-current-module	PO 	QO 	Rg  cond-expand-provide	Sg  current-module	T 	Ug  for-each	Vg  compare:checked	Wg  make-syntax-transformer	XW 	YW 	Zg  macro	[g  $sc-dispatch	\[ 	][ 	^g  any	_^^^^^ 	`g  syntax-object	ag  case	bg  top	cb 	dg  ribcage	eg  dummy	fg  c	gg  less	hg  equal	ig  greater	jefghi 	kg  m-46961e518a-3	lkb 	mlcccc 	nf  l-46961e518a-8	of  l-46961e518a-9	pf  l-46961e518a-a	qf  l-46961e518a-b	rf  l-46961e518a-c	snopqr 	tdjms 	ud 	vg  x	wv 	xl 	yf  l-46961e518a-5	zy 	{dwxz 	|ctu{ 	}g  hygiene	~} 	`a|~  `	|~    `
|~    `|~    g  else `|~  g  error `|~  f   comparison value not in {-1,0,1} `|~        g  syntax-violation     f  -source expression failed to match any pattern g  compare:if-rel? g  c-cases g  a-cases g  consequence ef  g  m-46961e518a-12 b  cccc  f  l-46961e518a-17 f  l-46961e518a-18 f  l-46961e518a-19 f  l-46961e518a-1a f  l-46961e518a-1b   d    f  l-46961e518a-14   dw  cu  `~  g  if `~  `~      ^^^^^^  g  	alternate ef  ccccc  f  l-46961e518a-22 f  l-46961e518a-23 f  l-46961e518a-24 f  l-46961e518a-25 f  l-46961e518a-26 f  l-46961e518a-27   d  cu  `a~  `~  `~  `~        g  each-any ^ g  arg e  g  m-46961e518a-2f b  c  f  l-46961e518a-34 f  l-46961e518a-35   d    f  l-46961e518a-31   dw  cu  `~  `
~    `	~  `~    g  m-46961e518a-3a b  c  f  l-46961e518a-3f f  l-46961e518a-40   d    f  l-46961e518a-3c   dw  cu  `~  `	~    `
~  `~    g  m-46961e518a-45 b  c  f  l-46961e518a-4a f  l-46961e518a-4b   d    f  l-46961e518a-47   dw  cu  `~  `~    `	~  `
~    g  m-46961e518a-50 b  c  f  l-46961e518a-55 f  l-46961e518a-56  d   f  l-46961e518a-52 dw cu `~ `	~ 	`
~ 
	 `~  g  m-46961e518a-5bb c f  l-46961e518a-60f  l-46961e518a-61 d  f  l-46961e518a-5d dw cu `~ `
~ `~  `	~  g  m-46961e518a-66 b ! c "f  l-46961e518a-6b#f  l-46961e518a-6c$"# %d!$ &  'f  l-46961e518a-68(' )dw&( *c%u) +`*~ ,`	*~ -`*~ .,- /`
*~ 0/ 1g  compare:define-rel?2^^^ 3g  define4g  rel?5g  if-rel?6e45 7g  m-46961e518a-7187b 98cc :f  l-46961e518a-76;f  l-46961e518a-77<f  l-46961e518a-78=:;< >d69= ?8 @f  l-46961e518a-73A@ Bdw?A Cc>uB D`3C~ Eg  case-lambdaF`EC~ Gg  lambdaH`GC~ I`vC~ Jg  yK`JC~ LIK M`/C~ NMIK O`C~ P`C~ QNOP Rg  compareS`RC~ TS USIK VUOP W`C~ Xg  
procedure?Y`XC~ ZYS [`C~ \f  *not a procedure (Did you mean rel/rel??): ]`\C~ ^[]S _^ `g  compare:define-rel1/rel2?a^^^^ bg  
rel1/rel2?cg  if-rel1?dg  if-rel2?eebcd fg  m-46961e518a-83gfb hgccc if  l-46961e518a-88jf  l-46961e518a-89kf  l-46961e518a-8alf  l-46961e518a-8bmijkl ndehm og pf  l-46961e518a-85qp rdwoq scnur t`3s~ u`Es~ v`Gs~ w`vs~ x`Js~ yg  zz`ys~ {wxz |`/s~ }|wx ~|xz `s~ `s~ ~ `Vs~ |z  `Rs~  wx xz  z  wxz g  compare:define-chain-rel?g  
chain-rel?e5 g  m-46961e518a-99b cc f  l-46961e518a-9ef  l-46961e518a-9ff  l-46961e518a-a0 d  f  l-46961e518a-9b dw cu `3~ `E~ `R~  `~  g  x1`~  `V~   g  x2`~  `~  g  x3`~      g  x3+`~ g  let`~ g  chain?`~ g  head`~  g  tail`~   `~ g  null?`~  g  car`~   g  cdr`~   g  apply`~     g  random-integerg  list-refg  lengthf  	bad indexg  integer?g  exact?^ e g  m-46961e518a-a9b  f  l-46961e518a-ae d f  l-46961e518a-ab dw cu `
~ ^^ ^^댤g  c1g  c2g  cse ccc f  l-46961e518a-b6f  l-46961e518a-b7f  l-46961e518a-b8f  l-46961e518a-b9 d cu `1~ `	~ `E~ `~  g  clauseevJ  g  m-46961e518a-bf b ccc f  l-46961e518a-c4f  l-46961e518a-c5f  l-46961e518a-c6f  l-46961e518a-c7 d 	 
f  l-46961e518a-c1
 dw	 cu `~ g  x-val`~ g  y-val`~ `F~ ^ evJ cc f  l-46961e518a-cef  l-46961e518a-cff  l-46961e518a-d0 d cu `
~ g  free-idcu  `~ !  "!#^^" $^# %evJf &f  l-46961e518a-d5'f  l-46961e518a-d6(f  l-46961e518a-d7)f  l-46961e518a-d8*&'() +d%* ,c+u -`E,~ ./^.0^/1^0 2g  t?3evJ2f 4ccccc 5f  l-46961e518a-df6f  l-46961e518a-e07f  l-46961e518a-e18f  l-46961e518a-e29f  l-46961e518a-e3:f  l-46961e518a-e4;56789: <d34; =c<u >`=~ ?g  t?-val@`?=~ Ag  txB`A=~ Cg  tyD`C=~ E`=~ F`E=~ G`	=~ HG I`=~ J`F=~ Kg  m-46961e518a-edLKb ML Nf  l-46961e518a-f2ON PdMO Qf  l-46961e518a-efRQ SdwMR TcPuS U`
T~ VcuS W`V~ XW YXZ^Y [e \Lc ]f  l-46961e518a-f5^f  l-46961e518a-f6_]^ `d[\_ ac`uS b`Ea~ cdce^dfeAC gLcccc hf  l-46961e518a-fbif  l-46961e518a-fcjf  l-46961e518a-fdkf  l-46961e518a-felf  l-46961e518a-ffmhijkl ndfgm ocnuS p`o~ qg  tx-valr`qo~ sg  ty-valt`so~ u`o~ v`Eo~ w`	o~ xw y`o~ z`-o~ {g  compare:type-check|g  type?}g  	type-name~e|}v g  m-46961e518a-107b ccc f  l-46961e518a-10cf  l-46961e518a-10df  l-46961e518a-10ef  l-46961e518a-10f d~  f  l-46961e518a-109 dw cu `~ g  not`~ `~ g  string-append`~ f  not `~ f  :`~  g  begine|}vJ cccc f  l-46961e518a-115f  l-46961e518a-116f  l-46961e518a-117f  l-46961e518a-118f  l-46961e518a-119 d cu `~ `{~ g  compare:define-by=/<g  =g  <eR|} g  m-46961e518a-120b ccccc f  l-46961e518a-125f  l-46961e518a-126f  l-46961e518a-127f  l-46961e518a-128f  l-46961e518a-129f  l-46961e518a-12a d  f  l-46961e518a-122 dw cu `3~ `~ `G~ `v~ `J~  `~  g  eq?`~  `
~  `	~ `~  `~ `~ `~ `~  g  boolean?f  booleang  char=?g  char?g  char<?f  charg  	char-ci=?g  	char-ci<?g  string=?g  string<?g  string?f  stringg  string-ci=?g  string-ci<?f  symbolg  symbol->stringf  integerg  	rational?f  rationalg  real?f  realg  complex?f  complexg  	real-partg  	imag-partg  number?f  numberg  vector-lengthg  
vector-refg  minf  $unrecognized type in default-comparef  compare value not in {-1,0,1}f  compare error: not reflexivef  !compare error: not anti-symmetricyJv Jyv yvJ vyJ Jvy vJy 












 f  compare error: not transitiveg  mapC 5h8    ]4	
JKN5	 4Q >  "  G   4Ri4Si5 T>  "  G  Uh   c   ]L   6      [       g  x
		
  g  filenamef  srfi/srfi-67/compare.scm
	U		
	U	 		
   C  h(      - 1 3 4O >  "  G   C          g  result
			% g  compare			% g  args				%  g  filenamef  srfi/srfi-67/compare.scm
	T
	
	U	 			%	
	  g  nameg  compare:checked CVR4Y1Z]_      h(   v   ]   C     n       g  dummy
		# g  c		# g  less			# g  equal			# g  greater			#  		#	   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-67/compare.scm
	[
 		"  g  
macro-typeg  syntax-rulesg  patternsg  cg  lessg  equalg  greater   C51R4YZ]_   h      ]C    w       g  dummy
		 g  c-cases		 g  a-cases			 g  c			 g  consequence			  			   C       h       ]  C            g  dummy
		 g  c-cases		 g  a-cases			 g  c			 g  consequence			 g  	alternate			  			   C   h@     ]4 5$  @4 5$  @ 6       	      g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-67/compare.scm
	f	 		9  g  
macro-typeg  syntax-rulesg  patternsg  c-casesg  a-casesg  cg  consequence g  c-casesg  a-casesg  cg  consequenceg  	alternate   C5R4Y4Z]    h   >   ]C  6       g  dummy
		 g  arg		  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-67/compare.scm
	o
 		"  g  
macro-typeg  syntax-rulesg  patternsg  argg  ...   C54R4Y3Z]    h   >   ]C  6       g  dummy
		 g  arg		  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-67/compare.scm
	r
 		"  g  
macro-typeg  syntax-rulesg  patternsg  argg  ...   C53R4Y6Z]    h   >   ]C  6       g  dummy
		 g  arg		  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-67/compare.scm
	u
 		"  g  
macro-typeg  syntax-rulesg  patternsg  argg  ...   C56R4Y2Z]
 h   >   ]C  6       g  dummy
		 g  arg		  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-67/compare.scm
	x
 		"  g  
macro-typeg  syntax-rulesg  patternsg  argg  ...   C52R4Y5Z] h   >   ]C  6       g  dummy
		 g  arg		  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-67/compare.scm
	{
 		"  g  
macro-typeg  syntax-rulesg  patternsg  argg  ...   C55R4Y0Z]+.0 h   >   ]C  6       g  dummy
		 g  arg		  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-67/compare.scm
	~
 		"  g  
macro-typeg  syntax-rulesg  patternsg  argg  ...   C50R4Y1Z]2DFHLQTVUWZ_       hP   T   ]     	
   C   L       g  dummy
		M g  rel?		M g  if-rel?			M  		M	   C     h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-67/compare.scm
 
 		"  g  
macro-typeg  syntax-rulesg  patternsg  rel?g  if-rel?   C51R/        h8   {   ]
4 5
$  C	$  "  $  C6   s       g  x
		5 g  y		5 g  key			5  g  filenamef  srfi/srfi-67/compare.scm
 
 		5	   C     h8   {   ]
4L  5
$  C	$  "  $  C6   s       g  x
		5 g  y		5 g  key			5  g  filenamef  srfi/srfi-67/compare.scm
 
 		5	   C/X\      h     )    3  C)   3  O C)   63 4 5
$  C	$  "  $  C6]4 5$  34 5
$  C	$  "  $  C6 6             g  compare
		 g  x
	&	Y g  y	&	Y g  key		/	Y g  compare
	[  g  x	[  g  y		[  g  key		o   g  filenamef  srfi/srfi-67/compare.scm
 
  
  
 			
 		 	&	Y	 	[ 	  g  nameg  =? CR/  h8   {   ]
4 5	$  C
$  "  $  C6   s       g  x
		5 g  y		5 g  key			5  g  filenamef  srfi/srfi-67/compare.scm
 
 		5	   C     h8   {   ]
4L  5	$  C
$  "  $  C6   s       g  x
		5 g  y		5 g  key			5  g  filenamef  srfi/srfi-67/compare.scm
 
 		5	   C/X\      h     )    3  C)   3  O C)   63 4 5	$  C
$  "  $  C6]4 5$  34 5	$  C
$  "  $  C6 6             g  compare
		 g  x
	&	Y g  y	&	Y g  key		/	Y g  compare
	[  g  x	[  g  y		[  g  key		o   g  filenamef  srfi/srfi-67/compare.scm
 
  
  
 			
 		 	&	Y	 	[ 	  g  nameg  <? CR/  h8   {   ]
4 5$  C	$  "  
$  C6   s       g  x
		5 g  y		5 g  key			5  g  filenamef  srfi/srfi-67/compare.scm
 
 		5	   C     h8   {   ]
4L  5$  C	$  "  
$  C6   s       g  x
		5 g  y		5 g  key			5  g  filenamef  srfi/srfi-67/compare.scm
 
 		5	   C/X\      h     )    3  C)   3  O C)   63 4 5$  C	$  "  
$  C6]4 5$  34 5$  C	$  "  
$  C6 6             g  compare
		 g  x
	&	Y g  y	&	Y g  key		/	Y g  compare
	[  g  x	[  g  y		[  g  key		o   g  filenamef  srfi/srfi-67/compare.scm
 
  
  
 			
 		 	&	Y	 	[ 	  g  nameg  >? CR/  h8   {   ]
4 5	$  "  
$  C$  C6   s       g  x
		5 g  y		5 g  key			5  g  filenamef  srfi/srfi-67/compare.scm
 
 		5	   C     h8   {   ]
4L  5	$  "  
$  C$  C6   s       g  x
		5 g  y		5 g  key			5  g  filenamef  srfi/srfi-67/compare.scm
 
 		5	   C/X\      h     )    3  C)   3  O C)   63 4 5	$  "  
$  C$  C6]4 5$  34 5	$  "  
$  C$  C6 6       	      g  compare
		 g  x
	&	Y g  y	&	Y g  key		/	Y g  compare
	[  g  x	[  g  y		[  g  key		o   g  filenamef  srfi/srfi-67/compare.scm
 
  
  
 			
 		 	&	Y	 	[ 	  g  nameg  <=? CR/ h8   {   ]
4 5
$  "  $  C	$  C6   s       g  x
		5 g  y		5 g  key			5  g  filenamef  srfi/srfi-67/compare.scm
 
 		5	   C     h8   {   ]
4L  5
$  "  $  C	$  C6   s       g  x
		5 g  y		5 g  key			5  g  filenamef  srfi/srfi-67/compare.scm
 
 		5	   C/X\      h     )    3  C)   3  O C)   63 4 5
$  "  $  C	$  C6]4 5$  34 5
$  "  $  C	$  C6 6       	      g  compare
		 g  x
	&	Y g  y	&	Y g  key		/	Y g  compare
	[  g  x	[  g  y		[  g  key		o   g  filenamef  srfi/srfi-67/compare.scm
 
  
  
 			
 		 	&	Y	 	[ 	  g  nameg  >=? CR/ h8   {   ]
4 5	$  "  $  C
$  C6   s       g  x
		5 g  y		5 g  key			5  g  filenamef  srfi/srfi-67/compare.scm
 
 		5	   C     h8   {   ]
4L  5	$  "  $  C
$  C6   s       g  x
		5 g  y		5 g  key			5  g  filenamef  srfi/srfi-67/compare.scm
 
 		5	   C/X\      h     )    3  C)   3  O C)   63 4 5	$  "  $  C
$  C6]4 5$  34 5	$  "  $  C
$  C6 6              g  compare
		 g  x
	&	Y g  y	&	Y g  key		/	Y g  compare
	[  g  x	[  g  y		[  g  key		o   g  filenamef  srfi/srfi-67/compare.scm
 
 			
 		 	&	Y	 	[ 	  g  nameg  not=? C=R4Y`Z]atuv{}      hh   q   ]  	
   	
   Ci       g  dummy
		h g  
rel1/rel2?		h g  if-rel1?			h g  if-rel2?			h  		h	   C        h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-67/compare.scm
 
 		"  g  
macro-typeg  syntax-rulesg  patternsg  
rel1/rel2?g  if-rel1?g  if-rel2?   C5`R/V   hp      ]4 5	$  345	$  C
$  "  $  C6
$  "  $  	66          g  x
		m g  y		m g  z			m g  key			m g  key			I  g  filenamef  srfi/srfi-67/compare.scm
 
 		m	   CV   hp      ]4L  5	$  34L 5	$  C
$  "  $  C6
$  "  $  	L 66          g  x
		m g  y		m g  z			m g  key			m g  key			I  g  filenamef  srfi/srfi-67/compare.scm
 
 		m	   C/V  h   N  )    3  C)   3  O C)   n3 4 5	$  345	$  C
$  "  $  C6
$  "  $  	66]4 5	$  34 5	$  C
$  "  $  C6
$  "  $  	 66  F      g  compare
		 g  x
	&  g  y	&  g  z		&  g  key		/  g  key		C	m g  compare
   g  x   g  y	   g  z	   g  key	   g  key	    g  filenamef  srfi/srfi-67/compare.scm
 
 			
 		 	& 	   	  g  nameg  </<? CR/V  hp      ]4 5	$  345	$  "  
$  C$  C6
$  "  $  	66          g  x
		m g  y		m g  z			m g  key			m g  key			I  g  filenamef  srfi/srfi-67/compare.scm
 
 		m	   CV   hp      ]4L  5	$  34L 5	$  "  
$  C$  C6
$  "  $  	L 66          g  x
		m g  y		m g  z			m g  key			m g  key			I  g  filenamef  srfi/srfi-67/compare.scm
 
 		m	   C/V  h   O  )    3  C)   3  O C)   n3 4 5	$  345	$  "  
$  C$  C6
$  "  $  	66]4 5	$  34 5	$  "  
$  C$  C6
$  "  $  	 66  G      g  compare
		 g  x
	&  g  y	&  g  z		&  g  key		/  g  key		C	m g  compare
   g  x   g  y	   g  z	   g  key	   g  key	    g  filenamef  srfi/srfi-67/compare.scm
 
 			
 		 	& 	   	  g  nameg  </<=? CR/V hp      ]4 5	$  "  
$  345	$  C
$  "  $  C6$  	66          g  x
		m g  y		m g  z			m g  key			m g  key		,	V  g  filenamef  srfi/srfi-67/compare.scm
 
 		m	   CV   hp      ]4L  5	$  "  
$  34L 5	$  C
$  "  $  C6$  	L 66          g  x
		m g  y		m g  z			m g  key			m g  key		,	V  g  filenamef  srfi/srfi-67/compare.scm
 
 		m	   C/V  h   O  )    3  C)   3  O C)   n3 4 5	$  "  
$  345	$  C
$  "  $  C6$  	66]4 5	$  "  
$  34 5	$  C
$  "  $  C6$  	 66  G      g  compare
		 g  x
	&  g  y	&  g  z		&  g  key		/  g  key		P	z g  compare
   g  x   g  y	   g  z	   g  key	   g  key	    g  filenamef  srfi/srfi-67/compare.scm
 
 			
 		 	& 	   	  g  nameg  <=/<? CR/V hp      ]4 5	$  "  
$  345	$  "  
$  C$  C6$  	66          g  x
		m g  y		m g  z			m g  key			m g  key		,	V  g  filenamef  srfi/srfi-67/compare.scm
 
 		m	   CV   hp      ]4L  5	$  "  
$  34L 5	$  "  
$  C$  C6$  	L 66          g  x
		m g  y		m g  z			m g  key			m g  key		,	V  g  filenamef  srfi/srfi-67/compare.scm
 
 		m	   C/V  h   P  )    3  C)   3  O C)   n3 4 5	$  "  
$  345	$  "  
$  C$  C6$  	66]4 5	$  "  
$  34 5	$  "  
$  C$  C6$  	 66  H      g  compare
		 g  x
	&  g  y	&  g  z		&  g  key		/  g  key		P	z g  compare
   g  x   g  y	   g  z	   g  key	   g  key	    g  filenamef  srfi/srfi-67/compare.scm
 
 			
 		 	& 	   	  g  nameg  <=/<=? CR/V        hp      ]4 5$  345$  C	$  "  
$  C6	$  "  
$  	66          g  x
		m g  y		m g  z			m g  key			m g  key			H  g  filenamef  srfi/srfi-67/compare.scm
 
 		m	   CV   hp      ]4L  5$  34L 5$  C	$  "  
$  C6	$  "  
$  	L 66          g  x
		m g  y		m g  z			m g  key			m g  key			H  g  filenamef  srfi/srfi-67/compare.scm
 
 		m	   C/V  h   N  )    3  C)   3  O C)   n3 4 5$  345$  C	$  "  
$  C6	$  "  
$  	66]4 5$  34 5$  C	$  "  
$  C6	$  "  
$  	 66  F      g  compare
		 g  x
	&  g  y	&  g  z		&  g  key		/  g  key		B	l g  compare
   g  x   g  y	   g  z	   g  key	   g  key	    g  filenamef  srfi/srfi-67/compare.scm
 
 			
 		 	& 	   	  g  nameg  >/>? CR/V  hp      ]4 5$  345
$  "  $  C	$  C6	$  "  
$  	66          g  x
		m g  y		m g  z			m g  key			m g  key			H  g  filenamef  srfi/srfi-67/compare.scm
 
 		m	   CV   hp      ]4L  5$  34L 5
$  "  $  C	$  C6	$  "  
$  	L 66          g  x
		m g  y		m g  z			m g  key			m g  key			H  g  filenamef  srfi/srfi-67/compare.scm
 
 		m	   C/V  h   O  )    3  C)   3  O C)   n3 4 5$  345
$  "  $  C	$  C6	$  "  
$  	66]4 5$  34 5
$  "  $  C	$  C6	$  "  
$  	 66  G      g  compare
		 g  x
	&  g  y	&  g  z		&  g  key		/  g  key		B	l g  compare
   g  x   g  y	   g  z	   g  key	   g  key	    g  filenamef  srfi/srfi-67/compare.scm
 
 			
 		 	& 	   	  g  nameg  >/>=? CR/V hp      ]4 5
$  "  $  345$  C	$  "  
$  C6	$  	66          g  x
		m g  y		m g  z			m g  key			m g  key		+	U  g  filenamef  srfi/srfi-67/compare.scm
 
 		m	   CV   hp      ]4L  5
$  "  $  34L 5$  C	$  "  
$  C6	$  	L 66          g  x
		m g  y		m g  z			m g  key			m g  key		+	U  g  filenamef  srfi/srfi-67/compare.scm
 
 		m	   C/V  h   O  )    3  C)   3  O C)   n3 4 5
$  "  $  345$  C	$  "  
$  C6	$  	66]4 5
$  "  $  34 5$  C	$  "  
$  C6	$  	 66  G      g  compare
		 g  x
	&  g  y	&  g  z		&  g  key		/  g  key		O	y g  compare
   g  x   g  y	   g  z	   g  key	   g  key	    g  filenamef  srfi/srfi-67/compare.scm
 
 			
 		 	& 	   	  g  nameg  >=/>? CR/V hp      ]4 5
$  "  $  345
$  "  $  C	$  C6	$  	66          g  x
		m g  y		m g  z			m g  key			m g  key		+	U  g  filenamef  srfi/srfi-67/compare.scm
 
 		m	   CV   hp      ]4L  5
$  "  $  34L 5
$  "  $  C	$  C6	$  	L 66          g  x
		m g  y		m g  z			m g  key			m g  key		+	U  g  filenamef  srfi/srfi-67/compare.scm
 
 		m	   C/V  h   P  )    3  C)   3  O C)   n3 4 5
$  "  $  345
$  "  $  C	$  C6	$  	66]4 5
$  "  $  34 5
$  "  $  C	$  C6	$  	 66  H      g  compare
		 g  x
	&  g  y	&  g  z		&  g  key		/  g  key		O	y g  compare
   g  x   g  y	   g  z	   g  key	   g  key	    g  filenamef  srfi/srfi-67/compare.scm
 
 			
 		 	& 	   	  g  nameg  >=/>=? CR4YZ]2     hX   Z   ] 	 
     C   R       g  dummy
		U g  
chain-rel?		U g  if-rel?			U  		U	   C       h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-67/compare.scm
 
 		"  g  
macro-typeg  syntax-rulesg  patternsg  
chain-rel?g  if-rel?   C5RV   hp    )   3 C)   3  6)   63 4 5
$  C	$  "  $  C6)   n3 4 5
$  34 5
$  C	$  "  $  C6	$  "  $  	 66- 1 3 4 5
$  `"  P(  C4 5
$  "	$  "  $  
 @6"	$  "  $  	 @6        g  compare
			 g  compare
		 g  x1		 g  compare
	&	Y g  x1	&	Y g  x2		&	Y g  key		/	Y g  compare
	b  g  x1	b  g  x2		b  g  x3		b  g  key		k  g  key		~  g  compare
 n g  x1 n g  x2	 n g  x3+	 n g  key	 n g  head	 = g  tail	 = g  key	 =  g  filenamef  srfi/srfi-67/compare.scm
 
 			 			 	&	Y	 	b 	  n	
	  g  nameg  chain=? C!RV        hp    )   3 C)   3  6)   63 4 5	$  C
$  "  $  C6)   n3 4 5	$  34 5	$  C
$  "  $  C6
$  "  $  	 66- 1 3 4 5	$  `"  P(  C4 5	$  "
$  "  $  
 @6"
$  "  $  	 @6        g  compare
			 g  compare
		 g  x1		 g  compare
	&	Y g  x1	&	Y g  x2		&	Y g  key		/	Y g  compare
	b  g  x1	b  g  x2		b  g  x3		b  g  key		k  g  key		  g  compare
 n g  x1 n g  x2	 n g  x3+	 n g  key	 n g  head	 > g  tail	 > g  key	 >  g  filenamef  srfi/srfi-67/compare.scm
 
 			 			 	&	Y	 	b 	  n	
	  g  nameg  chain<? C RV        hp    )   3 C)   3  6)   63 4 5$  C	$  "  
$  C6)   n3 4 5$  34 5$  C	$  "  
$  C6	$  "  
$  	 66- 1 3 4 5$  `"  P(  C4 5$  "	$  "  
$  
 @6"	$  "  
$  	 @6        g  compare
			 g  compare
		 g  x1		 g  compare
	&	Y g  x1	&	Y g  x2		&	Y g  key		/	Y g  compare
	b  g  x1	b  g  x2		b  g  x3		b  g  key		k  g  key		~  g  compare
 n g  x1 n g  x2	 n g  x3+	 n g  key	 n g  head	 = g  tail	 = g  key	 =  g  filenamef  srfi/srfi-67/compare.scm
 
 			 			 	&	Y	 	b 	  n	
	  g  nameg  chain>? C#RV        hp    )   3 C)   3  6)   63 4 5	$  "  
$  C$  C6)   n3 4 5	$  "  
$  34 5	$  "  
$  C$  C6$  	 66- 1 3 4 5	$  "  
$  `"  P(  C4 5	$  "  
$  "$  
 @6"$  	 @6        g  compare
			 g  compare
		 g  x1		 g  compare
	&	Y g  x1	&	Y g  x2		&	Y g  key		/	Y g  compare
	b  g  x1	b  g  x2		b  g  x3		b  g  key		k  g  key	   g  compare
 n g  x1 n g  x2	 n g  x3+	 n g  key	 n g  head	 K g  tail	 K g  key	K  g  filenamef  srfi/srfi-67/compare.scm
 
 			 			 	&	Y	 	b 	  n	
	  g  nameg  chain<=? CRV      hp    )   3 C)   3  6)   63 4 5
$  "  $  C	$  C6)   n3 4 5
$  "  $  34 5
$  "  $  C	$  C6	$  	 66- 1 3 4 5
$  "  $  `"  P(  C4 5
$  "  $  "	$  
 @6"	$  	 @6        g  compare
			 g  compare
		 g  x1		 g  compare
	&	Y g  x1	&	Y g  x2		&	Y g  key		/	Y g  compare
	b  g  x1	b  g  x2		b  g  x3		b  g  key		k  g  key	   g  compare
 n g  x1 n g  x2	 n g  x3+	 n g  key	 n g  head	 J g  tail	 J g  key	J  g  filenamef  srfi/srfi-67/compare.scm
 
 			 			 	&	Y	 	b 	  n	
	  g  nameg  chain>=? C"RVV      h    ];	$  $  $  
L 6CC454 5"  (  )4L 455$  45 "C$  "4L5			$  "	
$  $  
L@C	$  "G6
 "0       g  x
	 g  n	 g  
unchecked?		 g  i-pivot		. g  x-pivot		9 g  i		?  g  x		?  g  x<		?  g  x>		?  g  key		    
g  filenamef  srfi/srfi-67/compare.scm
 		 		 			 		 	!	 		! 	-	# 		( 		. 		1 		9 		? 		E 		F 		K 	'	T 		X 		[ 	'	l 		s 		w 		z 	 	} 	(  	  	  	'  	  	  	%  	-  	;  	5  	  	  	  	D  	"  	  	%  	-  	>  	8  	  	  	 	+ 	4 	 2		  g  nameg  unequal? C    h(    )   3 C)   3  6)   63 4 5	$  "  $  C
$  C6)   3 4 5	$  "  $  d4 5	$  "  $  34 5	$  "  $  C
$  C6
$  C6
$  	 66- 1 3 O  Q 456   }      g  compare
			 g  compare
		 g  x1		 g  compare
	&	Y g  x1	&	Y g  x2		&	Y g  key		/	Y g  compare
	b  g  x1	b  g  x2		b  g  x3		b  g  key		k  g  key	   g  key	   g  compare
% g  x1+% g  unequal?	%  g  filenamef  srfi/srfi-67/compare.scm
 		 		& 		' 		/ 		b 		c 		k 	  	  	  	%  	  	  	  	  	  	  	  	 	 	 	!% 	 			 			 	&	Y	 	b 	 %
   CBRV      h    )   3  6)   83 4 5	$  "  
$  C$  C6)   3 4 5	$  "  
$  54 5	$  "  
$  C$  C6$  54 5	$  "  
$  C$  C66)  d3 4 5	$  "  
$  4 5	$  "  
$  54 5	$  "  
$  C$  C6$  54 5	$  "  
$  C$  C66$  4 5	$  "  
$  54 5	$  "  
$  C$  C6$  54 5	$  "  
$  C$  C666- 1 3 "  U(  C4 5	$  "  
$  "  $  "  45"4 5	$  "  
$  "  $  "  45"b      g  compare
			 g  x1			 g  compare
		Q g  x1		Q g  x2			Q g  key		%	Q g  compare
	Z  g  x1	Z  g  x2		Z  g  x3		Z  g  key		c  g  key	   g  key	   g  compare
 ] g  x1 ] g  x2	 ] g  x3	 ] g  x4	 ] g  key	] g  key	& g  key	Gs g  key	 g  key	W g  key	 g  key	%Q g  compare
f g  x1f g  x2	f g  x3+	f g  xmin	j g  xs	j g  key	} g  key	  !g  filenamef  srfi/srfi-67/compare.scm
								%		Z		[
		c
		|	 	 
	 	 	 
	 	 			&	?	G	{	|										%	W	[	]	f	j	p	t	{	%}	}		4							 4				 		Q	 	Z 	  ]	 f	
	  g  nameg  min-compare C<RV    h    )   3  6)   83 4 5
$  "  $  C	$  C6)   3 4 5
$  "  $  54 5
$  "  $  C	$  C6	$  54 5
$  "  $  C	$  C66)  d3 4 5
$  "  $  4 5
$  "  $  54 5
$  "  $  C	$  C6	$  54 5
$  "  $  C	$  C66	$  4 5
$  "  $  54 5
$  "  $  C	$  C6	$  54 5
$  "  $  C	$  C666- 1 3 "  U(  C4 5
$  "  $  "  	$  "  45"4 5
$  "  $  "  	$  "  45"b      g  compare
			 g  x1			 g  compare
		Q g  x1		Q g  x2			Q g  key		%	Q g  compare
	Z  g  x1	Z  g  x2		Z  g  x3		Z  g  key		c  g  key	   g  key	   g  compare
 ] g  x1 ] g  x2	 ] g  x3	 ] g  x4	 ] g  key	] g  key	% g  key	Eq g  key	 g  key	W g  key	 g  key	%Q g  compare
f g  x1f g  x2	f g  x3+	f g  xmax	j g  xs	j g  key	} g  key	  !g  filenamef  srfi/srfi-67/compare.scm
						!		%!		Z		[#		c#		{$	 $	 #	 %	 %	 #	 	 '	'	(	%(	=)	E)	z(	{*	*	(	'	+	+	,	,	+	-	%-	W+	[-	]'	f	j/	p0	t2	{2	%}2	}2	2	42	3	2	/	/	/	/	 4				 		Q	 	Z 	  ]	 f	
	  g  nameg  max-compare C;RV 
 h    )   #3 
$  
 66)   3 	
$  54 5	$  "  
$  C$  C6$  54 5	$  "  
$  C$  C66)  3 		
$  4 5	$  "  
$  54 5	$  "  
$  C$  C6$  54 5	$  "  
$  C$  C66$ -4 5	$  g4 5	$  "  
$  C$  54 5	$  "  
$  C$  C66
$  54 5	$  "  
$  C$  C6$  g4 5	$  "  
$  C$  54 5	$  "  
$  C$  C666	$  4 5	$  "  
$  54 5	$  "  
$  C$  C6$  54 5	$  "  
$  C$  C666- 1 3 "  4>  "  -G  "  &45$  45$  "  ""  "45" 644	55	" 
(  e$  "$   $  66"4 
	5	$  &


"Z
$  &


",$  &


"6



""           g  compare
			) g  k			) g  x0				) g  key			) g  compare
	2  g  k	2  g  x0		2  g  x1		2  g  key		7  g  key		J	v g  key	   g  compare
 K g  k K g  x0	 K g  x1	 K g  x2	 K g  key	 K g  key	 l g  key	 ) g  key	:f g  key	} g  key	 g  key	 g  key	 , g  key	= g  key	i g  key	C g  key	  g  key	= g  compare
T g  kT g  x0	T g  x1+	T g  n	 g  k	 g  n	 g  rev	 g  x	 g  pivot		 g  x	
 g  x<	 g  n<	 g  x=	 g  n=	 g  x>	 g  n>	 g  key	-  /g  filenamef  srfi/srfi-67/compare.scm
:		<		<		!=		%>		)>		2:		7@		7@		BA		JA		~@		B	 B	 C	 C	 :	 E	 E	 F	 F	 G	 G	1F	2H	:H	lF	tE	uI	}I	J	J	L	!L	J	I	M	 M	4I	5N	=N	aP	!iP	N	I	E	Q	Q	R	R	Q		S	S	CQ	GT	KT	T:	YW	]W	dW	pV	qV	{V	|V	"V	X	X	X	Y		]	]	$]	]	^	_	a	`	b	 b	c	c	`	d	e	*e	3e	'e	f	'f	h	 h	h	.#h	$i	)i	!-i	-i	;j	>j	-Aj	'Dj	9^j	fi	ik	pk	3sk	-vk	?k	i	l	l	9l	3l	El	i	^	^	#^	3^	C^	Y		Y	\	Y		 }			)	 	2 	  K	 T	
	   C8R     h(      ]4L  5$  	C4L  5$  C
C            g  x
		# g  y		#  g  filenamef  srfi/srfi-67/compare.scm
s		s		s		s	/	s	+ 		#	   C      h8      )   3  O C]4 5$  	C4 5$  C
C           g  lt
			 g  lt
		4 g  x		4 g  y			4  g  filenamef  srfi/srfi-67/compare.scm
r		t		 t		$t	/	0t	+ 			 		4	  g  nameg  compare-by< C&R    h(      ]4L  5$  C4L  5$  	C
C            g  x
		# g  y		#  g  filenamef  srfi/srfi-67/compare.scm
x		x		x		x	.	x	* 		#	   C      h8      )   3  O C]4 5$  C4 5$  	C
C           g  gt
			 g  gt
		4 g  x		4 g  y			4  g  filenamef  srfi/srfi-67/compare.scm
w		y		 y		#y	.	/y	* 			 		4	  g  nameg  compare-by> C*R    h(      ]4L  5$  4L  5$  
C	CC            g  x
		# g  y		#  g  filenamef  srfi/srfi-67/compare.scm
}		}		}		}	,	}	( 		#	   C      h8      )   3  O C]4 5$  4 5$  
C	CC           g  le
			 g  le
		4 g  x		4 g  y			4  g  filenamef  srfi/srfi-67/compare.scm
|		~		 ~		!~	,	-~	( 			 		4	  g  nameg  compare-by<= C'R   h(      ]4L  5$  4L  5$  
CC	C            g  x
		# g  y		#  g  filenamef  srfi/srfi-67/compare.scm
							,		( 		#	   C      h8      )   3  O C]4 5$  4 5$  
CC	C           g  ge
			 g  ge
		4 g  x		4 g  y			4  g  filenamef  srfi/srfi-67/compare.scm
				 		!	,	-	( 			 		4	  g  nameg  compare-by>= C+R   h(      ]4L 5$  
C4L  5$  	CC            g  x
		# g  y		#  g  filenamef  srfi/srfi-67/compare.scm
			"				1		- 		#	   C      h8      )   3  O C]4 5$  
C45$  	CC         g  eq
			 g  lt			 g  eq
		6 g  lt		6 g  x			6 g  y			6  g  filenamef  srfi/srfi-67/compare.scm
			"	"		%	1	1	- 				 		6	  g  nameg  compare-by=/< C(R  h(      ]4L 5$  
C4L  5$  C	C            g  x
		# g  y		#  g  filenamef  srfi/srfi-67/compare.scm
			"				1		- 		#	   C      h8      )   3  O C]4 5$  
C45$  C	C         g  eq
			 g  gt			 g  eq
		6 g  gt		6 g  x			6 g  y			6  g  filenamef  srfi/srfi-67/compare.scm
			"	"		%	1	1	- 				 		6	  g  nameg  compare-by=/> C)R4YEZ] h   -   ]C   %       g  dummy
		  		   C      h   =   ]C   5       g  dummy
		 g  c1		  			   C        h   ]   ]C U       g  dummy
		 g  c1		 g  c2			 g  cs			  			   C 
   hP      ]4 5$  @4 5$  @4 5$  @	 6       g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  srfi/srfi-67/compare.scm
	 		P  g  
macro-typeg  syntax-rulesg  patternsg  c1 g  c1g  c2g  csg  ...   C5ER4YFZ]    h(   _   ]     C  W       g  dummy
		& g  x		& g  y			& g  clause			&  		&	   C       h   K   ]C   C       g  dummy
		 g  x		 g  y			  			   C$-   h   Z   ]CR       g  dummy
		 g  x		 g  y			 g  c			  			   C1>@BDEFHIJ 
   h`   ~   ]       	     C   v       g  dummy
		] g  x		] g  y			] g  t?			] g  c			] g  clause			]  		]	   C   hh   X  ]!4 5$  @4 5$  @4 5$  @4 5$  	@
 6 P      g  x
		g g  tmp		g g  tmp		"	g g  tmp		9	g g  tmp		P	g  g  filenamef  srfi/srfi-67/compare.scm
	 		g  g  
macro-typeg  syntax-rulesg  patternsg  xg  yg  clauseg  ... g  xg  y  g  xg  yg  elseg  cg  ...   g  xg  yg  t?g  cg  ... g  clauseg  ...    C5FR4Y-Z]U       h   -   ]C   %       g  dummy
		  		   CZb h   =   ]C5       g  dummy
		 g  cs		  			   Ceprtuvxyz 	   h@   q   ]      C    i       g  dummy
		< g  tx		< g  ty			< g  cs			< g  clause			<  		<	   C 
       hP     ]4 5$  @4 5$  @4 5$  @	 6      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  srfi/srfi-67/compare.scm
	 		P  g  
macro-typeg  syntax-rulesg  patternsg  elseg  csg  ...  g  txg  ty g  csg  ... g  clauseg  ...   C5-R4Y{Z]a    h(   f   ]    C  ^       g  dummy
		& g  type?		& g  	type-name			& g  x			&  		&	   C_      h    u   ]   C  m       g  dummy
		 g  type?		 g  	type-name			 g  x			 g  y			  			   C    h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-67/compare.scm
	 		9  g  
macro-typeg  syntax-rulesg  patternsg  type?g  	type-nameg  x g  type?g  	type-nameg  xg  y   C5{R4YZ]   h      ]   	
 	      C          g  dummy
		} g  compare		} g  =			} g  <			} g  type?			} g  	type-name			}  		}	   C       h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-67/compare.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  compareg  =g  <g  type?g  	type-name   C5R      hx      ]4 5$  "  445 >  "  G  45$  "  445>  "  G   $  
$  
CC$  	C
C          g  x
		u g  y		u  g  filenamef  srfi/srfi-67/compare.scm

							G		I		`		f		p	 
		u	  g  nameg  boolean-compare CRi         hh      ]4 5$  G &  
C45$  !4L  5$  
C4 5$  	CC45645 6          g  x
		e g  y		e  g  filenamef  srfi/srfi-67/compare.scm

	J
	L	7	N
	P
	[
	]	7	_
	a
 
		e	   C O  $Rii       hh      ]4 5$  G &  
C45$  !4L  5$  
C4L 5$  	CC45645 6          g  x
		e g  y		e  g  filenamef  srfi/srfi-67/compare.scm

	J
	L	@	N
	P
	[
	]	@	_
	a
 
		e	   C O  %Rii  hh      ]4 5$  G &  
C45$  !4L  5$  
C4L 5$  	CC45645 6          g  x
		e g  y		e  g  filenamef  srfi/srfi-67/compare.scm

	J
	L	?	N
	P
	[
	]	?	_
	a
 
		e	   C O  LRii  hh      ]4 5$  G &  
C45$  !4L  5$  
C4L 5$  	CC45645 6          g  x
		e g  y		e  g  filenamef  srfi/srfi-67/compare.scm

	J
	L	H	N
	P
	[
	]	H	_
	a
 
		e	   C O  MRL     hh      ] $  "  445 >  "  G  $  "  445>  "  G  4 5456           g  x
		d g  y		d  g  filenamef  srfi/srfi-67/compare.scm

							?		A		U		\	%	d	 
		d	  g  nameg  symbol-compare CGR   h`      ]4 5$  ? &  
C45$   $  
C $  	CC45645 6          g  x
		] g  y		]  g  filenamef  srfi/srfi-67/compare.scm

	B
	D	3	F
	H
	S
	U	3	W
	Y
 
		]	   C7R    h`      ]4 5$  ? &  
C45$   $  
C $  	CC45645 6          g  x
		] g  y		]  g  filenamef  srfi/srfi-67/compare.scm

	B
	D	5	F
	H
	S
	U	5	W
	Y
 
		]	   CCR    h`      ]4 5$  ? &  
C45$   $  
C $  	CC45645 6          g  x
		] g  y		]  g  filenamef  srfi/srfi-67/compare.scm

	D	-	F
	U	-	W
 		]	   CDRD       h   Y  ]
4 5$  "  445 >  "  G  45$  "  445>  "  G  "  K44 5455	$  	C
$  4	 54	56$  C
64 5$  45$   6"" Q      g  x
	  g  y	  g  key		q   g  filenamef  srfi/srfi-67/compare.scm

							G		I		_		b	$	i	2	q		q	 	$ 	2 	 	 	 	 	 	 	 	 	 	  g  nameg  complex-compare C,R,     hh      ]4 5$  "  445 >  "  G  45$  "  445>  "  G   6             g  x
		b g  y		b  g  filenamef  srfi/srfi-67/compare.scm

							G		I		b	 		b	  g  nameg  number-compare C>R       h      ]L  6    ~       g  x
		 g  y		  g  filenamef  srfi/srfi-67/compare.scm
				
			 			   C       h   ~   ] O C      v       g  compare
		
  g  filenamef  srfi/srfi-67/compare.scm

 		
  g  nameg  pair-compare-car C@R    h      ]L  6    ~       g  x
		 g  y		  g  filenamef  srfi/srfi-67/compare.scm
				
			 			   C       h   ~   ] O C      v       g  compare
		
  g  filenamef  srfi/srfi-67/compare.scm

 		
  g  nameg  pair-compare-cdr CAR?/   h   Z  )   >3 4 5	$  	C
$  
6$  C6)   {3 (  (  
C	C(  C$  G$  =4 5	$  	C
$   6$  C6	C$  C 6] 6       R      g  pair-compare-car
			D g  pair-compare-cdr			D g  x				D g  y				D g  key			D g  compare
	M  g  x	M  g  y		M  g  key		  g  x
   g  y    g  filenamef  srfi/srfi-67/compare.scm
		
 		 	'	 	/	 		 		/	'	2	/	4		< 		M		S		i		m		p		t		u		z	3	}	;				 	3 	; 	 	 	 	 		 	 	 			D	 	M 	   	  g  nameg  pair-compare C?R9/      h     )   3 	4545$  $  
C	C$  C4 45455	$  	C
$   45456$  C6)   3  6)   3  6] 6           g  compare
		  g  x		  g  y			  g  empty?			  g  head			  g  tail			  g  tx-val		  g  ty-val		  g  key		G  g  x
   g  y   g  empty?	   g  head	   g  tail	   g  compare
   g  x   g  y	   g  x
   g  y    g  filenamef  srfi/srfi-67/compare.scm
		
						5		8	"	?	+	G		G		b	"	i	+	w			 	 	 	 	 	 	 		 	   	   	   	  g  nameg  list-compare C9R9:/ 	   h     )   3 
"  P4545	$  	$  
"  9	"  3	$  "  (4545"	"	$  	C
$   6$  C6)   3  6)   3  6] 6           g  compare
		  g  x		  g  y			  g  empty?			  g  head			  g  tail			  g  x			] g  y			] g  tx-val			] g  ty-val				] g  key		i  g  x
   g  y   g  empty?	   g  head	   g  tail	   g  compare
   g  x   g  y	   g  x
   g  y    g  filenamef  srfi/srfi-67/compare.scm
 		#		%		%		$		B&		I&	(	W&		]#		i"	 '	 "	  	 +	  	 -	  	 /	 		 	   	   	   	  g  nameg  list-compare-as-vector C:R7H/        h     )   3 
454545	$  	C
$  \"  Q$  
C4 45455			$  	C	
$  	"	$  C6
"$  C6)   3  6)   3  6] 6          g  compare
		  g  x		  g  y			  g  size			  g  ref			  g  n		  g  m		  g  key		$  g  i		>  g  key			`  g  x
   g  y   g  size	   g  ref	   g  compare
   g  x   g  y	   g  x
   g  y    g  filenamef  srfi/srfi-67/compare.scm
3		
5		5		5		7	
	$6			>8	
	C9		G9		J;	 	M;	)	V;	3	`;	 	`;		y<	.	<	  ;	 8	
 6		 ;	 6		 3	 @	 3	 B	 3	 D	 		 	   	   	   	   CHR7I/ 	    h     )   3 
454545"  W$  64 45455			$  	C	
$  	"	$  C6
")   3  6)   3  6] 6        g  compare
		  g  x		  g  y			  g  size			  g  ref			  g  nx		  g  ny		  g  n		$  g  i		*  g  key			R  g  x
   g  y   g  size	   g  ref	   g  compare
   g  x   g  y	   g  x
   g  y    g  filenamef  srfi/srfi-67/compare.scm
H		
J		J		J		K		$K			*L		/M		3M		;N		<O	!	?O	*	HO	4	RO	!	RO		kP	/	qP	!	yO	 L	 H	 T	 H	 V	 H	 X	 		 	   	   	   	   CIR/$LG>H     h    ] (  (  
C	C(  C $  E$  ;4 5	$  	C
$  
 6$  C6	C$  C4 545$  $   6	C$  C4 5$  45$   6	C45$  C4 5$  45$  	 6	C45$  C $  $  
 6	C$  C4 5$  45$   6	C45$  C $  $  
 6	C$  C 6       g  x
	 g  y	 g  key		4	d g  t?-val		r g  tx	  g  ty	   g  filenamef  srfi/srfi-67/compare.scm
]
	^		*a		/a		2a	&	4a		4^		Ob		Rb	&	Tb		\^	 c	 ^	 d	 ^	 e	 ^	f	^	Ag	E^	ih	o^	yi	i		 		  g  nameg  default-compare C/RvJy       h(   e   ] $  LC $  L C $  MCC]       g  i
		(  g  filenamef  srfi/srfi-67/compare.scm
	 		, 		(   C     h    ]J4L  5	&  "  
&  "  $  "  4L   54L5	&  "  
&  "  $  "  4L 54L 5	&  "  
&  "  $  "  4L  54L 5	&  "  
&  "  $  "  4L  5
$  "  4L >  "  G  
$  "  4L>  "  G  
$  "  4L >  "  G  M $ M4L 5	&  "  
&  "  $  "  4L  5M4L 5	&  "  
&  "  $  "  4L  5M4L5	&  "  
&  "  $  "  4L 5M4L5	&  "  
&  "  $  "  4L 5	
$  "  4L M>  "  G  	
$  "  4LM>  "  G  				

$  ,4L4	L O 
5>  "  G  "   
	"  N 4
	5
$   "  NC        g  x
	 g  y	 g  c-xy			I g  c-xy		R  g  c-xy	   g  c-xy	  g  c-xx	 g  c-yy	 g  c-xy	 g  c-yx	 g  y	 g  c-xy	 g  x	3 g  c-xy	0 g  y	5 g  c-xy	@~ g  x	 g  c-xy	 g  c-xz	} g  c-zx	} g  c-yz	} g  c-zy		} g  ijk	
9q  g  filenamef  srfi/srfi-67/compare.scm
		u		u		v	
	v		!v	
	"v		*v	+	.v		5x	
	9x		Dx	6	Fx	
	Ju		Ru		\v	
	]v		hv	
	iv		qv	+	uv		|x	
 x	 x	6 x	
 u	 u	 v	
 v	 v	
 v	 v	+ v	 x	
 x	 x	6 x	
 u	 u	 v	
 v	 v	
 v	 v	+v	
x	
x	x	6x	
	)	.	3	7	@	K	P	U	Y	b	o	p	u	z	~				u	u	v	
v	v	
v	v	+v	x	
x	x	6x	
	u	u	v	
v	v	
	v	v	+v	x	
 x	+x	6-x	
5	8u	@u	Jv	
Kv	Vv	
Wv	_v	+cv	jx	
nx	yx	6{x	
	u	u	v	
v	v	
v	v	+v	x	
x	x	6x	
														'~	.	//	'4	:5	'9	9	>	B	C	I	L	b		{	{			 		   C      h      ]HH O C           g  c
		 g  z?		 g  z			  g  filenamef  srfi/srfi-67/compare.scm
r
		 		  g  nameg  debug-compare C.RC             g  m
		0 g  char=?
             g  	char-ci=?
            A g  	char-ci<?            A g  string=?
      N       g  string<?      N       g  string-ci=?
             g  string-ci<?              g  filenamef  srfi/srfi-67.scm		
	1	U
	6	U		>	U	&	C	U
g  filenamef  srfi/srfi-67/compare.scm	T
 
 
 
 
!T 
$ 
+y 
0" 
4 
9s 
>! 
B 
Gr 
L 
Q 
UF 
X 
\x 
` 
g 
o
w
      8
      q
      av
      B{
      "
      #
      #
      
      
      
      N
      
      @
      o
      
      
      
      V
      
      
      5
      
      |
      <1
      F
      4]
      /r
 9	      1
   C6                                                                                                                                        ccache/srfi/srfi-41.go                                                                              0000644                 00000304156 15154557173 0010457 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0V     ] 4        hE      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-41	 		g  filenameS	
f  srfi/srfi-41.scm	g  importsS	g  srfi-1	 	 	g  srfi-8	 	 	g  srfi-9	 	 	g  gnu	 	 	g  srfi-26	 	 	g  ice-9	g  match	 	 	 	 g  exportsS	!g  stream-null	"g  stream-cons	#g  stream?	$g  stream-null?	%g  stream-pair?	&g  
stream-car	'g  
stream-cdr	(g  stream-lambda	)g  define-stream	*g  list->stream	+g  port->stream	,g  stream	-g  stream->list	.g  stream-append	/g  stream-concat	0g  stream-constant	1g  stream-drop	2g  stream-drop-while	3g  stream-filter	4g  stream-fold	5g  stream-for-each	6g  stream-from	7g  stream-iterate	8g  stream-length	9g  
stream-let	:g  
stream-map	;g  stream-match	<g  	stream-of	=g  stream-range	>g  
stream-ref	?g  stream-reverse	@g  stream-scan	Ag  stream-take	Bg  stream-take-while	Cg  stream-unfold	Dg  stream-unfolds	Eg  
stream-zip	F!"#$%&'()*+,-./0123456789:;<=>?@ABCDE %	Gg  set-current-module	HG 	IG 	Jg  cond-expand-provide	Kg  current-module	L 	Mg  make-syntax-transformer	NM 	OM 	Pg  must	Qg  macro	Rg  $sc-dispatch	SR 	TR 	Ug  any	Vg  each-any	WUV	XUW	YUX	ZUY	[UZ	\g  syntax-object	]g  let	^g  top	_^ 	`g  ribcage	ag  dummy	bg  pred	cg  obj	dg  func	eg  msg	fg  args	gabcdef 	hg  m-46961e513a-1	ih^ 	ji_____ 	kf  l-46961e513a-6	lf  l-46961e513a-7	mf  l-46961e513a-8	nf  l-46961e513a-9	of  l-46961e513a-a	pf  l-46961e513a-b	qklmnop 	r`gjq 	s` 	tg  x	ut 	vi 	wf  l-46961e513a-3	xw 	y`uvx 	z_rsy 	{g  hygiene	|{ 	}\]z| 	~g  item	\~z|  g  unless \z|    g  throw \z|  g  quote \z|  g  wrong-type-arg \z|    g  list \z|      g  syntax-violation     f  -source expression failed to match any pattern g  must-not g  m-46961e513a-14 ^  _____  f  l-46961e513a-19 f  l-46961e513a-1a f  l-46961e513a-1b f  l-46961e513a-1c f  l-46961e513a-1d f  l-46961e513a-1e   `g    f  l-46961e513a-16   `u  _s  \]|  \~|  g  when \|    \|  \|  \|    \|      g  
must-every g  objs abdef  g  m-46961e513a-27 ^  _____  f  l-46961e513a-2c f  l-46961e513a-2d f  l-46961e513a-2e f  l-46961e513a-2f f  l-46961e513a-30 f  l-46961e513a-31   `    f  l-46961e513a-29   `u  _s  \]|  g  flunk \|  g  remove \|  \|  g  null? \|    \|  \|  \|    \|    g  first-value UU  g  receive g  expr a  g  m-46961e513a-3a ^  _  f  l-46961e513a-3f f  l-46961e513a-40   `    f  l-46961e513a-3c   `u  _s  \|  g  first \|  g  _ \|  挤   g  second-value g  m-46961e513a-44 ^  _  f  l-46961e513a-49 f  l-46961e513a-4a   `    f  l-46961e513a-46   `u  _s  \|  \|  g  second \|  \|      g  third-value g  m-46961e513a-4e ^  _ f  l-46961e513a-53f  l-46961e513a-54 `   f  l-46961e513a-50 	`u 
_s	 \
| \
| \
| g  third\
| \
|  g  define-syntax*UUVUg  define-syntaxg  nameg  bodyaf g  m-46961e513a-57^ ___  f  l-46961e513a-5c!f  l-46961e513a-5d"f  l-46961e513a-5e#f  l-46961e513a-5f$ !"# %`$ & 'f  l-46961e513a-59(' )`u&( *_%s) +\*| ,g  lambda*-\,*| .UUU /g  syntax0a/ 1__ 2f  l-46961e513a-663f  l-46961e513a-674f  l-46961e513a-685234 6`015 7_6s) 8\7| 9g  stream-promise:g  %make-stream-promise-procedure;g  make-stream-promise<U =g  lambda>g  m-46961e513a-70?>^ @g  t-46961e513a-6fA@ B? Cf  l-46961e513a-75DC E`ABD Ff  l-46961e513a-72GF H`uBG Ig  shiftJg  	proc-nameKJf L__ Mf  l-1e8ba8b5a-2baNf  l-1e8ba8b5a-2bbOMN P`KLO Qg  keyRg  valueSg  formalsTQRS U_____ Vf  l-1e8ba8b5a-2adWf  l-1e8ba8b5a-2aeXf  l-1e8ba8b5a-2afYf  l-1e8ba8b5a-2b0Zf  l-1e8ba8b5a-2b1[VWXYZ \`TU[ ]g  make-procedure-name^] __ `f  l-1e8ba8b5a-29da` b`^_a c_ df  l-1e8ba8b5a-29ced f`uce g?EsHIssssP\bf h{ i\=gh jg  valk_EsH l\jk| ml ng  make-structog  m-46961e513a-6dpo^ qg  t-1e8ba8b5a-38drg  t-1e8ba8b5a-38csg  t-1e8ba8b5a-38btqrs ug  m-1e8ba8b5a-38evu^ wvvv xf  l-1e8ba8b5a-392yf  l-1e8ba8b5a-393zf  l-1e8ba8b5a-394{xyz |`tw{ }g  	ctor-args~} f  l-1e8ba8b5a-37a `~c g  ctorg  field f  l-1e8ba8b5a-376f  l-1e8ba8b5a-377 `L g  formg  	type-nameg  constructor-specg  field-names ____ f  l-1e8ba8b5a-36bf  l-1e8ba8b5a-36cf  l-1e8ba8b5a-36df  l-1e8ba8b5a-36e ` g  record-layoutg  functional-settersg  settersg  copierg  gettersg  constructorg  getter-identifiersg  field-identifiers ________ f  l-1e8ba8b5a-343f  l-1e8ba8b5a-341f  l-1e8ba8b5a-33ff  l-1e8ba8b5a-33df  l-1e8ba8b5a-33bf  l-1e8ba8b5a-339f  l-1e8ba8b5a-337f  l-1e8ba8b5a-335 ` f  l-1e8ba8b5a-334 `uc pEsHIs|ssss \nh \9k| \
h l im V  f  Wrong number of argumentsg  identifier?  _sH \:| g  record-type-vtable  g  pwg  default-record-printer  j g  set-struct-vtable-name!  g  vtable-offset-user  g  %stream-promise?-procedureg  stream-promise?g  m-46961e513a-7d^ g  t-46961e513a-7c  f  l-46961e513a-82 ` f  l-46961e513a-7f `u sIssssP\bf \=h g  t-1e8ba8b5a-47eg  t-1e8ba8b5a-478g  t-1e8ba8b5a-479g  t-1e8ba8b5a-47ag  t-1e8ba8b5a-47dg  t-1e8ba8b5a-47cg  t-1e8ba8b5a-47b g  m-1e8ba8b5a-47f^  f  l-1e8ba8b5a-483f  l-1e8ba8b5a-484f  l-1e8ba8b5a-485f  l-1e8ba8b5a-486f  l-1e8ba8b5a-487f  l-1e8ba8b5a-488f  l-1e8ba8b5a-489 ` g  	copier-id f  l-1e8ba8b5a-476 `c g  	ctor-name f  l-1e8ba8b5a-46e `c  f  l-1e8ba8b5a-46c `c g  layout f  l-1e8ba8b5a-46a `c g  
immutable?  f  l-1e8ba8b5a-468 ` c g  field-count f  l-1e8ba8b5a-466 `c 	g  
getter-ids
	 f  l-1e8ba8b5a-463 `
c g  	field-ids f  l-1e8ba8b5a-460 `c g  predicate-nameg  
field-spec ______ f  l-1e8ba8b5a-453f  l-1e8ba8b5a-454f  l-1e8ba8b5a-455f  l-1e8ba8b5a-456f  l-1e8ba8b5a-457f  l-1e8ba8b5a-458 ` psIssssssssssss  \ch !  "g  and#\"h $g  struct?%\$h &%  'g  eq?(\'h )g  struct-vtable*\)h +*  ,_s -\9,| .(+- /#&. 0!/ 1_s 2\1| 3g  throw-bad-struct43 53 6g  stream-promise-val7g  %stream-promise-val-procedure8g  free-id9g  
%%on-error:g  m-46961e513a-89;:^ <; =f  l-46961e513a-8b>= ?`u<> @;s?IssssP\bf A\9@h B8A CBU Dg  %%typeEg  t-1e8ba8b5a-3a5Fg  t-1e8ba8b5a-3a6Gg  t-1e8ba8b5a-3a7Hg  t-1e8ba8b5a-3a8Ig  t-1e8ba8b5a-3a9Jg  t-1e8ba8b5a-3aaKg  t-1e8ba8b5a-3abLEFGHIJK Mg  m-1e8ba8b5a-3acNM^ ONNNNNNN Pf  l-1e8ba8b5a-3b0Qf  l-1e8ba8b5a-3b1Rf  l-1e8ba8b5a-3b2Sf  l-1e8ba8b5a-3b3Tf  l-1e8ba8b5a-3b4Uf  l-1e8ba8b5a-3b5Vf  l-1e8ba8b5a-3b6WPQRSTUV X`LOW Yg  getterZg  index[YZ \f  l-1e8ba8b5a-3a3]f  l-1e8ba8b5a-3a4^\] _`[L^ `	 a___ bf  l-1e8ba8b5a-39ecf  l-1e8ba8b5a-39fdf  l-1e8ba8b5a-3a0ebcd f``ae gps?IsXsss_sf h\Dgh i8h jCiU kg  cklg  errmg  snlm o;; pf  l-46961e513a-8eqf  l-46961e513a-8frpq s`nor t;ss?IssssP\bf u\kth v\th w_ss? x\9w| yvx zy {g  %%index|\{gh }8| ~C}U f  l-46961e513a-93f  l-46961e513a-94 `no ;s?IssssP\bf \kh \h s? \
|   g  %%copier\gh 8 CU f  l-46961e513a-98f  l-46961e513a-99 `no ;s?IssssP\bf \kh \h g  %%stream-promise-set-fields_s? \|   g  t-46961e513a-88 f  l-46961e513a-9d `< ;s?IssssP\bf \=h ps?IsXsss_sf \mh  g  if\h \'h \)h  _s? \9|  g  
struct-ref\h s? \
|  \3h \h \6|     _s? \7| g  each UUUg  %%set-fieldsg  check?amY g  m-46961e513a-a4^ pppp f  l-46961e513a-a9f  l-46961e513a-aaf  l-46961e513a-abf  l-46961e513a-acf  l-46961e513a-ad `  f  l-46961e513a-a6 `u g  t-1e8ba8b5a-3c4g  t-1e8ba8b5a-3c6g  t-1e8ba8b5a-3c5 g  m-1e8ba8b5a-3c7^  f  l-1e8ba8b5a-3cbf  l-1e8ba8b5a-3ccf  l-1e8ba8b5a-3cd ` f  l-1e8ba8b5a-3c1f  l-1e8ba8b5a-3c2f  l-1e8ba8b5a-3c3 ``a psIssss \h _s \9| \6|  g  map  g  stream-promise-val-set!g  "%stream-promise-val-set!-procedureUU g  m-46961e513a-b8^ g  t-46961e513a-b6g  t-46961e513a-b7  f  l-46961e513a-bdf  l-46961e513a-be `  f  l-46961e513a-ba `u sIssssP\bf \=h g  t-1e8ba8b5a-3e6g  t-1e8ba8b5a-3e7  g  m-1e8ba8b5a-3e8 ^  f  l-1e8ba8b5a-3ecf  l-1e8ba8b5a-3ed ` g  setterY 	f  l-1e8ba8b5a-3e0
f  l-1e8ba8b5a-3e1f  l-1e8ba8b5a-3e2	
 `a Z f  l-1e8ba8b5a-3d7f  l-1e8ba8b5a-3d8 `L g  field-specs f  l-1e8ba8b5a-3d3f  l-1e8ba8b5a-3d4 `L psIsss \mh \jh  \h \'h \)h   !_s "\9!| # " $g  struct-set!%\$h &s '\
&| (%' )\3h *\h +\!| ,*+ -), .#(- /. 0_s 1\0| 2g  stream-value3g  %make-stream-value-procedure4g  make-stream-value5g  m-46961e513a-d965^ 7g  t-46961e513a-d78g  t-46961e513a-d8978 :66 ;f  l-46961e513a-de<f  l-46961e513a-df=;< >`9:= ?6 @f  l-46961e513a-dbA@ B`u?A C6>sBIssssP\bf D\=Ch Eg  tagF_>sB G\EF| Hg  procI\HF| JGI Kg  m-46961e513a-d5LK^ ML>sBIs|ssss N\nMh O\2F| P\
Mh QNOPGI RDJQ S_sB T\3S| Ug  pwpwVEH Wg  %stream-value?-procedureXg  stream-value?Yg  m-46961e513a-e8ZY^ [g  t-46961e513a-e7\[ ]Z ^f  l-46961e513a-ed_^ ``\]_ af  l-46961e513a-eaba c`u]b dZ`scIssssP\bf e\=dh fL`scIssssssssssss g\cfh hg i\"fh j\$fh kjg l\'fh m\)fh nmg o_`sc p\2o| qlnp rikq sehr t_sc u\Wt| vg  stream-value-tagwg  %stream-value-tag-procedurexg  m-46961e513a-f4yx^ zy {f  l-46961e513a-f6|{ }`uz| ~ys}IssssP\bf \9~h 8 U Ls}IsXsss_sf \Dh 8 U yy f  l-46961e513a-f9f  l-46961e513a-fa `n ys}IssssP\bf \kh \h _s} \2|   \{h 8 U f  l-46961e513a-fef  l-46961e513a-ff `n ys}IssssP\bf \kh \h s} \
|   \h 8 U f  l-46961e513a-103f  l-46961e513a-104 `n ys}IssssP\bf \kh \h g  %%stream-value-set-fields_s} \|   g  t-46961e513a-f3 f  l-46961e513a-108 `z ys}IssssP\bf \=h Ls}IsXsss_sf \mh  \h \'h \)h  _s} \2|  \h s} \
|  \3h \h \v|     _s} \w| g  stream-value-procg  %stream-value-proc-procedureg  m-46961e513a-10f^  f  l-46961e513a-111 `u sIssssP\bf \9h 8 U LsIsXsss_sf \Dh 8 U  f  l-46961e513a-114f  l-46961e513a-115 `n sIssssP\bf \kh \h _s \2|   \{h 8 U f  l-46961e513a-119f  l-46961e513a-11a `n sIssssP\bf \kh \h s \|   \h 8 U f  l-46961e513a-11ef  l-46961e513a-11f `n sIssssP\bf \kh  \h _s \|    g  t-46961e513a-10e f  l-46961e513a-123 	` 
	sIssssP\bf \=
h L	sIsXsss_sf \mh  \h \'h \)h  _	s \2|  \h 	s \|  \3h \h \|      !_s "\!| #g  m-46961e513a-12a$#^ %$LLLL &f  l-46961e513a-12f'f  l-46961e513a-130(f  l-46961e513a-131)f  l-46961e513a-132*f  l-46961e513a-133+&'()* ,`%+ -$ .f  l-46961e513a-12c/. 0`u-/ 1L,s0Issss 2\1h 3_,s0 4\23| 5\v3| 6\3| 756 8g  stream-value-tag-set!9g   %stream-value-tag-set!-procedure:g  m-46961e513a-13e;:^ <g  t-46961e513a-13c=g  t-46961e513a-13d><= ?;; @f  l-46961e513a-143Af  l-46961e513a-144B@A C`>?B D; Ef  l-46961e513a-140FE G`uDF H;CsGIssssP\bf I\=Hh JLCsGIsss K\mJh L\jJh MKL N\Jh O\'Jh P\)Jh QPK R_CsG S\2R| TOQS U\$Jh VCsG W\
V| XUKWL Y\3Jh Z\Jh [\8R| \Z[ ]YK\ ^NTX] _IM^ `_sG a\9`| bg  stream-value-proc-set!cg  !%stream-value-proc-set!-proceduredg  m-46961e513a-14eed^ fg  t-46961e513a-14cgg  t-46961e513a-14dhfg iee jf  l-46961e513a-153kf  l-46961e513a-154ljk m`hil ne of  l-46961e513a-150po q`unp remsqIssssP\bf s\=rh tLmsqIsss u\mth v\jth wuv x\th y\'th z\)th {zu |_msq }\2|| ~y{} \$th msq \| uv \3th \th \b||  u x~ sw _sq \c| g  stream-lazyg  expa g  m-46961e513a-173^ _ f  l-46961e513a-178f  l-46961e513a-179 `  f  l-46961e513a-175 `u _s \;| \4| \| g  lazy\|  \=| g  eagerg  stream-eagerg  stream-delayg  m-46961e513a-187^ _ f  l-46961e513a-18cf  l-46961e513a-18d `  f  l-46961e513a-189 `u _s \| \| g  stream-forceg  nullg  %stream-nullg  stream-pareg  %make-stream-pare-procedureg  make-stream-pareg  m-46961e513a-1d9^ g  t-46961e513a-1d7g  t-46961e513a-1d8  f  l-46961e513a-1def  l-46961e513a-1df `  f  l-46961e513a-1db `u sIssssP\bf \=h g  kar_s \| g  kdr\|  g  m-46961e513a-1d5^ sIs|ssss \nh \| \
h   _s \|  g  %stream-pare?-procedureg  stream-pare?g  m-46961e513a-1e8^ g  t-46961e513a-1e7  f  l-46961e513a-1ed ` f  l-46961e513a-1ea `u sIssssP\bf \=h sIssssssssssss \ch  \"h \$h  \'h \)h  _s \|    _s \| g  
stream-karg  %stream-kar-procedureg  m-46961e513a-1f4^  f  l-46961e513a-1f6  `u s IssssP\bf \9h 8 U s IsXsss_sf \Dh 8 U 	 
f  l-46961e513a-1f9f  l-46961e513a-1fa
 `n	 s IssssP\bf \kh \h _s  \|   \{h 8 U f  l-46961e513a-1fef  l-46961e513a-1ff `n	 s IssssP\bf \kh \h s   \
| !  "! #\h $8# %$U &f  l-46961e513a-203'f  l-46961e513a-204(&' )`n	( *)s IssssP\bf +\k*h ,\*h -g  %%stream-pare-set-fields._)s  /\-.| 0,/ 10 2g  t-46961e513a-1f332 4f  l-46961e513a-20854 6`35 76s IssssP\bf 8\=7h 96s IsXsss_sf :\m9h ;: <\9h =\'9h >\)9h ?>: @_6s  A\@| B=?A C\9h D6s  E\
D| FC:E G\39h H\9h I\@| JHI KG:J L<BFK M8;L N_s  O\N| Pg  
stream-kdrQg  %stream-kdr-procedureRg  m-46961e513a-20fSR^ TS Uf  l-46961e513a-211VU W`uTV XSsWIssssP\bf Y\9Xh Z8Y [ZU \sWIsXsss_sf ]\D\h ^8] _[^U `SS af  l-46961e513a-214bf  l-46961e513a-215cab d`n`c eSdsWIssssP\bf f\keh g\eh h_dsW i\h| jgi kj l\{\h m8l n[mU of  l-46961e513a-219pf  l-46961e513a-21aqop r`n`q sSrsWIssssP\bf t\ksh u\sh vrsW w\v| xuw yx z\\h {8z |[{U }f  l-46961e513a-21e~f  l-46961e513a-21f}~ `n` SsWIssssP\bf \kh \h _sW \-|   g  t-46961e513a-20e f  l-46961e513a-223 `T SsWIssssP\bf \=h sWIsXsss_sf \mh  \h \'h \)h  _sW \|  \h sW \|  \3h \h \P|     _sW \Q| g  m-46961e513a-22a^  f  l-46961e513a-22ff  l-46961e513a-230f  l-46961e513a-231f  l-46961e513a-232f  l-46961e513a-233 `  f  l-46961e513a-22c `u sIssss \h _s \| \| \P|  g  strmac g  m-46961e513a-259^ __ f  l-46961e513a-25ef  l-46961e513a-25ff  l-46961e513a-260 `  f  l-46961e513a-25b `u _s \| \| \| \| f  
non-streamf  null streamg  body0g  body1aS g  m-46961e513a-28d^ ___ f  l-46961e513a-292f  l-46961e513a-293f  l-46961e513a-294f  l-46961e513a-295 `  f  l-46961e513a-28f `u _s \=| \| g  begin\| g  on-eagerSg  on-lazyS	 g  stream-promise-visitg  set-record-type-printer!g  displayf  #<streamg  
write-charg  writef   ...>WUg  defineg  formala g  m-46961e513a-2cf^ ____ f  l-46961e513a-2d4f  l-46961e513a-2d5f  l-46961e513a-2d6f  l-46961e513a-2d7f  l-46961e513a-2d8 `   f  l-46961e513a-2d1 `u  _s \| \(| WU	U
g  letrecg  body2aEj g  m-46961e513a-2e0^ _____ f  l-46961e513a-2e5f  l-46961e513a-2e6f  l-46961e513a-2e7f  l-46961e513a-2e8f  l-46961e513a-2e9f  l-46961e513a-2ea `  f  l-46961e513a-2e2 `u _s \
| \(| g  proper-list? g  circular-list?!f  non-list argument"g  current-input-port#g  input-port?$f  non-input-port argument%g  	read-char&g  eof-object?'U (a )g  m-46961e513a-359*)^ +* ,f  l-46961e513a-35e-, .`(+- /f  l-46961e513a-35b0/ 1`u+0 2_.s1 3\!2| 4g  y5at4 6*__ 7f  l-46961e513a-3618f  l-46961e513a-3629f  l-46961e513a-363:789 ;`56: <_;s1 =\"<| >\,<| ?g  % stream-fold-aux-procedure@g  stream-fold-auxAUUUU Bg  syntax-parameterizeCg  m-46961e513a-36cDC^ Eg  t-46961e513a-368Fg  t-46961e513a-369Gg  t-46961e513a-36aHg  t-46961e513a-36bIEFGH JDDDD Kf  l-46961e513a-371Lf  l-46961e513a-372Mf  l-46961e513a-373Nf  l-46961e513a-374OKLMN P`IJO QD Rf  l-46961e513a-36eSR T`uQS Uf  l-bde397a-1eafVf  l-bde397a-1eb0WUV X`KLW YS Zf  l-bde397a-1ea6[f  l-bde397a-1ea7\f  l-bde397a-1ea8]Z[\ ^`Ya] _g  prefix`]_ a__ bf  l-bde397a-1e9acf  l-bde397a-1e98dbc e``ad ff  l-bde397a-1e97gf h`ucg iDPsTIssssX^eh j{ k\Bij l_PsT m\@l| ng  identifier-syntaxo\nij p\?l| qop rmq sr t\=ij u\Hl| vg  basew\vl| x\l| yg  limitz\yl| {uwxz |g  do}\|l| ~\jl| \"l| \&l| x u~ u ~w \'l| x xx g  1-\l| z z zz  g  or\l| g  zero?\l| z z \$l| x  g  values\l| ~xz  } t{ ks   _sT \?| f  non-stream argumentg  integer?f  non-integer countg  exact?f  inexact countf  negative countg  reverse!g  xconsf  !non-stream object in input streamg  circular-listg  	stream-doU WVf  l-46961e513a-478 `uc g  var-stepg  end f  l-46961e513a-475f  l-46961e513a-473 `a f  l-46961e513a-472 `uc _s \| \|  g  result f  l-46961e513a-47f `c _s \| f  bad step expressionUV g  step f  l-46961e513a-49cf  l-46961e513a-49d `L g  varg  initg  test f  l-46961e513a-48df  l-46961e513a-48ef  l-46961e513a-48ff  l-46961e513a-490f  l-46961e513a-491f  l-46961e513a-492 ` _s \9| g  loop\| \| \| g  append  f  non-integer argumentf  inexact argumentf  negative argumentg  
procedure?f  non-procedural argumentg  applyg  number?f  non-numeric starting numberf  non-numeric step sizeg  ?f  l-46961e513a-6c1 `uc g  make-guardedg  make-matcher f  l-46961e513a-6bef  l-46961e513a-6bc `a f  l-46961e513a-6bb `uc _s \|  \$|   g  next f  l-46961e513a-6d4 `c g  rest 	f  l-46961e513a-6ce
f  l-46961e513a-6cf	
 `L _ss \| g  negate\| \$|  g  =\| \&| \'|  Ug  generate-temporaries' U g  guardg  fail  f  l-46961e513a-6df!f  l-46961e513a-6e0"f  l-46961e513a-6e1# !" $`a# %t &f  l-46961e513a-6d8'f  l-46961e513a-6d9(&' )`%L( *_$s) +\*| ,VV -g  matcher.- /f  l-46961e513a-6f50f  l-46961e513a-6f61/0 2`.L1 3 4f  l-46961e513a-6f054 6`3c5 7g  	strm-expr8g  pat978 :f  l-46961e513a-6e7;f  l-46961e513a-6e8<f  l-46961e513a-6e9=:;< >`9a= ?_s2ss6> 	@\]?| A\?| B\P?| C\#?| D\?| E\;?| FDE G\?| HBCAFG I\?| Jg  =>K\J?| Lg  stream-of-auxMa Ng  m-46961e513a-701ON^ PO__ Qf  l-46961e513a-706Rf  l-46961e513a-707Sf  l-46961e513a-708TQRS U`MPT VO Wf  l-46961e513a-703XW Y`uVX Z_UsY [\LZ| \\!Z| ]av ^g  m-46961e513a-70d_^^ `___ af  l-46961e513a-712bf  l-46961e513a-713cf  l-46961e513a-714dabc e`]`d f_ gf  l-46961e513a-70fhg i`ufh j_esi k\"j| lg  inm_si n\lm| o8n pUoU qpVrUqsUrtUsuav, v______ wf  l-46961e513a-719xf  l-46961e513a-71ayf  l-46961e513a-71bzf  l-46961e513a-71c{f  l-46961e513a-71d|f  l-46961e513a-71e}wxyz{| ~`uv} _~si \9| g  recur\| \| \| \$|  \]| \&|   \L| \'|   g  is\m| 8 UU VUUUav f  l-46961e513a-727f  l-46961e513a-728f  l-46961e513a-729f  l-46961e513a-72af  l-46961e513a-72bf  l-46961e513a-72c `v _si \]| \L| g  pred?av _____ f  l-46961e513a-735f  l-46961e513a-736f  l-46961e513a-737f  l-46961e513a-738f  l-46961e513a-739 ` _si \| \L| f  non-numeric ending numberg  <g  >f  beyond end of streamf  non-procedural mapperf  non-procedural pred?f  non-procedural generatorg  list->vectorg  error  f  no matching patterng  list-tabulateg  vector-lengthC 5      h    ]4	
 F5 4I >  "  G   4Ji4Ki5 L>  "  G  4OPQT[} 	h0      ]    C}       g  dummy
		0 g  pred		0 g  obj			0 g  func			0 g  msg			0 g  args			0  		0	   C    h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-41.scm
	.
 		"  g  
macro-typeg  syntax-rulesg  patternsg  predg  objg  funcg  msgg  argsg  ...   C5PR4OQT[ 	  h0      ]    C}       g  dummy
		0 g  pred		0 g  obj			0 g  func			0 g  msg			0 g  args			0  		0	   C    h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-41.scm
	3
 		"  g  
macro-typeg  syntax-rulesg  patternsg  predg  objg  funcg  msgg  argsg  ...   C5R4OQT[ 
h8      ]   	  C    ~       g  dummy
		4 g  pred		4 g  objs			4 g  func			4 g  msg			4 g  args			4  		4	   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-41.scm
	8
 		"  g  
macro-typeg  syntax-rulesg  patternsg  predg  objsg  funcg  msgg  argsg  ...   C5R4OQT    h   ?   ]C  7       g  dummy
		 g  expr		  			   C  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-41.scm
	=
 		"  g  
macro-typeg  syntax-rulesg  patternsg  expr   C5R4OQT  h   ?   ]C  7       g  dummy
		 g  expr		  			   C  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-41.scm
	A
 		"  g  
macro-typeg  syntax-rulesg  patternsg  expr   C5R4OQT       h   ?   ]C  7       g  dummy
		 g  expr		  			   C  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-41.scm
	E
 		"  g  
macro-typeg  syntax-rulesg  patternsg  expr   C5R4OQT+-        h   c   ] C      [       g  dummy
		 g  name		 g  args			 g  body			  			   C.8   h   S   ] C    K       g  dummy
		 g  name		 g  syntax			  			   C      h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-41.scm
	J	 		9  g  
macro-typeg  syntax-rulesg  patternsg  nameg  argsg  bodyg  ... g  nameg  syntax   C5R9 h      ]  C      w       g  val
		
  g  filenamef  srfi/srfi-41.scm
	q
 		
  g  nameg  %make-stream-promise-procedure C:R4O;QT<        h   7   ]  C      /       g  t-46961e513a-6f
		
  		
   C; h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-41.scm		q
 		   C    h   C   ] L 6;       g  filenamef  srfi/srfi-41.scm		q
 		
   C      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-41.scm
	q
 		n   C5;R9¨  4 9>  "  G   	Ȗ:i  9R9     h   {   ] $   CC      s       g  obj
		  g  filenamef  srfi/srfi-41.scm
	q
 		  g  nameg  %stream-promise?-procedure CR4OQT<0    h   7   ]  C      /       g  t-46961e513a-7c
		
  		
   C h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-41.scm		q
 		   C    h   C   ] L 6;       g  filenamef  srfi/srfi-41.scm		q
 		
   C2      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-41.scm
	q
 		n   C5R956 h   |   ] &   
C 6t       g  s
		  g  filenamef  srfi/srfi-41.scm
	q
 		  g  nameg  %stream-promise-val-procedure C7R4O6QTjuz        h   :   ]C     2       g  err
		 g  s		  			   C~ h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C<    h   7   ]  C      /       g  t-46961e513a-88
		
  		
   C6 h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-41.scm		q
 		   C    h   C   ] L 6;       g  filenamef  srfi/srfi-41.scm		q
 		
   C      h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-41.scm
	q
 	    C56R4OQT  h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-41.scm
	q
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R95       h       ] &   
C 6             g  s
		 g  val		  g  filenamef  srfi/srfi-41.scm
	q
 			  g  nameg  "%stream-promise-val-set!-procedure CR4OQT/     h   T   ]  C    L       g  t-46961e513a-b6
		 g  t-46961e513a-b7		  			   C    h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-41.scm		q
 		   C    h   C   ] L 6;       g  filenamef  srfi/srfi-41.scm		q
 		
   C1      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-41.scm
	q
 		n   C5R2       h      ]  C           g  tag
		 g  proc		  g  filenamef  srfi/srfi-41.scm
	t
 			  g  nameg  %make-stream-value-procedure C3R4O4QTR        h   T   ]  C    L       g  t-46961e513a-d7
		 g  t-46961e513a-d8		  			   C4    h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-41.scm		t
 		   C    h   C   ] L 6;       g  filenamef  srfi/srfi-41.scm		t
 		
   CT      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-41.scm
	t
 		n   C54RU2V  4 2>  "  G   	Ȗ3i  2R2     h   y   ] $   CC      q       g  obj
		  g  filenamef  srfi/srfi-41.scm
	t
 		  g  nameg  %stream-value?-procedure CWR4OXQT<s      h   7   ]  C      /       g  t-46961e513a-e7
		
  		
   CX h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-41.scm		t
 		   C    h   C   ] L 6;       g  filenamef  srfi/srfi-41.scm		t
 		
   Cu      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-41.scm
	t
 		n   C5XR25v h   z   ] &   
C 6r       g  s
		  g  filenamef  srfi/srfi-41.scm
	t
 		  g  nameg  %stream-value-tag-procedure CwR4OvQT  h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C<    h   7   ]  C      /       g  t-46961e513a-f3
		
  		
   Cv h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-41.scm		t
 		   C    h   C   ] L 6;       g  filenamef  srfi/srfi-41.scm		t
 		
   C      h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-41.scm
	t
 	    C5vR25     h   {   ] &   C 6s       g  s
		  g  filenamef  srfi/srfi-41.scm
	t
 		  g  nameg  %stream-value-proc-procedure CR4OQT h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C<     h   8   ]  C      0       g  t-46961e513a-10e
		
  		
   C        h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-41.scm		t
 		   C    h   C   ] L 6;       g  filenamef  srfi/srfi-41.scm		t
 		
   C"      h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-41.scm
	t
 	    C5R4OQT247  h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-41.scm
	t
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R258       h       ] &   
C 6             g  s
		 g  val		  g  filenamef  srfi/srfi-41.scm
	t
 			  g  nameg   %stream-value-tag-set!-procedure C9R4O8QT_       h   V   ]  C    N       g  t-46961e513a-13c
		 g  t-46961e513a-13d		  			   C8  h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-41.scm		t
 		   C    h   C   ] L 6;       g  filenamef  srfi/srfi-41.scm		t
 		
   Ca      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-41.scm
	t
 		n   C58R25b h       ] &   C 6             g  s
		 g  val		  g  filenamef  srfi/srfi-41.scm
	t
 			  g  nameg  !%stream-value-proc-set!-procedure CcR4ObQT      h   V   ]  C    N       g  t-46961e513a-14c
		 g  t-46961e513a-14d		  			   Cb  h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-41.scm		t
 		   C    h   C   ] L 6;       g  filenamef  srfi/srfi-41.scm		t
 		
   C      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-41.scm
	t
 		n   C5bR4OQT h   >   ]   C 6       g  dummy
		 g  exp		  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-41.scm
	x
 		"  g  
macro-typeg  syntax-rulesg  patternsg  exp   C5R29   h      ]	   C          g  x
		 g  val		  g  filenamef  srfi/srfi-41.scm
	{
		|	*		|			|	 		  g  nameg  stream-eager CR4OQT  h   >   ]  C 6       g  dummy
		 g  exp		  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-41.scm
	~
 		"  g  
macro-typeg  syntax-rulesg  patternsg  exp   C5R9562v8b        h    ]) &   
"  	4 5&  
"  	45$  &  C6$ Y4&  "  	455  &   
"  	4 5&  
"  	45&  "  &  
"  	45&  
"  	45&  
"  4	>  "  G  &  
"  	45&  "  	45&  "  4
>  "  G  &  
"  4>  "  G   6C         g  promise
	 g  content	 g  key		8 g  promise*		 g  content	  g  s	   g  val	 ' g  s	A` g  val	`  	g  filenamef  srfi/srfi-41.scm
 
	 		 		! 	
	8 		F 		b 		c 	 	 	  	   	  	;  	   	  	E  	3  	* 	GA 	4` 	 	 	 	  g  nameg  stream-force CRi#R,R4ii5!R9  h(      ] $   &  4 5CCC              g  obj
		!  g  filenamef  srfi/srfi-41.scm
 
	 			 		 		 		 	 		!  g  nameg  stream-null? C$R   h      ]  C           g  kar
		 g  kdr		  g  filenamef  srfi/srfi-41.scm
 
 			  g  nameg  %make-stream-pare-procedure CR4OQT h   V   ]  C    N       g  t-46961e513a-1d7
		 g  t-46961e513a-1d8		  			   C  h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-41.scm	 
 		   C   h   D   ] L 6<       g  filenamef  srfi/srfi-41.scm	 
 		
   C     h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-41.scm
 
 		n   C5RU٨  4 >  "  G   	Ȗi  R    h   y   ] $   CC      q       g  obj
		  g  filenamef  srfi/srfi-41.scm
 
 		  g  nameg  %stream-pare?-procedure CR4OQT<      h   8   ]  C      0       g  t-46961e513a-1e7
		
  		
   C        h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-41.scm	 
 		   C   h   D   ] L 6<       g  filenamef  srfi/srfi-41.scm	 
 		
   C     h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-41.scm
 
 		n   C5R5        h   u   ] &   
C 6m       g  s
		  g  filenamef  srfi/srfi-41.scm
 
 		  g  nameg  %stream-kar-procedure CR4OQT       h   :   ]C     2       g  err
		 g  s		  			   C" h   :   ]C     2       g  err
		 g  s		  			   C%+1 h   :   ]C     2       g  err
		 g  s		  			   C<M    h   8   ]  C      0       g  t-46961e513a-1f3
		
  		
   C        h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-41.scm	 
 		   C   h   D   ] L 6<       g  filenamef  srfi/srfi-41.scm	 
 		
   CO     h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-41.scm
 
 	    C5R5P    h   u   ] &   C 6m       g  s
		  g  filenamef  srfi/srfi-41.scm
 
 		  g  nameg  %stream-kdr-procedure CQR4OPQT_fk       h   :   ]C     2       g  err
		 g  s		  			   Cnty h   :   ]C     2       g  err
		 g  s		  			   C| h   :   ]C     2       g  err
		 g  s		  			   C<    h   8   ]  C      0       g  t-46961e513a-20e
		
  		
   CP        h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-41.scm	 
 		   C   h   D   ] L 6<       g  filenamef  srfi/srfi-41.scm	 
 		
   C     h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-41.scm
 
 	    C5PR4O-QT h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-41.scm
 
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5-R9      h0      ]	 $  $ &  4 5$  CCCC        g  obj
		/ g  obj		+  g  filenamef  srfi/srfi-41.scm
 
	 			 		 		 	+	 	 		/  g  nameg  stream-pair? C%R4O"QT.     h    P   ]    C     H       g  dummy
		 g  obj		 g  strm			  			   C h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-41.scm
 
 		"  g  
macro-typeg  syntax-rulesg  patternsg  objg  strm   C5"R#& 	       h      ]	4 5$  "  4    >  "  G  4 5"  "4   >  "  'G  "   $  &  "  ""  "
6         g  strm
	  g  pare	6   g  filenamef  srfi/srfi-41.scm
 
	 		 		 	!	 		0 		6 		= 		C 		E 	(	H 	  	  	 	   g  nameg  
stream-car C&R#' 	     h      ]	4 5$  "  4    >  "  G  4 5"  "4   >  "  'G  "   $  &  "  ""  "C            g  strm
	  g  pare	6   g  filenamef  srfi/srfi-41.scm
 
	 		 		 	!	 		0 		6 		= 		C 		E 	(	H 	  	 	   g  nameg  
stream-cdr C'R4O(QTY       h   h   ]  C `       g  dummy
		 g  formals		 g  body0			 g  body1			  			   C h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-41.scm
 
 		"  g  
macro-typeg  syntax-rulesg  patternsg  formalsg  body0g  body1g  ...   C5(R9562v 
   h   @  - /   0   3 #  #  H &   
"  	4 5KJ&  J
"  	4J5$  J&  J"  	4J56	$  J&  J"  	4J56C8      g  promise
	  g  on-eager	  g  on-lazy		  g  content		&  g  key		^   g  filenamef  srfi/srfi-41.scm
 
	+ 		G 		^ 		n 	  	  	  	  	 
	 
g  on-eagerSg  on-lazyS	   g  nameg  stream-promise-visit CR4i9i5      h   c   ] L 6      [       g  t-46961e513a-2c2
		
  g  filenamef  srfi/srfi-41.scm
 	) 		
   C   h   ]   ]?L 6      U       g  _
		
  g  filenamef  srfi/srfi-41.scm
 	)	
 	5 		
   CP     h      ] &  >L64 L>  "  G  4 &   
"  	4 5LO 	
LO >  "  G  L  &   "  	4 56       g  pare
	   g  filenamef  srfi/srfi-41.scm
 		
 		 		 		' 		, 	2	Z 		g 	"  	 
	    C h   f   ]L 6      ^       g  _
		
  g  filenamef  srfi/srfi-41.scm
 		 	'	
 	 		
   C       h    q   ] LL O L O 6    i       g  strm
		  g  filenamef  srfi/srfi-41.scm
 		 	 		  g  nameg  loop C    h0      ]
4>  "  G  O Q  6           g  strm
		, g  port		, g  loop			,  g  filenamef  srfi/srfi-41.scm
 		 		 		 		 	 		,	   C>  "  G  4O)QT     h   y   ] C   q       g  dummy
		 g  name		 g  formal			 g  body0			 g  body1			  			   C        h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-41.scm
 
 		"  g  
macro-typeg  syntax-rulesg  patternsg  nameg  formalg  body0g  body1g  ...   C5)R4O9QT	    h       ]   C       g  dummy
		  g  tag		  g  name			  g  val			  g  body1			  g  body2			   		 	   C  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-41.scm
 
 		"  g  
macro-typeg  syntax-rulesg  patternsg  tagg  nameg  val g  ... g  body1g  body2g  ...   C59R *!2!2 h   V   ] L 6       N       g  filenamef  srfi/srfi-41.scm
 		 			 	 			
   C9     h   V   ] LL 6       N       g  filenamef  srfi/srfi-41.scm
 		 	'		 	  			
   C 	   hX      ]L(  CLO      LL O          6       g  val
		' g  val
	7	C g  kar
	C	V g  kdr	C	V  g  filenamef  srfi/srfi-41.scm
 		 		 	 		X
   C9  h    y   ]	L  O   C    q       g  objs
		 g  val		  g  filenamef  srfi/srfi-41.scm
 	 		  g  nameg  recur C    h`      ]	4 5$  "  4 5$  "  4    >  "  G  O Q  6           g  objs
		\ g  t			  g  recur	N	X  g  filenamef  srfi/srfi-41.scm
 
	 			 		 		$ 		/ 		1 	!	4 		N 	 
		\  g  nameg  list->stream C*R"#+$2%&!2      h   D   ] L 6<       g  filenamef  srfi/srfi-41.scm
 	
 		
   C9       h   M   ] L 6   E       g  filenamef  srfi/srfi-41.scm
 	
	 	 		
   C     hh      ]4L 5 4 5$  C O   	LO   
 6           g  c
			d g  val	)	5 g  val	C	O g  kar	O	b g  kdr		O	b  g  filenamef  srfi/srfi-41.scm
 		 			 		 	
	 		 	
 		d
   C9        h    h   ]LL O     C    `       g  val
		  g  filenamef  srfi/srfi-41.scm
 	 		
  g  nameg  recur C     h`      -  . , 3  #  45  4 5$  "  4    >  "  G  O  Q 6           g  port
		] g  recur	O	[  g  filenamef  srfi/srfi-41.scm
 
	 	(	 		/ 		1 	'	4 		O 	 		]
  g  nameg  port->stream C+R4O,QT'3 h   -   ]C   %       g  dummy
		  		   CX=>       h   K   ] C C       g  dummy
		 g  x		 g  y			  			   C      h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-41.scm
 	 		9  g  
macro-typeg  syntax-rulesg  patternsg  xg  yg  ...   C5,R$&' h     ]$"  j$  
"  $  "  45$  D $  4 455"  45$  "  ""~      g  proc
	  g  base	  g  strm		  g  limit		  g  val			p g  strm			p g  limit			p g  t			,  g  filenamef  srfi/srfi-41.scm
 
	 		 		 		 		# 	%	0 		8 		> 		? 		D 	%	L 		R 		^ 		a 		p 	 	 	  g  nameg  % stream-fold-aux-procedure C?R4O@QTA h      ]  C       g  t-46961e513a-368
		 g  t-46961e513a-369		 g  t-46961e513a-36a			 g  t-46961e513a-36b			  			   C@       h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-41.scm	 
 		   C   h   D   ] L 6<       g  filenamef  srfi/srfi-41.scm	 
 		
   C     h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-41.scm
 
 		n   C5@R-#-$&' hh    )   
3  6]*45$  "  4   >  "  G   $  4 5$  "  4    >  "  G  4	 5$  "  4
    >  "  G   
$  "4    >  "  G  "   "   "  n$  
"  $  "  45$  	"  H$  4455"  45$  "  " "G6        g  strm
			 g  n
	f g  strm	f g  proc	 T g  val	 E g  strm	 E g  limit	 E g  t	   g  first	Ud g  _	Ud  
g  filenamef  srfi/srfi-41.scm
 		 		 		 		( 		* 	%	- 		E 		F 		[ 		] 	%	` 		s 	  	  	#  	  	  	  	*  	  	F 	2T 	X 	f 	 			 	f	  g  nameg  stream->list C-R#.!$2& h   V   ] 4L 56   N       g  filenamef  srfi/srfi-41.scm
					 		
   C9' h   h   ] L4L 5L6       `       g  filenamef  srfi/srfi-41.scm
			(		:		"		 		
   C 
 hx      ]L(  CL 4 5$  L L6 O    LL O   	 6              g  strm
		q g  val	2	> g  val	P	\ g  kar	\	o g  kdr		\	o  g  filenamef  srfi/srfi-41.scm
 		 									
	 	)	"	"	(	 
		q
   C29    h(      ]	O L  Q   C       g  strms
		( g  proc		 g  val		(  g  filenamef  srfi/srfi-41.scm
 	 		(  g  nameg  recur C  hX      -  1  3 4 5(  "  4  >  "  G  O Q  6             g  strms
			R g  flunk		< g  recur	D	N  g  filenamef  srfi/srfi-41.scm
 
	
 		% 		' 	+	* 		D 	 			R


  g  nameg  stream-append C.R#/$!&#/'2&      h   V   ] 4L 56   N       g  filenamef  srfi/srfi-41.scm
					 		
   C92'    h   V   ] 4L 56   N       g  filenamef  srfi/srfi-41.scm
	"		/		" 		
   C9' h   M   ] L 6E       g  filenamef  srfi/srfi-41.scm
	"		/ 		
   C     hX      ]L4L O      LO          56             g  val
		! g  val
	/	; g  kar
	;	N g  kdr	;	N  g  filenamef  srfi/srfi-41.scm
			"	R	 		R
   C  h     ]4L5$  C4L5 4 5$  "  4    >  "  G  4 5$  L 4	L56
 O    LL O    6           g  strm
	  g  val	l	x g  val   g  kar   g  kdr	    g  filenamef  srfi/srfi-41.scm
								
		
			
	/		1	,	4	
	G		Q	
	T	)	\	"	b	 	 
   C29       h(      ]	O L  Q   C       g  strms
		( g  proc		 g  val		(  g  filenamef  srfi/srfi-41.scm
	 		(  g  nameg  recur C  hH      ]	4 5$  "  4    >  "  G  O Q  6          g  strms
		E g  recur	7	A  g  filenamef  srfi/srfi-41.scm

						%			7	 		E  g  nameg  stream-concat C/R!*  h       )    3  C-  1  3 4 ?6       g  objs
		   g  filenamef  srfi/srfi-41.scm
				 		 			
 		 


  g  nameg  stream-constant C0R4OQTT      h      ] C          		
   C'  h   .   ] C   &       g  result
		  		   CV h   .   ] C&       g  result
		  		   CT      h      ] L C          		
   C'  h   )   ] C   !       g  e
		  		   C    h@      ]45$   O @45$  @L 6       g  v
		@ g  s		@ g  tmp		
	@ g  tmp		&	@  g  filenamef  srfi/srfi-41.scm
		8 		: 	&	@ 		 		@	  g  nameg  var-step C        h0   @   ]4LL5L  4L 5  C8       g  result
		0 g  step		0  		0	   C     h     ]45$  4?"  H45$  4?"  )45$  4?"  
454	
L O  5 45$   O @6      g  var
	  g  init	  g  step		  g  test		  g  result		  g  expr		  g  tmp		
	h g  tmp		&	e g  tmp		B	b g  tmp		{  g  tmp	    g  filenamef  srfi/srfi-41.scm	i'		{&	 	 	   C      h(   c   ]	4 5$   O @ 6 [       g  x
		' g  tmp		'  g  filenamef  srfi/srfi-41.scm

 		'   C5R1#$'     h0    ]"4 5$  "  4    >  "  G  4 5$  "  4    >  "  G   
$  "4    >  "  G  "   4	5$  "  4
   >  "  G  "  V$  
"  $  "  45$  	"  045$  "  " "GC             g  n
	) g  strm	) g  val	  g  strm	  g  limit	  g  t	   g  first	) g  second	) g  _	)  	g  filenamef  srfi/srfi-41.scm
.
	/		/		/	 	/		00		E0		G0		J0		_1		k1		m1	%	p1	 2	 2	 2	" 2	 3	 3	 	)	  g  nameg  stream-drop C1R2#2$&' h8      ]4L5  $  "  4L4L55 $  LCL 4L56       g  t
			&  g  filenamef  srfi/srfi-41.scm
8		9			9		9	+	9	2	"9	+	#9	&	*8		08		88	 		8
   C9     h    x   ]	LL  O   C  p       g  strm
		 g  val		  g  filenamef  srfi/srfi-41.scm
8	 		  g  nameg  loop C 	    hx      ]
4 5$  "  4    >  "  G  45$  "  4   >  "  G  O  Q 6          g  pred?
		u g  strm		u g  loop		e	q  g  filenamef  srfi/srfi-41.scm
5
	6		6		6	,	6		07		E7		G7	(	J7		e8	 		u	  g  nameg  stream-drop-while C2R3#$!&2&       h   V   ] 4L 56   N       g  filenamef  srfi/srfi-41.scm
A		A		A	 		
   C9' h   V   ] L4L 56   N       g  filenamef  srfi/srfi-41.scm
A		A	1	A	* 		
   C'  hx      ]4L5$  C4L 4L55$  MLO      	LLO       
   6L4L56       g  val
	0	< g  val
	L	X g  kar
	X	k g  kdr	X	k  g  filenamef  srfi/srfi-41.scm
>		?		?		@		@		@		 ?		&A		pB		xB	 		x
   C29     h0      ]	O L L Q   C            g  strm
		+ g  proc		! g  val	!	+  g  filenamef  srfi/srfi-41.scm
>	 		+  g  nameg  recur C 	  hx      ]
4 5$  "  4    >  "  G  45$  "  4   >  "  G  O  Q 6          g  pred?
		u g  strm		u g  recur		e	q  g  filenamef  srfi/srfi-41.scm
;
	<		<		<	(	<		0=		E=		G=	$	J=		e>	 		u	  g  nameg  stream-filter C3R4#$&'   h   `  ]#4 5$  "  4    >  "  G  45$  "  4   >  "  G  "  n$  
"  $  "  45$  	"  H $  4 4	55"  4
5$  "  ""GCX      g  proc
	  g  base	  g  strm		  g  val		`  g  strm		`  g  limit		`  g  t		o  g  first	   g  _	    	g  filenamef  srfi/srfi-41.scm
D
	E		E		E	%	E		0F		EF		GF	"	JF		`G	 G	 	 	  g  nameg  stream-fold C4R5#$&'U        hX  s  )   3 4 5$  "  4    >  "  G  45$  "  4   >  "  G  "  145$  C4 4	5>  "  G  4
5""- 1 3 4 5$  "  4    >  "  G  45(  "  4  >  "  G  "  945$  C4 4	5>  "  G  4
5""   k      g  proc
		  g  strm		  g  strm		g  g  proc
 U g  strm U g  rest	 U g  strms	 U g  flunk	  g  strms	M  	g  filenamef  srfi/srfi-41.scm
J		
L		L		!L	+	$L		7M		LM		NM	(	QM		gN		hO			rN		uP		xP	 P	 N	 N	 J	 R	 R	 S	 S	 S	- S	 T	 T	  T	1 T	U	V	!U	$W	)W	6W	?U	MU	 %		 	  U	
	  g  nameg  stream-for-each C5R622  h   D   ] L 6<       g  filenamef  srfi/srfi-41.scm
]	 		
   C9       h   V   ] LL L6     N       g  filenamef  srfi/srfi-41.scm
]			]		]	 		
   C    hX      ]LO      LL LO          6              g  val
		 g  val
	0	< g  kar
	<	O g  kdr	<	O  g  filenamef  srfi/srfi-41.scm
\		]	 		Q
   C9   h    z   ]	LL  O   C  r       g  first
		 g  val		  g  filenamef  srfi/srfi-41.scm
\	 		  g  nameg  recur C   h      - . , 3 #  4 5$  "  4    >  "  G  45$  "  4   >  "  G  O Q  6       g  first
	  g  step	  g  recur		x   g  filenamef  srfi/srfi-41.scm
Y
	Z		+Z		-Z	#	0Z		C[		X[		Z[	"	][		x\	 	   g  nameg  stream-from C6R722       h   D   ] L 6<       g  filenamef  srfi/srfi-41.scm
b	 		
   C9       h   V   ] L4L L56   N       g  filenamef  srfi/srfi-41.scm
b		b		b	 		
   C    hX      ]LO      L LLO          6              g  val
		 g  val
	0	< g  kar
	<	O g  kdr	<	O  g  filenamef  srfi/srfi-41.scm
a		b	 		Q
   C9   h    y   ]	LL  O   C  q       g  base
		 g  val		  g  filenamef  srfi/srfi-41.scm
a	 		  g  nameg  recur C    hH      ]
4 5$  "  4    >  "  G  O  Q 6       g  proc
		H g  base		H g  recur		8	D  g  filenamef  srfi/srfi-41.scm
_
	`		`		`	(	`		8a	 		H	  g  nameg  stream-iterate C7R#8$'       h   J  ]!4 5$  "  4    >  "  G  	"  V$  
"  $  "  45$  	"  045$  "  " 	"GC  B      g  strm
	  g  val	5  g  strm		5  g  limit		5  g  t		D	[ g  first   g  second	   g  third	   g  _	    	g  filenamef  srfi/srfi-41.scm
d
	e		e		e	$	e		5f	 f	 f	 		   g  nameg  stream-length C8R:#$!2& h   h   ] 4L4L 556      `       g  filenamef  srfi/srfi-41.scm
o	
	o		o		o		o	
 		
   C9'       h   V   ] L4L 56   N       g  filenamef  srfi/srfi-41.scm
o	
	p		p	 		
   C 
   h`      ]4L5$  CLL O      LLO       	   6        g  val
	"	. g  val
	>	J g  kar
	J	] g  kdr	J	]  g  filenamef  srfi/srfi-41.scm
m		n	
	n		o	
 		_
   C29   h0      ]	O L L Q   C            g  strm
		+ g  proc		! g  val	!	+  g  filenamef  srfi/srfi-41.scm
m	 		+  g  nameg  recur CU$!2&       h   h   ] 4L4L 5?6    `       g  filenamef  srfi/srfi-41.scm
w		w		w	%	w		w	 		
   C9'    h   V   ] L4L 56 N       g  filenamef  srfi/srfi-41.scm
w		x	 	x	 		
   C    hh      ]4L5$  CLL O      	LLO       
   6              g  val
	$	0 g  val
	@	L g  kar
	L	_ g  kdr	L	_  g  filenamef  srfi/srfi-41.scm
u		v		v		w	 		a
   C29   h0      ]	O L L Q   C            g  strms
		+ g  proc		! g  val	!	+  g  filenamef  srfi/srfi-41.scm
u	 		+  g  nameg  recur C  h    )   v3 4 5$  "  4    >  "  G  45$  "  4   >  "  G  O  Q 6- 1 3 4 5$  "  4    >  "  G  4	5(  "  4  >  "  G  
O  Q 6         g  proc
			| g  strm			| g  recur		l	x g  proc
  g  strm  g  rest	  g  strms	  g  flunk	   g  recur	   	g  filenamef  srfi/srfi-41.scm
i		
k		k		!k	&	$k		7l		Ll		Nl	#	Ql		lm	 i	 r	 r	 s	 s	 s	( s	 t	 t	  t	, t	 u	 			|	  	
	  g  nameg  
stream-map C:R4O;QT        h      ] C          		
   C        h   X   ] 6P       g  rest
		  g  filenamef  srfi/srfi-41.scm	~	 		   C      h   ,   ] C   $       g  rest
		  		   C      h   i   ] 6a       g  var
		 g  rest		  g  filenamef  srfi/srfi-41.scm		 			   C    h(      ]
4L 5    C   {       g  var
		% g  rest		% g  tmp				%  g  filenamef  srfi/srfi-41.scm					 		%	   C 
 hp      ]4 5$  @  4?$  @4 5"  	 6$  4?$  	L O @""           g  x
		l g  tmp	
	l g  tmp			l g  tmp		9	l  g  filenamef  srfi/srfi-41.scm
{	 		l  g  nameg  make-matcher CTTVTh   ,   ] C   $       g  expr
		  		   C+  h   Q   ]   C       I       g  guard
		 g  expr		 g  fail			  			   C        hH      ]  45$  @45$  @6             g  x
		B g  fail		B g  tmp				B g  tmp			B g  tmp		+	B  g  filenamef  srfi/srfi-41.scm
							 		B	  g  nameg  make-guarded CT,@AHIK        h   z   ]   C       r       g  tmp-46961e513a-6fb
		 g  tmp-46961e513a-6fa		 g  tmp-46961e513a-6f9			  			   C   h(   A   ]L  4L  5 C 9       g  matcher
		' g  expr		'  		'	   C        hH      ]4L L54L 5 45$   LO @6             g  fail
		B g  tmp		B g  tmp		$	B  g  filenamef  srfi/srfi-41.scm		$		!		 		B   C      h8      ]4545$  L  O @6         g  	strm-expr
		6 g  pat		6 g  expr			6 g  tmp				6 g  tmp			6  g  filenamef  srfi/srfi-41.scm					 		6	   C      h8   }   ]O Q 4 5$  O @ 6    u       g  x
		4 g  make-matcher	
	4 g  tmp			4  g  filenamef  srfi/srfi-41.scm
z
 		4   C5;R4O<QTX[\        h   Q   ]C  I       g  dummy
		 g  expr		 g  rest			  			   C        h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-41.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  exprg  restg  ...   C5<R4OLQT.k   h   Q   ] C    I       g  dummy
		 g  expr		 g  base			  			   Ct 
    h8      ]   	   C          g  dummy
		5 g  expr		5 g  base			5 g  var			5 g  stream			5 g  rest			5  		5	   C   h       ]   C   }       g  dummy
		 g  expr		 g  base			 g  var			 g  exp			 g  rest			  			   CZ       h   v   ] C n       g  dummy
		 g  expr		 g  base			 g  pred?			 g  rest			  			   C   hh   x  ]!4 5$  @4 5$  @4 5$  @4 5$  	@
 6 p      g  x
		g g  tmp		g g  tmp		"	g g  tmp		9	g g  tmp		P	g  g  filenamef  srfi/srfi-41.scm
	 		g  g  
macro-typeg  syntax-rulesg  patternsg  exprg  base g  exprg  baseg  varg  ing  stream g  restg  ... g  exprg  baseg  varg  isg  exp g  restg  ... g  exprg  baseg  pred?g  restg  ...   C5LR=22 h   D   ] L 6<       g  filenamef  srfi/srfi-41.scm
	
 		
   C9       h   V   ] LL L6     N       g  filenamef  srfi/srfi-41.scm
	
			$		 		
   C! 	 hh      ]4LLL5$  OLO      LLL O          6C              g  val
		+ g  val
	=	I g  kar
	I	\ g  kdr	I	\  g  filenamef  srfi/srfi-41.scm
			
				
 		a
   C9 h(   z   ]	LLL L O   C      r       g  first
		" g  val		"  g  filenamef  srfi/srfi-41.scm
	 		"  g  nameg  recur C   h     - . , 3 #  4 5$  "  4    >  "  G  45$  "  4   >  "  G  $  145$  "  4   >  "  G  "   $  "   $  "  	
$  "  	
O Q  6         g  first
	  g  past	  g  step		  g  step	   g  lt?	   g  recur	    g  filenamef  srfi/srfi-41.scm

			+		-	$	0		C		X		Z	#	]		u		v	 	 	% 	 	 	 	 	 	 	 	 	 	 	  g  nameg  stream-range C=R#>1$& h   l  ]
4 5$  "  4    >  "  G  45$  "  4   >  "  G  45$  "  4	   >  "  G  
$  "4
   >  "  G  "   4 545$  "4   >  "  G  "   6       d      g  strm
	  g  n	  g  res	    g  filenamef  srfi/srfi-41.scm

						!			0		E		G		J		]		r		t		w	 	 	 	$ 	 	 	 	 	 	+ 	 	 	 	  g  nameg  
stream-ref C>R#?2$'2&       h   V   ] 4L 56   N       g  filenamef  srfi/srfi-41.scm
			,		 		
   C9     h   D   ] L C   <       g  filenamef  srfi/srfi-41.scm
	 		
   C 
     hh      ]4L5$  LCL 4L54LO      LO       	   56        g  val
	*	6 g  val
	D	P g  kar
	P	c g  kdr	P	c  g  filenamef  srfi/srfi-41.scm
										g	 		g
   C9       h       ]
L  O   C         g  strm
		 g  rev		 g  val			  g  filenamef  srfi/srfi-41.scm
	 			  g  nameg  loop C! hH      ]	4 5$  "  4    >  "  G  O Q  6        g  strm
		G g  loop	7	A  g  filenamef  srfi/srfi-41.scm

						%			7	 		G  g  nameg  stream-reverse C?R@#$2        h   D   ] L 6<       g  filenamef  srfi/srfi-41.scm
	 		
   C9!   h   D   ] C   <       g  filenamef  srfi/srfi-41.scm
	 		
   C  h   D   ] L 6<       g  filenamef  srfi/srfi-41.scm
	 		
   C&'    h    q   ] L4L L4L554L56     i       g  filenamef  srfi/srfi-41.scm
			!	
	,		!		!		 		
   C    h      ]4L5$  FLO               6	LO      
LLLL O          6           g  val
		) g  val
	2	> g  kar
	>	Q g  kdr	>	Q g  val
	c	o g  val
   g  kar
   g  kdr    g  filenamef  srfi/srfi-41.scm
								Y	 	 
   C29   h0      ]
O L L Q   C         g  base
		. g  strm		. g  proc			$ g  val		$	.  g  filenamef  srfi/srfi-41.scm
	 		.	  g  nameg  recur C 	      hx      ]4 5$  "  4    >  "  G  45$  "  4   >  "  G  O  Q 6        g  proc
		w g  base		w g  strm			w g  recur		e	q  g  filenamef  srfi/srfi-41.scm

						%			0		E		G	"	J		e	 		w	  g  nameg  stream-scan C@R#A$!2&    h   V   ] 4L 56   N       g  filenamef  srfi/srfi-41.scm
					 		
   C9' h   _   ] LL4L 56W       g  filenamef  srfi/srfi-41.scm
			.		5		' 		
   C 
  hx      ]L
  $  "  4L5 $  CLO      LLL O       	   6            g  t
		 g  val
	4	@ g  val
	R	^ g  kar
	^	q g  kdr	^	q  g  filenamef  srfi/srfi-41.scm
								!		*	 		s
   C29   h0      ]
O L  Q   C            g  n
		+ g  strm		+ g  proc			! g  val		!	+  g  filenamef  srfi/srfi-41.scm
	 		+	  g  nameg  recur C  h   3  ]
45$  "  4   >  "  G  4 5$  "  4    >  "  G  4 5$  "  4	    >  "  G   
$  "4
    >  "  G  "   O Q  6     +      g  n
	  g  strm	  g  recur	    g  filenamef  srfi/srfi-41.scm

						"			0		E		G	 	J		]		r		t		w	 	 	 	% 	 	 	 	  g  nameg  stream-take CARB#$!&2&      h   V   ] 4L 56   N       g  filenamef  srfi/srfi-41.scm
					 		
   C9' h   V   ] L4L 56   N       g  filenamef  srfi/srfi-41.scm
			1		* 		
   C    hp      ]4L5$  C4L 4L55$  MLO      	LLO       
   6C       g  val
	0	< g  val
	L	X g  kar
	X	k g  kdr	X	k  g  filenamef  srfi/srfi-41.scm
												 		&	 			p
   C29       h0      ]	O L L Q   C            g  strm
		+ g  proc		! g  val	!	+  g  filenamef  srfi/srfi-41.scm
	 		+  g  nameg  recur C 	  hx      ]
4 5$  "  4    >  "  G  45$  "  4   >  "  G  O  Q 6          g  pred?
		u g  strm		u g  recur		e	q  g  filenamef  srfi/srfi-41.scm

						,			0		E		G	(	J		e	 		u	  g  nameg  stream-take-while CBRC2     h   V   ] 4LL 56   N       g  filenamef  srfi/srfi-41.scm
					 		
   C9     h   V   ] L4L L56   N       g  filenamef  srfi/srfi-41.scm
			*		# 		
   C! 	 hh      ]4LL5$  QLL O      LLLO          6C              g  val
		+ g  val
	=	I g  kar
	I	\ g  kdr	I	\  g  filenamef  srfi/srfi-41.scm
							 		a
   C29   h8      ]	O L LL LQ   C              g  base
		1 g  proc		' g  val	'	1  g  filenamef  srfi/srfi-41.scm
	 		1  g  nameg  recur C 	  h   >  ]4 5$  "  4    >  "  G  45$  "  4   >  "  G  45$  "  4   >  "  G  O  Q 66      g  mapper
	  g  pred?	  g  	generator		  g  base		  g  recur	    g  filenamef  srfi/srfi-41.scm

						)			0		E		G	(	J		]		r		t	,	w	 	 	 	  g  nameg  stream-unfold CCR2 h   V   ] 4L 56   N       g  filenamef  srfi/srfi-41.scm
					 		
   C9     h   M   ] LL 6E       g  filenamef  srfi/srfi-41.scm
			( 		
   C     hh      ] 4LL>  G O    L O    6              g  next
		a g  items		a g  val		$	0 g  val		@	L g  kar		L	_ g  kdr		L	_  g  filenamef  srfi/srfi-41.scm
							 		a
   C29    h0      ]	O L  LQ   C            g  seed
		+ g  proc		! g  val	!	+  g  filenamef  srfi/srfi-41.scm
	 		+  g  nameg  generator-stream C&!2' h   V   ] L4L5L 6 N       g  filenamef  srfi/srfi-41.scm
			.		 		
   C9.*'     h   V   ] L4L5L 6 N       g  filenamef  srfi/srfi-41.scm
			.		 		
   C        h   D   ] L 6<       g  filenamef  srfi/srfi-41.scm
	 		
   C2'       h   V   ] L4L5L 6 N       g  filenamef  srfi/srfi-41.scm
			.		 		
   C9    h    _   ]LLL O     C  W       g  val
		  g  filenamef  srfi/srfi-41.scm
			 		
   C   h   0  ] H 4L5LK J (  CJ &  LLL O   C"  =J $  )4J 5	LLL O   64
J 56 J $  _J (  TJ O   L LLO    6"]"Y(      g  head
	  g  val	3	= g  val	c	o g  w   g  val	   g  val	   g  kar	   g  kdr	    g  filenamef  srfi/srfi-41.scm
								%		D		K	&	U		q		r	 	 	 
   C29    h0      ]
O L  Q   C            g  genstrm
		+ g  index		+ g  proc			! g  val		!	+  g  filenamef  srfi/srfi-41.scm
	 		+	  g  nameg  make-result-stream CD&   h   c   ]LL  6      [       g  t-46961e513a-9f4
		
  g  filenamef  srfi/srfi-41.scm
	! 		
   C  hx   A  ]O O  Q Q 4 5$  "  4    >  "  G  4544	4
55O 5E       9      g  gen
		q g  seed		q g  generator-stream			q g  make-result-stream			q g  genstrm		S	q  g  filenamef  srfi/srfi-41.scm

	 		5		7	'	:		M		S		V		Y	!	\	0	d	!	o		q	 		q	  g  nameg  stream-unfolds CDR#EU$!2& h   V   ] 4L 56 N       g  filenamef  srfi/srfi-41.scm
	
				
 		
   C9'      h   V   ] L4L 56 N       g  filenamef  srfi/srfi-41.scm
	
		5		. 		
   C    h`      ]4L5$  CLO      	LL O       
   6        g  val
	"	. g  val
	>	J g  kar
	J	] g  kdr	J	]  g  filenamef  srfi/srfi-41.scm
			
				
 		_
   C29   h(      ]	O L  Q   C       g  strms
		( g  proc		 g  val		(  g  filenamef  srfi/srfi-41.scm
	 		(  g  nameg  recur C  h`      - 1 3  45(  "  4  >  "  G  O Q 6              g  strm
			Y g  rest			Y g  strms			Y g  flunk			C g  recur		K	U  g  filenamef  srfi/srfi-41.scm

							,		.	*	1		K	 				Y
  g  nameg  
stream-zip CERC         g  m
		, g  rtd
d g  rtd
 d  g  rtd
AB  g  filenamef  srfi/srfi-41.scm		
	-	*
	2	*		:	*	&	?	*
	q
	t
8_	{
= 
= 
= 	= 	#= 	= 
= 	= 
>~ 
?2 
Q 
U 
V 
ZT 
ZU 
fr 
jk 
nb 
t 
yw 

      
      .
      -5
      ;
      [D
      ^I
      |Y
      6_
      ]d
      h
      
      
      
      	
      n
      
      
      
      {
 1	      }
   C6                                                                                                                                                                                                                                                                                                                                                                                                                   ccache/srfi/srfi-88.go                                                                              0000644                 00000002574 15154557173 0010471 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0d      ] $ 4  hC      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-88	 		g  filenameS	
f  srfi/srfi-88.scm	g  exportsS	g  keyword->string	g  string->keyword	 	g  
re-exportsS	g  keyword?	 	g  set-current-module	 	 	g  cond-expand-provide	g  current-module	 	g  read-options	 	 	g  append	 	 	g  keywords	g  postfix	 g  symbol->string	!g  keyword->symbol	"g  symbol->keyword	#g  string->symbolC 5h@     ]4	
5 4 >  "  G   4i4i5 >  "  G  4445  5>  "  G   !        h      ]4 56          g  k
		  g  filenamef  srfi/srfi-88.scm
	(
		*			*	 		  g  nameg  keyword->stringg  documentationf  'Return the name of @var{k} as a string. CR"#  h      ]4 56          g  s
		  g  filenamef  srfi/srfi-88.scm
	,
		.			.	 		  g  nameg  string->keywordg  documentationf  0Return the keyword object whose name is @var{s}. CRC              g  m
		,  g  filenamef  srfi/srfi-88.scm		
	-	 
	2	 		:	 	&	?	 
	H	&		V	&		Y	&	N	(
7	,
 	9
   C6                                                                                                                                     ccache/srfi/srfi-10.go                                                                              0000644                 00000003523 15154557173 0010445 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0;      ] ' 4       h      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-10	 		g  filenameS	
f  srfi/srfi-10.scm	g  importsS	g  ice-9	g  rdelim	 	 	 	g  exportsS	g  define-reader-ctor	 	g  set-current-module	 	 	g  cond-expand-provide	g  current-module	 	g  make-hash-table	g  reader-ctors	g  
hashq-set!	g  	hashq-ref	g  
procedure?	g  error	 f  unknown hash-comma tag 	!g  lookup	"g  read	#f  %syntax error in hash-comma expression	$g  length	%g  
hash-comma	&g  read-hash-extendC 5  h     ]4	
5 4 >  "  G   4i4i5 >  "  G  4i	5R     h       ]4 >  "  G  C             g  symbol
		 g  proc		  g  filenamef  srfi/srfi-10.scm
	=
		>	 			  g  nameg  define-reader-ctor CR        h(      ]	4 545$  C 6           g  symbol
		$ g  p		$  g  filenamef  srfi/srfi-10.scm
	D
		E			E			F			F		 	H		$	H	 		$  g  nameg  lookup C!R"#$!       hP   6  ]45"  6$  .45
$  $  45@"""  .      g  char
		N g  port		N g  obj				N g  p		9	B  g  filenamef  srfi/srfi-10.scm
	L
		M				M			R			R			N			N			N			N	$	$	N		)	N		,	N	;	-	N	2	1	N		2	O		7	O		9	O		9	O		@	P		B	P	 		N	  g  nameg  
hash-comma C%R&i,%i6          g  m
		,  g  filenamef  srfi/srfi-10.scm		/
	-	3
	2	3		:	3	&	?	3
	H	8		S	8
	=
	D
	L
	V
 	
   C6                                                                                                                                                                              ccache/srfi/srfi-4.go                                                                               0000644                 00000054423 15154557173 0010375 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0X      ]  4        h      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-4	 		g  filenameS	
f  srfi/srfi-4.scm	g  importsS	g  rnrs	g  bytevectors	 	 	 	g  exportsS	g  	u8vector?	g  make-u8vector	g  u8vector	g  u8vector-length	g  u8vector-ref	g  u8vector-set!	g  u8vector->list	g  list->u8vector	g  	s8vector?	g  make-s8vector	g  s8vector	g  s8vector-length	g  s8vector-ref	g  s8vector-set!	 g  s8vector->list	!g  list->s8vector	"g  
u16vector?	#g  make-u16vector	$g  	u16vector	%g  u16vector-length	&g  u16vector-ref	'g  u16vector-set!	(g  u16vector->list	)g  list->u16vector	*g  
s16vector?	+g  make-s16vector	,g  	s16vector	-g  s16vector-length	.g  s16vector-ref	/g  s16vector-set!	0g  s16vector->list	1g  list->s16vector	2g  
u32vector?	3g  make-u32vector	4g  	u32vector	5g  u32vector-length	6g  u32vector-ref	7g  u32vector-set!	8g  u32vector->list	9g  list->u32vector	:g  
s32vector?	;g  make-s32vector	<g  	s32vector	=g  s32vector-length	>g  s32vector-ref	?g  s32vector-set!	@g  s32vector->list	Ag  list->s32vector	Bg  
u64vector?	Cg  make-u64vector	Dg  	u64vector	Eg  u64vector-length	Fg  u64vector-ref	Gg  u64vector-set!	Hg  u64vector->list	Ig  list->u64vector	Jg  
s64vector?	Kg  make-s64vector	Lg  	s64vector	Mg  s64vector-length	Ng  s64vector-ref	Og  s64vector-set!	Pg  s64vector->list	Qg  list->s64vector	Rg  
f32vector?	Sg  make-f32vector	Tg  	f32vector	Ug  f32vector-length	Vg  f32vector-ref	Wg  f32vector-set!	Xg  f32vector->list	Yg  list->f32vector	Zg  
f64vector?	[g  make-f64vector	\g  	f64vector	]g  f64vector-length	^g  f64vector-ref	_g  f64vector-set!	`g  f64vector->list	ag  list->f64vector	b !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`a P	cg  set-current-module	dc 	ec 	fg  cond-expand-provide	gg  current-module	h 	ig  make-syntax-transformer	ji 	ki 	lg  define-bytevector-type	mg  macro	ng  $sc-dispatch	on 	pn 	qg  _	rg  any	sqr	tg  syntax->datum	ut 	vt 	wg  datum->syntax	xw 	yw 	zg  begin	{g  define	|g  symbol-append	}g  vector?	~g  obj	~  g  and g  bytevector? ~  g  eq? g  
array-type ~  g  quote g  make- g  vector g  len g  fill  g  apply g  make-srfi-4-vector   g  vector-length g  v   g  let g  / g  bytevector-length   g  if g  integer?   g  error f  fractional length g  elts g  list->   g  let* g  length       g  lp g  i 
      g  <   g  pair?     g  vector-set! g  car     g  1+   g  cdr       g  vector->list g  1-       
    g  cons g  
vector-ref   g  bytevector- g  -ref g  * g  x   g  -set!   g  syntax-violation     f  -source expression failed to match any pattern g  u8 g  s8 g  u16 g  s16 g  u32 g  s32 g  u64 g  s64 g  f32 g  f64C 5      hH     ]4	
b5 4e >  "  G   4fi4gi5 h>  "  G  4klmpsvyz{|} 7       h    ]4 5	
     4 5
   4 5   
      4 54 5 4 5 4 5!  "#$4 %5&'   4 (5")*4 5  +,"-.4 /50    4 /5041253)   4 %5441553) 6 4 %5441553) 6  
C           g  tag
	 g  infix	 g  size		  g  filenamef  srfi/srfi-4.scm
	J
		K			L			L	"		L			K		-	N		1	N		5	N	)	7	N		9	K		P	P		V	P	"	X	P		Z	K	 	U	 	U	" 	U	 	K	 	V		 	V	 	V	$ 	V		 	K	 	W	 	W	 	W	* 	W	 	K	 	Y	 	Y	" 	Y	- 	Y	 	K	 	]	 	]	& 	]	 	K		`		`	"	`		K		a		a	,!	a	#	K	:	d	 @	d	3B	d	 D	K	X	e	^	e	"`	e	b	K	d	f		h	f	l	f	+n	f		p	K		g		g	"	g		K		h			h		h	+	h			K		i		i	"	i		K		j			j		j	+	j			K	 N		   C   h   c   ]	4 5L 4?6[       g  args
		 g  v			  g  filenamef  srfi/srfi-4.scm		J
 		   C      h(   a   ]	4 5$   O @ 6 Y       g  y
		' g  tmp		'  g  filenamef  srfi/srfi-4.scm
	J
 		'   C5lR        h    i   ]4 5$  4 5CC      a       g  obj
		  g  filenamef  srfi/srfi-4.scm
	l
 		  g  nameg  	u8vector? CR    h      - 1 3  @     x       g  len
			 g  fill			  g  filenamef  srfi/srfi-4.scm
	l
 			
  g  nameg  make-u8vector CR       h(      ]	4 545$  C 6  }       g  v
		& g  len		&  g  filenamef  srfi/srfi-4.scm
	l
		T	 		&  g  nameg  u8vector-length CR  h   k   -  1  3  6 c       g  elts
			  g  filenamef  srfi/srfi-4.scm
	l
 			


  g  nameg  u8vector CR  hP      ]!4 545"  ,$   $  "CC
 "        g  elts
		O g  len			O g  v			O g  i			D g  elts			D  g  filenamef  srfi/srfi-4.scm
	l
 		O  g  nameg  list->u8vector CR        h8      ]"  
$  C "4 5"          g  v
		5 g  i		$ g  elts			$  g  filenamef  srfi/srfi-4.scm
	l
 		5  g  nameg  u8vector->list CR       h   y   ] C      q       g  v
		
 g  i		
  g  filenamef  srfi/srfi-4.scm
	l
 		
	  g  nameg  u8vector-ref CR  h      ] C          g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	l
 			  g  nameg  u8vector-set! CR  h      ] C          g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	l
 			  g  nameg  u8vector-set! CR  h    i   ]4 5$  4 5CC      a       g  obj
		  g  filenamef  srfi/srfi-4.scm
	m
 		  g  nameg  	s8vector? CR    h      - 1 3  @     x       g  len
			 g  fill			  g  filenamef  srfi/srfi-4.scm
	m
 			
  g  nameg  make-s8vector CR       h(      ]	4 545$  C 6  }       g  v
		& g  len		&  g  filenamef  srfi/srfi-4.scm
	m
		T	 		&  g  nameg  s8vector-length CR!  h   k   -  1  3  6 c       g  elts
			  g  filenamef  srfi/srfi-4.scm
	m
 			


  g  nameg  s8vector CR  hP      ]!4 545"  ,$   $  "CC
 "        g  elts
		O g  len			O g  v			O g  i			D g  elts			D  g  filenamef  srfi/srfi-4.scm
	m
 		O  g  nameg  list->s8vector C!R        h8      ]"  
$  C "4 5"          g  v
		5 g  i		$ g  elts			$  g  filenamef  srfi/srfi-4.scm
	m
 		5  g  nameg  s8vector->list C R       h   y   ] C      q       g  v
		
 g  i		
  g  filenamef  srfi/srfi-4.scm
	m
 		
	  g  nameg  s8vector-ref CR  h      ] C          g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	m
 			  g  nameg  s8vector-set! CR  h      ] C          g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	m
 			  g  nameg  s8vector-set! CR  h    j   ]4 5$  4 5CC      b       g  obj
		  g  filenamef  srfi/srfi-4.scm
	n
 		  g  nameg  
u16vector? C"R   h      - 1 3  @     y       g  len
			 g  fill			  g  filenamef  srfi/srfi-4.scm
	n
 			
  g  nameg  make-u16vector C#R      h(      ]	4 5	45$  C 	6~       g  v
		( g  len		(  g  filenamef  srfi/srfi-4.scm
	n
	 	T	 		(  g  nameg  u16vector-length C%R) h   l   -  1  3  6 d       g  elts
			  g  filenamef  srfi/srfi-4.scm
	n
 			


  g  nameg  	u16vector C$R# hX      ]!4 545"  /$  #$  	"CC
 "             g  elts
		R g  len			R g  v			R g  i			G g  elts			G  g  filenamef  srfi/srfi-4.scm
	n
 		R  g  nameg  list->u16vector C)R%       h8      ]"  !
$  C 	"4 5"΅       g  v
		8 g  i		' g  elts			'  g  filenamef  srfi/srfi-4.scm
	n
 		8  g  nameg  u16vector->list C(R      h   z   ] 	C     r       g  v
		 g  i		  g  filenamef  srfi/srfi-4.scm
	n
 			  g  nameg  u16vector-ref C&R h      ] 	C         g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	n
 			  g  nameg  u16vector-set! C'R h      ] 	C         g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	n
 			  g  nameg  u16vector-set! C'R h    j   ]4 5$  4 5CC      b       g  obj
		  g  filenamef  srfi/srfi-4.scm
	o
 		  g  nameg  
s16vector? C*R   h      - 1 3  @     y       g  len
			 g  fill			  g  filenamef  srfi/srfi-4.scm
	o
 			
  g  nameg  make-s16vector C+R      h(      ]	4 5	45$  C 	6~       g  v
		( g  len		(  g  filenamef  srfi/srfi-4.scm
	o
	 	T	 		(  g  nameg  s16vector-length C-R1 h   l   -  1  3  6 d       g  elts
			  g  filenamef  srfi/srfi-4.scm
	o
 			


  g  nameg  	s16vector C,R+ hX      ]!4 545"  /$  #$  	"CC
 "             g  elts
		R g  len			R g  v			R g  i			G g  elts			G  g  filenamef  srfi/srfi-4.scm
	o
 		R  g  nameg  list->s16vector C1R-       h8      ]"  !
$  C 	"4 5"΅       g  v
		8 g  i		' g  elts			'  g  filenamef  srfi/srfi-4.scm
	o
 		8  g  nameg  s16vector->list C0R      h   z   ] 	C     r       g  v
		 g  i		  g  filenamef  srfi/srfi-4.scm
	o
 			  g  nameg  s16vector-ref C.R h      ] 	C         g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	o
 			  g  nameg  s16vector-set! C/R h      ] 	C         g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	o
 			  g  nameg  s16vector-set! C/R h    j   ]4 5$  4 5CC      b       g  obj
		  g  filenamef  srfi/srfi-4.scm
	p
 		  g  nameg  
u32vector? C2R   h      - 1 3  @     y       g  len
			 g  fill			  g  filenamef  srfi/srfi-4.scm
	p
 			
  g  nameg  make-u32vector C3R      h(      ]	4 5	45$  C 	6~       g  v
		( g  len		(  g  filenamef  srfi/srfi-4.scm
	p
	 	T	 		(  g  nameg  u32vector-length C5R9 h   l   -  1  3  6 d       g  elts
			  g  filenamef  srfi/srfi-4.scm
	p
 			


  g  nameg  	u32vector C4R3 hX      ]!4 545"  /$  #$  	"CC
 "             g  elts
		R g  len			R g  v			R g  i			G g  elts			G  g  filenamef  srfi/srfi-4.scm
	p
 		R  g  nameg  list->u32vector C9R5       h8      ]"  !
$  C 	"4 5"΅       g  v
		8 g  i		' g  elts			'  g  filenamef  srfi/srfi-4.scm
	p
 		8  g  nameg  u32vector->list C8R      h   z   ] 	C     r       g  v
		 g  i		  g  filenamef  srfi/srfi-4.scm
	p
 			  g  nameg  u32vector-ref C6R h      ] 	C         g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	p
 			  g  nameg  u32vector-set! C7R h      ] 	C         g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	p
 			  g  nameg  u32vector-set! C7R h    j   ]4 5$  4 5CC      b       g  obj
		  g  filenamef  srfi/srfi-4.scm
	q
 		  g  nameg  
s32vector? C:R   h      - 1 3  @     y       g  len
			 g  fill			  g  filenamef  srfi/srfi-4.scm
	q
 			
  g  nameg  make-s32vector C;R      h(      ]	4 5	45$  C 	6~       g  v
		( g  len		(  g  filenamef  srfi/srfi-4.scm
	q
	 	T	 		(  g  nameg  s32vector-length C=RA h   l   -  1  3  6 d       g  elts
			  g  filenamef  srfi/srfi-4.scm
	q
 			


  g  nameg  	s32vector C<R; hX      ]!4 545"  /$  #$  	"CC
 "             g  elts
		R g  len			R g  v			R g  i			G g  elts			G  g  filenamef  srfi/srfi-4.scm
	q
 		R  g  nameg  list->s32vector CAR=       h8      ]"  !
$  C 	"4 5"΅       g  v
		8 g  i		' g  elts			'  g  filenamef  srfi/srfi-4.scm
	q
 		8  g  nameg  s32vector->list C@R      h   z   ] 	C     r       g  v
		 g  i		  g  filenamef  srfi/srfi-4.scm
	q
 			  g  nameg  s32vector-ref C>R h      ] 	C         g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	q
 			  g  nameg  s32vector-set! C?R h      ] 	C         g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	q
 			  g  nameg  s32vector-set! C?R h    j   ]4 5$  4 5CC      b       g  obj
		  g  filenamef  srfi/srfi-4.scm
	r
 		  g  nameg  
u64vector? CBR   h      - 1 3  @     y       g  len
			 g  fill			  g  filenamef  srfi/srfi-4.scm
	r
 			
  g  nameg  make-u64vector CCR      h(      ]	4 5	45$  C 	6~       g  v
		( g  len		(  g  filenamef  srfi/srfi-4.scm
	r
	 	T	 		(  g  nameg  u64vector-length CERI h   l   -  1  3  6 d       g  elts
			  g  filenamef  srfi/srfi-4.scm
	r
 			


  g  nameg  	u64vector CDRC hX      ]!4 545"  /$  #$  	"CC
 "             g  elts
		R g  len			R g  v			R g  i			G g  elts			G  g  filenamef  srfi/srfi-4.scm
	r
 		R  g  nameg  list->u64vector CIRE       h8      ]"  !
$  C 	"4 5"΅       g  v
		8 g  i		' g  elts			'  g  filenamef  srfi/srfi-4.scm
	r
 		8  g  nameg  u64vector->list CHR      h   z   ] 	C     r       g  v
		 g  i		  g  filenamef  srfi/srfi-4.scm
	r
 			  g  nameg  u64vector-ref CFR h      ] 	C         g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	r
 			  g  nameg  u64vector-set! CGR h      ] 	C         g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	r
 			  g  nameg  u64vector-set! CGR h    j   ]4 5$  4 5CC      b       g  obj
		  g  filenamef  srfi/srfi-4.scm
	s
 		  g  nameg  
s64vector? CJR   h      - 1 3  @     y       g  len
			 g  fill			  g  filenamef  srfi/srfi-4.scm
	s
 			
  g  nameg  make-s64vector CKR      h(      ]	4 5	45$  C 	6~       g  v
		( g  len		(  g  filenamef  srfi/srfi-4.scm
	s
	 	T	 		(  g  nameg  s64vector-length CMRQ h   l   -  1  3  6 d       g  elts
			  g  filenamef  srfi/srfi-4.scm
	s
 			


  g  nameg  	s64vector CLRK hX      ]!4 545"  /$  #$  	"CC
 "             g  elts
		R g  len			R g  v			R g  i			G g  elts			G  g  filenamef  srfi/srfi-4.scm
	s
 		R  g  nameg  list->s64vector CQRM       h8      ]"  !
$  C 	"4 5"΅       g  v
		8 g  i		' g  elts			'  g  filenamef  srfi/srfi-4.scm
	s
 		8  g  nameg  s64vector->list CPR      h   z   ] 	C     r       g  v
		 g  i		  g  filenamef  srfi/srfi-4.scm
	s
 			  g  nameg  s64vector-ref CNR h      ] 	C         g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	s
 			  g  nameg  s64vector-set! COR h      ] 	C         g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	s
 			  g  nameg  s64vector-set! COR h    j   ]4 5$  4 5CC      b       g  obj
		  g  filenamef  srfi/srfi-4.scm
	t
 		  g  nameg  
f32vector? CRR   h      - 1 3  @     y       g  len
			 g  fill			  g  filenamef  srfi/srfi-4.scm
	t
 			
  g  nameg  make-f32vector CSR      h(      ]	4 5	45$  C 	6~       g  v
		( g  len		(  g  filenamef  srfi/srfi-4.scm
	t
	 	T	 		(  g  nameg  f32vector-length CURY h   l   -  1  3  6 d       g  elts
			  g  filenamef  srfi/srfi-4.scm
	t
 			


  g  nameg  	f32vector CTRS hX      ]!4 545"  /$  #$  	"CC
 "             g  elts
		R g  len			R g  v			R g  i			G g  elts			G  g  filenamef  srfi/srfi-4.scm
	t
 		R  g  nameg  list->f32vector CYRU       h8      ]"  !
$  C 	"4 5"΅       g  v
		8 g  i		' g  elts			'  g  filenamef  srfi/srfi-4.scm
	t
 		8  g  nameg  f32vector->list CXR      h   z   ] 	C     r       g  v
		 g  i		  g  filenamef  srfi/srfi-4.scm
	t
 			  g  nameg  f32vector-ref CVR h      ] 	C         g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	t
 			  g  nameg  f32vector-set! CWR h      ] 	C         g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	t
 			  g  nameg  f32vector-set! CWR h    j   ]4 5$  4 5CC      b       g  obj
		  g  filenamef  srfi/srfi-4.scm
	u
 		  g  nameg  
f64vector? CZR   h      - 1 3  @     y       g  len
			 g  fill			  g  filenamef  srfi/srfi-4.scm
	u
 			
  g  nameg  make-f64vector C[R      h(      ]	4 5	45$  C 	6~       g  v
		( g  len		(  g  filenamef  srfi/srfi-4.scm
	u
	 	T	 		(  g  nameg  f64vector-length C]Ra h   l   -  1  3  6 d       g  elts
			  g  filenamef  srfi/srfi-4.scm
	u
 			


  g  nameg  	f64vector C\R[ hX      ]!4 545"  /$  #$  	"CC
 "             g  elts
		R g  len			R g  v			R g  i			G g  elts			G  g  filenamef  srfi/srfi-4.scm
	u
 		R  g  nameg  list->f64vector CaR]       h8      ]"  !
$  C 	"4 5"΅       g  v
		8 g  i		' g  elts			'  g  filenamef  srfi/srfi-4.scm
	u
 		8  g  nameg  f64vector->list C`R      h   z   ] 	C     r       g  v
		 g  i		  g  filenamef  srfi/srfi-4.scm
	u
 			  g  nameg  f64vector-ref C^R h      ] 	C         g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	u
 			  g  nameg  f64vector-set! C_R h      ] 	C         g  v
		 g  i		 g  x			  g  filenamef  srfi/srfi-4.scm
	u
 			  g  nameg  f64vector-set! C_RC        g  m
		,  g  filenamef  srfi/srfi-4.scm		
	-	G
	2	G		:	G	&	?	G
	l
,	m
	n
E	o
!	p
(e	q
.	r
5	s
<	t
B	u
 	H
   C6                                                                                                                                                                                                                                              ccache/srfi/srfi-27.go                                                                              0000644                 00000045051 15154557173 0010457 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0J      ]H 4      h*      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-27	 		g  filenameS	
f  srfi/srfi-27.scm	g  importsS	g  srfi-9	 	 	 	g  exportsS	g  random-integer	g  random-real	g  default-random-source	g  make-random-source	g  random-source?	g  random-source-state-ref	g  random-source-state-set!	g  random-source-randomize!	g  random-source-pseudo-randomize!	g  random-source-make-integers	g  random-source-make-reals	 	g  set-current-module	 	 	 g  cond-expand-provide	!g  current-module	" 	#g  :random-source	$g  %%make-random-source-procedure	%g  make-syntax-transformer	&% 	'% 	(g  %make-random-source	)g  macro	*g  $sc-dispatch	+* 	,* 	-g  _	.g  any	/-. 	0g  syntax-object	1g  lambda	2g  m-46961e50f6-4	3g  top	423 	5g  ribcage	6g  t-46961e50f6-3	76 	84 	9f  l-46961e50f6-9	:9 	;578: 	<5 	=g  x	>= 	?f  l-46961e50f6-6	@? 	A5>8@ 	Bg  shift	Cg  	proc-name	Dg  args	ECD 	F3 	GFF 	Hf  l-1e8ba8b5a-2ba	If  l-1e8ba8b5a-2bb	JHI 	K5EGJ 	Lg  key	Mg  value	Ng  name	Og  formals	Pg  body	QLMNOP 	RFFFFF 	Sf  l-1e8ba8b5a-2ad	Tf  l-1e8ba8b5a-2ae	Uf  l-1e8ba8b5a-2af	Vf  l-1e8ba8b5a-2b0	Wf  l-1e8ba8b5a-2b1	XSTUVW 	Y5QRX 	Zg  make-procedure-name	[Z 	\F 	]f  l-1e8ba8b5a-29d	^] 	_5[\^ 	`F 	af  l-1e8ba8b5a-29c	ba 	c5>`b 	d4;<AB<<<<KY_c 	eg  hygiene	fe 	g01df 	hg  state	iF;<A 	je 	k0hij 	lk 	mg  make-struct	ng  m-46961e50f6-1	on3 	pg  t-1e8ba8b5a-38d	qg  t-1e8ba8b5a-38c	rg  t-1e8ba8b5a-38b	spqr 	tg  m-1e8ba8b5a-38e	ut3 	vuuu 	wf  l-1e8ba8b5a-392	xf  l-1e8ba8b5a-393	yf  l-1e8ba8b5a-394	zwxy 	{5svz 	|g  	ctor-args	}| 	~f  l-1e8ba8b5a-37a	~  5}`  g  ctor g  field   f  l-1e8ba8b5a-376 f  l-1e8ba8b5a-377   5G  g  form g  	type-name g  constructor-spec g  field-names   FFFF  f  l-1e8ba8b5a-36b f  l-1e8ba8b5a-36c f  l-1e8ba8b5a-36d f  l-1e8ba8b5a-36e   5  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers   FFFFFFFF  f  l-1e8ba8b5a-343 f  l-1e8ba8b5a-341 f  l-1e8ba8b5a-33f f  l-1e8ba8b5a-33d f  l-1e8ba8b5a-33b f  l-1e8ba8b5a-339 f  l-1e8ba8b5a-337 f  l-1e8ba8b5a-335   5  f  l-1e8ba8b5a-334   5>`  o;<AB<{<<<<  0mf  0#ij  0
f  k  gl  g  each-any - g  syntax-violation     f  Wrong number of arguments g  identifier?     F<A  0$j      f  -source expression failed to match any pattern g  record-type-vtable     g  pw g  default-record-printer     h  g  set-struct-vtable-name!     g  vtable-offset-user     g  %random-source?-procedure g  m-46961e50f6-11 3  g  t-46961e50f6-10     f  l-46961e50f6-16   5  f  l-46961e50f6-13   5>  <B<<<<KY_c  01f  g  obj g  t-1e8ba8b5a-47e g  t-1e8ba8b5a-478 g  t-1e8ba8b5a-479 g  t-1e8ba8b5a-47a g  t-1e8ba8b5a-47d g  t-1e8ba8b5a-47c g  t-1e8ba8b5a-47b   g  m-1e8ba8b5a-47f 3    f  l-1e8ba8b5a-483 f  l-1e8ba8b5a-484 f  l-1e8ba8b5a-485 f  l-1e8ba8b5a-486 f  l-1e8ba8b5a-487 f  l-1e8ba8b5a-488 f  l-1e8ba8b5a-489   5  g  	copier-id   f  l-1e8ba8b5a-476   5`  g  	ctor-name   f  l-1e8ba8b5a-46e   5`    f  l-1e8ba8b5a-46c   5`  g  layout   f  l-1e8ba8b5a-46a  5` g  
immutable? f  l-1e8ba8b5a-468 5` g  field-count	 
f  l-1e8ba8b5a-466
 5	` g  
getter-ids f  l-1e8ba8b5a-463 5` g  	field-ids f  l-1e8ba8b5a-460 5` g  predicate-nameg  
field-spec FFFFFF f  l-1e8ba8b5a-453f  l-1e8ba8b5a-454f  l-1e8ba8b5a-455f  l-1e8ba8b5a-456f  l-1e8ba8b5a-457 f  l-1e8ba8b5a-458!  "5! #o<B<<<<<<<<<<<<" $0#f %$ &g  and'0&#f (g  struct?)0(#f *)$ +g  eq?,0+#f -g  struct-vtable.0-#f /.$ 0F< 10#0j 2,/1 3'*2 4%3 5F< 605j 7g  throw-bad-struct87 97 :g  random-source-state;g  %random-source-state-procedure<g  free-id=g  
%%on-error>g  m-46961e50f6-1d?>3 @? Af  l-46961e50f6-1fBA C5>@B D?<CB<<<<KY_c E0=Df F<E GF. Hg  %%typeIg  t-1e8ba8b5a-3a5Jg  t-1e8ba8b5a-3a6Kg  t-1e8ba8b5a-3a7Lg  t-1e8ba8b5a-3a8Mg  t-1e8ba8b5a-3a9Ng  t-1e8ba8b5a-3aaOg  t-1e8ba8b5a-3abPIJKLMNO Qg  m-1e8ba8b5a-3acRQ3 SRRRRRRR Tf  l-1e8ba8b5a-3b0Uf  l-1e8ba8b5a-3b1Vf  l-1e8ba8b5a-3b2Wf  l-1e8ba8b5a-3b3Xf  l-1e8ba8b5a-3b4Yf  l-1e8ba8b5a-3b5Zf  l-1e8ba8b5a-3b6[TUVWXYZ \5PS[ ]g  getter^g  index_]^ `f  l-1e8ba8b5a-3a3af  l-1e8ba8b5a-3a4b`a c5_Gb d eFFF ff  l-1e8ba8b5a-39egf  l-1e8ba8b5a-39fhf  l-1e8ba8b5a-3a0ifgh j5dei ko<CB<\<<<c<j l0Hkf m<l n-Gm. og  ckpg  errqg  srpq s?? tf  l-46961e50f6-22uf  l-46961e50f6-23vtu w5rsv x?w<CB<<<<KY_c y0oxf zg  quote{0zxf |Fw<C }0#|j ~{} ~ g  %%index0kf < -G. f  l-46961e50f6-27f  l-46961e50f6-28 5rs ?<CB<<<<KY_c 0of 0zf <C 0
j   g  %%copier0kf < -G. f  l-46961e50f6-2cf  l-46961e50f6-2d 5rs ?<CB<<<<KY_c 0of 0zf g  %%:random-source-set-fieldsF<C 0j   g  t-46961e50f6-1c f  l-46961e50f6-31 5@ ?<CB<<<<KY_c 01f o<CB<\<<<c<j 0qf  g  if0f 0+f 0-f  F<C 0#j  g  
struct-ref0f <C 0
j  07f 0zf 0:j     F<C 0;j g  each..  ...Ìg  %%set-fieldsg  dummyg  check?g  exprq] g  m-46961e50f6-383 oooo f  l-46961e50f6-3df  l-46961e50f6-3ef  l-46961e50f6-3ff  l-46961e50f6-40f  l-46961e50f6-41 5  f  l-46961e50f6-3a 5> g  t-1e8ba8b5a-3c4g  t-1e8ba8b5a-3c6g  t-1e8ba8b5a-3c5 g  m-1e8ba8b5a-3c73  f  l-1e8ba8b5a-3cbf  l-1e8ba8b5a-3ccf  l-1e8ba8b5a-3cd 5 f  l-1e8ba8b5a-3c1f  l-1e8ba8b5a-3c2f  l-1e8ba8b5a-3c3 5de o<B<<<< 0f F< 0#j 0:j  g  map  g  listg  set-random-source-state!g  #%set-random-source-state!-procedure-.. g  m-46961e50f6-4c3 g  t-46961e50f6-4ag  t-46961e50f6-4b  f  l-46961e50f6-51f  l-46961e50f6-52 5   f  l-46961e50f6-4e 5>  <B<<<<KY_c 01f g  t-1e8ba8b5a-3e6g  t-1e8ba8b5a-3e7 	g  m-1e8ba8b5a-3e8
	3 

 f  l-1e8ba8b5a-3ecf  l-1e8ba8b5a-3ed 5 g  setterN] f  l-1e8ba8b5a-3e0f  l-1e8ba8b5a-3e1f  l-1e8ba8b5a-3e2 5e ^ f  l-1e8ba8b5a-3d7f  l-1e8ba8b5a-3d8 5G g  field-specs f  l-1e8ba8b5a-3d3f  l-1e8ba8b5a-3d4  !5G  "o<B<<<! #0q"f $g  val%0$"f &#% '0"f (0+"f )0-"f *)# +F< ,0#+j -(*, .g  struct-set!/0."f 0< 10
0j 2/#1% 307"f 40z"f 50+j 645 73#6 8'-27 9&8 :F< ;0:j <g  seed->random-state=g  random-state->datum>g  datum->random-state?g  gettimeofday@e  	1000000.0Ag  	i+j->seedBg  spreadCg  randomDg  random:uniformEg  real?Fg  errorGf  !unit must be real between 0 and 1C 5       h    ]4	
5 4 >  "  G   4 i4!i5 ">  "  G  #   h      ]  C      y       g  state
		
  g  filenamef  srfi/srfi-27.scm
	(
 		
  g  nameg  %%make-random-source-procedure C$R4'(),/  h   6   ]  C      .       g  t-46961e50f6-3
		
  		
   C(      h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-27.scm		(
 		   C-     h   C   ] L 6;       g  filenamef  srfi/srfi-27.scm		(
 		
   C       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-27.scm
	(
 		n   C5(R#ƨ  4 #>  "  G   	̖$i  #R# h   z   ] $   CC      r       g  obj
		  g  filenamef  srfi/srfi-27.scm
	(
 		  g  nameg  %random-source?-procedure CR4'),/4        h   7   ]  C      /       g  t-46961e50f6-10
		
  		
   C     h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-27.scm		(
 		   C-     h   C   ] L 6;       g  filenamef  srfi/srfi-27.scm		(
 		
   C6      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-27.scm
	(
 		n   C5R#9:   h   }   ] &   
C 6u       g  s
		  g  filenamef  srfi/srfi-27.scm
	(
 		  g  nameg  %random-source-state-procedure C;R4':),ny       h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C/     h   7   ]  C      /       g  t-46961e50f6-1c
		
  		
   C:    h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-27.scm		(
 		   C-     h   C   ] L 6;       g  filenamef  srfi/srfi-27.scm		(
 		
   C      h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-27.scm
	(
 	    C5:R4'), h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-27.scm
	(
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R#9        h       ] &   
C 6             g  s
		 g  val		  g  filenamef  srfi/srfi-27.scm
	(
 			  g  nameg  #%set-random-source-state!-procedure CR4'),9    h   T   ]  C    L       g  t-46961e50f6-4a
		 g  t-46961e50f6-4b		  			   C       h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-27.scm		(
 		   C-     h   C   ] L 6;       g  filenamef  srfi/srfi-27.scm		(
 		
   C;      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-27.scm
	(
 		n   C5R<#     h      ]4
5   C      }       g  state
		  g  filenamef  srfi/srfi-27.scm
	-
		.			.	 		
  g  nameg  make-random-source CR=#9: h       ] &   
"  	4 56~       g  s
		   g  filenamef  srfi/srfi-27.scm
	0
		1		 	1	 		   g  nameg  random-source-state-ref CR>#9        h(      ]
45 &   
C 6            g  s
		# g  state		# g  val				#  g  filenamef  srfi/srfi-27.scm
	3
		4				4	 		#	  g  nameg  random-source-state-set! CR?<@#9     h8      ]45 45 &   
C 6             g  s
		2 g  time		2 g  val			2  g  filenamef  srfi/srfi-27.scm
	6
		7			7		
	8	 		9	'		9	2		9	$		9	7		9	!		8	 		8	 		2  g  nameg  random-source-randomize! CR<A#9  h0      ]4455 &   
C 6             g  s
		* g  i		* g  j			* g  val			*  g  filenamef  srfi/srfi-27.scm
	;
		<			<	2		<			<	 		*	  g  nameg  random-source-pseudo-randomize! CRB h      ]4 	54	5C       g  i
		 g  j		  g  filenamef  srfi/srfi-27.scm
	>
		?			?	
		@	
		?	 			  g  nameg  	i+j->seed CAR   h@      ]"  )
$  C	"
 
"          g  n
		= g  amount		= g  result			/ g  n			/ g  shift			/  g  filenamef  srfi/srfi-27.scm
	B
		C				D			D			G			G			F		 	H		%	I		/	F		/	C	 		=	  g  nameg  spread CBRC#9:     h(   c   ] L &  L 
"  	4L 56      [       g  n
		"  g  filenamef  srfi/srfi-27.scm
	L				M		"	M	 		"   C  h   z   ] O C      r       g  s
		
  g  filenamef  srfi/srfi-27.scm
	K
 		
  g  nameg  random-source-make-integers CRD#9:   h@      ]"  04L &  L 
"  	4L 55  
$  " C"             g  x
	%	6  g  filenamef  srfi/srfi-27.scm
	R			S			T			T	"	%	T		%	T			*	U		/	U		3	V		6	S	 		:
   CEFG       h`      )   3  O C]
45$  
$  "  "  $  "  4>  "  G   6          g  s
			 g  s
		] g  unit		] g  t		4	W  g  filenamef  srfi/srfi-27.scm
	P			Y			Y			"	Y		4	Y		A	Z			E	Z		L	Z			]	[	 
			 		]	  g  nameg  random-source-make-reals CR4i5 R4ii5R4ii5RC             g  m
		, g  rtd
~  g  filenamef  srfi/srfi-27.scm		
	-	&
	2	&		:	&	&	?	&
 	(
	-
q	0
f	3
	6
	;
	>
	B
	K
	O
	]		]
	^		^
	_		_
 	
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        ccache/srfi/srfi-69.go                                                                              0000644                 00000133275 15154557173 0010473 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]W 4       hR      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-69	 		g  filenameS	
f  srfi/srfi-69.scm	g  importsS	g  srfi-1	 	 	g  srfi-9	 	 	g  srfi-13	 	 	g  ice-9	g  optargs	 	 	 	g  exportsS	g  make-hash-table	g  hash-table?	g  alist->hash-table	g  hash-table-equivalence-function	g  hash-table-hash-function	 g  hash-table-ref	!g  hash-table-ref/default	"g  hash-table-set!	#g  hash-table-delete!	$g  hash-table-exists?	%g  hash-table-update!	&g  hash-table-update!/default	'g  hash-table-size	(g  hash-table-keys	)g  hash-table-values	*g  hash-table-walk	+g  hash-table-fold	,g  hash-table->alist	-g  hash-table-copy	.g  hash-table-merge!	/g  string-ci-hash	0g  hash-by-identity	1 !"#$%&'()*+,-./0 	2g  
re-exportsS	3g  string-hash	43 	5g  replacementsS	6g  hash	76 	8g  set-current-module	98 	:8 	;g  cond-expand-provide	<g  current-module	= 	>g  make-syntax-transformer	?> 	@> 	Ag  hashx-invoke	Bg  macro	Cg  $sc-dispatch	DC 	EC 	Fg  _	Gg  any	HFG	Ig  syntax->datum	JI 	KI 	Lg  datum->syntax	ML 	NL 	Og  ht-associator	Pg  ht-real-table	Qg  syntax-violation	RQ 	SQ 	Tf  -source expression failed to match any pattern	Ug  with-hashx-values	Vg  let	Wg  first	Xg  second	Yg  third	Zg  most-positive-fixnum	[g  caller-with-default-size	\6 	]6 	^g  string-hash-ci	_g  hashq	`g  srfi-69:hash-table	ag  "%make-srfi-69-hash-table-procedure	bg  make-srfi-69-hash-table	cFGGGGGG 	dg  syntax-object	eg  lambda	fg  m-46961e518c-31	gg  top	hfg 	ig  ribcage	jg  t-46961e518c-2b	kg  t-46961e518c-2c	lg  t-46961e518c-2d	mg  t-46961e518c-2e	ng  t-46961e518c-2f	og  t-46961e518c-30	pjklmno 	qhhhhhh 	rf  l-46961e518c-36	sf  l-46961e518c-37	tf  l-46961e518c-38	uf  l-46961e518c-39	vf  l-46961e518c-3a	wf  l-46961e518c-3b	xrstuvw 	yipqx 	zi 	{g  x	|{ 	}h 	~f  l-46961e518c-33	~  i|}  g  shift g  	proc-name g  args   g    f  l-1e8ba8b5a-2ba f  l-1e8ba8b5a-2bb   i  g  key g  value g  name g  formals g  body     f  l-1e8ba8b5a-2ad f  l-1e8ba8b5a-2ae f  l-1e8ba8b5a-2af f  l-1e8ba8b5a-2b0 f  l-1e8ba8b5a-2b1   i  g  make-procedure-name     f  l-1e8ba8b5a-29d   i    f  l-1e8ba8b5a-29c   i|  hyzzzzz  g  hygiene   de  g  
real-table yz    d  g  
associator d  g  size d  g  weakness d  g  equivalence-function d  g  hash-function d    g  make-struct g  m-46961e518c-29 g  g  t-1e8ba8b5a-38d g  t-1e8ba8b5a-38c g  t-1e8ba8b5a-38b   g  m-1e8ba8b5a-38e g    f  l-1e8ba8b5a-392 f  l-1e8ba8b5a-393 f  l-1e8ba8b5a-394   i  g  	ctor-args   f  l-1e8ba8b5a-37a   i  g  ctor g  field   f  l-1e8ba8b5a-376 f  l-1e8ba8b5a-377   i  g  form g  	type-name g  constructor-spec g  field-names     f  l-1e8ba8b5a-36b f  l-1e8ba8b5a-36c f  l-1e8ba8b5a-36d f  l-1e8ba8b5a-36e   i  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers     f  l-1e8ba8b5a-343 f  l-1e8ba8b5a-341 f  l-1e8ba8b5a-33f f  l-1e8ba8b5a-33d f  l-1e8ba8b5a-33b f  l-1e8ba8b5a-339 f  l-1e8ba8b5a-337 f  l-1e8ba8b5a-335   i  f  l-1e8ba8b5a-334   i|  yzzzzzz  d  d`  d
   	   g  each-any F Q  Q  f  Wrong number of arguments g  identifier?   z da g  record-type-vtable  g  pwpwpwpwpwpwg  default-record-printer	 
  g  set-struct-vtable-name!  g  vtable-offset-user  g  %hash-table?-procedureFG g  m-46961e518c-48g g  t-46961e518c-47  f  l-46961e518c-4d i f  l-46961e518c-4a i| zzzzz  de !g  obj"g  t-1e8ba8b5a-47e#g  t-1e8ba8b5a-478$g  t-1e8ba8b5a-479%g  t-1e8ba8b5a-47a&g  t-1e8ba8b5a-47d'g  t-1e8ba8b5a-47c(g  t-1e8ba8b5a-47b)"#$%&'( *g  m-1e8ba8b5a-47f+*g ,+++++++ -f  l-1e8ba8b5a-483.f  l-1e8ba8b5a-484/f  l-1e8ba8b5a-4850f  l-1e8ba8b5a-4861f  l-1e8ba8b5a-4872f  l-1e8ba8b5a-4883f  l-1e8ba8b5a-4894-./0123 5i),4 6g  	copier-id76 8f  l-1e8ba8b5a-47698 :i79 ;g  	ctor-name<; =f  l-1e8ba8b5a-46e>= ?i<> @ Af  l-1e8ba8b5a-46cBA Ci@B Dg  layoutED Ff  l-1e8ba8b5a-46aGF HiEG Ig  
immutable?JI Kf  l-1e8ba8b5a-468LK MiJL Ng  field-countON Pf  l-1e8ba8b5a-466QP RiOQ Sg  
getter-idsTS Uf  l-1e8ba8b5a-463VU WiTV Xg  	field-idsYX Zf  l-1e8ba8b5a-460[Z \iY[ ]g  predicate-name^g  
field-spec_I]^ ` af  l-1e8ba8b5a-453bf  l-1e8ba8b5a-454cf  l-1e8ba8b5a-455df  l-1e8ba8b5a-456ef  l-1e8ba8b5a-457ff  l-1e8ba8b5a-458gabcdef hi_`g izz5zzzz:z?zCzHzMzRzWz\h jd!i kj lg  andmdli ng  struct?odni poj qg  eq?rdqi sg  struct-vtabletdsi utj vz wd`v xruw ympx z ky {z |d{ }g  throw-bad-struct~} } g  %ht-real-table-procedureg  free-idg  
%%on-errorg  m-46961e518c-54g  f  l-46961e518c-56 i| zzzzz d  G g  %%typeg  t-1e8ba8b5a-3a5g  t-1e8ba8b5a-3a6g  t-1e8ba8b5a-3a7g  t-1e8ba8b5a-3a8g  t-1e8ba8b5a-3a9g  t-1e8ba8b5a-3aag  t-1e8ba8b5a-3ab g  m-1e8ba8b5a-3acg  f  l-1e8ba8b5a-3b0f  l-1e8ba8b5a-3b1f  l-1e8ba8b5a-3b2f  l-1e8ba8b5a-3b3f  l-1e8ba8b5a-3b4f  l-1e8ba8b5a-3b5f  l-1e8ba8b5a-3b6 i g  getterg  index f  l-1e8ba8b5a-3a3f  l-1e8ba8b5a-3a4 i S6  f  l-1e8ba8b5a-39ef  l-1e8ba8b5a-39ff  l-1e8ba8b5a-3a0 i zzzzzz d  FG g  ckg  errg  s  f  l-46961e518c-59f  l-46961e518c-5a i zzzzz d g  quoted z d`   g  %%indexd  FG f  l-46961e518c-5ef  l-46961e518c-5f i zzzzz d d z d
   g  %%copierd  FG f  l-46961e518c-63f  l-46961e518c-64 i zzzzz d d g  %%srfi-69:hash-table-set-fieldsz d   g  t-46961e518c-53 f  l-46961e518c-68 i zzzzz de zzzzzz d  g  ifd dq ds  z d`  g  
struct-refd z d
  d} d dP       z d g  %ht-associator-procedureg  m-46961e518c-6fg  f  l-46961e518c-71	 
i|	 z
zzzz d  G z
zzzzz d  FG  f  l-46961e518c-74f  l-46961e518c-75 i z
zzzz d d z
 d`   d   !F G "f  l-46961e518c-79#f  l-46961e518c-7a$"# %i$ &%z
zzzz 'd& (d& )%z
 *d) +(* ,+ -d .- /F.G 0f  l-46961e518c-7e1f  l-46961e518c-7f201 3i2 43z
zzzz 5d4 6d4 73z
 8d7 968 :9 ;g  t-46961e518c-6e<; =f  l-46961e518c-83>= ?i<> @?z
zzzz Ade@ B?z
zzzzz CdB DC EdB FdqB GdsB HGC I?z
 Jd`I KFHJ LdB M?z
 NdM OLCN Pd}B QdB RdOI SQR TPCS UEKOT VADU Wz
 XdW Yg  ht-sizeZg  %ht-size-procedure[g  m-46961e518c-8a\[g ]\ ^f  l-46961e518c-8c_^ `i|]_ a\z`zzzz bda cb dcG ez`zzzzz fde gf hFdgG i\\ jf  l-46961e518c-8fkf  l-46961e518c-90ljk miil n\mz`zzzz odn pdn qmz` rd`q spr ts ude vu wFdvG xf  l-46961e518c-94yf  l-46961e518c-95zxy {iiz |\{z`zzzz }d| ~d| {z` d	 ~  de  FdG f  l-46961e518c-99f  l-46961e518c-9a ii \z`zzzz d d z` d   g  t-46961e518c-89 f  l-46961e518c-9e i] \z`zzzz de z`zzzzz d  d dq ds  z` d`  d z` d	  d} d dY     z` dZ g  ht-weaknessg  %ht-weakness-procedureg  m-46961e518c-a5g  f  l-46961e518c-a7 i| zzzzz d  G zzzzzz d  FG  f  l-46961e518c-aaf  l-46961e518c-ab i zzzzz d d z d`   d  FG f  l-46961e518c-aff  l-46961e518c-b0 i zzzzz d d z d	   d  FG f  l-46961e518c-b4f  l-46961e518c-b5 i zzzzz d d z d   g  t-46961e518c-a4 f  l-46961e518c-b9 i zzzzz de zzzzzz d  d dq ds  z d`  d z d	  d} d d       z d g  *%hash-table-equivalence-function-procedureg  m-46961e518c-c0g  	f  l-46961e518c-c2
	 i|
 zzzzz d  G zzzzzz d  FG  f  l-46961e518c-c5f  l-46961e518c-c6 i zzzzz d d z d`    d !  "F!G #f  l-46961e518c-ca$f  l-46961e518c-cb%#$ &i% '&zzzzz (d' )d' *&z +d	* ,)+ -, .d /. 0F/G 1f  l-46961e518c-cf2f  l-46961e518c-d0312 4i3 54zzzzz 6d5 7d5 84z 9d8 :79 ;: <g  t-46961e518c-bf=< >f  l-46961e518c-d4?> @i=? A@zzzzz BdeA C@zzzzzz DdC ED FdC GdqC HdsC IHD J@z Kd`J LGIK MdC N@z Od	N PMDO Qd}C RdC SdJ TRS UQDT VFLPU WBEV Xz YdX Zg  #%hash-table-hash-function-procedure[g  m-46961e518c-db\[g ]\ ^f  l-46961e518c-dd_^ `i|]_ a\z`zzzz bda cb dcG ez`zzzzz fde gf hFdgG i\\ jf  l-46961e518c-e0kf  l-46961e518c-e1ljk miil n\mz`zzzz odn pdn qmz` rd`q spr ts ude vu wFdvG xf  l-46961e518c-e5yf  l-46961e518c-e6zxy {iiz |\{z`zzzz }d| ~d| {z` d	 ~  de  FdG f  l-46961e518c-eaf  l-46961e518c-eb ii \z`zzzz d d z` d   g  t-46961e518c-da f  l-46961e518c-ef i] \z`zzzz de z`zzzzz d  d dq ds  z` d`  d z` d	  d} d d     z` dZ g  eachGG  GGGg  %%set-fieldsg  dummyg  check?g  expr g  m-46961e518c-f6g  f  l-46961e518c-fbf  l-46961e518c-fcf  l-46961e518c-fdf  l-46961e518c-fef  l-46961e518c-ff i  f  l-46961e518c-f8 i| g  t-1e8ba8b5a-3c4g  t-1e8ba8b5a-3c6g  t-1e8ba8b5a-3c5 g  m-1e8ba8b5a-3c7g  f  l-1e8ba8b5a-3cbf  l-1e8ba8b5a-3ccf  l-1e8ba8b5a-3cd i f  l-1e8ba8b5a-3c1f  l-1e8ba8b5a-3c2f  l-1e8ba8b5a-3c3 i zzzzz d z d` dP dO dY d d d  g  map  g  listg  ht-size!g  %ht-size!-procedureFGG g  m-46961e518c-10ag g  t-46961e518c-108g  t-46961e518c-109  f  l-46961e518c-10ff  l-46961e518c-110 i  f  l-46961e518c-10c i| zzzzz de g  t-1e8ba8b5a-3e6g  t-1e8ba8b5a-3e7 g  m-1e8ba8b5a-3e8g   f  l-1e8ba8b5a-3ecf  l-1e8ba8b5a-3ed i  g  setter f  l-1e8ba8b5a-3e0f  l-1e8ba8b5a-3e1	f  l-1e8ba8b5a-3e2
	 i
 ^ f  l-1e8ba8b5a-3d7f  l-1e8ba8b5a-3d8 i g  field-specs f  l-1e8ba8b5a-3d3f  l-1e8ba8b5a-3d4 i zzzz d g  vald  d dq ds   z !d`  "! #g  struct-set!$d# %z &d	% '$& (d} )d *d  +)* ,(+ -"', .- /z 0d/ 1g  equal?2g  eqv?3g  hashv4g  string=?5g  string-ci=?6g  guess-hash-function7g  reverse!8g  keyword?9g  without-keyword-args: ; <g  make-weak-key-hash-table=g  make-weak-value-hash-table>g  key-or-value?g  make-doubly-weak-hash-table@g  errorAf  Invalid weak hash table typeBg  guile-ht-ctorCg  assocDC EC Fg  assqGg  assvHg  equivalence-proc->associatorIg  weakSJI	KJ Lg  for-eachMg  hashx-get-handleNg  
hashx-set!Of  ht-valuePg  ht-unspecifiedQg  	hashx-refRf  Key not in tableSg  hashx-create-handle!Tg  hashx-remove!Ug  	hash-foldVg  
alist-consC 5 h]    ]4	
124575 4: >  "  G   4;i4<i5 =>  "  G  4@ABEHKNOP      h(      - 1 3     C        g  
hashx-proc
			' g  ht-var			' g  args				'  g  filenamef  srfi/srfi-69.scm
	a
		d	 			'	
	   C h   d   ]	4 5L 4?6\       g  args
		 g  v			  g  filenamef  srfi/srfi-69.scm		a
 		   CST     h(   !  ]	4 5$   O @ 6       g  y
		' g  tmp		'  g  filenamef  srfi/srfi-69.scm
	a
 		'  g  documentationf  rInvoke HASHX-PROC, a `hashx-*' procedure taking a hash-function,
assoc-function, and the hash-table as first args.g  
macro-typeg  defmacrog  defmacro-argsg  args  C5AR4@UBEHKNVWXOYP       hH      - 1 3 4 5  4 5  4 5   C         g  bindings
			F g  ht-var			F g  
body-forms				F  g  filenamef  srfi/srfi-69.scm
	i
		l			l			l			m		%	l		.	n		6	l	 				F	
	   C     h   d   ]	4 5L 4?6\       g  args
		 g  v			  g  filenamef  srfi/srfi-69.scm		i
 		   CST     h(     ]	4 5$   O @ 6       g  y
		' g  tmp		'  g  filenamef  srfi/srfi-69.scm
	i
 		'  g  documentationf  fBind BINDINGS to the hash-function, associator, and real-table of
HT-VAR, while evaluating BODY-FORMS.g  
macro-typeg  defmacrog  defmacro-argsg  args  C5URZ       h    o   - . , 3 #  L  6  g       g  obj
		 g  size		  g  filenamef  srfi/srfi-69.scm
	z			{	 		   C      h     ] O C             g  hash-fn
		
  g  filenamef  srfi/srfi-69.scm
	w
 		
  g  nameg  caller-with-default-sizeg  documentationf  nAnswer a function that makes `most-positive-fixnum' the default
second argument to HASH-FN, a 2-arg procedure. C[R4[i]56R^i/R4[i_i50R`     h     ]  C           g  
real-table
		 g  
associator		 g  size			 g  weakness			 g  equivalence-function			 g  hash-function			  g  filenamef  srfi/srfi-69.scm
 
 			  g  nameg  "%make-srfi-69-hash-table-procedure CaR4@bBEc   h      ]  C           g  t-46961e518c-2b
		 g  t-46961e518c-2c		 g  t-46961e518c-2d			 g  t-46961e518c-2e			 g  t-46961e518c-2f			 g  t-46961e518c-30			  			   Cb    h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-69.scm	 
 		   CF   h   D   ] L 6<       g  filenamef  srfi/srfi-69.scm	 
 		
   C     h      ] C          		
   CST        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-69.scm
 
 		n   C5bR
`  4 `>  "  G   	ai  `R`  h   x   ] $   CC      p       g  obj
		  g  filenamef  srfi/srfi-69.scm
 
 		  g  nameg  %hash-table?-procedure CR4@BEz        h   7   ]  C      /       g  t-46961e518c-47
		
  		
   C     h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-69.scm	 
 		   CF   h   D   ] L 6<       g  filenamef  srfi/srfi-69.scm	 
 		
   C|     h      ] C          		
   CST        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-69.scm
 
 		n   C5R`P   h   x   ] &   
C 6p       g  s
		  g  filenamef  srfi/srfi-69.scm
 
 		  g  nameg  %ht-real-table-procedure CR4@PBE     h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C    h   7   ]  C      /       g  t-46961e518c-53
		
  		
   CP     h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-69.scm	 
 		   CF   h   D   ] L 6<       g  filenamef  srfi/srfi-69.scm	 
 		
   C     h      ] C          		
   CST        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-69.scm
 
 	    C5PR`O       h   x   ] &   C 6p       g  s
		  g  filenamef  srfi/srfi-69.scm
 
 		  g  nameg  %ht-associator-procedure CR4@OBE     h   :   ]C     2       g  err
		 g  s		  			   C!', h   :   ]C     2       g  err
		 g  s		  			   C/5: h   :   ]C     2       g  err
		 g  s		  			   CV    h   7   ]  C      /       g  t-46961e518c-6e
		
  		
   CO     h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-69.scm	 
 		   CF   h   D   ] L 6<       g  filenamef  srfi/srfi-69.scm	 
 		
   CX     h      ] C          		
   CST        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-69.scm
 
 	    C5OR`Y      h    r   ] &   	C 6       j       g  s
		  g  filenamef  srfi/srfi-69.scm
 
 		  g  nameg  %ht-size-procedure CZR4@YBEhot  h   :   ]C     2       g  err
		 g  s		  			   Cw} h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C    h   7   ]  C      /       g  t-46961e518c-89
		
  		
   CY    h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-69.scm	 
 		   CF   h   D   ] L 6<       g  filenamef  srfi/srfi-69.scm	 
 		
   C     h      ] C          		
   CST        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-69.scm
 
 	    C5YR`     h    v   ] &   	C 6       n       g  s
		  g  filenamef  srfi/srfi-69.scm
 
 		  g  nameg  %ht-weakness-procedure CR4@BE      h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C    h   7   ]  C      /       g  t-46961e518c-a4
		
  		
   C    h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-69.scm	 
 		   CF   h   D   ] L 6<       g  filenamef  srfi/srfi-69.scm	 
 		
   C     h      ] C          		
   CST        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-69.scm
 
 	    C5R`      h       ] &   	C 6              g  s
		  g  filenamef  srfi/srfi-69.scm
 
 		  g  nameg  *%hash-table-equivalence-function-procedure CR4@BE   h   :   ]C     2       g  err
		 g  s		  			   C"(- h   :   ]C     2       g  err
		 g  s		  			   C06; h   :   ]C     2       g  err
		 g  s		  			   CW    h   7   ]  C      /       g  t-46961e518c-bf
		
  		
   C     h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-69.scm	 
 		   CF   h   D   ] L 6<       g  filenamef  srfi/srfi-69.scm	 
 		
   CY     h      ] C          		
   CST        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-69.scm
 
 	    C5R`       h       ] &   	C 6       {       g  s
		  g  filenamef  srfi/srfi-69.scm
 
 		  g  nameg  #%hash-table-hash-function-procedure CZR4@BEhot  h   :   ]C     2       g  err
		 g  s		  			   Cw} h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C    h   7   ]  C      /       g  t-46961e518c-da
		
  		
   C     h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-69.scm	 
 		   CF   h   D   ] L 6<       g  filenamef  srfi/srfi-69.scm	 
 		
   C     h      ] C          		
   CST        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-69.scm
 
 	    C5R4@BE h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   CST   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-69.scm
 
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R`       h       ] &   	C 6     |       g  s
		 g  val		  g  filenamef  srfi/srfi-69.scm
 
 			  g  nameg  %ht-size!-procedure CR4@BE.   h   V   ]  C    N       g  t-46961e518c-108
		 g  t-46961e518c-109		  			   C     h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-69.scm	 
 		   CF   h   D   ] L 6<       g  filenamef  srfi/srfi-69.scm	 
 		
   C0     h      ] C          		
   CST        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-69.scm
 
 		n   C5R1]q_23435/       h@     ] &  C &  C &  C &  C	 &  
CC           g  
equal-proc
		<  g  filenamef  srfi/srfi-69.scm
 
	
 	 		<  g  nameg  guess-hash-functiong  documentationf  lGuess a hash function for EQUAL-PROC, falling back on `hash', as
specified in SRFI-69 for `make-hash-table'. C6R78W hP     ]"  ?(  64455$  "45" "      g  	rest-list
		P g  acc		E g  	rest-list			E  g  filenamef  srfi/srfi-69.scm
 
	 		 		 		 		 		 		" 		' 		0 		1 		: 		= 	1	E 		E 		F 		P 	 		P  g  nameg  without-keyword-argsg  documentationf  MAnswer REST-LIST with all keywords removed along with items that
follow them. C9R;<=>?@A 
h@      ] $  C $  C $  C $  C	 6              g  weakness
		9  g  filenamef  srfi/srfi-69.scm
 
	
 		5 		9 	
 		9  g  nameg  guile-ht-ctorg  documentationf  7Answer the Guile HT constructor for the given WEAKNESS. CBR14EqF2GC   h   s   ] L 6    k       g  item
		 g  alist		  g  filenamef  srfi/srfi-69.scm
 		 	 			   C 	 h@     ] &  "   $  C &  C &  C O C             g  
equal-proc
		9  g  filenamef  srfi/srfi-69.scm
 
	
 			 		 		 	 		9  g  nameg  equivalence-proc->associatorg  documentationf  ^Answer an `assoc'-like procedure that compares the argument key to
alist keys with EQUAL-PROC. CHRK16B9H`       hh     -  /    0  2  3  #   #  	4 5#  44545?4 5
  C       g  
equal-proc
		g g  	hash-proc		g g  weak			g g  
guile-opts			g g  
real-table		R	g g  
associator		R	g  g  filenamef  srfi/srfi-69.scm
 
	) 		; 		< 	
	C 		K 		L 		R 	 			g
		g  weakS	   g  nameg  make-hash-tableg  documentationf  Answer a new hash table using EQUAL-PROC as the comparison
function, and HASH-PROC as the hash function.  See the reference
manual for specifics, of which there are many. CR`YOPLMN    h0      ]	4LLL 5$  CM N LLL  6        g  pair
		/ g  handle		/  g  filenamef  srfi/srfi-69.scm
 		 	 	 	=	 	 	 		 		 	&	 		* 	'	- 	2	/ 	 		/   C      h     - 1 3 4?&  		"  	45H&  		"  	45&  "  	45&  
"  	454	O  >  "  G  J&  	"  4
>  "  G  C       g  alist
		  g  mht-args		  g  result		  g  size		-  g  	hash-proc		~  g  
associator		~  g  
real-table		~  g  val	    g  filenamef  srfi/srfi-69.scm
 
	
 		 		 		- 		~ 	  	  	 			 
  g  nameg  alist->hash-tableg  documentationf  4Convert ALIST to a hash table created with MHT-ARGS. CROPRQ`OPPW@R        h     - 1 3 4 &  	 	"  	4 5 &   "  	4 5 &   
"  	4 55&  $  	456 	
 6C      g  ht
		  g  key		  g  default-thunk-lst			  g  result		a   g  filenamef  srfi/srfi-69.scm
 
	
 		a 		k 		n 		r 		s 		{ 		 	  	 		 	
	  g  nameg  hash-table-refg  documentationf  Lookup KEY in HT and answer the value, invoke DEFAULT-THUNK if KEY
isn't present, or signal an error if DEFAULT-THUNK isn't provided. C RQ`OP   h`     ] &  	 	"  	4 5 &   "  	4 5 &   
"  	4 56              g  ht
		Y g  key		Y g  default			Y  g  filenamef  srfi/srfi-69.scm
 
	Y 	 		Y	  g  nameg  hash-table-ref/defaultg  documentationf  LLookup KEY in HT and answer the value.  Answer DEFAULT if KEY isn't
present. C!RS`OPPY 
 h   @  ]4 &  	 	"  	4 5 &   "  	4 5 &   
"  	4 55&  N &  	 	"  	4 5 &   	"  4 	>  "  G  "   C   8      g  ht
	  g  key	  g  	new-value		  g  handle		Z  g  val	    g  filenamef  srfi/srfi-69.scm
 
	 		Z 		a 		e 		h 	  	  	  	 
	 	  g  nameg  hash-table-set!g  documentationf  Set KEY to NEW-VALUE in HT. C"R`OPMYT 
 h   G  ]" &  	 	"  	4 5 &   "  	4 5 &   
"  	4 545$  f &  	 	"  	4 5 &   	"  4 >  "  G  4	>  "  G  "   C       ?      g  ht
	  g  key	  g  h		Q  g  a		Q  g  real-ht		Q  g  val	    g  filenamef  srfi/srfi-69.scm
 
	Q 		X 		h 		k 	  	  	
  	
 		 	  g  nameg  hash-table-delete!g  documentationf  Remove KEY's association in HT. C#RM`OP    h`      ]4 &  	 	"  	4 5 &   "  	4 5 &   
"  	4 55$  CC       g  ht
		` g  key		`  g  filenamef  srfi/srfi-69.scm
 
	 		\ 	 		`	  g  nameg  hash-table-exists?g  documentationf  "Return whether KEY is a key in HT. C$R`OPMN@RY      h    - 1 3 	 &  	 	"  	4 5 &   "  	4 5 &   
"  	4 545$  45"  4$  445 5"  4	 5>  "  G   &  	 	"  	4 
5 &   	"  4 >  "  G  C           g  ht
		 g  key		 g  modifier			 g  default-thunk-lst			 g  	hash-proc		X g  
associator		X g  
real-table		X g  handle		k g  val	   	g  filenamef  srfi/srfi-69.scm

	X
		_		k		s		v		{	(	}		~	 	 	 	 	 	' 	( 	' 	 	 	$ 	 	 	 	 	 			
	  g  nameg  hash-table-update!g  documentationf  Modify HT's value at KEY by passing its value to MODIFIER and
setting it to the result thereof.  Invoke DEFAULT-THUNK for the old
value if KEY isn't in HT, or signal an error if DEFAULT-THUNK is not
provided. C%R% h   D   ] L C   <       g  filenamef  srfi/srfi-69.scm
	& 		
   C h   ^  ] O 6     V      g  ht
		 g  key		 g  modifier			 g  default			  g  filenamef  srfi/srfi-69.scm

		 			  g  nameg  hash-table-update!/defaultg  documentationf  Modify HT's value at KEY by passing its old value, or DEFAULT if it
doesn't have one, to MODIFIER, and setting it to the result thereof. C&R`+  h   }   ]C  u       g  k
		 g  v		 g  ans			  g  filenamef  srfi/srfi-69.scm
!		!	, 			   CY     hH   -  ] &  	 	"  	4 5$  	 
6 &   	C 6       %      g  ht
		A  g  filenamef  srfi/srfi-69.scm

	 		! 		*!		-"	 		A  g  nameg  hash-table-sizeg  documentationf  Return the number of associations in HT.  This is guaranteed O(1)
for tables where #:weak was #f or not specified at creation time. C'R+   h   }   ] Cu       g  k
		 g  v		 g  lst			  g  filenamef  srfi/srfi-69.scm
&		&	( 			   C        h      ] 6            g  ht
		  g  filenamef  srfi/srfi-69.scm
$
		&	6	&	 		  g  nameg  hash-table-keysg  documentationf   Return a list of the keys in HT. C(R+h   }   ]Cu       g  k
		 g  v		 g  lst			  g  filenamef  srfi/srfi-69.scm
*		*	( 			   C        h      ] 6            g  ht
		  g  filenamef  srfi/srfi-69.scm
(
		*	6	*	 		  g  nameg  hash-table-valuesg  documentationf  "Return a list of the values in HT. C)R+    h      ]4L  >  GC        g  k
		 g  v		 g  unspec			 g  vals			  g  filenamef  srfi/srfi-69.scm
.		/	5	/	 			   C  h      ] O 6       g  ht
		 g  proc		  g  filenamef  srfi/srfi-69.scm
,
	.	 			  g  nameg  hash-table-walkg  documentationf  3Call PROC with each key and value as two arguments. C*RU`P   h(   Z  ] &   
"  	4 56    R      g  ht
		$ g  f		$ g  knil			$  g  filenamef  srfi/srfi-69.scm
3
	7		$7	 		$	  g  nameg  hash-table-foldg  documentationf  Invoke (F KEY VAL PREV) for each KEY and VAL in HT, where PREV is
the result of the previous invocation, using KNIL as the first PREV.
Answer the final F result. C+R+V  h      ] 6            g  ht
		  g  filenamef  srfi/srfi-69.scm
9
		;	!	;	 		  g  nameg  hash-table->alistg  documentationf  Return an alist for HT. C,R`OP'BUN      h   }   ]LLL  6u       g  k
		 g  v		 g  ign			  g  filenamef  srfi/srfi-69.scm
B		B	# 			   C      h     ]9 &  	 	"  	4 5 &   "  	4 5 &   
"  	4 54 5 &  	 	"  	4 544554	
O >  "  G   &  	 	"  	4 5 C      g  ht
	  g  h	Q  g  a		Q  g  real-ht		Q  g  size		^  g  weak		{  g  new-real-ht	   g  equivalence-function	    g  filenamef  srfi/srfi-69.scm
=
	Q?		X@		^@		c@	-	{@		~A		A	 A	 @	 B	 F	 D	 	   g  nameg  hash-table-copyg  documentationf  Answer a copy of HT. C-R+"     h   }   ]L  6    u       g  k
		 g  v		 g  ign			  g  filenamef  srfi/srfi-69.scm
L		L	 			   C        h      ]4  O >  "  G   C        g  ht
		 g  other-ht		  g  filenamef  srfi/srfi-69.scm
H
	K	 			  g  nameg  hash-table-merge!g  documentationf  `Add all key/value pairs from OTHER-HT to HT, overriding HT's
mappings where present.  Return HT. C.RC          g  m
		4 g  rtd
  g  filenamef  srfi/srfi-69.scm		D
	5	Z
	:	Z		B	Z	&	G	Z
	w
	}		}
	
 	 
	S 
3 
5 
78 
9Q 
; 
? 
? 	+? 	? 
A 
C 
E 
G 
II 
M
Oi
Q
S$
Tw(
V/,
W3
X9
[=
]H
 %	]
   C6                                                                                                                                                                                                                                                                                                                                    ccache/srfi/srfi-14.go                                                                              0000644                 00000004707 15154557173 0010456 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0	      ] Z 4    h	      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-14	 		g  filenameS	
f  srfi/srfi-14.scm	g  set-current-module	 	 	g  call-with-deferred-observers	 	 	g  module-re-export!	 	 	g  current-module	 	 	g  	char-set?	g  	char-set=	g  
char-set<=	g  char-set-hash	g  char-set-cursor	g  char-set-ref	g  char-set-cursor-next	g  end-of-char-set?	g  char-set-fold	 g  char-set-unfold	!g  char-set-unfold!	"g  char-set-for-each	#g  char-set-map	$g  char-set-copy	%g  char-set	&g  list->char-set	'g  list->char-set!	(g  string->char-set	)g  string->char-set!	*g  char-set-filter	+g  char-set-filter!	,g  ucs-range->char-set	-g  ucs-range->char-set!	.g  
->char-set	/g  char-set-size	0g  char-set-count	1g  char-set->list	2g  char-set->string	3g  char-set-contains?	4g  char-set-every	5g  char-set-any	6g  char-set-adjoin	7g  char-set-adjoin!	8g  char-set-delete	9g  char-set-delete!	:g  char-set-complement	;g  char-set-union	<g  char-set-intersection	=g  char-set-difference	>g  char-set-xor	?g  char-set-diff+intersection	@g  char-set-complement!	Ag  char-set-union!	Bg  char-set-intersection!	Cg  char-set-difference!	Dg  char-set-xor!	Eg  char-set-diff+intersection!	Fg  char-set:lower-case	Gg  char-set:upper-case	Hg  char-set:title-case	Ig  char-set:letter	Jg  char-set:digit	Kg  char-set:letter+digit	Lg  char-set:graphic	Mg  char-set:printing	Ng  char-set:whitespace	Og  char-set:iso-control	Pg  char-set:punctuation	Qg  char-set:symbol	Rg  char-set:hex-digit	Sg  char-set:blank	Tg  char-set:ascii	Ug  char-set:empty	Vg  char-set:full	W !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUV @	Xg  cond-expand-provide	Y C 5  h   u   ]4	
5 4 >  "  G   4W       h   B   ] 45 6   :       g  filenamef  srfi/srfi-14.scm
	
 		
   C>  "  G  Xi4i5 Y6  m       g  m
		$  g  filenamef  srfi/srfi-14.scm		
	%	
 	`	 	`	& 	`
 	 
   C6                                                          ccache/srfi/srfi-45.go                                                                              0000644                 00000077560 15154557173 0010471 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0X      ] 4       hE      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-45	 		g  filenameS	
f  srfi/srfi-45.scm	g  importsS	g  srfi-9	 	 	g  gnu	 	 	 	g  exportsS	g  delay	g  lazy	g  force	g  eager	g  promise?	 	g  replacementsS	 	g  set-current-module	 	 	g  cond-expand-provide	 g  current-module	! 	"g  promise	#g  %make-promise-procedure	$g  make-syntax-transformer	%$ 	&$ 	'g  make-promise	(g  macro	)g  $sc-dispatch	*) 	+) 	,g  _	-g  any	.,- 	/g  syntax-object	0g  lambda	1g  m-46961e513e-4	2g  top	312 	4g  ribcage	5g  t-46961e513e-3	65 	73 	8f  l-46961e513e-9	98 	:4679 	;4 	<g  x	=< 	>f  l-46961e513e-6	?> 	@4=7? 	Ag  shift	Bg  	proc-name	Cg  args	DBC 	E2 	FEE 	Gf  l-1e8ba8b5a-2ba	Hf  l-1e8ba8b5a-2bb	IGH 	J4DFI 	Kg  key	Lg  value	Mg  name	Ng  formals	Og  body	PKLMNO 	QEEEEE 	Rf  l-1e8ba8b5a-2ad	Sf  l-1e8ba8b5a-2ae	Tf  l-1e8ba8b5a-2af	Uf  l-1e8ba8b5a-2b0	Vf  l-1e8ba8b5a-2b1	WRSTUV 	X4PQW 	Yg  make-procedure-name	ZY 	[E 	\f  l-1e8ba8b5a-29d	]\ 	^4Z[] 	_E 	`f  l-1e8ba8b5a-29c	a` 	b4=_a 	c3:;@A;;;;JX^b 	dg  hygiene	ed 	f/0ce 	gg  val	hE:;@ 	id 	j/ghi 	kj 	lg  make-struct	mg  m-46961e513e-1	nm2 	og  t-1e8ba8b5a-38d	pg  t-1e8ba8b5a-38c	qg  t-1e8ba8b5a-38b	ropq 	sg  m-1e8ba8b5a-38e	ts2 	uttt 	vf  l-1e8ba8b5a-392	wf  l-1e8ba8b5a-393	xf  l-1e8ba8b5a-394	yvwx 	z4ruy 	{g  	ctor-args	|{ 	}f  l-1e8ba8b5a-37a	~} 	4|_~  g  ctor g  field   f  l-1e8ba8b5a-376 f  l-1e8ba8b5a-377   4F  g  form g  	type-name g  constructor-spec g  field-names   EEEE  f  l-1e8ba8b5a-36b f  l-1e8ba8b5a-36c f  l-1e8ba8b5a-36d f  l-1e8ba8b5a-36e   4  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers   EEEEEEEE  f  l-1e8ba8b5a-343 f  l-1e8ba8b5a-341 f  l-1e8ba8b5a-33f f  l-1e8ba8b5a-33d f  l-1e8ba8b5a-33b f  l-1e8ba8b5a-339 f  l-1e8ba8b5a-337 f  l-1e8ba8b5a-335   4  f  l-1e8ba8b5a-334   4=_  n:;@A;z;;;;  /le  /"hi  /
e  j  fk  g  each-any , g  syntax-violation     f  Wrong number of arguments g  identifier?     E;@  /#i      f  -source expression failed to match any pattern g  record-type-vtable     g  pw g  default-record-printer     g  g  set-struct-vtable-name!     g  vtable-offset-user     g  %promise?-procedure g  m-46961e513e-11 2  g  t-46961e513e-10     f  l-46961e513e-16   4  f  l-46961e513e-13   4=  ;A;;;;JX^b  /0e  g  obj g  t-1e8ba8b5a-47e g  t-1e8ba8b5a-478 g  t-1e8ba8b5a-479 g  t-1e8ba8b5a-47a g  t-1e8ba8b5a-47d g  t-1e8ba8b5a-47c g  t-1e8ba8b5a-47b   g  m-1e8ba8b5a-47f 2    f  l-1e8ba8b5a-483 f  l-1e8ba8b5a-484 f  l-1e8ba8b5a-485 f  l-1e8ba8b5a-486 f  l-1e8ba8b5a-487 f  l-1e8ba8b5a-488 f  l-1e8ba8b5a-489   4  g  	copier-id   f  l-1e8ba8b5a-476   4_  g  	ctor-name   f  l-1e8ba8b5a-46e   4_    f  l-1e8ba8b5a-46c   4_  g  layout   f  l-1e8ba8b5a-46a  4_  g  
immutable? f  l-1e8ba8b5a-468 4_ g  field-count 	f  l-1e8ba8b5a-466
	 4_
 g  
getter-ids f  l-1e8ba8b5a-463 4_ g  	field-ids f  l-1e8ba8b5a-460 4_ g  predicate-nameg  
field-spec EEEEEE f  l-1e8ba8b5a-453f  l-1e8ba8b5a-454f  l-1e8ba8b5a-455f  l-1e8ba8b5a-456f  l-1e8ba8b5a-457f  l-1e8ba8b5a-458  !4  "n;A;;;;;;;;;;;;! #/"e $# %g  and&/%"e 'g  struct?(/'"e )(# *g  eq?+/*"e ,g  struct-vtable-/,"e .-# /E; 0/"/i 1+.0 2&)1 3$2 4E; 5/4i 6g  throw-bad-struct76 86 9g  promise-val:g  %promise-val-procedure;g  free-id<g  
%%on-error=g  m-46961e513e-1d>=2 ?> @f  l-46961e513e-1fA@ B4=?A C>;BA;;;;JX^b D/<Ce E;D FE- Gg  %%typeHg  t-1e8ba8b5a-3a5Ig  t-1e8ba8b5a-3a6Jg  t-1e8ba8b5a-3a7Kg  t-1e8ba8b5a-3a8Lg  t-1e8ba8b5a-3a9Mg  t-1e8ba8b5a-3aaNg  t-1e8ba8b5a-3abOHIJKLMN Pg  m-1e8ba8b5a-3acQP2 RQQQQQQQ Sf  l-1e8ba8b5a-3b0Tf  l-1e8ba8b5a-3b1Uf  l-1e8ba8b5a-3b2Vf  l-1e8ba8b5a-3b3Wf  l-1e8ba8b5a-3b4Xf  l-1e8ba8b5a-3b5Yf  l-1e8ba8b5a-3b6ZSTUVWXY [4ORZ \g  getter]g  index^\] _f  l-1e8ba8b5a-3a3`f  l-1e8ba8b5a-3a4a_` b4^Fa c dEEE ef  l-1e8ba8b5a-39eff  l-1e8ba8b5a-39fgf  l-1e8ba8b5a-3a0hefg i4cdh jn;BA;[;;;b;i k/Gje l;k m,Fl- ng  ckog  errpg  sqop r>> sf  l-46961e513e-22tf  l-46961e513e-23ust v4qru w>v;BA;;;;JX^b x/nwe yg  quotez/ywe {Ev;B |/"{i }z| ~} g  %%index/je ; ,F- f  l-46961e513e-27f  l-46961e513e-28 4qr >;BA;;;;JX^b /ne /ye ;B /
i   g  %%copier/je ; ,F- f  l-46961e513e-2cf  l-46961e513e-2d 4qr >;BA;;;;JX^b /ne /ye g  %%promise-set-fieldsE;B /i   g  t-46961e513e-1c f  l-46961e513e-31 4? >;BA;;;;JX^b /0e n;BA;[;;;b;i /pe  g  if/e /*e /,e  E;B /"i  g  
struct-ref/e ;B /
i  /6e /ye /9i     E;B /:i g  each--  ---g  %%set-fieldsg  dummyg  check?g  exprp\ g  m-46961e513e-382 nnnn f  l-46961e513e-3df  l-46961e513e-3ef  l-46961e513e-3ff  l-46961e513e-40f  l-46961e513e-41 4  f  l-46961e513e-3a 4= g  t-1e8ba8b5a-3c4g  t-1e8ba8b5a-3c6g  t-1e8ba8b5a-3c5 g  m-1e8ba8b5a-3c72  f  l-1e8ba8b5a-3cbf  l-1e8ba8b5a-3ccf  l-1e8ba8b5a-3cd 4 f  l-1e8ba8b5a-3c1f  l-1e8ba8b5a-3c2f  l-1e8ba8b5a-3c3 4cd n;A;;;; /e E; /"i /9i  g  map  g  listg  promise-val-set!g  %promise-val-set!-procedure,-- g  m-46961e513e-4c2 g  t-46961e513e-4ag  t-46961e513e-4b  f  l-46961e513e-51f  l-46961e513e-52 4   f  l-46961e513e-4e  4= ;A;;;;JX^b /0e g  t-1e8ba8b5a-3e6g  t-1e8ba8b5a-3e7 g  m-1e8ba8b5a-3e8	2 
		 f  l-1e8ba8b5a-3ecf  l-1e8ba8b5a-3ed 4
 g  setterM\ f  l-1e8ba8b5a-3e0f  l-1e8ba8b5a-3e1f  l-1e8ba8b5a-3e2 4d ] f  l-1e8ba8b5a-3d7f  l-1e8ba8b5a-3d8 4F g  field-specs f  l-1e8ba8b5a-3d3f  l-1e8ba8b5a-3d4  4F !n;A;;;  "/p!e #/g!e $"# %/!e &/*!e '/,!e ('" )E; */")i +&(* ,g  struct-set!-/,!e .; //
.i 0-"/# 1/6!e 2/y!e 3/)i 423 51"4 6%+05 7$6 8E; 9/8i :g  %make-value-procedure;g  
make-value<g  m-46961e513e-6d=<2 >g  t-46961e513e-6b?g  t-46961e513e-6c@>? A== Bf  l-46961e513e-72Cf  l-46961e513e-73DBC E4@AD F= Gf  l-46961e513e-6fHG I4=FH J=E;IA;;;;JX^b K/0Je Lg  tagMEE;I N/LMi Og  procP/OMi QNP Rg  m-46961e513e-69SR2 TSE;IA;z;;;; U/lTe V/LMi W/
Te XUVWNP YKQX ZE;I [/:Zi \g  pwpw]LO ^g  %value?-procedure_g  value?`g  m-46961e513e-7ca`2 bg  t-46961e513e-7bcb da ef  l-46961e513e-81fe g4cdf hf  l-46961e513e-7eih j4=di kag;jA;;;;JX^b l/0ke mSg;jA;;;;;;;;;;;;! n/me on p/%me q/'me rqn s/*me t/,me utn vEg;j w/Lvi xsuw yprx zloy {E;j |/^{i }g  	value-tag~g  %value-tag-procedureg  m-46961e513e-882  f  l-46961e513e-8a 4= ;A;;;;JX^b /<e ; - S;A;[;;;b;i /Ge ; ,-  f  l-46961e513e-8df  l-46961e513e-8e 4q ;A;;;;JX^b /ne /ye E; /Li   /e ; ,- f  l-46961e513e-92f  l-46961e513e-93 4q ;A;;;;JX^b /ne /ye ; /
i   /e ; ,- f  l-46961e513e-97f  l-46961e513e-98 4q ;A;;;;JX^b /ne /ye g  %%value-set-fieldsE; /i   g  t-46961e513e-87 f  l-46961e513e-9c 4 ;A;;;;JX^b /0e S;A;[;;;b;i /pe  /e /*e /,e  E; /Li  /e ; /
i  /6e /ye /}i     E; /~i g  
value-procg  %value-proc-procedureg  m-46961e513e-a32  f  l-46961e513e-a5 4= ;A;;;;JX^b /<e ; - S;A;[;;;b;i /Ge ; ,-  f  l-46961e513e-a8f  l-46961e513e-a9 4q ;A;;;;JX^b /ne /ye E; /Li   /e ; ,- f  l-46961e513e-adf  l-46961e513e-ae 4q ;A;;;;JX^b /ne /ye ; /i   /e ;  ,- f  l-46961e513e-b2f  l-46961e513e-b3 4q ;A;;;;JX^b /ne /ye E; 	/i 
	 
 g  t-46961e513e-a2 f  l-46961e513e-b7 4 ;A;;;;JX^b /0e S;A;[;;;b;i /pe  /e /*e /,e  E; /Li  /e ; /i   !/6e "/ye #/i $"# %!$ & % '& (E; )/(i *g  m-46961e513e-be+*2 ,+SSSS -f  l-46961e513e-c3.f  l-46961e513e-c4/f  l-46961e513e-c50f  l-46961e513e-c61f  l-46961e513e-c72-./01 34,2 4+ 5f  l-46961e513e-c065 74=46 8S3;7A;;;; 9/8e :E3;7 ;/L:i </}:i =/:i ><= ?g  value-tag-set!@g  %value-tag-set!-procedureAg  m-46961e513e-d2BA2 Cg  t-46961e513e-d0Dg  t-46961e513e-d1ECD FBB Gf  l-46961e513e-d7Hf  l-46961e513e-d8IGH J4EFI KB Lf  l-46961e513e-d4ML N4=KM OBJ;NA;;;;JX^b P/0Oe QSJ;NA;;;  R/pQe S/gQe TRS U/Qe V/*Qe W/,Qe XWR YEJ;N Z/LYi [VXZ \/,Qe ]J;N ^/
]i _\R^S `/6Qe a/yQe b/?Yi cab d`Rc eU[_d fPTe gE;N h/@gi ig  value-proc-set!jg  %value-proc-set!-procedurekg  m-46961e513e-e2lk2 mg  t-46961e513e-e0ng  t-46961e513e-e1omn pll qf  l-46961e513e-e7rf  l-46961e513e-e8sqr t4ops ul vf  l-46961e513e-e4wv x4=uw ylt;xA;;;;JX^b z/0ye {St;xA;;;  |/p{e }/g{e ~|} /{e /*{e /,{e | Et;x /Li  /,{e t;x /i |} /6{e /y{e /ii  |  z~ E;x /ji g  exp g  m-46961e513e-1072 E f  l-46961e513e-10cf  l-46961e513e-10d 4  f  l-46961e513e-109 4= E; /'i /;i /yi /i  /0i g  m-46961e513e-11b2 E f  l-46961e513e-120f  l-46961e513e-121 4  f  l-46961e513e-11d 4= E; /i /i g  on-eagerSg  on-lazyS	 g  promise-visitg  set-record-type-printer!g  formatf  #<promise = ~s>f  #<promise => ~s>C 5h4     ]4	
5	 4 >  "  G   4i4 i5 !>  "  G  "       h   x   ]  C      p       g  val
		
  g  filenamef  srfi/srfi-45.scm
	.
 		
  g  nameg  %make-promise-procedure C#R4&'(+.   h   6   ]  C      .       g  t-46961e513e-3
		
  		
   C'      h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-45.scm		.
 		   C,     h   C   ] L 6;       g  filenamef  srfi/srfi-45.scm		.
 		
   C       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-45.scm
	.
 		n   C5'R"Ũ  4 ">  "  G   	˖#i  "R" h   t   ] $   CC      l       g  obj
		  g  filenamef  srfi/srfi-45.scm
	.
 		  g  nameg  %promise?-procedure CR4&(+.3      h   7   ]  C      /       g  t-46961e513e-10
		
  		
   C     h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-45.scm		.
 		   C,     h   C   ] L 6;       g  filenamef  srfi/srfi-45.scm		.
 		
   C5      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-45.scm
	.
 		n   C5R"89   h   u   ] &   
C 6m       g  s
		  g  filenamef  srfi/srfi-45.scm
	.
 		  g  nameg  %promise-val-procedure C:R4&9(+mx~       h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C.     h   7   ]  C      /       g  t-46961e513e-1c
		
  		
   C9    h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-45.scm		.
 		   C,     h   C   ] L 6;       g  filenamef  srfi/srfi-45.scm		.
 		
   C      h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-45.scm
	.
 	    C59R4&(+ h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-45.scm
	.
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R"8        h       ] &   
C 6             g  s
		 g  val		  g  filenamef  srfi/srfi-45.scm
	.
 			  g  nameg  %promise-val-set!-procedure CR4&(+7    h   T   ]  C    L       g  t-46961e513e-4a
		 g  t-46961e513e-4b		  			   C       h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-45.scm		.
 		   C,     h   C   ] L 6;       g  filenamef  srfi/srfi-45.scm		.
 		
   C9      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-45.scm
	.
 		n   C5RL        h      ]  C           g  tag
		 g  proc		  g  filenamef  srfi/srfi-45.scm
	1
 			  g  nameg  %make-value-procedure C:R4&;(+Y       h   T   ]  C    L       g  t-46961e513e-6b
		 g  t-46961e513e-6c		  			   C;       h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-45.scm		1
 		   C,     h   C   ] L 6;       g  filenamef  srfi/srfi-45.scm		1
 		
   C[      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-45.scm
	1
 		n   C5;R\L]  4 L>  "  G   	˖:i  LRL     h   r   ] $   CC      j       g  obj
		  g  filenamef  srfi/srfi-45.scm
	1
 		  g  nameg  %value?-procedure C^R4&_(+.z      h   7   ]  C      /       g  t-46961e513e-7b
		
  		
   C_    h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-45.scm		1
 		   C,     h   C   ] L 6;       g  filenamef  srfi/srfi-45.scm		1
 		
   C|      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-45.scm
	1
 		n   C5_RL8}  h   s   ] &   
C 6k       g  s
		  g  filenamef  srfi/srfi-45.scm
	1
 		  g  nameg  %value-tag-procedure C~R4&}(+ h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C.     h   7   ]  C      /       g  t-46961e513e-87
		
  		
   C}    h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-45.scm		1
 		   C,     h   C   ] L 6;       g  filenamef  srfi/srfi-45.scm		1
 		
   C      h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-45.scm
	1
 	    C5}RL8      h   t   ] &   C 6l       g  s
		  g  filenamef  srfi/srfi-45.scm
	1
 		  g  nameg  %value-proc-procedure CR4&(+        h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C  h   :   ]C     2       g  err
		 g  s		  			   C.'     h   7   ]  C      /       g  t-46961e513e-a2
		
  		
   C    h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-45.scm		1
 		   C,     h   C   ] L 6;       g  filenamef  srfi/srfi-45.scm		1
 		
   C)      h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-45.scm
	1
 	    C5R4&(+9;> h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-45.scm
	1
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5RL8?        h       ] &   
C 6             g  s
		 g  val		  g  filenamef  srfi/srfi-45.scm
	1
 			  g  nameg  %value-tag-set!-procedure C@R4&?(+f      h   T   ]  C    L       g  t-46961e513e-d0
		 g  t-46961e513e-d1		  			   C?       h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-45.scm		1
 		   C,     h   C   ] L 6;       g  filenamef  srfi/srfi-45.scm		1
 		
   Ch      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-45.scm
	1
 		n   C5?RL8i  h       ] &   C 6             g  s
		 g  val		  g  filenamef  srfi/srfi-45.scm
	1
 			  g  nameg  %value-proc-set!-procedure CjR4&i(+     h   T   ]  C    L       g  t-46961e513e-e0
		 g  t-46961e513e-e1		  			   Ci       h   S   ]L 6    K       g  a
		  g  filenamef  srfi/srfi-45.scm		1
 		   C,     h   C   ] L 6;       g  filenamef  srfi/srfi-45.scm		1
 		
   C      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-45.scm
	1
 		n   C5iR4&(+ h   >   ]   C 6       g  dummy
		 g  exp		  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-45.scm
	5
 		"  g  
macro-typeg  syntax-rulesg  patternsg  exp   C5RL"       h      ]	   C          g  x
		 g  val		  g  filenamef  srfi/srfi-45.scm
	8
		9			9			9	 		  g  nameg  eager CR4&(+  h   >   ]  C 6       g  dummy
		 g  exp		  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-45.scm
	;
 		"  g  
macro-typeg  syntax-rulesg  patternsg  exp   C5R"89L}?i      h    ]) &   
"  	4 5&  
"  	45$  &  C6$ Y4&  "  	455  &   
"  	4 5&  
"  	45&  "  &  
"  	45&  
"  	45&  
"  4	>  "  G  &  
"  	45&  "  	45&  "  4
>  "  G  &  
"  4>  "  G   6C         g  promise
	 g  content	 g  key		8 g  promise*		 g  content	  g  s	   g  val	 ' g  s	A` g  val	`  	g  filenamef  srfi/srfi-45.scm
	>
		?			?		!	@	
	8	@		F	A		b	@		c	B	 		B	 	C	  	B	 	D	4 	D	  	D	 	F	7 	F	, 	E	*	H	9A	H	-`	G		I		J	 	  g  nameg  force CR"89L} 
   h   0  - /   0   3 #  #  H &   
"  	4 5KJ&  J
"  	4J5$  J&  J"  	4J56	$  J&  J"  	4J56C(      g  promise
	  g  on-eager	  g  on-lazy		  g  content		&  g  key		^   g  filenamef  srfi/srfi-45.scm
	P
	+	Q		G	R		^	R		n	S	 	S	 	R	 	T	 	T	 
	 
g  on-eagerSg  on-lazyS	   g  nameg  promise-visit CRi"i  h   g   ]L  6    _       g  value
		  g  filenamef  srfi/srfi-45.scm
	Y			Z	 		Z	 		   C    h   f   ]L  6    ^       g  proc
		  g  filenamef  srfi/srfi-45.scm
	[			\	 		\	 		   C       h    s   ] O O 6      k       g  promise
		 g  port		  g  filenamef  srfi/srfi-45.scm
	W			X	 			   C6          g  m
		0 g  rtd
~ g  rtd
Qz  g  filenamef  srfi/srfi-45.scm		"
	1	,
	6	,		>	,	&	C	,
 	.
	1
,	8
1	>
3	P
4	V
 	4
   C6                                                                                                                                                 ccache/srfi/srfi-13.go                                                                              0000644                 00000005572 15154557173 0010456 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0b      ] p 4      h	      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-13	 		g  filenameS	
f  srfi/srfi-13.scm	g  set-current-module	 	 	g  call-with-deferred-observers	 	 	g  module-re-export!	 	 	g  current-module	 	 	g  string?	g  string-null?	g  
string-any	g  string-every	g  make-string	g  string	g  string-tabulate	g  string->list	g  list->string	 g  reverse-list->string	!g  string-join	"g  string-length	#g  
string-ref	$g  string-copy	%g  substring/shared	&g  string-copy!	'g  string-take	(g  string-take-right	)g  string-drop	*g  string-drop-right	+g  
string-pad	,g  string-pad-right	-g  string-trim	.g  string-trim-right	/g  string-trim-both	0g  string-set!	1g  string-fill!	2g  string-compare	3g  string-compare-ci	4g  string=	5g  string<>	6g  string<	7g  string>	8g  string<=	9g  string>=	:g  
string-ci=	;g  string-ci<>	<g  
string-ci<	=g  
string-ci>	>g  string-ci<=	?g  string-ci>=	@g  string-hash	Ag  string-hash-ci	Bg  string-prefix-length	Cg  string-prefix-length-ci	Dg  string-suffix-length	Eg  string-suffix-length-ci	Fg  string-prefix?	Gg  string-prefix-ci?	Hg  string-suffix?	Ig  string-suffix-ci?	Jg  string-index	Kg  string-index-right	Lg  string-skip	Mg  string-skip-right	Ng  string-count	Og  string-contains	Pg  string-contains-ci	Qg  string-upcase	Rg  string-upcase!	Sg  string-downcase	Tg  string-downcase!	Ug  string-titlecase	Vg  string-titlecase!	Wg  string-reverse	Xg  string-reverse!	Yg  string-append	Zg  string-append/shared	[g  string-concatenate	\g  string-concatenate-reverse	]g  string-concatenate/shared	^g  !string-concatenate-reverse/shared	_g  
string-map	`g  string-map!	ag  string-fold	bg  string-fold-right	cg  string-unfold	dg  string-unfold-right	eg  string-for-each	fg  string-for-each-index	gg  
xsubstring	hg  string-xcopy!	ig  string-replace	jg  string-tokenize	kg  string-filter	lg  string-delete	m !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijkl V	ng  cond-expand-provide	o C 5    h   x   ]4	
5 4 >  "  G   4m       h   B   ] 45 6   :       g  filenamef  srfi/srfi-13.scm
	
 		
   C>  "  G  ni4i5 o6  p       g  m
		$  g  filenamef  srfi/srfi-13.scm		
	%	
  	  	&  
 	 
   C6                                                                                                                                       ccache/srfi/srfi-16.go                                                                              0000644                 00000000704 15154557173 0010451 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4     h       ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-16	 		g  filenameS	
f  srfi/srfi-16.scm	g  
re-exportsS	g  case-lambda	 	g  set-current-module	 	 C 5   h(   R   ]4	
5 4 >  "  G   CJ       g  m
		(  g  filenamef  srfi/srfi-16.scm
	/
 		(
   C6                                                             ccache/srfi/srfi-38.go                                                                              0000644                 00000017670 15154557173 0010467 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] U 4 h      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-38	 		g  filenameS	
f  srfi/srfi-38.scm	g  importsS	g  rnrs	g  bytevectors	 	 	g  srfi-8	 	 	g  srfi-69	 	 	g  system	g  vm	g  
trap-state	 	 	 	g  exportsS	g  write-with-shared-structure	g  read-with-shared-structure	 	 g  set-current-module	!  	"  	#g  cond-expand-provide	$g  current-module	% 	&g  current-output-port	'g  vector-length	(g  string?	)g  string-length	*g  bytevector?	+g  port?	,g  display	-f  (	.f  )	/f   . 	0g  hash-table-ref	1f   	2f  #(	3g  write	4g  number?	5f  #	6g  counter	7f  =	8g  hash-table-set!	9g  hash-table-exists?	:g  make-hash-table	;g  eq?	<g  current-input-port	=g  eqv?	>g  	peek-char	?g  eof-object?	@g  list->string	Ag  reverse	Bg  	read-char	Cg  string->number	Dg  char-numeric?	Eg  hash-table-ref/default	Fg  error	Gf  Double declaration of part 	Hg  read	If  Use of undeclared part 	Jf  Malformed shared part specifier	Kg  with-fluid*	Lg  %read-hash-procedures	Mg  for-each	Ng  read-hash-extend	O0123456789 
	Pg  hash-table-size	Qg  patch!	Rg  
procedure?	Sg  hole?	Tg  	fill-holeC 5       h     ]4	
5 4" >  "  G   4#i4$i5 %>  "  G  &'()*+        h   \  ]	 $  C $  4 5
"  $  C4 5$  4 5
"  $  C4 5$  C $  C4 5$  CCT      g  obj
	  g  t	!  g  t	F  g  t	X  g  t	s   g  filenamef  srfi/srfi-38.scm
	9			:				:		
	:			;			;			;	'		;	 		;		!	:		-	<		7	<		8	<	'	?	<	 	A	<		F	:		R	=		X	:		f	>		j	:		k	>		m	?		s	:	 	   g  nameg  interesting? C,-./012'345678    h@    ]" _ $  4L>  "  G  4L  >  "  G  "  "  >(  L64L>  "  G  4L >  "  G  L6$  C45$  "4L>  "  G  4L >  "  G  "t"t "g $  4L>  "  G  4 54L  
>  "  G  "  E$  L64L>  "  G  4L  >  "  G  ""	 L64L 5$  4 5$  4
5$  04L>  "  G  4	L>  "  G  L6454L>  "  G  4	L>  "  G  4L>  "  G  4>  "  G  4 >  "  G  ""	 L6      g  obj
	@ g  state	@ g  obj		:  g  len	 ] g  i	V g  val	y8 g  n	4  g  filenamef  srfi/srfi-38.scm
	N			O				P			P			Q			Q			Q		"	R		'	R		.	R		:	S		D	T		H	Y		L	Y		M	[		Q	[		X	[		a	\		x	]		|	]		|	T			T	 	T	 	T	, 	T	 	U	 	U	 	U	 	V	 	V	! 	V	 	W	! 	W	 	S	 	S	" 	S	 	^	 	P	 	_	 	_	 	_	 	`	 	`	 	a	 	a		a		b		c		c		c	+"	c	"#	d	'	d	&.	d	7	e	>	e	(E	e	P	f	(V	f	V	b	e	h	f	i	p	i	q	j	y	j		k		l		k		m		m	$	m		n		o	$	o		q	"	q	8	q	"	q		q		r		r		r		s		t		t		t		u		u	-	u		v	4	w	8	k	@	y	 ^	@	  g  nameg  	write-obj C98'    h     ]4L  5$  C4 5$  	 64 >  "  G   $  "4L >  "  G    " $  ?4 5"  +$  C4L >  "  G  "
"C             g  obj
	  g  state	  g  t		
  g  len		w  g  i		}   g  filenamef  srfi/srfi-38.scm
	~					
			
			 		"			+ 		, 		C 		G 		H 		M 		T 		_ 		i 		l 		p 		q 		w 		} 	  	  	  	  	  	  	  	 	 	  g  nameg  scan C:;86 	 h   L  - . , 3 #  45 #  O O Q Q 454 >  "  G  4
>  "  G   6     D      g  obj
	  g  outport	  g  optarg		  g  interesting?		9  g  	write-obj		9  g  scan		9  g  state		P   g  filenamef  srfi/srfi-38.scm
	.
		0	/	J 		P 		S 		g 		m 		s 	  	 
	 	  g  nameg  write-with-shared-structure CR<:=>?@AB    hX   7  ]"  G4L 545$  "  4 5$  4564L 5""   /      g  pred
		U g  initial		U g  chars			M g  c			M g  t			.  g  filenamef  srfi/srfi-38.scm
 		 		 		 		 		 		$ 	'	+ 	"	2 	
	5 		= 		> 		G 		M 		M 	 		U	  g  nameg  read-some-chars CCDBEFG8h   _   ] L C  W       g  filenamef  srfi/srfi-38.scm
 		 	$ 		
  g  nameg  thunk CHIJ        h     ]*44L   55454L5=$  P$  4>  "  G  "    4LO >  "  G  4	5C#$  $  C
66           g  c
	  g  port	  g  n		  g  c		  g  thunk		(  g  cell		U  g  obj		y   g  filenamef  srfi/srfi-38.scm
 		 		 	 	 	?	 	 	 		 		 		 		 		( 		3 		9 		: 		> 		E 		U 		U 		X 		s 		y 	  	  	  	  	  	  	  	 	 	  g  nameg  	read-hash CKLMN h   a   ] L 6      Y       g  digit
		
  g  filenamef  srfi/srfi-38.scm
 		
 	 		
   COHPQ    hP      ]4LO >  "  G  4L5 
4L 5$  4 >  "  G  "    C             g  result
	"	J  g  filenamef  srfi/srfi-38.scm
 		 		 		 		 		" 		& 		- 		1 	
	2 	 		J
   C 	  hX      -  . , 3  #  45  45O O  Q Q [ O 6            g  port
		S g  parts-table	 	S g  read-some-chars		3	S g  	read-hash		3	S  g  filenamef  srfi/srfi-38.scm
 
	 	6	 		  		S 	 		S
  g  nameg  read-with-shared-structure CRR h   n   ] 6f       g  x
		  g  filenamef  srfi/srfi-38.scm
 
	 	 		  g  nameg  hole? CSRST       h       ]4 5$  	4 5 6 C              g  x
		  g  filenamef  srfi/srfi-38.scm
 
	 		 		 	/	 	$ 		  g  nameg  	fill-hole CTRSTQ'    h     ] $  N4 5$   4 5"  4 >  "  G  4 5$   4 5C 6 $  \"  J
$  C 45$   45"  4>  "  G  "4 5"C          g  x
	  g  i	b  g  elt		q   g  filenamef  srfi/srfi-38.scm
 
	 			 		
 		 		 		 		 	$	 	/	 	$	  		% 	9	* 	A	/ 	9	8 		= 		? 		C 		F 	$	K 	/	M 	$	N 		U 	A	W 	9	Z 		^ 		b 		f 			j 		q 		q 		t 		~ 	  	  	  	  	$  	  	  	  	 *	   g  nameg  patch! CQRC         g  m
		,  g  filenamef  srfi/srfi-38.scm		
	-	"
	2	"		:	"	&	?	"
	.
 
A 
 
 
 	
   C6                                                                         ccache/srfi/srfi-31.go                                                                              0000644                 00000004314 15154557173 0010447 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] O 4       h      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-31	 		g  filenameS	
f  srfi/srfi-31.scm	g  exportsS	g  rec	 	g  set-current-module	 	 	g  cond-expand-provide	g  current-module	 	g  make-syntax-transformer	 	 	g  macro	g  $sc-dispatch	 	 	g  any		g  each-any			 g  syntax-object	!g  letrec	"g  top	#" 	$g  ribcage	%g  dummy	&g  name	'g  formals	(g  body	)%&'( 	*g  m-46961e5115-0	+*" 	,+### 	-f  l-46961e5115-5	.f  l-46961e5115-6	/f  l-46961e5115-7	0f  l-46961e5115-8	1-./0 	2$),1 	3$ 	4g  x	54 	6+ 	7f  l-46961e5115-2	87 	9$568 	:#239 	;g  hygiene	<; 	= !:< 	>g  lambda	? >:< 	@ 	Ag  expr	B%&A 	C+## 	Df  l-46961e5115-f	Ef  l-46961e5115-10	Ff  l-46961e5115-11	GDEF 	H$BCG 	I#H39 	J !I< 	Kg  syntax-violation	LK 	MK 	Nf  -source expression failed to match any patternC 5     h  r   ]4	
5 4 >  "  G   4i4i5 >  "  G  4=? h    f   ]   C      ^       g  dummy
		 g  name		 g  formals			 g  body			  			   C@J  h   Q   ]   C    I       g  dummy
		 g  name		 g  expr			  			   CMN        h@   I  ]4 5$  @4 5$  @ 6       A      g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  srfi/srfi-31.scm
		 		9  g  documentationf  XReturn the given object, defined in a lexical environment where
NAME is bound to itself.g  
macro-typeg  syntax-rulesg  patternsg  nameg  formalsg  bodyg  ... g  nameg  expr   C5RCj       g  m
		(  g  filenamef  srfi/srfi-31.scm		
	)	
	.			6		&	;	
 	
   C6                                                                                                                                                                                                                                                                                                                     ccache/srfi/srfi-18.go                                                                              0000644                 00000040543 15154557173 0010460 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0KA      ]  4  h      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-18	 		g  filenameS	
f  srfi/srfi-18.scm	g  importsS	g  srfi-34	 	 	 	g  exportsS	g  make-thread	g  thread-name	g  thread-specific	g  thread-specific-set!	g  thread-start!	g  thread-yield!	g  thread-sleep!	g  thread-terminate!	g  thread-join!	g  
make-mutex	g  
mutex-name	g  mutex-specific	g  mutex-specific-set!	g  mutex-state	g  mutex-lock!	 g  mutex-unlock!	!g  make-condition-variable	"g  condition-variable-name	#g  condition-variable-specific	$g   condition-variable-specific-set!	%g  condition-variable-signal!	&g  condition-variable-broadcast!	'g  condition-variable-wait!	(g  current-time	)g  time?	*g  time->seconds	+g  seconds->time	,g  current-exception-handler	-g  with-exception-handler	.g  raise	/g  join-timeout-exception?	0g  abandoned-mutex-exception?	1g  terminated-thread-exception?	2g  uncaught-exception?	3g  uncaught-exception-reason	4 !"#$%&'()*+,-./0123 #	5g  
re-exportsS	6g  current-thread	7g  thread?	8g  mutex?	9g  condition-variable?	:6789 	;g  replacementsS	<(!. 	=g  set-current-module	>= 	?= 	@g  	provided?	Ag  threads	Bg  error	Cf  +SRFI-18 requires Guile with threads support	Dg  cond-expand-provide	Eg  current-module	F 	Gg  	scm-error	Hg  wrong-type-arg	If  Wrong type argument: ~S	Jg  check-arg-type	Kg  abandoned-mutex-exception	Lg  join-timeout-exception	Mg  terminated-thread-exception	Ng  uncaught-exception	Og  make-weak-key-hash-table	Pg  object-names	Qg  object-specifics	Rg  thread-start-conds	Sg  thread-exception-handlers	T. 	U. 	Vg  srfi-18-exception-preserver	Wg  initial-handler	Xg  make-object-property	Yg  thread->exception	Zg  setter	[Z 	\Z 	]g  srfi-18-exception-handler	^g  	hashq-ref	_g  
hashq-set!	`g  current-handler-stack	ag  
procedure?	bf  with-exception-handler	cg  thunk?	d- 	e- 	ff  uncaught-exception-reason	gg  launch-mutex	hg  launch-condition-variable	ig  start-mutex	jg  start-condition-variable	kg  
lock-mutex	lg  call-with-new-thread	mg  signal-condition-variable	ng  unlock-mutex	og  wait-condition-variable	pf  thread-name	qf  thread-specific	rf  thread-specific-set!	sf  thread-start!	tg  hashq-remove!	ug  yield	vg  number?	wf  thread-sleep!	xg  inexact->exact	yg  truncate	zg  sleep	{g  usleep	|g  wrap	}g  thread-cleanup	~g  set-thread-cleanup!	g  cancel-thread g  join-thread g  length     g  unchecked-unlock g  allow-external-unlock g  	recursive f  
mutex-name f  mutex-specific f  mutex-specific-set! g  mutex-owner g  thread-exited? g  	abandoned g  mutex-level g  	not-owned g  not-abandoned g  catch g  abandoned-mutex-error !  !  f  condition-variable-name f  condition-variable-specific f   condition-variable-specific-set! g  broadcast-condition-variable g  gettimeofday g  integer? f  time->seconds f  seconds->timeC 5   h@0    ]4	
45:;<5 4? >  "  G   4@iA5$  "  4BiC>  "  G  4Di4Ei5 F>  "  G  GHI  h       ]4 5$  C 6       g  pred
		  g  arg		  g  caller			   g  filenamef  srfi/srfi-18.scm
	`
		a			a			c			d			d	+		d	6	 	c	 			 	  g  nameg  check-arg-type CJRK KRL LRM MRN NR4Oi5 PR4Oi5 QR4Oi5 RR4Oi5 SRU.RVN   h      ] 6     x       g  obj
		  g  filenamef  srfi/srfi-18.scm
	s
			t			t	 		  g  nameg  initial-handler CWR4Xi5 YR12\Y6     h8      ]	4 5$  "  4 5$  4545  6C         g  obj
		6 g  t			   g  filenamef  srfi/srfi-18.scm
	x
		y	
			y			z	
	$	y		,	{		4	{	 		6  g  nameg  srfi-18-exception-preserver CVRVN h0      - 1 3  &  C(  	 "   6         g  key
			. g  args			.  g  filenamef  srfi/srfi-18.scm
	}
	 		 		 	$	  	(	+ 	(	. 	 			.
  g  nameg  srfi-18-exception-handler C]R6^S_W    h0      ]45  4 5$  C  6             g  ct
		* g  t		*  g  filenamef  srfi/srfi-18.scm
 
	 		 		
 		 		( 	1	* 	 		*
  g  nameg  current-handler-stack C`R6`Jabc_Se_S        h    h   ]4LL>  "  G  L  6  `       g  obj
		  g  filenamef  srfi/srfi-18.scm
 		 		 	 		   C_S        h0   q   ]4L>   G 4L L>  "  G   E      i       g  res
		*  g  filenamef  srfi/srfi-18.scm
 		 		 		* 	 		*
   C    hp   $  ]45 45 4 >  "  G  4>  "  G  4 >  "  G  	
 O O 6       g  handler
		o g  thunk		o g  ct			o g  hl			o  g  filenamef  srfi/srfi-18.scm
 
	 		 		 		 		 	'	 		' 		/ 	!	4 		= 		H 	-	M 		o 	 		o	  g  nameg  with-exception-handler C-R`   h   {   ] 45 C       s       g  filenamef  srfi/srfi-18.scm
 
	 		 	 			
  g  nameg  current-exception-handler C,RL    h      ] Cz       g  obj
		  g  filenamef  srfi/srfi-18.scm
 
	 	& 		  g  nameg  join-timeout-exception? C/RK     h      ] C}       g  obj
		  g  filenamef  srfi/srfi-18.scm
 
	 	) 		  g  nameg  abandoned-mutex-exception? C0RN  h      ] $   CC             g  obj
		  g  filenamef  srfi/srfi-18.scm
 
	 			 		 		 	 		  g  nameg  uncaught-exception? C2RJ2f  h      ]4 5C        g  exc
		  g  filenamef  srfi/srfi-18.scm
 
	 		 	/	 		 	 		  g  nameg  uncaught-exception-reason C3RM        h      ] C       g  obj
		  g  filenamef  srfi/srfi-18.scm
 
	 	 		  g  nameg  terminated-thread-exception? C1Rg!hijklkmno-W     hx      ] 4L>  "  G  4L>  "  G  4L>  "  G  4L>  "  G  4LL>  "  G  4L>  "  G  L 6{       g  filenamef  srfi/srfi-18.scm
 		 		 		' 		9 		K 		_ 		x 	 			x
   C]_RPon      h     - 1 3 $  "  454545454>  "  G  4	 O 
54>  "  G  $  4>  "  G  "   4>  "  G  4>  "  G  C            g  thunk
		  g  name		  g  n		4  g  lm		4  g  lc		4  g  sm		4  g  sc		4  g  t		f   g  filenamef  srfi/srfi-18.scm
 		 		 		 	!	 		 		 		  		$ 	)	& 		' 		+ 		- 		. 		2 	)	4 		4 		? 		Q 		f 		i 	
	t 	+	y 	
  	
  	  	
  	
 		 
   CR^PJ7p       h      ]4 56            g  thread
		  g  filenamef  srfi/srfi-18.scm
 
	 		 	9	 		 	 		  g  nameg  thread-name CR^QJ7q   h      ]4 56            g  thread
		  g  filenamef  srfi/srfi-18.scm
 
	 		 	,	 		 	 		  g  nameg  thread-specific CR_QJ7r       h(      ]44 5>  "  G  C            g  thread
		# g  obj		#  g  filenamef  srfi/srfi-18.scm
 
	 		 		 	-	 		 	 		#	  g  nameg  thread-specific-set! CR^RJ7stkmn 
       h   %  ]44 55$  ^4 >  "  G  4>  "  G  4>  "  G  4	>  "  G  "    C         g  thread
		} g  x		} g  smutex		"	v g  scond		"	v  g  filenamef  srfi/srfi-18.scm
 
	 		 		 	5	 		 		 		 		 		" 		" 		' 		; 		M 		_ 	 		}  g  nameg  thread-start! CRu  h   f   ] 4>   "  G  C    ^       g  filenamef  srfi/srfi-18.scm
 
	 	 		
  g  nameg  thread-yield! CR*()vGHwIxyz{   h     ]!445 54 5$  4 5"  %4 5$  	 "  4  54	4
554	4
     B@55
$  4>  "  G  "   
$  4>  "  G  "   C         g  timeout
	  g  ct	  g  t		L  g  secs		Z  g  usecs		u   g  filenamef  srfi/srfi-18.scm
 
	 		 		 		 		 		 		 	&	# 	#	( 		2 		7 	%	< 		@ 	#	B 	3	D 	#	I 	#	J 	#	L 		L 		O 		R 		Z 		Z 		] 		` 	 	g 	-	q 	*	s 	 	u 		u 		{ 			 	  	  		  	  	 &	   g  nameg  thread-sleep! CR-,       h    z   ]445  >  "  G  L 6      r       g  obj
		  g  filenamef  srfi/srfi-18.scm
 		 		 		 		 	 		   C   h   h   ] O L 6 `       g  continuation
		  g  filenamef  srfi/srfi-18.scm
 		 	 		   C     h   h   ] O C      `       g  thunk
		
  g  filenamef  srfi/srfi-18.scm
 
 		
  g  nameg  wrap C|R}c~-WVM  h    V   ] 4L >  "  G  6    N       g  filenamef  srfi/srfi-18.scm
				!		! 		
   CVM  h   M   ] 6E       g  filenamef  srfi/srfi-18.scm
			* 		
   C      h`      ]	4 545$  4 O >  "  G  "  4 >  "  G  4 >  "  G  C            g  thread
		[ g  current-handler			[  g  filenamef  srfi/srfi-18.scm

							
				
	4	
	H	 			[  g  nameg  thread-terminate! CR|Y.L   hh      ]4L L?4L 5 4L5$    $  "  4>  "  G  "   $  4>  "  G  "    C             g  v
		b g  e		b  g  filenamef  srfi/srfi-18.scm
	
											#		)		.		I		J	 		b
   C h       - 1 3 H4 O 5KJB        g  thread
			 g  args			 g  thread-join-inner!		
	  g  filenamef  srfi/srfi-18.scm

				 			
  g  nameg  thread-join! CR_P       hP      -  1  3  $   "  45$  4>  "  G  "   C             g  name
			J g  n	#	J g  m		#	J  g  filenamef  srfi/srfi-18.scm
#		$		$		$		%		%		&		'		!(		#%		#$		-)		.)	 			J


  g  nameg  
make-mutex CR^PJ8      h      ]4 56            g  mutex
		  g  filenamef  srfi/srfi-18.scm
+
	,		,	7	,		,	 		  g  nameg  
mutex-name CR^QJ8     h      ]4 56            g  mutex
		  g  filenamef  srfi/srfi-18.scm
.
	0		0	*	0		/	 		  g  nameg  mutex-specific CR_QJ8 h(      ]44 5>  "  G  C            g  mutex
		# g  obj		#  g  filenamef  srfi/srfi-18.scm
2
	3		4		4	+	4		3	 		#	  g  nameg  mutex-specific-set! CR        h8      ]	4 5$  45$  CC4 5
$  CC          g  mutex
		5 g  owner			5  g  filenamef  srfi/srfi-18.scm
8
	9			9		:		;		;		;	#	#<		+<		/<		1<	&	4<	1 		5  g  nameg  mutex-state CR|k   h   M   ] LL @      E       g  filenamef  srfi/srfi-18.scm
B		
B	 		

   C.K   h   r   - 1 3 6 j       g  key
			 g  args			  g  filenamef  srfi/srfi-18.scm
C		C	( 			
   C   h   V   ] L LO 6     N       g  filenamef  srfi/srfi-18.scm
@	
	A		A	 		
   C       h       - 1 3 H4 O 5KJB        g  mutex
			 g  args			 g  mutex-lock-inner!		
	  g  filenamef  srfi/srfi-18.scm
>
	@		D	 			
  g  nameg  mutex-lock! CRn    h      - 1 3  @              g  mutex
			 g  args			  g  filenamef  srfi/srfi-18.scm
F
	G	 			
  g  nameg  mutex-unlock! C R_P      hH      -  1  3  $   "  45 $  4>  "  G  "   C           g  name
			D g  n		D g  m			D  g  filenamef  srfi/srfi-18.scm
M		N		N		N		O		O		O		N		'P		(P	 			D


  g  nameg  make-condition-variable C!R^PJ9    h      ]4 56            g  condition-variable
		  g  filenamef  srfi/srfi-18.scm
R
	S		U	*	S		S	 		  g  nameg  condition-variable-name C"R^QJ9   h      ]4 56            g  condition-variable
		  g  filenamef  srfi/srfi-18.scm
W
	X		Z	.	X		X	 		  g  nameg  condition-variable-specific C#R_QJ9       h(      ]44 5>  "  G  C            g  condition-variable
		# g  obj		#  g  filenamef  srfi/srfi-18.scm
\
	]		^		`		^		]	 		#	  g  nameg   condition-variable-specific-set! C$Rm        h      ]4 >  "  G  C  ~       g  cond
		  g  filenamef  srfi/srfi-18.scm
d
	e	 		  g  nameg  condition-variable-signal! C%R h      ]4 >  "  G  C         g  cond
		  g  filenamef  srfi/srfi-18.scm
h
	i	 		  g  nameg  condition-variable-broadcast! C&Ri(R       hH      ]	 $  9 45$  
"  $   45$  
CCCC           g  obj
		D g  co		% g  co	,	@  g  filenamef  srfi/srfi-18.scm
o
	p			p		q		q		q	"	q		q	0	)p		,r		,r		/r	"	9r		=r	0 		D  g  nameg  time? C)RJ) h(      ]4 5$         B@CC          g  time
		%  g  filenamef  srfi/srfi-18.scm
t
	u		u	"	u		u		v	
	v		!v		"v	 
		%  g  nameg  time->seconds C*RJvyx       h@      ]	4 5$  +4 54544      B@55CC         g  x
		> g  fx		<  g  filenamef  srfi/srfi-18.scm
x
	y		y	!	y		y		z		z		{		"|		%|		,|	,	6|	)	8|		:|		;{		 		>  g  nameg  seconds->time C+RC       g  m
		4  g  filenamef  srfi/srfi-18.scm		 
	5	[			;	[		=	[			A	[
	F	\		L	\		Q	\		Z	^
	_	^		g	^	&	l	^
x	`
z	f	(}	f	"	f
	g	%	g		g
	h	*	h	$	h
	i	!	i		i
	k		k
	l		l
	m		m
	n	"	n
	r
k	s
l	v	u	v
	x
	}
 
 
	F 
	 

 
L 
 
 
 
_ 
+ 
* 
 
 
o 
3 
t

 "
 +
!.
"2
#8
&>>
&F
(FL
)'R
*W
+"\
+d
,h
,n
-o
.t
0=x
 K	0?
   C6                                                                                                                                                              ccache/srfi/srfi-28.go                                                                              0000644                 00000001370 15154557173 0010454 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4 hD      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-28	 		g  filenameS	
f  srfi/srfi-28.scm	g  replacementsS	g  format	 	g  set-current-module	 	 	g  simple-format	g  cond-expand-provide	g  current-module	 C 5       h   v   ]4	
5 4 >  "  G     h      - 1 3  @      ~       g  message
			 g  args			  g  filenamef  srfi/srfi-28.scm
	
			 			
  g  nameg  format CRi4i5 6n       g  m
		(  g  filenamef  srfi/srfi-28.scm		
 	
 	!	 	!	& 	!
 	 
   C6                                                                                                                                                                                                                                                                         ccache/srfi/srfi-111.go                                                                             0000644                 00000037127 15154557173 0010536 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0?>      ]< 4  h(      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-111	 		g  filenameS	
f  srfi/srfi-111.scm	g  importsS	g  srfi-9	 	 	g  gnu	 	 	 	g  exportsS	g  box	g  box?	g  unbox	g  set-box!	 	g  set-current-module	 	 	g  cond-expand-provide	g  current-module	 	g  <box>	 g  %box-procedure	!g  make-syntax-transformer	"! 	#! 	$g  macro	%g  $sc-dispatch	&% 	'% 	(g  _	)g  any	*() 	+g  syntax-object	,g  lambda	-g  m-a33a589db48-4	.g  top	/-. 	0g  ribcage	1g  t-a33a589db48-3	21 	3/ 	4f  l-a33a589db48-9	54 	60235 	70 	8g  x	98 	:f  l-a33a589db48-6	;: 	<093; 	=g  shift	>g  	proc-name	?g  args	@>? 	A. 	BAA 	Cf  l-1e8ba8b5a-2ba	Df  l-1e8ba8b5a-2bb	ECD 	F0@BE 	Gg  key	Hg  value	Ig  name	Jg  formals	Kg  body	LGHIJK 	MAAAAA 	Nf  l-1e8ba8b5a-2ad	Of  l-1e8ba8b5a-2ae	Pf  l-1e8ba8b5a-2af	Qf  l-1e8ba8b5a-2b0	Rf  l-1e8ba8b5a-2b1	SNOPQR 	T0LMS 	Ug  make-procedure-name	VU 	WA 	Xf  l-1e8ba8b5a-29d	YX 	Z0VWY 	[A 	\f  l-1e8ba8b5a-29c	]\ 	^09[] 	_/67<=7777FTZ^ 	`g  hygiene	a` 	b+,_a 	cA67< 	d` 	e+Hcd 	fe 	gg  make-struct	hg  m-a33a589db48-1	ih. 	jg  t-1e8ba8b5a-38d	kg  t-1e8ba8b5a-38c	lg  t-1e8ba8b5a-38b	mjkl 	ng  m-1e8ba8b5a-38e	on. 	pooo 	qf  l-1e8ba8b5a-392	rf  l-1e8ba8b5a-393	sf  l-1e8ba8b5a-394	tqrs 	u0mpt 	vg  	ctor-args	wv 	xf  l-1e8ba8b5a-37a	yx 	z0w[y 	{g  ctor	|g  field	}{| 	~f  l-1e8ba8b5a-376	f  l-1e8ba8b5a-377 ~  0}B  g  form g  	type-name g  constructor-spec g  field-names   AAAA  f  l-1e8ba8b5a-36b f  l-1e8ba8b5a-36c f  l-1e8ba8b5a-36d f  l-1e8ba8b5a-36e   0  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers   AAAAAAAA  f  l-1e8ba8b5a-343 f  l-1e8ba8b5a-341 f  l-1e8ba8b5a-33f f  l-1e8ba8b5a-33d f  l-1e8ba8b5a-33b f  l-1e8ba8b5a-339 f  l-1e8ba8b5a-337 f  l-1e8ba8b5a-335   0  f  l-1e8ba8b5a-334   09[  i67<=7u777z7  +ga  +cd  +
a  e  bf  g  each-any ( g  syntax-violation     f  Wrong number of arguments g  identifier?     A7<  + d      f  -source expression failed to match any pattern g  record-type-vtable     g  pw g  default-record-printer     H  g  set-struct-vtable-name!     g  vtable-offset-user     g  %box?-procedure g  m-a33a589db48-11 .  g  t-a33a589db48-10     f  l-a33a589db48-16   0  f  l-a33a589db48-13   09  7=7777FTZ^  +,a  g  obj g  t-1e8ba8b5a-47e g  t-1e8ba8b5a-478 g  t-1e8ba8b5a-479 g  t-1e8ba8b5a-47a g  t-1e8ba8b5a-47d g  t-1e8ba8b5a-47c g  t-1e8ba8b5a-47b   g  m-1e8ba8b5a-47f .    f  l-1e8ba8b5a-483 f  l-1e8ba8b5a-484 f  l-1e8ba8b5a-485 f  l-1e8ba8b5a-486 f  l-1e8ba8b5a-487 f  l-1e8ba8b5a-488 f  l-1e8ba8b5a-489   0  g  	copier-id   f  l-1e8ba8b5a-476   0[  g  	ctor-name   f  l-1e8ba8b5a-46e   0[    f  l-1e8ba8b5a-46c   0[  g  layout   f  l-1e8ba8b5a-46a   0[  g  
immutable?   f  l-1e8ba8b5a-468  0[  g  field-count f  l-1e8ba8b5a-466 0[ g  
getter-ids 	f  l-1e8ba8b5a-463
	 0[
 g  	field-ids f  l-1e8ba8b5a-460 0[ g  predicate-nameg  
field-spec AAAAAA f  l-1e8ba8b5a-453f  l-1e8ba8b5a-454f  l-1e8ba8b5a-455f  l-1e8ba8b5a-456f  l-1e8ba8b5a-457f  l-1e8ba8b5a-458 0 i7=777777777777 +a   g  and!+ a "g  struct?#+"a $# %g  eq?&+%a 'g  struct-vtable(+'a )( *A7 ++*d ,&)+ -!$, .- /A7 0+/d 1g  throw-bad-struct21 31 4g  %unbox-procedure5g  free-id6g  
%%on-error7g  m-a33a589db48-1d87. 98 :f  l-a33a589db48-1f;: <099; =87<=7777FTZ^ >+6=a ?5> @?) Ag  %%typeBg  t-1e8ba8b5a-3a5Cg  t-1e8ba8b5a-3a6Dg  t-1e8ba8b5a-3a7Eg  t-1e8ba8b5a-3a8Fg  t-1e8ba8b5a-3a9Gg  t-1e8ba8b5a-3aaHg  t-1e8ba8b5a-3abIBCDEFGH Jg  m-1e8ba8b5a-3acKJ. LKKKKKKK Mf  l-1e8ba8b5a-3b0Nf  l-1e8ba8b5a-3b1Of  l-1e8ba8b5a-3b2Pf  l-1e8ba8b5a-3b3Qf  l-1e8ba8b5a-3b4Rf  l-1e8ba8b5a-3b5Sf  l-1e8ba8b5a-3b6TMNOPQRS U0ILT Vg  getterWg  indexXVW Yf  l-1e8ba8b5a-3a3Zf  l-1e8ba8b5a-3a4[YZ \0XB[ ] ^AAA _f  l-1e8ba8b5a-39e`f  l-1e8ba8b5a-39faf  l-1e8ba8b5a-3a0b_`a c0]^b di7<=7U777\7c e+Ada f5e g(@f) hg  ckig  errjg  skij l88 mf  l-a33a589db48-22nf  l-a33a589db48-23omn p0klo q8p7<=7777FTZ^ r+hqa sg  quotet+sqa uAp7< v+ud wtv xw yg  %%indexz+yda {5z |(@{) }f  l-a33a589db48-27~f  l-a33a589db48-28}~ 0kl 87<=7777FTZ^ +ha +sa 7< +
d   g  %%copier+da 5 (@) f  l-a33a589db48-2cf  l-a33a589db48-2d 0kl 87<=7777FTZ^ +ha +sa g  %%<box>-set-fieldsA7< +d   g  t-a33a589db48-1c f  l-a33a589db48-31 09 87<=7777FTZ^ +,a i7<=7U777\7c +ja  g  if+a +%a +'a  A7< +d  g  
struct-ref+a 7< +
d  +1a +sa +d     A7< +4d g  each))  )))g  %%set-fieldsg  dummyg  check?g  exprjV g  m-a33a589db48-38. iiii f  l-a33a589db48-3df  l-a33a589db48-3ef  l-a33a589db48-3ff  l-a33a589db48-40f  l-a33a589db48-41 0  f  l-a33a589db48-3a 09 g  t-1e8ba8b5a-3c4g  t-1e8ba8b5a-3c6g  t-1e8ba8b5a-3c5 g  m-1e8ba8b5a-3c7.  f  l-1e8ba8b5a-3cbf  l-1e8ba8b5a-3ccf  l-1e8ba8b5a-3cd 0 f  l-1e8ba8b5a-3c1f  l-1e8ba8b5a-3c2f  l-1e8ba8b5a-3c3 0]^ i7=7777 +a A7 +d +d  g  map  g  listg  %set-box!-procedure()) g  m-a33a589db48-4c. g  t-a33a589db48-4ag  t-a33a589db48-4b  f  l-a33a589db48-51f  l-a33a589db48-52 0  f  l-a33a589db48-4e 09 7=7777FTZ^ +,a g  t-1e8ba8b5a-3e6g  t-1e8ba8b5a-3e7  g  m-1e8ba8b5a-3e8.  f  l-1e8ba8b5a-3ecf  l-1e8ba8b5a-3ed 0  g  setter	IV 
f  l-1e8ba8b5a-3e0f  l-1e8ba8b5a-3e1f  l-1e8ba8b5a-3e2
 0	^ W f  l-1e8ba8b5a-3d7f  l-1e8ba8b5a-3d8 0B g  field-specs f  l-1e8ba8b5a-3d3f  l-1e8ba8b5a-3d4 0B i7=777 +ja g  val+a  +a  +%a !+'a "! #A7 $+#d % "$ &g  struct-set!'+&a (7 )+
(d *') ++1a ,+sa -+#d .,- /+. 0%*/ 10 2A7 3+2d 4g  set-record-type-printer!5g  display6f  #<box 7g  number->string8g  object-address9f   value: :g  write;f  >C 5  hh     ]4	
5 4 >  "  G   4i4i5 >  "  G     h   r   ]  C      j       g  value
		
  g  filenamef  srfi/srfi-111.scm
	
 		
  g  nameg  %box-procedure C R4#$'* h   7   ]  C      /       g  t-a33a589db48-3
		
  		
   C     h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-111.scm		
 		   C(    h   D   ] L 6<       g  filenamef  srfi/srfi-111.scm		
 		
   C      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-111.scm
	
 		n   C5R  4 >  "  G   	Ɩ i  R        h   q   ] $   CC      i       g  obj
		  g  filenamef  srfi/srfi-111.scm
	
 		  g  nameg  %box?-procedure CR4#$'*. h   8   ]  C      0       g  t-a33a589db48-10
		
  		
   C    h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-111.scm		
 		   C(    h   D   ] L 6<       g  filenamef  srfi/srfi-111.scm		
 		
   C0     h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-111.scm
	
 		n   C5R3   h   p   ] &   
C 6h       g  s
		  g  filenamef  srfi/srfi-111.scm
	
 		  g  nameg  %unbox-procedure C4R4#$'grx     h   :   ]C     2       g  err
		 g  s		  			   C| h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C*     h   8   ]  C      0       g  t-a33a589db48-1c
		
  		
   C    h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-111.scm		
 		   C(    h   D   ] L 6<       g  filenamef  srfi/srfi-111.scm		
 		
   C     h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  srfi/srfi-111.scm
	
 	    C5R4#$' h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-111.scm
	
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R3        h       ] &   
C 6      |       g  s
		 g  val		  g  filenamef  srfi/srfi-111.scm
	
 			  g  nameg  %set-box!-procedure CR4#$'1    h   V   ]  C    N       g  t-a33a589db48-4a
		 g  t-a33a589db48-4b		  			   C      h   T   ]L 6    L       g  a
		  g  filenamef  srfi/srfi-111.scm		
 		   C(    h   D   ] L 6<       g  filenamef  srfi/srfi-111.scm		
 		
   C3     h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  srfi/srfi-111.scm
	
 		n   C5R4ii56789:3;     h      ]4>  "  G  444 5	5>  "  G  4>  "  G  4 &   
"  	4 	5>  "  G  
6           g  box
		| g  port		|  g  filenamef  srfi/srfi-111.scm
				 			 			 			!			!			!		'	!		.	!		7	"		;	"		@	"		I	#		N	#		l	#		x	$		|	$	 		|	   C6             g  m
		, g  rtd
o  g  filenamef  srfi/srfi-111.scm		
	-	
	2			:		&	?	
 	
b	
 	b
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                          ccache/srfi/srfi-1.go                                                                               0000644                 00000122634 15154557173 0010372 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4   h      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-1	 		g  filenameS	
f  srfi/srfi-1.scm	g  exportsS	g  xcons	g  list-tabulate	g  	list-copy	g  circular-list	g  proper-list?	g  circular-list?	g  dotted-list?	g  
null-list?	g  	not-pair?	g  list=	g  first	g  second	g  third	g  fourth	g  fifth	g  sixth	g  seventh	g  eighth	g  ninth	g  tenth	 g  car+cdr	!g  take	"g  drop	#g  
take-right	$g  
drop-right	%g  take!	&g  drop-right!	'g  split-at	(g  	split-at!	)g  last	*g  length+	+g  concatenate	,g  concatenate!	-g  append-reverse	.g  append-reverse!	/g  zip	0g  unzip1	1g  unzip2	2g  unzip3	3g  unzip4	4g  unzip5	5g  count	6g  fold	7g  
fold-right	8g  	pair-fold	9g  pair-fold-right	:g  reduce	;g  reduce-right	<g  unfold	=g  unfold-right	>g  
append-map	?g  append-map!	@g  map!	Ag  pair-for-each	Bg  
filter-map	Cg  	partition	Dg  remove	Eg  
partition!	Fg  remove!	Gg  find	Hg  	find-tail	Ig  
take-while	Jg  take-while!	Kg  
drop-while	Lg  span	Mg  span!	Ng  break	Og  break!	Pg  any	Qg  every	Rg  delete-duplicates	Sg  delete-duplicates!	Tg  
alist-cons	Ug  
alist-copy	Vg  alist-delete	Wg  alist-delete!	Xg  lset<=	Yg  lset=	Zg  lset-adjoin	[g  
lset-union	\g  lset-intersection	]g  lset-difference	^g  lset-xor	_g  lset-diff+intersection	`g  lset-union!	ag  lset-intersection!	bg  lset-difference!	cg  	lset-xor!	dg  lset-diff+intersection!	e !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcd Y	fg  
re-exportsS	gg  cons	hg  list	ig  cons*	jg  	make-list	kg  pair?	lg  null?	mg  car	ng  cdr	og  caar	pg  cadr	qg  cdar	rg  cddr	sg  caaar	tg  caadr	ug  cadar	vg  caddr	wg  cdaar	xg  cdadr	yg  cddar	zg  cdddr	{g  caaaar	|g  caaadr	}g  caadar	~g  caaddr	g  cadaar g  cadadr g  caddar g  cadddr g  cdaaar g  cdaadr g  cdadar g  cdaddr g  cddaar g  cddadr g  cdddar g  cddddr g  list-ref g  	last-pair g  length g  append g  append! g  reverse g  reverse! g  filter g  filter! g  memq g  memv g  assq g  assv g  set-car! g  set-cdr! ghijklmnopqrstuvwxyz{|}~ 3 g  replacementsS g  iota g  map g  for-each g  map-in-order g  
list-index g  member g  delete g  delete! g  assoc  
 g  set-current-module     g  cond-expand-provide g  current-module   g  load-extension g  string-append f  	libguile- g  effective-version f  scm_init_srfi_1 g  	scm-error g  wrong-type-arg g  symbol->string f  Wrong type argument: ~S g  make-syntax-transformer     g  	check-arg g  macro g  $sc-dispatch     PPPP  g  syntax-object g  if g  top   g  ribcage g  dummy g  pred g  arg g  caller   g  m-1e8ba8b52-388     f  l-1e8ba8b52-38d f  l-1e8ba8b52-38e f  l-1e8ba8b52-38f f  l-1e8ba8b52-390       g  x     f  l-1e8ba8b52-38a       g  hygiene     g  not     g  quote   g  syntax-violation     f  -source expression failed to match any pattern g  out-of-range f  Value out of range: ~A g  integer? g  non-negative-integer? g  error f  not a proper list in null-list? g  
procedure? g  	list-head g  	list-tail g  any1 f  map f  Circular list: ~S f  Not a list: ~S g  min f  .Args do not contain a proper (finite) list: ~S f  for-each g  apply g  every1 g  acons g  equal? g  eq? g  eqv?C 5     h    ]4	
ef5	 4 >  "  G   4i4i5 >  "  G  4i4i4i5 5>  "  G         h      ] C       g  d
		 g  a		  g  filenamef  srfi/srfi-1.scm
 
	 	 			  g  nameg  xconsg  documentationf  dLike `cons', but with interchanged arguments.  Useful mostly when passed to
higher-order procedures. CR   h      ]4 5 6        g  caller
		 g  arg		  g  filenamef  srfi/srfi-1.scm
 
	 		 		 		 	'	 	2	 	 			  g  nameg  wrong-type-arg CR4    h(   d   ]     C      \       g  dummy
		" g  pred		" g  arg			" g  caller			"  		"	   C     h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-1.scm
 
 		"  g  
macro-typeg  syntax-rulesg  patternsg  predg  argg  caller   C5R     h      ]   6         g  proc
		 g  arg		  g  filenamef  srfi/srfi-1.scm
 
	 		
 		 	&	 	1	 	 			  g  nameg  out-of-range CR   h      ]4 5$   
CC           g  x
		  g  filenamef  srfi/srfi-1.scm
 
	 	'	 	"	 	4 		  g  nameg  non-negative-integer? CR    hX     ]4 5$  "  4 >  "  G  "  !
$  C45" "         g  n
		U g  	init-proc		U g  n		)	J g  acc		)	J  g  filenamef  srfi/srfi-1.scm
 
			)		-		1		7		8		=	%	?		B		J		J		M		U	 		U	  g  nameg  list-tabulateg  documentationf  Return an N-element list, where each list element is produced by applying the
procedure INIT-PROC to the corresponding list index.  The order in which
INIT-PROC is applied to the indices is not specified. CR     h(      - 1 3 H JK4J5JJC              g  elt1
		! g  elts		!  g  filenamef  srfi/srfi-1.scm

										 			!
  g  nameg  circular-list CR   hx   "  - . , 3 #  
#  4 5$  "  4 >  "  G  "  % $  6"
"          g  count
		t g  start		t g  step			t g  n		E	j g  acc		E	j  g  filenamef  srfi/srfi-1.scm

			E		J		N		T		W		^	#	_		b		j		j		l		t	 		t	  g  nameg  iota CR h   t   ] C  l       g  x
		  g  filenamef  srfi/srfi-1.scm

		 		  g  nameg  proper-list? CR   hX   6  ]4 5$  C"  745$  C45$  C&  C"  " .      g  x
		W g  hare		J g  tortoise			J g  hare		#	J  g  filenamef  srfi/srfi-1.scm

								
			#		#		&		0	
	:!		?#		B#		J#		J		M		W	 		W  g  nameg  circular-list? CR hp   F  ] (  C4 5$  C"  G(  C45$  C(  C45$  C&  C"  " >      g  x
		o g  hare		b g  tortoise			b g  hare		3	b  g  filenamef  srfi/srfi-1.scm
%
	&		(		&		*		!+		$-	
	.+		3/		3/	
	;0		>2		H0		W5		Z5		b5		b*		e*		o*	 		o  g  nameg  dotted-list? CR   h(      ]4 5$   C4 5$  C6           g  x
		$  g  filenamef  srfi/srfi-1.scm
7
	9		8		:		;		8		">		$>	 			$  g  nameg  
null-list? CR   h   I  ] C A      g  x
		  g  filenamef  srfi/srfi-1.scm
@
	E		E	 		  g  nameg  	not-pair?g  documentationf  Return #t if X is not a pair, #f otherwise.

This is shorthand notation `(not (pair? X))' and is supposed to be used for
end-of-list checking in contexts where dotted lists are allowed. CR hH     ]"  1(  C(  C4L 5$  "C "           g  a
		C g  b		C g  a			7 g  b			7  g  filenamef  srfi/srfi-1.scm
H		I		J		K		J		O		O		!O	 	#O		'O		*P		-P		5P		7I	 		C	  g  nameg  lists-equal C  hx   <  - 1 3 O  Q 4 5$  "  4 >  "  G  (  C"  *$  C45$  	"C" 4      g  elt=
			w g  rest			w g  lists-equal			w g  lists		E	o g  t		I	o  g  filenamef  srfi/srfi-1.scm
G
	R		?S		@S		ET		HU		IU		IU		UV		ZV		]V	*	`V		dV		gW		mW		oT	 			w
  g  nameg  list= CRmiRpiRviRiR   h   v   ] C      n       g  x
		
  g  filenamef  srfi/srfi-1.scm
_
	_			_	 		
  g  nameg  fifth CR     h   v   ] C     n       g  x
		  g  filenamef  srfi/srfi-1.scm
`
	`			`	 		  g  nameg  sixth CR     h   x   ] C    p       g  x
		  g  filenamef  srfi/srfi-1.scm
a
	a			a	 		  g  nameg  seventh CR   h   w   ] C   o       g  x
		  g  filenamef  srfi/srfi-1.scm
b
	b			b	 		  g  nameg  eighth CR    h      ] C  w       g  x
		  g  filenamef  srfi/srfi-1.scm
c
	c			c		c	 		  g  nameg  ninth CR    h      ] C w       g  x
		  g  filenamef  srfi/srfi-1.scm
d
	d	 		d		d	 		  g  nameg  tenth CR    h      ]  D             g  x
		
  g  filenamef  srfi/srfi-1.scm
f
	h	
	h		
h	 		
  g  nameg  car+cdrg  documentationf  3Return two values, the `car' and the `cdr' of PAIR. C Ri!Ri"R"       h8      ]"  $  "C 4 5"              g  lis
		1 g  k		1 g  lag			 g  lead			  g  filenamef  srfi/srfi-1.scm
q
	r			s		s		t		t		t		r		!r		1r	 		1	  g  nameg  
take-right C#R"       h@   &  ]"  #$  "6 4 5"       g  lis
		? g  k		? g  lag			) g  lead			) g  result			)  g  filenamef  srfi/srfi-1.scm
w
	x			y		y		z		z		z	'	z	!	#z		){		)x		,x		5x	1	?x	 		?	  g  nameg  
drop-right C$R" h      ]

$  C4 5 C       g  lst
		 g  i		 g  tail			  g  filenamef  srfi/srfi-1.scm
}
			
															 			  g  nameg  take!g  documentationf   Linear-update variant of `take'. C%R" hP   }  ]4 5(  C"  %(  $   C C" "     u      g  lst
		K g  i		K g  tail			K g  prev			> g  tail			>  g  filenamef  srfi/srfi-1.scm

												
	"		&		)	#	*		3		6		>		>		C		K	 		K	  g  nameg  drop-right!g  documentationf  &Linear-update variant of `drop-right'. C&R'      hP     ]
$  6"  )
$  45D" "        g  lst
		N g  i		N g  l			? g  n			? g  acc			?  g  filenamef  srfi/srfi-1.scm

			
														)		,		/		2	&	5	 	?		?		D	"	N	 		N	  g  nameg  split-atg  documentationf  [Return two values, a list of the elements before index I in LST, and
a list of those after. C'R(    hX     ]
$  6
$   D"  %
$   D" "         g  lst
		U g  i		U g  l		#	H g  n		#	H g  tmp		.	:  g  filenamef  srfi/srfi-1.scm

				
																	#			'		+		.		.		3		4		:		=		@		H		H			M		U		 		U	  g  nameg  	split-at!g  documentationf  $Linear-update variant of `split-at'. C(R       h      ]4 5C            g  pair
		  g  filenamef  srfi/srfi-1.scm

			
	 		  g  nameg  lastg  documentationf  ;Return the last element of the non-empty, finite list PAIR. C)RPlnm    hP     - 1 3 "  045$  64545" "            g  clist1
			K g  rest			K g  l			= g  acc			=  g  filenamef  srfi/srfi-1.scm

							 		!	
	*		5		=		=		B		C	'	K	 			K
  g  nameg  zip C/R       h   n   ] 6      f       g  l
		
  g  filenamef  srfi/srfi-1.scm

	
	 		
  g  nameg  unzip1 C0R     h      ]4 54 5D  x       g  l
		  g  filenamef  srfi/srfi-1.scm

		
				 		  g  nameg  unzip2 C1R h       ]4 54 54 5D        g  l
		  g  filenamef  srfi/srfi-1.scm

		
				'		 		  g  nameg  unzip3 C2R      h(      ]4 54 54 54 5D       g  l
		(  g  filenamef  srfi/srfi-1.scm

		
				'		5	(	 		(  g  nameg  unzip4 C3R   h8      ]4 54 54 54 54 5D              g  l
		1  g  filenamef  srfi/srfi-1.scm

		
				'		5	'	
	1	 		1  g  nameg  unzip5 C4R6Plmn 
   h     - 1 3 4 5$  "  4 >  "  G  (  ."  (  C4 5"""  A45$  C45454 4	 5?""          g  kons
		  g  knil		  g  list1			  g  rest			  g  knil		6	T g  list1		6	T g  knil		d  g  lists		d  g  cars	   g  cdrs	    
g  filenamef  srfi/srfi-1.scm

	
		2		6		<		@		E		I		L	'	T		T		d		e		q		u		~	 	 	 	 	+ 	 	 	 	 	! 	 		 	
	  g  nameg  foldg  documentationf  uApply PROC to the elements of LIST1 ... LISTN to build a result, and return
that result.  See the manual for details. C6R7lnm      h     - 1 3 4 5$  "  4 >  "  G  (  3"  (  C4 5"45""  945$  C454 4	4
5 5?"45"      g  kons
		  g  knil		  g  clist1			  g  rest			  g  lst		6	T g  result		6	T g  lists		i  g  result		i   g  filenamef  srfi/srfi-1.scm

	
		2		6		<		B		C		H		L		T		T		U		e		i		j		v		z	 	 	 	' 	7 	 	 	 	 	 	& 	 	 		 	
	  g  nameg  
fold-right C7R8Pln 	      h     - 1 3 4 5$  "  4 >  "  G  (  1"  !(  C4 5"""  645$  C454 4 5?""          g  kons
		  g  knil		  g  clist1			  g  rest			  g  knil		6	W g  list1		6	W g  tail		B	W g  knil		g  g  lists		g  g  tails	    
g  filenamef  srfi/srfi-1.scm

	
		2		6		<		B		B		E		W		W		g		h		t		x	 	 	 	 	, 	 	 	 	 	! 	 		 	
	  g  nameg  	pair-fold C8R9     h       ] (  LCL  4L 56              g  list1
		  g  filenamef  srfi/srfi-1.scm
											 		  g  nameg  f CPln        h0      ]4 5$  LCL 4 4L4 55 5@         g  lists
		.  g  filenamef  srfi/srfi-1.scm
			
						)		,	'	)	*	#	,		.	 		.  g  nameg  f C       hh      - 1 3 4 5$  "  4 >  "  G  (  O  Q 6O  Q 6        g  kons
			g g  knil			g g  clist1				g g  rest				g g  f		<	K g  f		U	g  g  filenamef  srfi/srfi-1.scm

	
		2		<		U		e		g	 			g	
	  g  nameg  pair-fold-right C9R  h   \   ]C    T       g  x
		  g  filenamef  srfi/srfi-1.scm
	1		= 		   C<   h    - . , 3 	#  "  /"  (  C"45"4 5$  "  4 >  "  G  45$  "  4>  "  G  45$  "  4>  "  G  45$  "  4>  "  G  "  04 5$  "*4545""    
      g  p
	 g  f	 g  g		 g  seed		 g  tail-gen		 g  lst			I g  seed			I g  lst			8 g  result			8 g  seed	 	 g  result	 	  g  filenamef  srfi/srfi-1.scm

					$		*			-
		0
		8		
	8		;		I		J		m	 	 	 	 	 	 	 	 								 		  g  nameg  unfold C<R= h   O  - . , 3 #  4 5$  "  4 >  "  G  45$  "  4>  "  G  45$  "  4>  "  G  "  '4 5$  C4545""   G      g  p
	  g  f	  g  g		  g  seed		  g  tail		  g  seed	   g  lis	    g  filenamef  srfi/srfi-1.scm

		3			9		\	 	 	 	 	 	 	 	 	 	 	  g  nameg  unfold-right C=R:6  h@     ]4 5$  "  4 >  "  G  (  C 6            g  f
		: g  	ridentity		: g  lst			:  g  filenamef  srfi/srfi-1.scm
 
	%		+&		5(		8(		:(	 		:	  g  nameg  reduceg  documentationf  `reduce' is a variant of `fold', where the first call to F is on two
elements from LST, rather than one element and a given initial value.
If LST is empty, RIDENTITY is returned.  If LST has just one element
then that's the return value. C:R:        h     ] 456             g  f
		 g  	ridentity		 g  lst			  g  filenamef  srfi/srfi-1.scm
*
		/		/	 			  g  nameg  reduce-rightg  documentationf  `reduce-right' is a variant of `fold-right', where the first call to
F is on two elements from LST, rather than one element and a given
initial value.  If LST is empty, RIDENTITY is returned.  If LST
has just one element then that's the return value. C;R6*   h(      ]
4 5$  $  6CC          g  ls
		% g  len		% g  ls-len				%  g  filenamef  srfi/srfi-1.scm
F		G	&		G		H		I		I	) 		%	   C*nm     h    )   3 4 5$  "  4 >  "  G  "  |$  Y$  6&   64 5"4 5"(  6	 6"r- 1 3 4 5$  "  4 >  "  G  4
455$  "  4 >  "  G  "  =
$  6454 45?""             g  f
		  g  l		  g  hare		0  g  tortoise		0  g  move?		0  g  out		0  g  f
 y g  l1 y g  rest	 y g  len	 y g  l1	)f g  rest	)f g  len	)f g  out	)f  g  filenamef  srfi/srfi-1.scm
2		
4		05		36		76		=7		E8		I9		K9	.	M9	4	R:		U9		X;		[;	$	]<		b<	 	d<		g<		s;		v=		z>		>	 >	 >	 =	 ?	 @	 A	 A	* A	0 B	 A	 5	 5	6 5	 2	 E	 F	 K	 F	 F	M	N	N	N	&O	P	P	N	)Q	,R	1R		7S	:T	;T	FT	+GU	LU	"MU	+WU	ZU	fT	fQ	mQ	5yQ	 B		 	  y	
	  g  nameg  map CRiR6* h(      ]
4 5$  $  6CC          g  ls
		% g  len		% g  ls-len				%  g  filenamef  srfi/srfi-1.scm
p		q	&		q		r		s		s	) 		%	   C*mn   h  Z  )   3 4 5$  "  4 >  "  G  "  $  e$  <&   64 >  "  G  "4 >  "  G  "(  C 6"m- 1 3 4 5$  "  4 >  "  G  4	
455$  "  4 >  "  G  "  A
$  74 45>  "  G  45"C" R      g  f
		  g  l		  g  hare		0  g  tortoise		0  g  move?		0  g  f
  g  l1  g  rest	  g  len	  g  l1	.o g  rest	.o g  len	.o  g  filenamef  srfi/srfi-1.scm
Z		
\		0]		3^		7^		=_		E`		Ia		Ka	.	Ma	9	Rb		Ua		Vd		[d		`d		ke	 	ne	+	ye		zg		g	 g	 h	 h	 j	 k	 k	* k	5 l	 k	 ]	 Z	 o	 p	 u	 p	 p	w	x	x	x	&y	z	z	"x	.{	2|	6|		7~	>~	?~	!L~	W	X	#c	2m	o{	 9		 	  	
	  g  nameg  for-each CR+   h      - 1 3 4 ?6       g  f
			 g  clist1			 g  rest				  g  filenamef  srfi/srfi-1.scm

				 				
	  g  nameg  
append-map C>R, h      - 1 3 4 ?6       g  f
			 g  clist1			 g  rest				  g  filenamef  srfi/srfi-1.scm

				 				
	  g  nameg  append-map! C?Ri@RBlmn 
  h     - 1 3 4 5$  "  4 >  "  G  (  H"  9(  64 5$  """"  R45$  64 45?$  4	5"4	5""        g  proc
		  g  list1		  g  rest			  g  l		6	o g  rl		6	o g  res		J	o g  l		~  g  rl		~  g  res	    	g  filenamef  srfi/srfi-1.scm

	
		2		6		<		B		C		H		J		J		R		U		Z		b		e		o		o		r		z		~			 	 	 	 	# 	 	 	 	 	" 	 	 	 	 	 	 	 &		 	
	  g  nameg  
filter-mapg  documentationf  Apply PROC to the elements of LIST1... and return a list of the
results as per SRFI-1 `map', except that any #f results are omitted from
the list returned. CBRAln 	       h   V  - 1 3 4 5$  "  4 >  "  G  (  /"  #(  C4 >  "  G  """  245$  C4 >  "  G  45""      N      g  f
		  g  clist1		  g  rest			  g  l		6	Y g  l		e   g  filenamef  srfi/srfi-1.scm

	
		2		6		<		?	
	S		Y	
	Y		e		f	
	r		u	
 	 	
 	 	 	 		 	
	  g  nameg  pair-for-each CARI     h     ]4 5$  "  4 >  "  G  (  C4 5$  H "  /(  C4 5$   "C"C           g  pred
	  g  ls	  g  result		?  g  ls		E	t g  p		E	t  g  filenamef  srfi/srfi-1.scm

			+		,		.		3		5		9		<		?		?			E		K		O		T		V		Z		_	&	b	 	c		f		i	!	q		t		w	 	 	 	 	  g  nameg  
take-whileg  documentationf  jReturn a new list which is the longest initial prefix of LS whose
elements all satisfy the predicate PRED. CIRJ    hh   e  ]4 5$  "  4 >  "  G  "  2(  C4 5$  "$  CC"  ]      g  pred
		f g  lst		f g  prev		)	[ g  rest		)	[  g  filenamef  srfi/srfi-1.scm

			)		/		3		8		:		>		C		K		N		R		U	 	V		Z		[	 		f	  g  nameg  take-while!g  documentationf  &Linear-update variant of `take-while'. CJRK      hX   \  ]
4 5$  "  4 >  "  G  "   (  C4 5$  	"C"       T      g  pred
		Q g  lst		Q g  lst		)	I  g  filenamef  srfi/srfi-1.scm

			)		/		0		2		7		9		=		@		F		I	 		Q	  g  nameg  
drop-whileg  documentationf  UDrop the longest initial prefix of LST whose elements all satisfy the
predicate PRED. CKRL     hh     ]4 5$  "  4 >  "  G  "  3(  "  4 5$  "45D"       g  pred
		g g  lst		g g  lst		)	\ g  rl		)	\  g  filenamef  srfi/srfi-1.scm

			)		/		5		:		<		@		C		F		I		Q		R		\		\		_		g	 		g	  g  nameg  spang  documentationf  }Return two values, the longest initial prefix of LST whose elements
all satisfy the predicate PRED, and the remainder of LST. CLRM        hp   ~  ]4 5$  "  4 >  "  G  "  :(  D4 5$  "$  
DD"  v      g  pred
		n g  list		n g  prev		)	c g  rest		)	c  g  filenamef  srfi/srfi-1.scm

			)		/		2		4		5		:		<		@		E		M		P		T		W	 	X		^		_		c		c	 		n	  g  nameg  span!g  documentationf   Linear-update variant of `span'. CMRN   hh     ]4 5$  "  4 >  "  G  "  3(  "  4 5$  45D""       g  pred
		g g  clist		g g  clist		)	\ g  rl		)	\  g  filenamef  srfi/srfi-1.scm

			)		/		0		5		:		<		@		A		K		N 		Q 		T 		\ 		\		_		g	 		g	  g  nameg  breakg  documentationf  zReturn two values, the longest initial prefix of LST whose elements
all fail the predicate PRED, and the remainder of LST. CNRO     hp   }  ]4 5$  "  4 >  "  G  "  :(  D4 5$  $  
DD""  u      g  pred
		n g  list		n g  l		)	c g  prev		)	c  g  filenamef  srfi/srfi-1.scm

			)		/		2		4		5			:			<			@		C
		G
		J	 	K		Q		R		V		Y		c		c	 		n	  g  nameg  break!g  documentationf  !Linear-update variant of `break'. CORPlnm 	   h   u  - 1 3 4 5$  "  4 >  "  G  (   6"  X45$  C4455$   45@4 45?$  C45""       m      g  pred
		  g  ls		  g  lists			  g  lists		>  g  t		|   g  filenamef  srfi/srfi-1.scm

	
		2		:		>		?		K		N		S		]		a		d		n		o		r		|		|	 	4 	0 	 	 	 		 	
	  g  nameg  any CPR      h@   
  ]"  2(  C(   64 5$  C""      g  pred
		@ g  ls		@ g  ls			8 g  t		$	8  g  filenamef  srfi/srfi-1.scm

			 		"		 		#		#		%		"%		$%		$%		2%	#	8%		8	 		@	  g  nameg  any1 CRQlnm 
    h   h  - 1 3 4 5$  "  4 >  "  G  (   6"  S45$  C4455$   4	5@4 4	5?$  45"C"    `      g  pred
		  g  ls		  g  lists			  g  lists		>   g  filenamef  srfi/srfi-1.scm
'
	
(		2)		:*		>+		?,		K,		N.		S.		].		a,		d/		n/		o1		r1	 	|1	 1	 1	5 1	1 +	 +	 +	 		 	
	  g  nameg  every CQR   h@      ]
"  -(  C(   64 5$  	"C"            g  pred
		; g  ls		; g  ls			3  g  filenamef  srfi/srfi-1.scm
3
	4		5		7		5		8		8		:		":		$:		(:		+:	$	1:	 	34	 		;	  g  nameg  every1 CRlmn 	   h   A  - 1 3 4 5$  "  4 >  "  G  (  4"  %(  C4 5$  C"
""  845$  C4 45?$  C45"
"9      g  pred
		  g  clist1		  g  rest			  g  l		6	[ g  i		6	[ g  lists		j  g  i		j   g  filenamef  srfi/srfi-1.scm
<
	
?		2@		6A		<B		?D		DD		FD		JD		PF		SF		[F	
	[A		jG		kH		wH		zJ		}J	 J	 H	 L	 L	! L	 G	 G	 G	 		 	
	  g  nameg  
list-indexg  documentationf  gReturn the index of the first set of elements, one from each of
CLIST1 ... CLISTN, that satisfies PRED. CRiTRT     h8   r  ]"  &(  645" " j      g  alist
		7 g  a		, g  rl			,  g  filenamef  srfi/srfi-1.scm
R
	U		W		X		Y		Y		Y	 	Y	)	$Y		,Y		,U		/V		7U	 		7  g  nameg  
alist-copyg  documentationf  eReturn a copy of ALIST, copying both the pairs comprising the list
and those making the associations. CURV     h   N  - . , 3 #  45$  "  4>  "  G  "  9(  64 5$  """       F      g  key
	  g  alist	  g  k=		  g  a		=	v g  rl		=	v  g  filenamef  srfi/srfi-1.scm
[
	\		=]		C^		I_		J`		Q`		T`		X`		[a		ea		hb		kb		nb		vb		v]		y]	 ]	 	 	  g  nameg  alist-delete CVRV       h       - . , 3 #   6       g  key
		  g  alist		  g  k=			   g  filenamef  srfi/srfi-1.scm
d
	 e	 		 	  g  nameg  alist-delete! CWRH     h   \   ]LL  6      T       g  y
		
  g  filenamef  srfi/srfi-1.scm
q		
q	 		
   C hh      - . , 3 #  &   6&   645$  "  4>  "  G  	
 O 6       g  x
		h g  ls		h g  =			h  g  filenamef  srfi/srfi-1.scm
i
	j		&m		.j		6n		7p		hq	 		h	  g  nameg  member CRXQ   h   f   ] LL 6   ^       g  el
		  g  filenamef  srfi/srfi-1.scm
{			{	0	{	% 		   C       hx     - 1 3 4 5$  "  4 >  "  G  (  C"  ,(  C4 O 5$  "C"            g  =
			r g  rest			r g  f		8	d g  r		8	d  g  filenamef  srfi/srfi-1.scm
u
	
v		2w		8y		>z		?z		A{		T{		W|		Z|		b|		dy		gy		jy	!	ry	 			r
  g  nameg  lset<= CXRXQ  h   f   ] LL 6   ^       g  el
		  g  filenamef  srfi/srfi-1.scm
				.		# 		   C     h   k   ]L  6      c       g  x
		
 g  y		
  g  filenamef  srfi/srfi-1.scm
	0	
	> 		
	   C  h   ]   ] LL O 6       U       g  el
		  g  filenamef  srfi/srfi-1.scm
			# 		   C        h   <  - 1 3 4 5$  "  4 >  "  G  (  C"  C(  C4 O 5$  %4 O 5$  "CC"       4      g  =
		  g  rest		  g  f		8	{ g  r		8	{  g  filenamef  srfi/srfi-1.scm
~
	
		2		8		>		?	
	A		T	
	U		c	I	e		i	
	l		o		w		{		~	 	 	 		 
  g  nameg  lset= CYRZ    h   k   ]L  6      c       g  x
		
 g  y		
  g  filenamef  srfi/srfi-1.scm
	
	
	 		
	   C        h     - 1 3 H &  "   $   "  *4 5$  "  4 >  "  G   O K"  0(  C4J5$  "  ""          g  =
		  g  list		  g  rest			  g  pred		
  g  ans		X  g  rest		X   g  filenamef  srfi/srfi-1.scm

							"		)	
	X		^		b		g		m		q		z		}	 	 	 	 		 	
	  g  nameg  lset-adjoing  documentationf lAdd to LIST any of the elements of REST not already in the list.
These elements are `cons'ed onto the start of LIST (so the return shares
a common tail with LIST), but the order they're added is unspecified.

The given `=' procedure is used for comparing elements, called
as `(@var{=} listelem elem)', i.e., the second argument is one of the
given REST parameters. CZR[      h   k   ]L  6      c       g  x
		
 g  y		
  g  filenamef  srfi/srfi-1.scm
	
	
	 		
	   C66  h       ]4 M 5$  C C      y       g  elt
		 g  ans		  g  filenamef  srfi/srfi-1.scm
							 			   C    h0   x   ] (  C(   C &  CL O  6  p       g  lis
		. g  ans		.  g  filenamef  srfi/srfi-1.scm
			
	.	 		.	   C 	    hh      - 1 3 H &  "   $   "  *4 5$  "  4 >  "  G   O KO 6             g  =
			b g  rest			b g  pred		
	b  g  filenamef  srfi/srfi-1.scm

							"		)	
	^		b	 				b
  g  nameg  
lset-union C[R\Q       h   f   ]L L 6   ^       g  ll
		  g  filenamef  srfi/srfi-1.scm
			&		 		   C       h   ?  - 1 3 4 5$  "  4 >  "  G  "  >(  64 O 5$  """       7      g  =
			y g  list1			y g  rest				y g  l		0	n g  acc		0	n  g  filenamef  srfi/srfi-1.scm

	
		0		6		<		=	
	P		S		V		Y		a		d		n		n		q		y	 			y	
	  g  nameg  lset-intersection C\R]P     h   f   ]L L 6   ^       g  ll
		  g  filenamef  srfi/srfi-1.scm
			&		 		   C       h   K  - 1 3 4 5$  "  4 >  "  G  (  C"  >(  64 O 5$  """      C      g  =
		  g  list1		  g  rest			  g  l		9	w g  acc		9	w  g  filenamef  srfi/srfi-1.scm

	
		2		9		?		E		F		Y		\		f	
	i		l		o		w	
	w		z	 	 		 	
	  g  nameg  lset-difference C]R^6 h     ]""  ~(  J"  :(  64 L 5$  """4L 5$  "" "w       g  lst
	  g  res	  g  l		  g  acc		  g  r			J g  acc			J  g  filenamef  srfi/srfi-1.scm
			
											"		(		,		/		9		<		?	'	B	!	J		J		W		\		b		f		i		s		v		y	"	|	 	 	
 	  	
 	 	   C h@      - 1 3 4 5$  "  4 >  "  G   O 6             g  =
			: g  rest			:  g  filenamef  srfi/srfi-1.scm

	
		6		:	 			:
  g  nameg  lset-xor C^R_Q       h   f   ]L L 6   ^       g  ll
		  g  filenamef  srfi/srfi-1.scm
			1		) 		   C       h     - 1 3 4 5$  "  4 >  "  G  "  X(  4545D4 O 5$  """        g  =
		  g  list1		  g  rest			  g  l		0  g  accd		0  g  acci		0  g  appears		V   g  filenamef  srfi/srfi-1.scm

	
		0		6		7		>		F		G		V		^		a		f	!	i		s	
	v		y		|	 	
 	 	 	& 	 		 	
	  g  nameg  lset-diff+intersection C_R`[  h8      - 1 3 4 5$  "  4 >  "  G   @           g  =
			4 g  rest			4  g  filenamef  srfi/srfi-1.scm

	
		4	 			4
  g  nameg  lset-union! C`Ra\  h8      - 1 3 4 5$  "  4 >  "  G   @         g  =
			6 g  list1			6 g  rest				6  g  filenamef  srfi/srfi-1.scm

	
		6	 			6	
	  g  nameg  lset-intersection! CaRc^      h8      - 1 3 4 5$  "  4 >  "  G   @           g  =
			4 g  rest			4  g  filenamef  srfi/srfi-1.scm

	
		4	 			4
  g  nameg  	lset-xor! CcRd_    h8      - 1 3 4 5$  "  4 >  "  G   @         g  =
			6 g  list1			6 g  rest				6  g  filenamef  srfi/srfi-1.scm

	
		6	 			6	
	  g  nameg  lset-diff+intersection! CdRC         g  m
		0  g  filenamef  srfi/srfi-1.scm		'
	1 
	6 		> 	&	C 
	L 
	Q 		W 		X 	+	` 		b 		g 
 
l 
 
 
 



/

%
7
@
G
[
\
$]
+^
_
Y`
a
b
*c
d
f
j
k
q
w
}

 
"
#
%9
%
&
'D
(
)
,z
/]
2*
5s
9%
;B
=X 
?@*
E1
EW
KY
Lg
M8
M?
QD
Si
V*
X
Y
\
^)
`q
bx
d
f
hC'
i3
l<
lP
nmR
pa[
q6d
ri
u'u
x~
|
      
      
      
      @
      2
      
      
      
      
 a	      
   C6                                                                                                     ccache/srfi/srfi-9/gnu.go                                                                           0000644                 00000032341 15154557173 0011166 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.04      ]R 4    hh      ] g  guile	 	g  define-module*	 	 	g  srfi	g  srfi-9	g  gnu		 	
g  filenameS	f  srfi/srfi-9/gnu.scm	g  importsS	g  srfi-1	 	 	g  system	g  base	g  ck	 	 	 	g  exportsS	g  set-record-type-printer!	g  define-immutable-record-type	g  	set-field	g  
set-fields	 	g  set-current-module	 	 	g  vtable-index-printer	 g  make-syntax-transformer	!  	"  	#g  macro	$g  $sc-dispatch	%$ 	&$ 	'g  any	(g  each-any	)'(	*')	+'*	,'+	-g  syntax-object	.g  @@	/g  top	0/ 	1g  ribcage	2g  dummy	3g  name	4g  ctor	5g  pred	6g  fields	723456 	8g  m-1e8bcc284-11e	98/ 	:90000 	;f  l-1e8bcc284-123	<f  l-1e8bcc284-124	=f  l-1e8bcc284-125	>f  l-1e8bcc284-126	?f  l-1e8bcc284-127	@;<=>? 	A17:@ 	B1 	Cg  x	DC 	E9 	Ff  l-1e8bcc284-120	GF 	H1DEG 	I0ABH 	Jg  hygiene	KJ 	L-.IK 	M-IK 	N-IK 	OMN 	Pg  %define-record-type	Q-PIK 	RLOQ 	S-IK 	T-IK 	Ug  syntax-violation	VU 	WU 	Xf  -source expression failed to match any pattern	Y''(' 	Zg  %set-fields	[g  s	\g  getter	]g  expr	^2[\] 	_g  m-1e8bcc284-130	`_/ 	a`000 	bf  l-1e8bcc284-135	cf  l-1e8bcc284-136	df  l-1e8bcc284-137	ef  l-1e8bcc284-138	fbcde 	g1^af 	h` 	if  l-1e8bcc284-132	ji 	k1Dhj 	l0gBk 	m-ZlK 	n-lK 	o-lK 	p''	q'p	rg  rest	s2[r 	tg  m-1e8bcc284-140	ut/ 	vu00 	wf  l-1e8bcc284-145	xf  l-1e8bcc284-146	yf  l-1e8bcc284-147	zwxy 	{1svz 	|u 	}f  l-1e8bcc284-142	~} 	1D|~  0{B  -ZK  -K  -K  g  each p'    g  fold g  find g  free-identifier=? g  delq g  collate-set-field-specs g  unknown-getter g  _ ''  f  unknown getter g  c-list g  free-id g  quote 0  f  l-1e8bcc284-175   1D  0B  -K    '    '  g  v [  00  f  l-1e8bcc284-178 f  l-1e8bcc284-179   1  0B  -K  -K  g  c-same-type-check f  l-1e8bcc284-17e   1D  0B  -K    '  (  )  '  g  every g  format f  \field paths ~a and ~a require one object to belong to two different record types (~a and ~a) g  syntax->datum g  append     g  	orig-form g  path g  getter0 g  type0 g  type g  
on-success [\  00000000  f  l-1e8bcc284-1a3 f  l-1e8bcc284-1a4 f  l-1e8bcc284-1a5 f  l-1e8bcc284-1a6 f  l-1e8bcc284-1a7 f  l-1e8bcc284-1a8 f  l-1e8bcc284-1a9 f  l-1e8bcc284-1aa   1  0B  -K  -K  f  l-1e8bcc284-1b4   1D  0BB  -.K  -K  -K    g  getter-type -K    g  getter-index -K    g  getter-copier -K    '''  ''('  '  ''('  ' (䌤 '匤 '挤 猤 g  map     g  car \  f  l-1e8bcc284-1ea f  l-1e8bcc284-1eb   1  g  collated-specs   f  l-1e8bcc284-1e2   1  g  check? g  path-so-far g  struct-expr g  head g  tail ]  0000000  f  l-1e8bcc284-1d4 f  l-1e8bcc284-1d5 f  l-1e8bcc284-1d6f  l-1e8bcc284-1d7f  l-1e8bcc284-1d8f  l-1e8bcc284-1d9f  l-1e8bcc284-1da  1  000 	f  l-1e8bcc284-1b8
f  l-1e8bcc284-1b9f  l-1e8bcc284-1ba	
 1 0BBBBBBB -K ''  '] f  l-1e8bcc284-202f  l-1e8bcc284-203f  l-1e8bcc284-204 1 g  spec f  l-1e8bcc284-1fe 1 g  err  f  l-1e8bcc284-1f0!  "1! #0BBBBBBB"BBBBBBB $-#K %f  l-1e8bcc284-20a&% '1& (0B'BBBBBBB"BBBBBBB )-Z(K *g  
struct-ref+-*(K ,-[(K --(K .-(K /g  list0g  t-1e8bcc284-1f210 2g  m-1e8bcc284-1f332/ 43 5f  l-1e8bcc284-1f765 71146 80B7BBB"BBBBBBB 9-8K :-8K ;-8K <-8K =g  let>-=8K ?-[8K @ A@B'AC(BD'CE'DFEGf  duplicate field pathH(' IH J'IK(JL'KM'LNMOf  %one field path is a prefix of anotherPqQf  invalid syntaxC 5   h  g   ]4	
5 4 >  "  G         h      ] C             g  type
		
 g  proc		
  g  filenamef  srfi/srfi-9/gnu.scm
	 
			"	 		
	  g  nameg  set-record-type-printer!g  documentationf  (Set PROC as the custom printer for TYPE. CR4"#&,RST  h(   w   ]C     o       g  dummy
		# g  name		# g  ctor			# g  pred			# g  fields			#  		#	   CWX  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-9/gnu.scm
	$
 		"  g  
macro-typeg  syntax-rulesg  patternsg  nameg  ctorg  predg  fieldsg  ...   C5R4"#&Ymno      h    b   ]   C Z       g  dummy
		 g  s		 g  getter			 g  expr			  			   CWX       h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-9/gnu.scm
	)
 		"  g  
macro-typeg  syntax-rulesg  patternsg  sg  getterg  ... g  expr   C5R4"#&q      h    N   ]C       F       g  dummy
		 g  s		 g  rest			  			   CWX   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  srfi/srfi-9/gnu.scm
	-
 		"  g  
macro-typeg  syntax-rulesg  patternsg  sg  rest  C5R& h   i   ]L  6     a       g  tree
		  g  filenamef  srfi/srfi-9/gnu.scm
	C				D	+		D	 		   C  hH      ]4 O 5$    45C   C              g  head
		A g  tail		A g  expr			A g  result			A g  t			A  g  filenamef  srfi/srfi-9/gnu.scm
	B			C			C		!	G		$	H		%	G		'	I		0	G		:	J	 
		A	  g  nameg  insert C  h      ] 6 ~       g  head
		 g  tail		 g  expr			  g  filenamef  srfi/srfi-9/gnu.scm		M			M	 			   CWX   h(      ]	4 5$  @ 6             g  specs
		" g  tmp		"  g  filenamef  srfi/srfi-9/gnu.scm
	A
 		"  g  nameg  collate-set-field-specs CR4"#&U  h      ] 6  {       g  	orig-form
		 g  getter		  g  filenamef  srfi/srfi-9/gnu.scm		S			S	%		S	 			   CWX      h(   f   ]	4 5$  @ 6      ^       g  x
		" g  tmp		"  g  filenamef  srfi/srfi-9/gnu.scm
	P	 		"   C5R4"#& h   8   ]   C       0       g  s
		 g  v		  			   CWX h(   f   ]	4 5$  @ 6      ^       g  x
		" g  tmp		"  g  filenamef  srfi/srfi-9/gnu.scm
	V	 		"   C5R4"#&WXU        hX      ]
4 L5$  C444L  5544L L 554 54L55L6         g  t
		V g  g		V g  t			V  g  filenamef  srfi/srfi-9/gnu.scm
	b			c			c			e			f		 	g		!	i		2	j		C	k		J	l		R	f		V	d	 		V	   C h       , 3 O 6            g  s
		 g  	orig-form		 g  path			 g  getter0			 g  getter			 g  type0			 g  type			 g  
on-success			  g  filenamef  srfi/srfi-9/gnu.scm		b	 			   C  h      , 3    C          g  s
		 g  	orig-form		 g  path			 g  getter0			 g  getter			 g  type0			 g  type			 g  
on-success			  			   C     h@   f   ]	4 5"  	 6$  4?$  @""       ^       g  x
		9 g  tmp		9  g  filenamef  srfi/srfi-9/gnu.scm
	\	 		9   C5R4"Z#&&    h   m   ]C   e       g  check?
		 g  	orig-form		 g  path-so-far			 g  s			  			   C       h   |   ]C   t       g  check?
		 g  	orig-form		 g  path-so-far			 g  s			 g  e			  			   C   h   w   ]  C   o       g  tmp-1e8bcc284-1e6
		 g  tmp-1e8bcc284-1e5		 g  tmp-1e8bcc284-1e4			  			   C&)&$)+,-./ 
       hX      ]L   L L4L  5L      4	5 C          g  head
		U g  tail		U g  expr			U g  tmp			U  g  filenamef  srfi/srfi-9/gnu.scm	 	# 		U	   CWX h0   j   ]	4 5$  LLLL O @ 6   b       g  spec
		- g  tmp		-  g  filenamef  srfi/srfi-9/gnu.scm
 	 		-   C&(9:;<;    h   9   ]L  L   C  1       g  tmp-1e8bcc284-1fb
		  		   C>? 	     h   9   ]L L LL LL L  4LLO L5L   LL L   L     C     1       g  t-1e8bcc284-1f2
	   	    CWX 	       hX      ]L  4LL LLO L545$  LLLL LLO 	@6       g  getter0
		X g  getter		X g  tmp			X g  tmp		!	X g  tmp		,	X  g  filenamef  srfi/srfi-9/gnu.scm	 		 		! 	 		X	   CWX  hX   5  ]44554545		$  LLL  O 	@	
6    -      g  check?
		T g  	orig-form		T g  path-so-far			T g  struct-expr			T g  head			T g  tail			T g  expr			T g  collated-specs			T g  tmp			T g  tmp			*	T  
g  filenamef  srfi/srfi-9/gnu.scm	 		 			 		 	 		T	   CFUG     h      ]6         g  check?
		 g  	orig-form		 g  path-so-far			 g  s			 g  e			 g  e*			  g  filenamef  srfi/srfi-9/gnu.scm	 		 	'	 		 			   CNUO     h      ]6         g  check?
		 g  	orig-form		 g  path-so-far			 g  s			 g  getter			 g  expr			  g  filenamef  srfi/srfi-9/gnu.scm	 		 	'	 		 			   CPUQ      h      ]6           g  check?
		 g  	orig-form		 g  rest			  g  filenamef  srfi/srfi-9/gnu.scm	 		 	'	 		 			   CWX h      ]34L 5$  @4L 5$  @4L 5$   O @4L 5$  	@4L 
5$  @4L 5$  @L 6         g  getter-type
	  g  getter-index	  g  getter-copier		  g  tmp		  g  tmp		"  g  tmp		9  g  tmp		Y  g  tmp		p  g  tmp	    		 	   CWX 	       h8      ] 45$   O @6      w       g  x
		2 g  tmp		2 g  tmp			2  g  filenamef  srfi/srfi-9/gnu.scm
	s			t	 		2   C5ZRC  _       g  m
		,  g  filenamef  srfi/srfi-9/gnu.scm		
(	 
	@	A
 	~
   C6                                                                                                                                                                                                                                                                                                ccache/rnrs/programs.go                                                                             0000644                 00000002572 15154557173 0011142 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0b      ] + 4   h      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  programs	 		g  filenameS	
f  rnrs/programs.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  only	g  command-line	g  exit	 	g  call-with-deferred-observers	 	 	g  module-use-interfaces!	 	 	g  current-module	 	  	!g  module-export!	"! 	#! 	$g  module-re-export!	%$ 	&$ 	' 	(g  module-replace!	)( 	*( C 5h  h   ]4	
5 4 >  "  G   45 4  h   C   ] 45 L  6;       g  filenamef  rnrs/programs.scm
	
 		
   C O >  "  G   4#      h   C   ] 45 6    ;       g  filenamef  rnrs/programs.scm
	
 		
   C>  "  G  4& '   h   C   ] 45 6   ;       g  filenamef  rnrs/programs.scm
	
 		
   C>  "  G  *       h   C   ] 45 6    ;       g  filenamef  rnrs/programs.scm
	
 		
   C6   `       g  m
		+ g  iface
	2   g  filenamef  rnrs/programs.scm		
 	
   C6                                                                                                                                       ccache/rnrs/enums.go                                                                                0000644                 00000022341 15154557173 0010433 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0$      ]  4  h      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  enums	 		g  filenameS	
f  rnrs/enums.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  only	g  and=>	 	g  call-with-deferred-observers	 	 	g  module-use-interfaces!	 	 	g  current-module	 	 	 g  base	!  	"g  
conditions	#" 	$g  
exceptions	%$ 	&g  records	'g  
procedural	(&' 	)g  syntax-case	*) 	+g  srfi	,g  :1	-+, 	.g  module-export!	/. 	0. 	1g  define-enumeration	2g  enum-set-projection	3g  enum-set-complement	4g  enum-set-difference	5g  enum-set-intersection	6g  enum-set-union	7g  
enum-set=?	8g  enum-set-subset?	9g  enum-set-member?	:g  enum-set->list	;g  enum-set-constructor	<g  enum-set-indexer	=g  enum-set-universe	>g  make-enumeration	?123456789:;<=> 	@g  module-re-export!	A@ 	B@ 	Cg  module-replace!	DC 	EC 	Fg  make-record-type-descriptor	Gg  enum-set	Hg  mutable	Ig  universe	JHI 	Kg  	immutable	Lg  set	MKL 	NJM 	Og  enum-set-rtd	Pg  record-constructor	Qg  "make-record-constructor-descriptor	Rg  make-enum-set	Sg  record-accessor	Tg  enum-set-universe-internal	Ug  record-mutator	Vg  enum-set-universe-set!	Wg  enum-set-set	Xg  length	Yg  memq	Zg  	list-copy	[g  lset-intersection	\g  eq?	]g  lset<=	^g  
lset-union	_g  raise	`g  make-assertion-violation	ag  lset-difference	bg  make-syntax-transformer	cb 	db 	eg  macro	fg  $sc-dispatch	gf 	hf 	ig  any	jg  each-any	kiiji 	lg  syntax-object	mg  begin	ng  top	on 	pg  ribcage	qg  dummy	rg  	type-name	sg  symbol	tg  constructor-syntax	uqrst 	vg  m-bfa5881-18	wvn 	xwooo 	yf  l-bfa5881-1d	zf  l-bfa5881-1e	{f  l-bfa5881-1f	|f  l-bfa5881-20	}yz{| 	~pux} 	p  g  x   w  f  l-bfa5881-1a   p  o~  g  private   lm  g  define-syntax l  g  lambda l  g  s l    l)  g  sym l    g  if l  lY  g  syntax->datum l  g  syntax l      g  quote l      g  syntax-violation l  g  symbol->string l  f  not a member of the set l  l    g  _ l  g  ... l    g  let* l  lI  g  syms l          g  quoted-universe l  g  datum->syntax l  g  list l          g  quoted-syms l          g  or l  g  every l  l          f  not a subset of the universe l    g  quasisyntax l  l;  l>  g  unsyntax l                    f  -source expression failed to match any patternC 5     hx    ]4	
5 4 >  "  G   45 4 h   @   ] 45 L  68       g  filenamef  rnrs/enums.scm
	
 		
   C O >  "  G   4!5 4       h   @   ] 45 L  68       g  filenamef  rnrs/enums.scm
	
 		
   C O >  "  G   4#5 4       h   @   ] 45 L  68       g  filenamef  rnrs/enums.scm
	
 		
   C O >  "  G   4%5 4       h   @   ] 45 L  68       g  filenamef  rnrs/enums.scm
	
 		
   C O >  "  G   4(5 4       h   @   ] 45 L  68       g  filenamef  rnrs/enums.scm
	
 		
   C O >  "  G   4*5 4       h   @   ] 45 L  68       g  filenamef  rnrs/enums.scm
	
 		
   C O >  "  G   4-5 4       h   @   ] 45 L  68       g  filenamef  rnrs/enums.scm
	
 		
   C O >  "  G   40?      h   @   ] 45 6   8       g  filenamef  rnrs/enums.scm
	
 		
   C>  "  G  4B        h   @   ] 45 6    8       g  filenamef  rnrs/enums.scm
	
 		
   C>  "  G  4E        h   @   ] 45 6    8       g  filenamef  rnrs/enums.scm
	
 		
   C>  "  G  4FiGN5OR4Pi4QiOi55RR4SiOi
5TR4UiOi
5VR4SiOi5WRRV     h      ]	4 56           g  symbol-list
		 g  es	
	  g  filenamef  rnrs/enums.scm
	-	 		  g  nameg  make-enumeration C>RT        h      ]	4 5$  C C |       g  enum-set
		 g  t			  g  filenamef  rnrs/enums.scm
	1	 		  g  nameg  enum-set-universe C=R:=XYX       h   -   ]L 4 5C   %       g  probe
		  		   C        h   )   ]4 L5L O 6  !       g  x
		  		   C    h(      ]44 5545O C            g  enum-set
		# g  symbols		# g  cardinality			#  g  filenamef  rnrs/enums.scm
	5	 		#  g  nameg  enum-set-indexer C<RR=Z        h   3   ]4L 54 56    +       g  symbol-list
		  		   C  h   y   ] O C      q       g  enum-set
		
  g  filenamef  rnrs/enums.scm
	<	 		
  g  nameg  enum-set-constructor C;R[\W=        h    s   ]44 554 56     k       g  enum-set
		  g  filenamef  rnrs/enums.scm
	A	 		  g  nameg  enum-set->list C:RYW  h      ]4 455$  CC       g  symbol
		 g  enum-set		  g  filenamef  rnrs/enums.scm
	F	 			  g  nameg  enum-set-member? C9R]\W=        h@      ]444 5544555$  4 5456C            g  
enum-set-1
		; g  
enum-set-2		;  g  filenamef  rnrs/enums.scm
	I	 		;	  g  nameg  enum-set-subset? C8R8        h       ]4 5$   6C              g  
enum-set-1
		 g  
enum-set-2		  g  filenamef  rnrs/enums.scm
	O	 			  g  nameg  
enum-set=? C7R=R^\W_`  h@      ]4 545$   4 544 5455645 6         g  
enum-set-1
		> g  
enum-set-2		>  g  filenamef  rnrs/enums.scm
	S	 		>	  g  nameg  enum-set-union C6R=R[\W_`      h@      ]4 545$   4 544 5455645 6         g  
enum-set-1
		> g  
enum-set-2		>  g  filenamef  rnrs/enums.scm
	\	 		>	  g  nameg  enum-set-intersection C5R=Ra\W_`       h@      ]4 545$   4 544 5455645 6         g  
enum-set-1
		> g  
enum-set-2		>  g  filenamef  rnrs/enums.scm
	e	 		>	  g  nameg  enum-set-difference C4R=Ra\:W   h(      ]	4 54454 556         g  enum-set
		& g  universe			&  g  filenamef  rnrs/enums.scm
	n	 		&  g  nameg  enum-set-complement C3RR=[\W:        h(      ]4544 5445556        g  
enum-set-1
		' g  
enum-set-2		'  g  filenamef  rnrs/enums.scm
	t	 		'	  g  nameg  enum-set-projection C2R4d1ehk     h   }   ]	
                   C u       g  dummy
	  g  	type-name	  g  symbol		  g  constructor-syntax		   	 	   C    h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  		"  g  
macro-typeg  syntax-rulesg  patternsg  	type-nameg  symbolg  ... g  constructor-syntax   C51RCw      g  m
		+ g  iface
	2  g  iface
 5 g  iface
< g  iface
E g  iface
L g  iface
U g  iface
\  g  filenamef  rnrs/enums.scm		
W	 	n	$	}	(		)		+	R	-		1		5			<	
F	A	
	F		I		O		S		\		e	X	n	5	t	 	x
   C6                                                                                                                                                                                                                                                                                                ccache/rnrs/base.go                                                                                 0000644                 00000052774 15154557173 0010233 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0U      ] 4  h,      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  base	 		g  filenameS	
f  rnrs/base.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  rename	g  except	g  error	g  raise	g  map	g  string-for-each	 	g  log	g  log-internal	 	g  euclidean-quotient	g  div	  	!g  euclidean-remainder	"g  mod	#!" 	$g  
euclidean/	%g  div-and-mod	&$% 	'g  centered-quotient	(g  div0	)'( 	*g  centered-remainder	+g  mod0	,*+ 	-g  	centered/	.g  div0-and-mod0	/-. 	0g  inf?	1g  	infinite?	201 	3g  exact->inexact	4g  inexact	534 	6g  inexact->exact	7g  exact	867 	9 #&),/258 	:g  call-with-deferred-observers	;: 	<: 	=g  module-use-interfaces!	>= 	?= 	@g  current-module	A@ 	B@ 	Cg  srfi	Dg  srfi-11	ECD 	Fg  module-export!	GF 	HF 	Ig  assert	Jg  assertion-violation	Kg  vector-for-each	Lg  
vector-map	Mg  symbol=?	Ng  	boolean=?	Og  integer-valued?	Pg  rational-valued?	Qg  real-valued?	RIJKLMNOPQ 		Sg  module-re-export!	TS 	US 	Vg  identifier-syntax	Wg  syntax-rules	Xg  letrec-syntax	Yg  
let-syntax	Zg  unquote-splicing	[g  unquote	\g  
quasiquote	]g  apply	^g  values	_g  dynamic-wind	`g  call-with-values	ag  call/cc	bg  call-with-current-continuation	cg  vector-fill!	dg  list->vector	eg  vector->list	fg  vector-set!	gg  
vector-ref	hg  vector-length	ig  vector	jg  make-vector	kg  vector?	lg  string-copy	mg  list->string	ng  string->list	og  string-append	pg  	substring	qg  	string>=?	rg  	string<=?	sg  string>?	tg  string<?	ug  string=?	vg  
string-ref	wg  string-length	xg  string	yg  make-string	zg  char>=?	{g  char<=?	|g  char>?	}g  char<?	~g  char=?	g  integer->char g  char->integer g  string->symbol g  symbol->string g  for-each g  list-ref g  	list-tail g  reverse g  append g  length g  list g  list? g  cddddr g  cdddar g  cddadr g  cdaddr g  cadddr g  caddar g  caaddr g  cadadr g  cdaadr g  cdadar g  cddaar g  cdaaar g  cadaar g  caadar g  caaadr g  caaaar g  cdddr g  cddar g  cdadr g  caddr g  cdaar g  cadar g  caadr g  caaar g  cddr g  cdar g  cadr g  caar g  cdr g  car g  cons g  string->number g  number->string g  >= g  <= g  > g  < g  = g  finite? g  nan? g  even? g  odd? g  	negative? g  	positive? g  zero? g  inexact? g  exact? g  integer? g  	rational? g  real? g  complex? g  angle g  	magnitude g  
make-polar g  atan g  acos g  asin g  tan g  cos g  sin g  exp g  sqrt g  exact-integer-sqrt g  expt g  make-rectangular g  	imag-part g  	real-part g  rationalize g  round g  truncate g  ceiling g  floor g  lcm g  gcd g  denominator g  	numerator g  abs g  min g  max g  / g  * g  - g  + g  eq? g  equal? g  eqv? g  not g  and g  or g  case g  cond g  set! g  if g  lambda g  quote g  begin g  letrec* g  letrec g  let*-values g  
let-values g  let* g  let g  define-syntax g  define g  
procedure? g  string? g  number? g  pair? g  null? g  char? g  symbol? g  boolean? VWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~471.+(%"Wk  g  module-replace!       f  .string arguments must all have the same lengthg  	scm-errorg  wrong-type-argf  mapf  Circular list: ~Sf  Not a list: ~Sf  List of wrong length: ~Sg  make-syntax-transformer 	 
g  define-proxyg  macrog  $sc-dispatch  g  anyg  free-idg  syntax-objectg  @g  top g  ribcage g  x g  
m-a850ec-9  f  
l-a850ec-b    g  private!  "! #" $# %$ &g  dummy'g  binding(g  module)g  original*&'() + ,f  
l-a850ec-e-f  
l-a850ec-f.f  l-a850ec-10/f  l-a850ec-110,-./ 1*+0 21 32! 4V2! 5g  
module-ref652! 7g  resolve-interface872! 92! :g  syntax-violation;: <: =f  -source expression failed to match any pattern>g  identifier??> @> Ag  m-a850ec-16BA Cg  idDC Eg  m-a850ec-17FE GF Hf  l-a850ec-1eIH JDGI Kf  l-a850ec-19LK MGL Ng  shiftOBJMN1 P5O! Q7O! RO! SJM TS! Ug  
exceptionsVUS! WTV XRW YQX ZS! [RZ \PY[ ]g  _^g  each-any_]^`f  l-a850ec-21a` bGa cBbMN1 d5c! e7c! fc! gbM hg! iUg! jhi kfj lek mg! nfm odln pg  	conditionqg  m-a850ec-24rq sg  m-a850ec-25ts ut vf  l-a850ec-2cwv xDuw yf  l-a850ec-27zy {uz |rx{N1 }5|! ~7|! |! x{ ! g  
conditions!   ~ p!  } f  l-a850ec-2f u r{N1 5! 7! ! { ! !    p!   g  
make-errorg  m-a850ec-32 g  m-a850ec-33  f  l-a850ec-3a D f  l-a850ec-35  N1 5! 7! !  ! !    !   f  l-a850ec-3d  N1 5! 7! !  ! !    !   g  make-assertion-violationg  m-a850ec-40 g  m-a850ec-41  f  l-a850ec-48 D f  l-a850ec-43  N1 5! 7! !  ! !    !   f  l-a850ec-4b  N1 5! 7! !  ! !    !   g  make-who-conditiong  m-a850ec-4e g  m-a850ec-4f  f  l-a850ec-56 D f  l-a850ec-51  N1 5! 7! !  ! !      !   f  l-a850ec-59  N1 	5! 
7! !  ! !   
 !  	 g  make-message-conditiong  m-a850ec-5c g  m-a850ec-5d  f  l-a850ec-64 D f  l-a850ec-5f   ! N1 "5!! #7!! $!! %  &%! '%! (&' )$( *#) +%! ,$+ -"*, .f  l-a850ec-67/. 0/ 10 N1 251! 371! 41! 50  65! 75! 867 948 :39 ;5! <4; =2:< >g  make-irritants-condition?g  m-a850ec-6a@? Ag  m-a850ec-6bBA CB Df  l-a850ec-72ED FDCE Gf  l-a850ec-6dHG ICH J@FIN1 K5J! L7J! MJ! NFI ON! PN! QOP RMQ SLR T>N! UMT VKSU Wf  l-a850ec-75XW YCX Z@YIN1 [5Z! \7Z! ]Z! ^YI _^! `^! a_` b]a c\b d>^! e]d f[ce gU h i jg  
expressionk&j lg  m-a850ec-78ml nm of  l-a850ec-7dpf  l-a850ec-7eqop rknq sm tf  l-a850ec-7aut vsu wrv xw! yw! zpw! {w! |{ }w! ~g  format~w! w! f  assertion failed: ~sw! w! C 5 h%     ]4	
5 4 >  "  G   495 4<?B h   ?   ] 45 L  67       g  filenamef  rnrs/base.scm
	
 		
   C O >  "  G   4E5 4<?B        h   ?   ] 45 L  67       g  filenamef  rnrs/base.scm
	
 		
   C O >  "  G   4<HBR       h   ?   ] 45 6   7       g  filenamef  rnrs/base.scm
	
 		
   C>  "  G  4<UB       h   ?   ] 45 6   7       g  filenamef  rnrs/base.scm
	
 		
   C>  "  G  4<B       h   ?   ] 45 6   7       g  filenamef  rnrs/base.scm
	
 		
   C>  "  G  wvJ J  h    Q   ]L $  CL L@       I       g  x
		  g  filenamef  rnrs/base.scm		s	 		   C]v       h   )   ] L 6      !       g  s
		
  		
   C    hP    )   D3 45"  -$  C4 45>  "  G  "
")   {3 4545$  "  4>  "  G  "  6$  C4 4545>  "  G  "
"- 1 3 45454O >  "  G  "  =$  C4	 454
O 5>  "  G  "
"         g  proc
			J g  string			J g  end			J g  i			C g  proc
	S  g  string1	S  g  string2		S  g  end1		a  g  end2		a  g  i	   g  proc
 M g  string M g  strings	 M g  end	 M g  ends	 M g  i		F  g  filenamef  rnrs/base.scm	y	e	 			J	 	S 	  M	
	  g  nameg  string-for-each CR      hh    )   3 "  |$  Y$  6&   64 5"4 5"(  6 6"r)  3 	"  $  $  $  [&   6&   64 5"4 5"h$  "   6(  )(  6$  "   6 6"- 1 3 45"  C(  "  A45$  	"4 >  "  G  "  ""  6(  64	
54 4	5?""           g  f
		  g  l		  g  hare		  g  tortoise		  g  move?		  g  out		  g  f
  g  l1  g  l2	  g  h1	  g  h2	  g  t1	  g  t2	  g  move?	  g  out	  g  f
c g  l1c g  rest	c g  len	 g  rest	 g  l1	T g  rest	T g  out	T  g  filenamef  rnrs/base.scm	( 	/	* 	5	 	+  	1  	'  	-  	'  	-F 	'O 	U 	u 	%~ 	 	 	% 	 	- 	3 		 	  	 c	
	  g  nameg  map CR        h(   a   )   	3  6]4 545C       Y       g  n
			 g  n
		! g  base		!  			 		!	  g  nameg  log CR      h`      -  1  3 "  %(  C$  "C (  C 45$   "C              g  bools
			Y g  lst		2 g  last			2 g  bool			2 g  bool	=	Y  g  filenamef  rnrs/base.scm
  			Y


  g  nameg  	boolean=? CNR  hX      -  1  3 "  $(  C&  "C (  C $   "C           g  syms
			T g  lst		1 g  last			1 g  sym			1 g  sym	<	T  g  filenamef  rnrs/base.scm
  			T


  g  nameg  symbol=? CMR        h    i   ]4 5$  
4 5
CC       a       g  x
		  g  filenamef  rnrs/base.scm
  		  g  nameg  real-valued? CQRQ  h    m   ]4 5$  4 56C      e       g  x
		  g  filenamef  rnrs/base.scm
  		  g  nameg  rational-valued? CPRP      h    l   ]4 5$   44 55CC d       g  x
		  g  filenamef  rnrs/base.scm
  		  g  nameg  integer-valued? CORe       h      - 1 3  45@z       g  proc
			 g  vecs			  g  filenamef  rnrs/base.scm
  			
  g  nameg  vector-for-each CKRde h    }   - 1 3 4 45?6   u       g  proc
			 g  vecs			  g  filenamef  rnrs/base.scm
  			
  g  nameg  
vector-map CLR4	
%34689    h(   l   ]      C d       g  dummy
		' g  binding		' g  module			' g  original			'  		'	   C<=   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  		"  g  
macro-typeg  syntax-rulesg  patternsg  bindingg  @g  moduleg  original    C5
R4	@      h   R   ] 6J       g  id
		  g  filenamef  rnrs/base.scm	  		   C\       h   *   ]C   "       g  id
		  		   C_o h   )   ] C!       g  x
		  		   C<=      h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  rnrs/base.scm
  		:  g  
macro-typeg  identifier-syntax C5R4	p@    h   R   ] 6J       g  id
		  g  filenamef  rnrs/base.scm	  		   C       h   *   ]C   "       g  id
		  		   C_ h   )   ] C!       g  x
		  		   C<=      h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  rnrs/base.scm
  		:  g  
macro-typeg  identifier-syntax C5pR4	@   h   R   ] 6J       g  id
		  g  filenamef  rnrs/base.scm	  		   C       h   *   ]C   "       g  id
		  		   C_ h   )   ] C!       g  x
		  		   C<=      h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  rnrs/base.scm
  		:  g  
macro-typeg  identifier-syntax C5R4	@   h   R   ] 6J       g  id
		  g  filenamef  rnrs/base.scm	 		   C       h   *   ]C   "       g  id
		  		   C_ h   )   ] C!       g  x
		  		   C<=      h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  rnrs/base.scm
 		:  g  
macro-typeg  identifier-syntax C5R4	@   h   R   ] 6J       g  id
		  g  filenamef  rnrs/base.scm	 		   C       h   *   ]C   "       g  id
		  		   C_ h   )   ] C!       g  x
		  		   C<=      h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  rnrs/base.scm
 		:  g  
macro-typeg  identifier-syntax C5R4	@   h   R   ] 6J       g  id
		  g  filenamef  rnrs/base.scm	 		   C-       h   *   ]C   "       g  id
		  		   C_= h   )   ] C!       g  x
		  		   C<=      h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  rnrs/base.scm
 		:  g  
macro-typeg  identifier-syntax C5R4	>@   h   R   ] 6J       g  id
		  g  filenamef  rnrs/base.scm	 		   CV       h   *   ]C   "       g  id
		  		   C_f h   )   ] C!       g  x
		  		   C<=      h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  rnrs/base.scm
 		:  g  
macro-typeg  identifier-syntax C5>R57ghp>  h      - 1 3 4455444554444555   $  4445	5 5 "  4445
55444555 5?6          g  who
		  g  message		  g  	irritants			   g  filenamef  rnrs/base.scm
 		 	
	  g  nameg  error CR57ghp>   h      - 1 3 4455444554444555   $  4445	5 5 "  4445
55444555 5?6          g  who
		  g  message		  g  	irritants			   g  filenamef  rnrs/base.scm
 		 	
	  g  nameg  assertion-violation CJR4	Iixyz|} 
h0   E   ]	      C     =       g  dummy
		+ g  
expression		+  		+	   C<=  h(   x   ]	4 5$  @ 6      p       g  x
		" g  tmp		"  		"  g  
macro-typeg  syntax-rulesg  patternsg  
expression   C5IRC        g  m
		+ g  iface
	2  g  iface
 4  g  filenamef  rnrs/base.scm		
	X	}   d   e  "$8 	%
   C6     ccache/rnrs/arithmetic/bitwise.go                                                                   0000644                 00000010377 15154557173 0013111 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] c 4   h      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  
arithmetic	g  bitwise		 	
g  filenameS	f  rnrs/arithmetic/bitwise.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  base	 	g  call-with-deferred-observers	 	 	g  module-use-interfaces!	 	 	g  current-module	 	 	 g  control	!  	"g  rename	#g  only	$g  srfi	%g  srfi-60	&$% 	'g  
bitwise-if	(g  integer-length	)g  first-set-bit	*g  copy-bit	+g  	bit-field	,g  copy-bit-field	-g  rotate-bit-field	.g  reverse-bit-field	/#&'()*+,-. 
	0g  bitwise-length	1(0 	2g  bitwise-first-bit-set	3)2 	4g  bitwise-bit-field	5+4 	6g  bitwise-reverse-bit-field	7.6 	8"/1357 	9g  lognot	:g  logand	;g  logior	<g  logxor	=g  logcount	>g  logbit?	?g  modulo	@g  ash	A#9:;<=>?@ 
	Bg  bitwise-not	C9B 	Dg  bitwise-and	E:D 	Fg  bitwise-ior	G;F 	Hg  bitwise-xor	I<H 	Jg  bitwise-arithmetic-shift	K@J 	L"ACEGIK 	Mg  module-export!	NM 	OM 	Pg  bitwise-rotate-bit-field	Qg  bitwise-arithmetic-shift-right	Rg  bitwise-arithmetic-shift-left	Sg  bitwise-copy-bit-field	Tg  bitwise-copy-bit	Ug  bitwise-bit-set?	Vg  bitwise-bit-count	WPQRSTUV 	Xg  module-re-export!	YX 	ZX 	[6J420'HFDB 
	\g  module-replace!	]\ 	^\ 	_9 	`9 	a@ 	b@ C 5   h     ]4	
5 4 >  "  G   45 4 h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/bitwise.scm
	
 		
   C O >  "  G   4!5 4  h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/bitwise.scm
	
 		
   C O >  "  G   485 4  h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/bitwise.scm
	
 		
   C O >  "  G   4L5 4  h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/bitwise.scm
	
 		
   C O >  "  G   4OW h   M   ] 45 6   E       g  filenamef  rnrs/arithmetic/bitwise.scm
	
 		
   C>  "  G  4Z[ h   M   ] 45 6   E       g  filenamef  rnrs/arithmetic/bitwise.scm
	
 		
   C>  "  G  4^   h   M   ] 45 6    E       g  filenamef  rnrs/arithmetic/bitwise.scm
	
 		
   C>  "  G  `=      h    }   ] 
$  4 56 6     u       g  ei
		  g  filenamef  rnrs/arithmetic/bitwise.scm
	E	 		  g  nameg  bitwise-bit-count CVR>  h      ] 6             g  ei1
		
 g  ei2		
  g  filenamef  rnrs/arithmetic/bitwise.scm
	J	 		
	  g  nameg  bitwise-bit-set? CUR*>       h      ] 4
56             g  ei1
		 g  ei2		 g  ei3			  g  filenamef  rnrs/arithmetic/bitwise.scm
	L	 			  g  nameg  bitwise-copy-bit CTR,        h      ] 6         g  ei1
		 g  ei2		 g  ei3			 g  ei4			  g  filenamef  rnrs/arithmetic/bitwise.scm
	S	 			  g  nameg  bitwise-copy-bit-field CSR- h      ] 6         g  ei1
		 g  ei2		 g  ei3			 g  ei4			  g  filenamef  rnrs/arithmetic/bitwise.scm
	V	 			  g  nameg  bitwise-rotate-bit-field CPRbRR      h      ] 
C             g  ei1
		
 g  ei2		
  g  filenamef  rnrs/arithmetic/bitwise.scm
	Z	 		
	  g  nameg  bitwise-arithmetic-shift-right CQRC              g  m
		+ g  iface
	2  g  iface
 J g  iface
Q g  iface
j  g  filenamef  rnrs/arithmetic/bitwise.scm		
	E	Q	J	"	L		S		V		Y		Z	 		
   C6                                                                                                                                                                                                                                                                  ccache/rnrs/arithmetic/flonums.go                                                                   0000644                 00000035461 15154557173 0013127 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0;      ]  4       h      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  
arithmetic	g  flonums		 	
g  filenameS	f  rnrs/arithmetic/flonums.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  ice-9	g  optargs	 	g  call-with-deferred-observers	 	 	g  module-use-interfaces!	 	 	g  current-module	 	  	!g  only	"g  inf?	#!" 	$g  fixnums	%$ 	&g  base	'& 	(g  control	)( 	*g  
conditions	+* 	,g  
exceptions	-, 	.g  lists	/. 	0g  r5rs	10 	2g  module-export!	32 	42 	5g  fixnum->flonum	6g  no-nans-violation?	7g  make-no-nans-violation	8g  &no-nans	9g  no-infinities-violation?	:g  make-no-infinities-violation	;g  &no-infinities	<g  flexpt	=g  flsqrt	>g  flatan	?g  flasin	@g  flacos	Ag  fltan	Bg  flcos	Cg  flsin	Dg  fllog	Eg  flexp	Fg  flround	Gg  
fltruncate	Hg  	flceiling	Ig  flfloor	Jg  fldenominator	Kg  flnumerator	Lg  flmod0	Mg  fldiv0	Ng  fldiv0-and-mod0	Og  flmod	Pg  fldiv	Qg  fldiv-and-mod	Rg  flabs	Sg  fl/	Tg  fl-	Ug  fl*	Vg  fl+	Wg  flmin	Xg  flmax	Yg  flnan?	Zg  flinfinite?	[g  	flfinite?	\g  fleven?	]g  flodd?	^g  flnegative?	_g  flpositive?	`g  flzero?	ag  
flinteger?	bg  fl>=?	cg  fl>?	dg  fl<=?	eg  fl<?	fg  fl=?	gg  real->flonum	hg  flonum?	i56789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefgh 4	jg  module-re-export!	kj 	lj 	mg  module-replace!	nm 	om 	pg  real?	qg  inexact?	rg  for-all	sg  raise	tg  make-assertion-violation	ug  assert-flonum	vg  integer?	wg  assert-iflonum	xg  	imag-part	yg  	real-part	ze  +nan.0	{g  ensure-flonum	|g  exact->inexact	}g  apply	~g  =	g  < g  <= g  > g  >= g  odd? g  even? g  nan? g  max g  min e  0.0 g  + e  1.0 g  * g  - g  / g  abs g  div-and-mod g  div g  mod g  div0-and-mod0 g  div0 g  mod0 g  	numerator g  denominator g  floor g  ceiling g  truncate g  round g  exp g  log g  sin g  cos g  tan g  asin g  acos g  atan g  sqrt g  expt *  g  make-record-type-descriptor     g  &implementation-restriction g  list->vector     g  record-constructor     g  "make-record-constructor-descriptor     g  condition-predicate     g  fixnum?C 5   h+    ]4	
5 4 >  "  G   45 4  h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/flonums.scm
	
 		
   C O >  "  G   4#5 4   h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/flonums.scm
	
 		
   C O >  "  G   4%5 4   h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/flonums.scm
	
 		
   C O >  "  G   4'5 4   h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/flonums.scm
	
 		
   C O >  "  G   4)5 4   h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/flonums.scm
	
 		
   C O >  "  G   4+5 4   h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/flonums.scm
	
 		
   C O >  "  G   4-5 4   h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/flonums.scm
	
 		
   C O >  "  G   4/5 4   h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/flonums.scm
	
 		
   C O >  "  G   415 4   h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/flonums.scm
	
 		
   C O >  "  G   44 i h   M   ] 45 6   E       g  filenamef  rnrs/arithmetic/flonums.scm
	
 		
   C>  "  G  4l    h   M   ] 45 6    E       g  filenamef  rnrs/arithmetic/flonums.scm
	
 		
   C>  "  G  4o    h   M   ] 45 6    E       g  filenamef  rnrs/arithmetic/flonums.scm
	
 		
   C>  "  G  pq      h   t   ]4 5$   6C   l       g  obj
		  g  filenamef  rnrs/arithmetic/flonums.scm
	E	 		  g  nameg  flonum? ChRrhst     h(      -  1  3 4 5$  C45 6         g  args
			& g  t		&  g  filenamef  rnrs/arithmetic/flonums.scm
	F	 			&


  g  nameg  assert-flonum CuRrhv       h   )   ]4 5$   6C   !       g  i
		  		   Cst        h(      -  1  3 4 5$  C45 6         g  args
			& g  t		&  g  filenamef  rnrs/arithmetic/flonums.scm
	H	 			&


  g  nameg  assert-iflonum CwRpxyz     h(      ]4 5$   C4 5
$   6C  x       g  z
		&  g  filenamef  rnrs/arithmetic/flonums.scm
	L		%	O	 		&  g  nameg  ensure-flonum C{Rpst| h8      ]	4 5$  "  445 >  "  G   6     }       g  x
		3 g  t			-  g  filenamef  rnrs/arithmetic/flonums.scm
	Q	 		3  g  nameg  real->flonum CgR}u~      h(   t   -  1  3 4 >  "  G   @     l       g  args
			#  g  filenamef  rnrs/arithmetic/flonums.scm
	U	 			#


  g  nameg  fl=? CfR}u       h(   t   -  1  3 4 >  "  G   @     l       g  args
			#  g  filenamef  rnrs/arithmetic/flonums.scm
	V	 			#


  g  nameg  fl<? CeR}u       h(   u   -  1  3 4 >  "  G   @     m       g  args
			#  g  filenamef  rnrs/arithmetic/flonums.scm
	W	 			#


  g  nameg  fl<=? CdR}u      h(   t   -  1  3 4 >  "  G   @     l       g  args
			#  g  filenamef  rnrs/arithmetic/flonums.scm
	X	 			#


  g  nameg  fl>? CcR}u       h(   u   -  1  3 4 >  "  G   @     m       g  args
			#  g  filenamef  rnrs/arithmetic/flonums.scm
	Y	 			#


  g  nameg  fl>=? CbRuv        h    v   ]4 >  "  G   6      n       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
	[	 		  g  nameg  
flinteger? CaRu h    s   ]4 >  "  G   
C       k       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
	\	 		  g  nameg  flzero? C`Ru    h    w   ]4 >  "  G   
C       o       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
	]	 		  g  nameg  flpositive? C_Ru        h    w   ]4 >  "  G   
C       o       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
	^	 		  g  nameg  flnegative? C^Rw      h    s   ]4 >  "  G   6      k       g  ifl
		  g  filenamef  rnrs/arithmetic/flonums.scm
	_	 		  g  nameg  flodd? C]Rw  h    t   ]4 >  "  G   6      l       g  ifl
		  g  filenamef  rnrs/arithmetic/flonums.scm
	`	 		  g  nameg  fleven? C\Ru"       h8      ]	4 >  "  G  4 5$  "  4 5C   {       g  fl
		5 g  t		3  g  filenamef  rnrs/arithmetic/flonums.scm
	a	 		5  g  nameg  	flfinite? C[Ru"  h    w   ]4 >  "  G   6      o       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
	b	 		  g  nameg  flinfinite? CZRu      h    r   ]4 >  "  G   6      j       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
	c	 		  g  nameg  flnan? CYR}u h0      - 1 3  4>  "  G  @             g  fl1
			* g  args			* g  flargs			*  g  filenamef  rnrs/arithmetic/flonums.scm
	e	 			*
  g  nameg  flmax CXR}u  h0      - 1 3  4>  "  G  @             g  fl1
			* g  args			* g  flargs			*  g  filenamef  rnrs/arithmetic/flonums.scm
	j	 			*
  g  nameg  flmin CWR}u        h0   {   -  1  3 4 >  "  G   (  C @    s       g  args
			,  g  filenamef  rnrs/arithmetic/flonums.scm
	o		%	q	 			,


  g  nameg  fl+ CVR}u      h0   {   -  1  3 4 >  "  G   (  C @    s       g  args
			,  g  filenamef  rnrs/arithmetic/flonums.scm
	s		%	u	 			,


  g  nameg  fl* CUR}u        h0      - 1 3  4>  "  G  @             g  fl1
			* g  args			* g  flargs			*  g  filenamef  rnrs/arithmetic/flonums.scm
	w	 			*
  g  nameg  fl- CTR}u    h0      - 1 3  4>  "  G  @             g  fl1
			* g  args			* g  flargs			*  g  filenamef  rnrs/arithmetic/flonums.scm
	|	 			*
  g  nameg  fl/ CSRu      h    r   ]4 >  "  G   6      j       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 		  g  nameg  flabs CRRw   h       ]4 >  "  G   6         g  fl1
		 g  fl2		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 			  g  nameg  fldiv-and-mod CQRw h       ]4 >  "  G   6  |       g  fl1
		 g  fl2		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 			  g  nameg  fldiv CPRw h       ]4 >  "  G   6  |       g  fl1
		 g  fl2		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 			  g  nameg  flmod CORw h       ]4 >  "  G   6         g  fl1
		 g  fl2		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 			  g  nameg  fldiv0-and-mod0 CNRw       h       ]4 >  "  G   6  }       g  fl1
		 g  fl2		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 			  g  nameg  fldiv0 CMRw        h       ]4 >  "  G   6  }       g  fl1
		 g  fl2		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 			  g  nameg  flmod0 CLRu        h    x   ]4 >  "  G   6      p       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 		  g  nameg  flnumerator CKRu     h    z   ]4 >  "  G   6      r       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 		  g  nameg  fldenominator CJRu   h    t   ]4 >  "  G   6      l       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 		  g  nameg  flfloor CIRu h    v   ]4 >  "  G   6      n       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 		  g  nameg  	flceiling CHRu       h    w   ]4 >  "  G   6      o       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 		  g  nameg  
fltruncate CGRu      h    t   ]4 >  "  G   6      l       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 		  g  nameg  flround CFRu h    r   ]4 >  "  G   6      j       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 		  g  nameg  flexp CERu{       hX      )   #3 4 >  "  G  4 56]4 >  "  G  4 5456       g  fl
			) g  fl
	+	X g  fl2	+	X  g  filenamef  rnrs/arithmetic/flonums.scm	$ 	!	H 	$	R 	% 			) 	+	X	  g  nameg  fllog CDRu        h    r   ]4 >  "  G   6      j       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 		  g  nameg  flsin CCRu   h    r   ]4 >  "  G   6      j       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 		  g  nameg  flcos CBRu   h    r   ]4 >  "  G   6      j       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 		  g  nameg  fltan CARu{ h    s   ]4 >  "  G  4 56 k       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 		  g  nameg  flasin C?Ru{        h    s   ]4 >  "  G  4 56 k       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 		  g  nameg  flacos C@Ru  h@   e   )   3 4 >  "  G   6]4 >  "  G   6 ]       g  fl
			! g  fl
	#	? g  fl2	#	?  			! 	#	?	  g  nameg  flatan C>Ru{      h    s   ]4 >  "  G  4 56 k       g  fl
		  g  filenamef  rnrs/arithmetic/flonums.scm
 	 		  g  nameg  flsqrt C=Ru{        h(      ]4 >  "  G  4 56     }       g  fl1
		# g  fl2		#  g  filenamef  rnrs/arithmetic/flonums.scm
 	 		#	  g  nameg  flexpt C<R4;i455;R44;i55:R4;i59R48i4558R448i557R48i56Rst|        h8      ]	4 5$  "  445 >  "  G   6            g  fx
		3 g  t			-  g  filenamef  rnrs/arithmetic/flonums.scm
 	 		3  g  nameg  fixnum->flonum C5RC        g  m
		+ g  iface
	2  g  iface
 J g  iface
Q g  iface
j g  iface
q g  iface
 g  iface
 g  iface
! g  iface
:  
g  filenamef  rnrs/arithmetic/flonums.scm		
_	E	.	F		W	H	
	L	
	Q		U	_	V		W		X		Y	9	[		\		]	:	^		_		`	f	a		b		c		e	|	j	F	o		s		w		|	} 	? 	 	 	q 	0 	 	 	 U 	  	! 	"Z 	# 	# 	$ 	%} 	&% 	& 	'v 	(& 	( 	) 	*X 	*Y 	* 	+ 	 5	+
   C6                                                                                                                                                                                                                ccache/rnrs/arithmetic/fixnums.go                                                                   0000644                 00000046460 15154557173 0013136 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0M      ]< 4  h      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  
arithmetic	g  fixnums		 	
g  filenameS	f  rnrs/arithmetic/fixnums.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  only	g  ash	g  cons*	g  define-inlinable	g  inexact->exact	g  logand	g  logbit?	g  logcount	g  logior	g  lognot	g  logxor	 g  most-positive-fixnum	!g  most-negative-fixnum	"g  object-address	# !" 	$g  call-with-deferred-observers	%$ 	&$ 	'g  module-use-interfaces!	(' 	)' 	*g  current-module	+* 	,* 	-g  ice-9	.g  optargs	/-. 	0g  base	10 	2g  control	32 	4g  bitwise	54 	6g  
conditions	76 	8g  
exceptions	98 	:g  lists	;: 	<g  module-export!	=< 	>< 	?g  fxreverse-bit-field	@g  fxrotate-bit-field	Ag  fxarithmetic-shift-right	Bg  fxarithmetic-shift-left	Cg  fxarithmetic-shift	Dg  fxcopy-bit-field	Eg  fxbit-field	Fg  
fxcopy-bit	Gg  
fxbit-set?	Hg  fxfirst-bit-set	Ig  fxlength	Jg  fxbit-count	Kg  fxif	Lg  fxxor	Mg  fxior	Ng  fxand	Og  fxnot	Pg  	fx*/carry	Qg  	fx-/carry	Rg  	fx+/carry	Sg  fxmod0	Tg  fxdiv0	Ug  fxdiv0-and-mod0	Vg  fxmod	Wg  fxdiv	Xg  fxdiv-and-mod	Yg  fx-	Zg  fx*	[g  fx+	\g  fxmin	]g  fxmax	^g  fxeven?	_g  fxodd?	`g  fxnegative?	ag  fxpositive?	bg  fxzero?	cg  fx<=?	dg  fx>=?	eg  fx<?	fg  fx>?	gg  fx=?	hg  greatest-fixnum	ig  least-fixnum	jg  fixnum-width	kg  fixnum?	l?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijk -	mg  module-re-export!	nm 	om 	pg  module-replace!	qp 	rp 	sg  % inline-fixnum?-procedure	tg  make-syntax-transformer	ut 	vt 	wg  inline-fixnum?	xg  macro	yg  $sc-dispatch	zy 	{y 	|g  _	}g  any	~|} 	g  syntax-object g  syntax-parameterize g  m-2e3f1f84bf0f11-1c g  top   g  ribcage g  t-2e3f1f84bf0f11-1b     f  l-2e3f1f84bf0f11-21       g  x   f  l-2e3f1f84bf0f11-1e     g  shift g  	proc-name g  args       f  l-bde397a-1eaf f  l-bde397a-1eb0     g  name g  formals g  body     f  l-bde397a-1ea6 f  l-bde397a-1ea7 f  l-bde397a-1ea8     g  make-procedure-name g  prefix     f  l-bde397a-1e9a f  l-bde397a-1e98       f  l-bde397a-1e97       g  hygiene       g  private   w  g  identifier-syntax   s        g  lambda   g  obj     g  not   g  =   
    	  "              g  each-any |Ҍ g  syntax-violation     f  Wrong number of arguments f  -source expression failed to match any pattern g  identifier?       s  g  assert-fixnum }Ҍ g  or g  dummy g  arg   g  m-2e3f1f84bf0f11-27     f  l-2e3f1f84bf0f11-2c f  l-2e3f1f84bf0f11-2d       f  l-2e3f1f84bf0f11-29         g  and   g  map     w  g  raise   g  make-assertion-violation         g  for-all g  assert-fixnums g  define-fxop*}}} g  defineg  op g  m-2e3f1f84bf0f11-31  f  l-2e3f1f84bf0f11-36	f  l-2e3f1f84bf0f11-37
f  l-2e3f1f84bf0f11-38	
   f  l-2e3f1f84bf0f11-33    g  case-lambda  g  y       g  apply   !g  >"g  <#g  >=$g  <=%g  zero?&g  	positive?'g  	negative?(g  odd?)g  even?*g  max+g  min,g  )make-implementation-restriction-violation-g  div.g  mod/g  div-and-mod0g  div01g  mod02g  div0-and-mod03g  expt4g  
bitwise-if5g  bitwise-length6g  bitwise-first-bit-set7g  bitwise-copy-bit8g  bitwise-bit-field9g  bitwise-copy-bit-field:g  bitwise-rotate-bit-field;g  bitwise-reverse-bit-fieldC 5  h3    ]4	
5 4 >  "  G   4#5 4&), h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/fixnums.scm
	
 		
   C O >  "  G   4/5 4&),  h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/fixnums.scm
	
 		
   C O >  "  G   415 4&),  h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/fixnums.scm
	
 		
   C O >  "  G   435 4&),  h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/fixnums.scm
	
 		
   C O >  "  G   455 4&),  h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/fixnums.scm
	
 		
   C O >  "  G   475 4&),  h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/fixnums.scm
	
 		
   C O >  "  G   495 4&),  h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/fixnums.scm
	
 		
   C O >  "  G   4;5 4&),  h   M   ] 45 L  6E       g  filenamef  rnrs/arithmetic/fixnums.scm
	
 		
   C O >  "  G   4&>,l h   M   ] 45 6   E       g  filenamef  rnrs/arithmetic/fixnums.scm
	
 		
   C>  "  G  4&o,   h   M   ] 45 6    E       g  filenamef  rnrs/arithmetic/fixnums.scm
	
 		
   C>  "  G  4&r,   h   M   ] 45 6    E       g  filenamef  rnrs/arithmetic/fixnums.scm
	
 		
   C>  "  G  "  " i$   "   	 "
 "   h      ] L C          		
   C O  jR       h   j   ] C   b       g  filenamef  rnrs/arithmetic/fixnums.scm
	h	 		
  g  nameg  greatest-fixnum ChR!     h   g   ] C   _       g  filenamef  rnrs/arithmetic/fixnums.scm
	i	 		
  g  nameg  least-fixnum CiR"        h   t   ]
	4 5Cl       g  obj
		  g  filenamef  rnrs/arithmetic/fixnums.scm
	k	 		  g  nameg  fixnum? CkR"   h      ]
	4 5C       g  obj
		  g  filenamef  rnrs/arithmetic/fixnums.scm
	n	 		  g  nameg  % inline-fixnum?-procedure CsR4vwx{~    h   ;   ]  C      3       g  t-2e3f1f84bf0f11-1b
		
  		
   Cw h   _   ]L 6    W       g  a
		  g  filenamef  rnrs/arithmetic/fixnums.scm		n	 		   C|     h   O   ] L 6G       g  filenamef  rnrs/arithmetic/fixnums.scm		n	 		
   C   h      ] C          		
   C    hx      ]4 5$  @4 5$   O @4 5"  	 6$  4	 O ?$  
@""              g  x
		q g  tmp		q g  tmp		"	q g  tmp		>	q  g  filenamef  rnrs/arithmetic/fixnums.scm
	n	 		q   C5wR4vx{  h   =   ]  C      5       g  tmp-2e3f1f84bf0f11-30
		
  		
   C      h   >   ]45C   6       g  dummy
		 g  arg		  			   C   h(   x   ]	4 5$  @ 6      p       g  x
		" g  tmp		"  		"  g  
macro-typeg  syntax-rulesg  patternsg  argg  ...   C5Rs       h       ]	4 5$  C45 6        g  args
		 g  t		  g  filenamef  rnrs/arithmetic/fixnums.scm
	w	 		  g  nameg  assert-fixnums CR4v x{  	h0   O   ]    C      G       g  dummy
		* g  name		* g  op			*  		*	   C  h(   x   ]	4 5$  @ 6      p       g  x
		" g  tmp		"  		"  g  
macro-typeg  syntax-rulesg  patternsg  nameg  op   C5 RigR!ifR"ieR#idR$icR%ibR&iaR'i`R(i_R)i^R"*    hx      )   Q3 
	4 5$  "  
	45$  "  445 >  "  G   6-  1  3 4 >  "  G   @       g  x
			W g  y			W g  t		+	O g  args
	`	x  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 			W	 	`	x


  g  nameg  fxmax C]R"+    hx      )   Q3 
	4 5$  "  
	45$  "  445 >  "  G   6-  1  3 4 >  "  G   @       g  x
			W g  y			W g  t		+	O g  args
	`	x  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 			W	 	`	x


  g  nameg  fxmin C\R",      h      ]
	4 5$  "  
	45$  "  445 >  "  G   
	45$  "  445 >  "  G  C            g  fx1
	  g  fx2	  g  t		$	H g  r		M  g  t		\   g  filenamef  rnrs/arithmetic/fixnums.scm
 	 	 	  g  nameg  fx+ C[R",    h      ]
	4 5$  "  
	45$  "  445 >  "  G   
	45$  "  445 >  "  G  C            g  fx1
	  g  fx2	  g  t		$	H g  r		M  g  t		\   g  filenamef  rnrs/arithmetic/fixnums.scm
 	 	 	  g  nameg  fx* CZR"       h      - . , 3 #  
	4 5$  "  445 >  "  G  $  l
	45$  "  445 >  "  G   
	45$  "  445 >  "  G  C
 
	45$  "  445 >  "  G  C             g  fx1
	  g  fx2	  g  t		"	F g  t		Y	} g  r	   g  t	   g  r	   g  t	    g  filenamef  rnrs/arithmetic/fixnums.scm
 	 	   g  nameg  fx- CYR"- hP      ]

	4 5$  "  
	45$  "  445 >  "  G   6       g  fx1
		P g  fx2		P g  t		$	H  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 		P	  g  nameg  fxdiv CWR".     hP      ]

	4 5$  "  
	45$  "  445 >  "  G   6       g  fx1
		P g  fx2		P g  t		$	H  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 		P	  g  nameg  fxmod CVR"/     hP      ]

	4 5$  "  
	45$  "  445 >  "  G   6       g  fx1
		P g  fx2		P g  t		$	H  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 		P	  g  nameg  fxdiv-and-mod CXR"0     hP      ]

	4 5$  "  
	45$  "  445 >  "  G   6       g  fx1
		P g  fx2		P g  t		$	H  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 		P	  g  nameg  fxdiv0 CTR"1    hP      ]

	4 5$  "  
	45$  "  445 >  "  G   6       g  fx1
		P g  fx2		P g  t		$	H  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 		P	  g  nameg  fxmod0 CSR"2    hP      ]

	4 5$  "  
	45$  "  445 >  "  G   6       g  fx1
		P g  fx2		P g  t		$	H  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 		P	  g  nameg  fxdiv0-and-mod0 CUR"13j0   h      ]
	4 5$  "  "
	45$  "  
	45$  "  445 >  "  G   44	45 5544	45 55D        g  fx1
	  g  fx2	  g  fx3		  g  t		9	] g  s		e  g  s0		z  g  s1	    g  filenamef  rnrs/arithmetic/fixnums.scm
 	 	 	  g  nameg  	fx+/carry CRR"13j0 h      ]
	4 5$  "  "
	45$  "  
	45$  "  445 >  "  G   44	45 5544	45 55D        g  fx1
	  g  fx2	  g  fx3		  g  t		9	] g  d		e  g  d0		z  g  d1	    g  filenamef  rnrs/arithmetic/fixnums.scm
 	 	 	  g  nameg  	fx-/carry CQR"13j0 h      ]
	4 5$  "  "
	45$  "  
	45$  "  445 >  "  G   44	45 5544	45 55D        g  fx1
	  g  fx2	  g  fx3		  g  t		9	] g  s		e  g  s0		z  g  s1	    g  filenamef  rnrs/arithmetic/fixnums.scm
 	 	 	  g  nameg  	fx*/carry CPR"  h@      ]	
	4 5$  "  445 >  "  G   6       x       g  fx
		9 g  t		3  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 		9  g  nameg  fxnot COR"       hx      )   O3 
	4 5$  "  
	45$  "  445 >  "  G   C-  1  3 4 >  "  G   @         g  x
			U g  y			U g  t		+	O g  args
	^	v  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 			U	 	^	v


  g  nameg  fxand CNR"     hx      )   O3 
	4 5$  "  
	45$  "  445 >  "  G   C-  1  3 4 >  "  G   @         g  x
			U g  y			U g  t		+	O g  args
	^	v  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 			U	 	^	v


  g  nameg  fxior CMR"     hx      )   O3 
	4 5$  "  
	45$  "  445 >  "  G   C-  1  3 4 >  "  G   @         g  x
			U g  y			U g  t		+	O g  args
	^	v  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 			U	 	^	v


  g  nameg  fxxor CLR"4      hh      ]
	4 5$  "  "
	45$  "  
	45$  "  445 >  "  G   6        g  fx1
		g g  fx2		g g  fx3			g g  t		9	]  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 		g	  g  nameg  fxif CKR"    hP      ]	
	4 5$  "  445 >  "  G   
$  4 56 6    ~       g  fx
		L g  t		3  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 		L  g  nameg  fxbit-count CJR"5  h@      ]	
	4 5$  "  445 >  "  G   6       {       g  fx
		9 g  t		3  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 		9  g  nameg  fxlength CIR"6     h@      ]	
	4 5$  "  445 >  "  G   6              g  fx
		9 g  t		3  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 		9  g  nameg  fxfirst-bit-set CHR"       hP      ]

	4 5$  "  
	45$  "  445 >  "  G   6       g  fx1
		P g  fx2		P g  t		$	H  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 		P	  g  nameg  
fxbit-set? CGR"7        hh      ]
	4 5$  "  "
	45$  "  
	45$  "  445 >  "  G   6        g  fx1
		g g  fx2		g g  fx3			g g  t		9	]  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 		g	  g  nameg  
fxcopy-bit CFR"8       hh      ]
	4 5$  "  "
	45$  "  
	45$  "  445 >  "  G   6        g  fx1
		g g  fx2		g g  fx3			g g  t		9	]  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 		g	  g  nameg  fxbit-field CER"9      h      ]
	4 5$  "  7
	45$  "  "
	45$  "  
	45$  "  445 >  "  G   6         g  fx1
		~ g  fx2		~ g  fx3			~ g  fx4			~ g  t		N	r  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 		~	  g  nameg  fxcopy-bit-field CDR"   hP      ]

	4 5$  "  
	45$  "  445 >  "  G   C         g  fx1
		N g  fx2		N g  t		$	H  g  filenamef  rnrs/arithmetic/fixnums.scm
 	 		N	  g  nameg  fxarithmetic-shift CCRCiBR"    hP      ]

	4 5$  "  
	45$  "  445 >  "  G   
C       g  fx1
		P g  fx2		P g  t		$	H  g  filenamef  rnrs/arithmetic/fixnums.scm
	 		P	  g  nameg  fxarithmetic-shift-right CAR":  h      ]
	4 5$  "  7
	45$  "  "
	45$  "  
	45$  "  445 >  "  G   6         g  fx1
		~ g  fx2		~ g  fx3			~ g  fx4			~ g  t		N	r  g  filenamef  rnrs/arithmetic/fixnums.scm
	 		~	  g  nameg  fxrotate-bit-field C@R";      hh      ]
	4 5$  "  "
	45$  "  
	45$  "  445 >  "  G   6        g  fx1
		g g  fx2		g g  fx3			g g  t		9	]  g  filenamef  rnrs/arithmetic/fixnums.scm
	 		g	  g  nameg  fxreverse-bit-field C?RC       g  m
		+ g  iface
	2  g  iface
 J g  iface
Q g  iface
j g  iface
q g  iface
 g  iface
 g  iface
! g  i
.P g  n.P g  w
Z  g  filenamef  rnrs/arithmetic/fixnums.scm		
	a		h		i	?	k		n		w	] 	e 	m 	u 	} 	 	 	 	 	 	 	% 	 	 	 	 	 	 	 	 	 	z 	  	! 	" 	# 	% 	&E 	'n 	(a 	)> 	*% 	++ 	,\ 	- 	. 	/ 	/ 	1		2e	3	 1	3
   C6                                                                                                                                                                                                                 ccache/rnrs/syntax-case.go                                                                          0000644                 00000006202 15154557173 0011541 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0j      ] H 4      h      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  syntax-case	 		g  filenameS	
f  rnrs/syntax-case.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  only	g  make-variable-transformer	g  syntax	g  identifier?	g  bound-identifier=?	g  free-identifier=?	g  syntax->datum	g  datum->syntax	g  generate-temporaries	g  with-syntax	g  quasisyntax	g  unsyntax	 g  unsyntax-splicing	!  	"g  call-with-deferred-observers	#" 	$" 	%g  module-use-interfaces!	&% 	'% 	(g  current-module	)( 	*( 	+g  ice-9	,g  optargs	-+, 	.g  base	/. 	0g  
conditions	10 	2g  
exceptions	32 	4g  records	5g  
procedural	645 	7g  module-export!	87 	97 	:g  module-re-export!	;: 	<: 	=  	>g  module-replace!	?> 	@> 	Ag  syntax-violation	BA 	Cg  make-message-condition	Dg  make-syntax-violation	Eg  make-who-condition	Fg  raise	Gg  	conditionC 5  h(     ]4	
5 4 >  "  G   4!5 4$'* h   F   ] 45 L  6>       g  filenamef  rnrs/syntax-case.scm
	
 		
   C O >  "  G   4-5 4$'* h   F   ] 45 L  6>       g  filenamef  rnrs/syntax-case.scm
	
 		
   C O >  "  G   4/5 4$'* h   F   ] 45 L  6>       g  filenamef  rnrs/syntax-case.scm
	
 		
   C O >  "  G   415 4$'* h   F   ] 45 L  6>       g  filenamef  rnrs/syntax-case.scm
	
 		
   C O >  "  G   435 4$'* h   F   ] 45 L  6>       g  filenamef  rnrs/syntax-case.scm
	
 		
   C O >  "  G   465 4$'* h   F   ] 45 L  6>       g  filenamef  rnrs/syntax-case.scm
	
 		
   C O >  "  G   4$9*  h   F   ] 45 6    >       g  filenamef  rnrs/syntax-case.scm
	
 		
   C>  "  G  4$<*=        h   F   ] 45 6   >       g  filenamef  rnrs/syntax-case.scm
	
 		
   C>  "  G  4$@*B        h   F   ] 45 6   >       g  filenamef  rnrs/syntax-case.scm
	
 		
   C>  "  G  CDEFG       hP      - . , 3 #  4545  $  4 5"  4?6          g  who
		M g  message		M g  form			M g  subform			M g  
conditions		(	M g  
conditions		@	M  g  filenamef  rnrs/syntax-case.scm
	<	 		M	  g  nameg  syntax-violation CARC       g  m
		+ g  iface
	2  g  iface
 ; g  iface
B g  iface
K g  iface
R g  iface
[  g  filenamef  rnrs/syntax-case.scm		
&	<	 	(
   C6                                                                                                                                                                                                                                                                                                                                                                                               ccache/rnrs/lists.go                                                                                0000644                 00000007405 15154557173 0010446 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] T 4  h      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  lists	 		g  filenameS	
f  rnrs/lists.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  base	 	g  call-with-deferred-observers	 	 	g  module-use-interfaces!	 	 	g  current-module	 	 	g  only	 g  filter	!g  member	"g  memv	#g  memq	$g  assoc	%g  assv	&g  assq	'g  cons*	( !"#$%&' 
	)g  rename	*g  srfi	+g  srfi-1	,*+ 	-g  any	.g  every	/g  remove	0g  find	1g  	partition	2g  
fold-right	3g  
filter-map	4,-./!$0123 	5g  exists	6-5 	7g  for-all	8.7 	9g  remp	:/9 	;g  memp-internal	<!; 	=g  assp-internal	>$= 	?)468:<> 	@g  module-export!	A@ 	B@ 	Cg  assp	Dg  memp	Eg  remq	Fg  remv	Gg  	fold-left	HCDEF/G 	Ig  module-re-export!	JI 	KI 	L'&%$#"!921 570 	Mg  module-replace!	NM 	OM 	Pg  null?	Qg  map	Rg  car	Sg  cdrC 5   h     ]4	
5 4 >  "  G   45 4 h   @   ] 45 L  68       g  filenamef  rnrs/lists.scm
	
 		
   C O >  "  G   4(5 4       h   @   ] 45 L  68       g  filenamef  rnrs/lists.scm
	
 		
   C O >  "  G   4?5 4       h   @   ] 45 L  68       g  filenamef  rnrs/lists.scm
	
 		
   C O >  "  G   4BH      h   @   ] 45 6   8       g  filenamef  rnrs/lists.scm
	
 		
   C>  "  G  4KL      h   @   ] 45 6   8       g  filenamef  rnrs/lists.scm
	
 		
   C>  "  G  4O        h   @   ] 45 6    8       g  filenamef  rnrs/lists.scm
	
 		
   C>  "  G  5PQRS     hP      - 1 3 "  145$  C4 45?45""          g  combine
			M g  nil			M g  list				M g  lists				M g  nil			> g  lists			>  g  filenamef  rnrs/lists.scm
	(	 			M	
	  g  nameg  	fold-left CGR9      h   +   ]L  C#       g  elt
		  		   C  h   x   ] O 6 p       g  obj
		 g  list		  g  filenamef  rnrs/lists.scm
	0	 			  g  nameg  remove C/R9h   +   ]L  C#       g  elt
		  		   C  h   v   ] O 6 n       g  obj
		 g  list		  g  filenamef  rnrs/lists.scm
	1	 			  g  nameg  remv CFR9  h   +   ]L  C#       g  elt
		  		   C  h   v   ] O 6 n       g  obj
		 g  list		  g  filenamef  rnrs/lists.scm
	2	 			  g  nameg  remq CER;  h   8   ]L 60       g  x
		 g  y		  			   C     h   w   ] O 6o       g  pred
		 g  list		  g  filenamef  rnrs/lists.scm
	4	 			  g  nameg  memp CDR= h   8   ]L 60       g  x
		 g  y		  			   C     h   w   ] O 6o       g  pred
		 g  list		  g  filenamef  rnrs/lists.scm
	5	 			  g  nameg  assp CCRC           g  m
		+ g  iface
	2  g  iface
 5 g  iface
<  g  filenamef  rnrs/lists.scm		
]	(	;	0		1		2		4		5	 	
   C6                                                                                                                                                                                                                                                            ccache/rnrs/mutable-strings.go                                                                      0000644                 00000002671 15154557173 0012430 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] + 4   h      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  mutable-strings	 		g  filenameS	
f  rnrs/mutable-strings.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  only	g  string-set!	g  string-fill!	 	g  call-with-deferred-observers	 	 	g  module-use-interfaces!	 	 	g  current-module	 	  	!g  module-export!	"! 	#! 	$g  module-re-export!	%$ 	&$ 	' 	(g  module-replace!	)( 	*( C 5   h0  o   ]4	
5 4 >  "  G   45 4  h   J   ] 45 L  6B       g  filenamef  rnrs/mutable-strings.scm
	
 		
   C O >  "  G   4#       h   J   ] 45 6    B       g  filenamef  rnrs/mutable-strings.scm
	
 		
   C>  "  G  4& '    h   J   ] 45 6   B       g  filenamef  rnrs/mutable-strings.scm
	
 		
   C>  "  G  *        h   J   ] 45 6    B       g  filenamef  rnrs/mutable-strings.scm
	
 		
   C6    g       g  m
		+ g  iface
	2   g  filenamef  rnrs/mutable-strings.scm		
 	,
   C6                                                                        ccache/rnrs/io/ports.go                                                                             0000644                 00000112030 15154557173 0011055 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0       ] 4    h4      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  io	g  ports		 	
g  filenameS	f  rnrs/io/ports.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  ice-9	g  binary-ports	 	g  call-with-deferred-observers	 	 	g  module-use-interfaces!	 	 	g  current-module	 	  	!g  only	"g  base	#" 	$g  assertion-violation	%!#$ 	&g  enums	'& 	(g  records	)g  	syntactic	*() 	+g  
exceptions	,+ 	-g  
conditions	.- 	/g  files	0/ 	1g  srfi	2g  srfi-8	312 	4g  rdelim	54 	6g  except	7g  raise	8g  display	9678 	:g  prefix	;!8 	<g  guile:	=:;< 	>g  module-export!	?> 	@> 	Ag  i/o-encoding-error-char	Bg  make-i/o-encoding-error	Cg  i/o-encoding-error?	Dg  &i/o-encoding-error	Eg  make-i/o-decoding-error	Fg  i/o-decoding-error?	Gg  &i/o-decoding-error	Hg  standard-error-port	Ig  standard-output-port	Jg  standard-input-port	Kg  
put-string	Lg  	put-datum	Mg  put-char	Ng  lookahead-char	Og  get-string-n	Pg  get-string-all	Qg  get-line	Rg  	get-datum	Sg  get-char	Tg  open-file-input/output-port	Ug  flush-output-port	Vg  make-custom-textual-output-port	Wg  call-with-string-output-port	Xg   call-with-bytevector-output-port	Yg  open-file-output-port	Zg  open-string-output-port	[g  open-file-input-port	\g  open-string-input-port	]g  call-with-port	^g  port-has-set-port-position!?	_g  port-has-port-position?	`g  set-port-position!	ag  port-position	bg  transcoded-port	cg  textual-port?	dg  binary-port?	eg  port-transcoder	fg  	port-eof?	gg  utf-16-codec	hg  utf-8-codec	ig  latin-1-codec	jg  native-transcoder	kg  transcoder-error-handling-mode	lg  transcoder-eol-style	mg  transcoder-codec	ng  make-transcoder	og  error-handling-mode	pg  native-eol-style	qg  	eol-style	rg  buffer-mode?	sg  buffer-mode	tg  file-options	uABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrst 4	vg  module-re-export!	wv 	xv 	yg  i/o-error-port	zg  make-i/o-port-error	{g  i/o-port-error?	|g  	&i/o-port	}g  "make-i/o-file-does-not-exist-error	~g  i/o-file-does-not-exist-error?	g  &i/o-file-does-not-exist g  "make-i/o-file-already-exists-error g  i/o-file-already-exists-error? g  &i/o-file-already-exists g   make-i/o-file-is-read-only-error g  i/o-file-is-read-only-error? g  &i/o-file-is-read-only g  make-i/o-file-protection-error g  i/o-file-protection-error? g  &i/o-file-protection g  i/o-error-filename g  make-i/o-filename-error g  i/o-filename-error? g  &i/o-filename g  make-i/o-invalid-position-error g  i/o-invalid-position-error? g  &i/o-invalid-position g  make-i/o-write-error g  i/o-write-error? g  
&i/o-write g  make-i/o-read-error g  i/o-read-error? g  	&i/o-read g  make-i/o-error g  
i/o-error? g  &i/o g  current-error-port g  current-output-port g  current-input-port g  get-string-n! g  put-bytevector g  put-u8 g  make-custom-binary-output-port g  open-bytevector-output-port g  get-bytevector-all g  get-bytevector-some g  get-bytevector-n! g  get-bytevector-n g  lookahead-u8 g  get-u8 g  make-custom-binary-input-port g  open-bytevector-input-port g  
close-port g  output-port? g  input-port? g  port? g  eof-object? g  
eof-object yz{|}~ 6 g  module-replace!     g  make-syntax-transformer     g  file-option g  macro g  $sc-dispatch     g  any   g  syntax->datum '  '  g  	no-create g  no-fail g  no-truncate g  syntax-object g  quote g  m-d35b14d-24 g  top   g  ribcage g  sym       f  l-d35b14d-29 f  l-d35b14d-2a       g  s     f  l-d35b14d-26     g  shift g  dummy g  	type-name g  symbol g  constructor-syntax   g  m-bfa5881-18     f  l-bfa5881-1d f  l-bfa5881-1e f  l-bfa5881-1f f  l-bfa5881-20     g  x     f  l-bfa5881-1a       g  private &    g  syntax-violation '  '  g  symbol->string '  '  f  not a member of the set     f  -source expression failed to match any pattern g  _ g  each-any  g  datum->syntax '  '  g  every' ' g  memqf  not a subset of the universeg  enum-set-constructorg  t-d35b14d-43	g  t-d35b14d-44
	 g  m-d35b14d-45  f  l-d35b14d-49f  l-d35b14d-4a 
 g  quoted-syms f  l-d35b14d-3b  g  quoted-universe f  l-d35b14d-39  g  syms f  l-d35b14d-36   !g  universe"! #f  l-d35b14d-34$# %"$ & 'f  l-d35b14d-31(' )&( *f  l-d35b14d-2e+* ,+ - %), .- /g  make-enumeration0/- 1g  none2g  line3g  block4g  m-d35b14d-4d54 6s 75 8f  l-d35b14d-529f  l-d35b14d-53:89 ;67: <5 =f  l-d35b14d-4f>= ?<> @5;? A@ Bg  buffer-modesC123 Dg  t-d35b14d-6cEg  t-d35b14d-6dFDE Gg  m-d35b14d-6eHG IHH Jf  l-d35b14d-72Kf  l-d35b14d-73LJK MFIL Nf  l-d35b14d-64ON P<O Qf  l-d35b14d-62RQ S<R Tf  l-d35b14d-5fUT V<U Wf  l-d35b14d-5dXW Y"<X Zf  l-d35b14d-5a[Z \&<[ ]f  l-d35b14d-57^] _<^ `5MPSVY\_ a` b/` cg  enum-set-member?dg  enum-set-universee' f' g'/ h'/ ig  lfjg  crkg  crlflg  nelmg  crnelng  lsog  m-d35b14d-76po qq rp sf  l-d35b14d-7btf  l-d35b14d-7cust vqru wp xf  l-d35b14d-78yx zwy {pvz |{ }g  
eol-styles~ijklmn1 g  t-d35b14d-95g  t-d35b14d-96 g  m-d35b14d-97  f  l-d35b14d-9bf  l-d35b14d-9c  f  l-d35b14d-8d w f  l-d35b14d-8b w f  l-d35b14d-88 w f  l-d35b14d-86 "w f  l-d35b14d-83 &w f  l-d35b14d-80 w p  / g  ignoreg  replaceg  m-d35b14d-9f o  f  l-d35b14d-a4f  l-d35b14d-a5   f  l-d35b14d-a1    g  error-handling-modes7 g  t-d35b14d-beg  t-d35b14d-bf g  m-d35b14d-c0  f  l-d35b14d-c4f  l-d35b14d-c5  f  l-d35b14d-b6  f  l-d35b14d-b4  f  l-d35b14d-b1  f  l-d35b14d-af " f  l-d35b14d-ac & f  l-d35b14d-a9    / g  make-record-type-descriptor* * g  
transcoderg  	immutableg  codec q o  g  record-constructor* * g  "make-record-constructor-descriptor* * g  %make-transcoderg  register-record-type* * g  record-predicate* * g  transcoder?g  record-accessor* * g  %default-port-encodingf  
ISO-8859-1f  UTF-8f  UTF-16g  with-throw-handlerg  system-errorg  system-error-errnog  EACCESg  EEXISTg  ENOENTg  EROFSg  with-i/o-filename-conditionsg  memvg  EIOg  EFBIGg  ENOSPCg  EPIPEg  	conditiong  throwg  with-i/o-port-errorg  with-textual-output-conditions  g  portg  body0g  body g  m-d35b14d-cb  	f  l-d35b14d-d0
f  l-d35b14d-d1f  l-d35b14d-d2f  l-d35b14d-d3	
   f  l-d35b14d-cd      g  lambda g  with-i/o-encoding-error g  with-textual-input-conditionsg  m-d35b14d-d9  f  l-d35b14d-de f  l-d35b14d-df!f  l-d35b14d-e0"f  l-d35b14d-e1# !" $# % &f  l-d35b14d-db'& (%' )$( *) +) ,) -g  with-i/o-decoding-error.-) /g  port-encoding0g  port-conversion-strategy1g  error2g  
substitute3f  unsupported error handling mode4g  %make-transcoded-port54 64 7g  set-port-encoding!8g  set-port-conversion-strategy!9g  seek:g  SEEK_CUR;g  SEEK_SET<g  catch=< >< ?g  open-input-string@g  openAg  	r6rs-openBg  O_CREATCg  O_TRUNCDg  O_EXCLEg  file-options->modeFg  O_RDONLYGg  O_RDWRHg  open-output-stringIg  get-output-stringJg  O_WRONLYKg  make-soft-portLg  stringMg  string-lengthNf  wOg  force-outputP. Q. Rg  &i/o-encodingSg  list->vectorT.S U.S Vg  charWVA X. Y. Z. [. \g  condition-predicate].\ ^.\ _g  condition-accessor`._ a._ b. c. d eg  m-d35b14d-114fe gf hf  l-d35b14d-119if  l-d35b14d-11ajhi kdgj lf mf  l-d35b14d-116nm oln pko qp rp sg  encoding-errortsp urt vp wg  beginxwp yg  keyzyp {g  subr|{p }g  message~}p g  errnop p g  chrp z|~ 7p Bp   v  g  
write-charg  writeg  string?g  substring/sharedf  expected stringg  guile:displayg  &i/o-decodingg  m-d35b14d-148  f  l-d35b14d-14df  l-d35b14d-14e d  f  l-d35b14d-14a     g  decoding-error   w y { }    7 E     g  	read-charg  readg  	read-lineg  trimg  read-stringg  make-stringg  	peek-charg  dup->inportg  dup->outportC 5  h@Z    ]4	
5 4 >  "  G   45 4  h   C   ] 45 L  6;       g  filenamef  rnrs/io/ports.scm
	
 		
   C O >  "  G   4%5 4     h   C   ] 45 L  6;       g  filenamef  rnrs/io/ports.scm
	
 		
   C O >  "  G   4'5 4     h   C   ] 45 L  6;       g  filenamef  rnrs/io/ports.scm
	
 		
   C O >  "  G   4*5 4     h   C   ] 45 L  6;       g  filenamef  rnrs/io/ports.scm
	
 		
   C O >  "  G   4,5 4     h   C   ] 45 L  6;       g  filenamef  rnrs/io/ports.scm
	
 		
   C O >  "  G   4.5 4     h   C   ] 45 L  6;       g  filenamef  rnrs/io/ports.scm
	
 		
   C O >  "  G   405 4     h   C   ] 45 L  6;       g  filenamef  rnrs/io/ports.scm
	
 		
   C O >  "  G   435 4     h   C   ] 45 L  6;       g  filenamef  rnrs/io/ports.scm
	
 		
   C O >  "  G   455 4     h   C   ] 45 L  6;       g  filenamef  rnrs/io/ports.scm
	
 		
   C O >  "  G   495 4     h   C   ] 45 L  6;       g  filenamef  rnrs/io/ports.scm
	
 		
   C O >  "  G   4=5 4     h   C   ] 45 L  6;       g  filenamef  rnrs/io/ports.scm
	
 		
   C O >  "  G   4@ u   h   C   ] 45 6   ;       g  filenamef  rnrs/io/ports.scm
	
 		
   C>  "  G  4x    h   C   ] 45 6   ;       g  filenamef  rnrs/io/ports.scm
	
 		
   C>  "  G  4      h   C   ] 45 6    ;       g  filenamef  rnrs/io/ports.scm
	
 		
   C>  "  G  4 
     hH   ~   ]
45&  "  &  "  $   C45	6 v       g  file-option
		G g  sym		G g  t				-  g  filenamef  rnrs/io/ports.scm		}
 		G	   C   h(   c   ]	4 5$  @ 6      [       g  s
		" g  tmp		"  g  filenamef  rnrs/io/ports.scm
	}
 		"   C5R4t     h   S   ] 6      K       g  x
		
  g  filenamef  rnrs/io/ports.scm
	}
 		
   Ct.0      h   N   ]    C    F       g  t-d35b14d-43
		 g  t-d35b14d-44		  			   C   h      ])4 54L  54L  545$  "  44	5
>  "  G   45$  @6         g  sym
	  g  syms		  g  quoted-universe		  g  quoted-syms		)  g  t		4	] g  tmp		d  g  tmp		o   g  filenamef  rnrs/io/ports.scm		}
 	    C    h(   c   ]	4 5$   O @ 6 [       g  s
		' g  tmp		'  g  filenamef  rnrs/io/ports.scm
	}
 		'   C5tR4s123As 
 hH      ]
45&  "  &  "  $   C45	6 w       g  buffer-mode
		G g  sym		G g  t				-  g  filenamef  rnrs/io/ports.scm	 
 		G	   C  h(   d   ]	4 5$  @ 6      \       g  s
		" g  tmp		"  g  filenamef  rnrs/io/ports.scm
 
 		"   C5sR4B CC  h   T   ] 6      L       g  x
		
  g  filenamef  rnrs/io/ports.scm
 
 		
   CBab    h   N   ]    C    F       g  t-d35b14d-6c
		 g  t-d35b14d-6d		  			   C   h      ])4 54L  54L  545$  "  44	5
>  "  G   45$  @6         g  sym
	  g  syms		  g  quoted-universe		  g  quoted-syms		)  g  t		4	] g  tmp		d  g  tmp		o   g  filenamef  rnrs/io/ports.scm	 
 	    C   h(   d   ]	4 5$   O @ 6 \       g  s
		' g  tmp		'  g  filenamef  rnrs/io/ports.scm
 
 		'   C5BRcdfhC   h    r   ] 444455556   j       g  symbol
		  g  filenamef  rnrs/io/ports.scm
 
 		  g  nameg  buffer-mode? CrR4qijklmn1|q h   }   ]
45&  "  F&  "  9&  "  ,&  "  &  "  &  "  $  	 C
456     u       g  	eol-style
		{ g  sym		{ g  t				a  g  filenamef  rnrs/io/ports.scm	 
 		{	   C    h(   d   ]	4 5$  @ 6      \       g  s
		" g  tmp		"  g  filenamef  rnrs/io/ports.scm
 
 		"   C5qR4} ~~  h   T   ] 6      L       g  x
		
  g  filenamef  rnrs/io/ports.scm
 
 		
   C}    h   N   ]    C    F       g  t-d35b14d-95
		 g  t-d35b14d-96		  			   C   h      ])4 54L  54L  545$  "  44	5
>  "  G   45$  @6         g  sym
	  g  syms		  g  quoted-universe		  g  quoted-syms		)  g  t		4	] g  tmp		d  g  tmp		o   g  filenamef  rnrs/io/ports.scm	 
 	    C   h(   d   ]	4 5$   O @ 6 \       g  s
		' g  tmp		'  g  filenamef  rnrs/io/ports.scm
 
 		'   C5}R1       h   a   ] C   Y       g  filenamef  rnrs/io/ports.scm
 
 		
  g  nameg  native-eol-style CpR4o7o 
      hH      ]
45&  "  &  "  $   C45	6        g  error-handling-mode
		G g  sym		G g  t				-  g  filenamef  rnrs/io/ports.scm	 
 		G	   C  h(   d   ]	4 5$  @ 6      \       g  s
		" g  tmp		"  g  filenamef  rnrs/io/ports.scm
 
 		"   C5oR4   h   T   ] 6      L       g  x
		
  g  filenamef  rnrs/io/ports.scm
 
 		
   C    h   N   ]    C    F       g  t-d35b14d-be
		 g  t-d35b14d-bf		  			   C   h      ])4 54L  54L  545$  "  44	5
>  "  G   45$  @6         g  sym
	  g  syms		  g  quoted-universe		  g  quoted-syms		)  g  t		4	] g  tmp		d  g  tmp		o   g  filenamef  rnrs/io/ports.scm	 
 	    C   h(   d   ]	4 5$   O @ 6 \       g  s
		' g  tmp		'  g  filenamef  rnrs/io/ports.scm
 
 		'   C5R45R44i55R4i4i5>  "  G  R4i5R4i	5kR4i5lR4i
5mRp       h0      - . , 3 #  45 #   6          g  codec
		- g  	eol-style		- g  handling-mode			-  g  filenamef  rnrs/io/ports.scm
 
 		-	  g  nameg  make-transcoder CnRni   h    r   ][  $   "  45  6 j       g  t
		  g  filenamef  rnrs/io/ports.scm
 
 		
  g  nameg  native-transcoder CjR    h   g   ] C   _       g  filenamef  rnrs/io/ports.scm
 
	 	 		
  g  nameg  latin-1-codec CiR       h   e   ] C   ]       g  filenamef  rnrs/io/ports.scm
 
	 	 		
  g  nameg  utf-8-codec ChR h   f   ] C   ^       g  filenamef  rnrs/io/ports.scm
 
	 	 		
  g  nameg  utf-16-codec CgR}7 h`   a   -  1  3 4 5$  "  /$  "   $  "  $  	"  
4L 56   Y       g  args
			] g  errno		] g  construct-condition		P	]  			]


   C    h      ] O 6              g  filename
		 g  thunk		  g  filenamef  rnrs/io/ports.scm
 
 			  g  nameg  with-i/o-filename-conditions CR7z      hH   @   -  1  3 4 54 5$  44L 5 4	L556
 @     8       g  args
			C g  errno		C  			C


   C     h      ] O 6            g  port
		 g  make-primary-condition		 g  thunk			  g  filenamef  rnrs/io/ports.scm
 
 			  g  nameg  with-i/o-port-error CR4        h    d   ]  C      \       g  dummy
		 g  port		 g  body0			 g  body			  			   C     h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  		"  g  
macro-typeg  syntax-rulesg  patternsg  portg  body0g  bodyg  ...   C5R4*+,.  h    d   ]  C      \       g  dummy
		 g  port		 g  body0			 g  body			  			   C     h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  		"  g  
macro-typeg  syntax-rulesg  patternsg  portg  body0g  bodyg  ...   C5R/np0172$e3        hX     ]4 5$  >45 4 5$  "  $  "  	4	
56C             g  port
		Q g  t			Q g  key		!	M  g  filenamef  rnrs/io/ports.scm
 
	H 	' 		Q  g  nameg  port-transcoderg  documentationf  dReturn the transcoder object associated with @var{port}, or @code{#f}
if the port has no transcoder. CeR/ h      ]4 5C            g  port
		  g  filenamef  rnrs/io/ports.scm
 
 		  g  nameg  binary-port?g  documentationf  ZReturns @code{#t} if @var{port} does not have an associated encoding,
@code{#f} otherwise. CdR   h      ]C           g  port
		  g  filenamef  rnrs/io/ports.scm
 
 		  g  nameg  textual-port?g  documentationf  LAlways returns @code{#t}, as all ports can be used for textual I/O in
Guile. CcRdN      h(   m   ]4 5$  4 5"  4 56     e       g  port
		#  g  filenamef  rnrs/io/ports.scm
 
 		#  g  nameg  	port-eof? CfR67mk781213      h   r  ]4 5445>  "  G  45$  4>  "  G  "  :$  4	>  "  G  "  4
45>  "  G  C  j      g  port
	  g  
transcoder	  g  result			  g  key		+   g  filenamef  rnrs/io/ports.scm
 
	t	 	 	  g  nameg  transcoded-portg  documentationf  Return a new textual port based on @var{port}, using
@var{transcoder} to encode and decode data written to or
read from its underlying binary port @var{port}. CbR9: h      ] 
6            g  port
		  g  filenamef  rnrs/io/ports.scm

 		  g  nameg  port-positiong  documentationf  jReturn the offset (an integer) indicating where the next octet will be
read from/written to in @var{port}. CaR9;  h      ] 6           g  port
		 g  offset		  g  filenamef  rnrs/io/ports.scm

 			  g  nameg  set-port-position!g  documentationf  NSet the position where the next octet will be read from/written to
@var{port}. C`R>a     h      ] L 6       		
   C     h   .   -  1  3 C     &       g  args
			  			


   C       h       ]4 O 5$  CC              g  port
		  g  filenamef  rnrs/io/ports.scm

 		  g  nameg  port-has-port-position?g  documentationf  =Return @code{#t} is @var{port} supports @code{port-position}. C_R>`a   h      ] L 4L 56        		
   C     h   .   -  1  3 C     &       g  args
			  			


   C       h       ]4 O 5$  CC              g  port
		  g  filenamef  rnrs/io/ports.scm

 		  g  nameg  port-has-set-port-position!?g  documentationf  BReturn @code{#t} is @var{port} supports @code{set-port-position!}. C^R       h(   +  ]
4 >  G4 >  "  G  E#      g  port
		( g  proc		( g  vals			(  g  filenamef  rnrs/io/ports.scm
#
 		(	  g  nameg  call-with-portg  documentationf  Call @var{proc}, passing it @var{port} and closing @var{port} upon exit of
@var{proc}.  Return the return values of @var{proc}. C]R]  h@      - . , 3 #  4>  G 4 >  "  G  6         g  proc
		? g  
transcoder		? g  port		 	? g  extract		 	?  g  filenamef  rnrs/io/ports.scm
,
 		?  g  nameg   call-with-bytevector-output-port CXR?     h      ]Y4 >  ZCZF         g  str
		  g  filenamef  rnrs/io/ports.scm
1
	3	( 		  g  nameg  open-string-input-portg  documentationf  1Open an input port that will read from @var{str}. C\R@      h      ] Y4LL >  ZCZF        		
   C7m       h@      ]4  O 5$  445>  "  G  "   C             g  filename
		: g  mode		: g  buffer-mode			: g  
transcoder			: g  port			:  g  filenamef  rnrs/io/ports.scm
6
 		:	  g  nameg  	r6rs-open CARcBCD        hH      ]4 5$  
"  4 5$  
"  4 5$  
"  C           g  file-options
		D g  	base-mode		D  g  filenamef  rnrs/io/ports.scm
?
 		D	  g  nameg  file-options->mode CERfh3AF hH     - . , 3 #  444555#  #   6           g  filename
		C g  file-options		C g  buffer-mode			C g  
transcoder			C  g  filenamef  rnrs/io/ports.scm
K
 		C	  g  nameg  open-file-input-portg  documentationf  5Return an input port for reading from @var{filename}. C[Rfh3AEG hP   "  - . , 3 #  444555#  #   456            g  filename
		J g  file-options		J g  buffer-mode			J g  
transcoder			J  g  filenamef  rnrs/io/ports.scm
S
 		J	  g  nameg  open-file-input/output-portg  documentationf  =Return a port for reading from and writing to @var{filename}. CTRHI  h      ] L 6       		
   C    h    5  ]Y45 Z   O D     -      g  port
		  g  filenamef  rnrs/io/ports.scm
^
	a	4 		
  g  nameg  open-string-output-portg  documentationf  Return two values: an output port that will collect characters written to it
as a string, and a thunk to retrieve the characters associated with that port. CZRfh3AEJ       hP     - . , 3 #  444555#  #   456            g  filename
		J g  file-options		J g  buffer-mode			J g  maybe-transcoder			J  g  filenamef  rnrs/io/ports.scm
f
 		J	  g  nameg  open-file-output-portg  documentationf  4Return an output port for writing to @var{filename}. CYRHI  h(   !  ]	45 4 >  "  G  6             g  proc
		! g  port		!  g  filenamef  rnrs/io/ports.scm
q
 		!  g  nameg  call-with-string-output-portg  documentationf  zCall @var{proc}, passing it a string output port. When @var{proc} returns,
return the characters accumulated in that port. CWRKL h   )   ]L 4 5
6 !       g  c
		  		   CM        h   )   ]L  
4 56!       g  s
		  		   CN h       ]O O  6          g  id
		 g  write!		 g  get-position			 g  set-position!			 g  close			  g  filenamef  rnrs/io/ports.scm
x
		 			  g  nameg  make-custom-textual-output-port CVRO        h   u   ] 6m       g  port
		  g  filenamef  rnrs/io/ports.scm

 		  g  nameg  flush-output-port CUR4QR|i4UW 55RR4Y4[Ri55BR4^Ri5CR4aRi4cRi
55AR4quvx h   ?   ] C 7       g  dummy
		 g  body		  			   C  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  		"  g  documentationf  BConvert Guile throws to `encoding-error' to `&i/o-encoding-error'.g  
macro-typeg  syntax-rulesg  patternsg  bodyg  ...   C5Rs     h      ] LL 6             		

   C7B       h      ]456        g  key
		 g  subr		 g  message			 g  errno			 g  port			 g  chr			  			   C     h      ] L LO 6            		
   C    h   ~   ]  O 6     v       g  port
		 g  char		  g  filenamef  rnrs/io/ports.scm

 			  g  nameg  put-char CMRs   h      ] LL 6             		

   C7B       h      ]456        g  key
		 g  subr		 g  message			 g  errno			 g  port			 g  chr			  			   C     h      ] L LO 6            		
   C    h      ]  O 6     x       g  port
		 g  datum		  g  filenamef  rnrs/io/ports.scm

 			  g  nameg  	put-datum CLRs8M$K  hX   F   ] 4L5$  >L $  0L$  4LL L L5L64LL 4L55L6LL6L6   >       g  filenamef  rnrs/io/ports.scm	Q	+ 		U
   C7B  h      ]456        g  key
		 g  subr		 g  message			 g  errno			 g  port			 g  chr			  			   C     h      ] L LLLO 6        		
   C    h8      - . , 3 #  #    O 6            g  port
		3 g  s		3 g  start			3 g  count			3  g  filenamef  rnrs/io/ports.scm

 		3		  g  nameg  
put-string CKRs  h      ] LL 6             		

   C7B       h      ]456        g  key
		 g  subr		 g  message			 g  errno			 g  port			 g  chr			  			   C     h      ] L LO 6            		
   C    h0      - . , 3 #  45  O 6      w       g  object
		* g  port		*  g  filenamef  rnrs/io/ports.scm

 		*  g  nameg  display C8R4Q|i4U55R4Y4[i55ER4^i5FR4-      h   ?   ] C 7       g  dummy
		 g  body		  			   C  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  		"  g  documentationf  BConvert Guile throws to `decoding-error' to `&i/o-decoding-error'.g  
macro-typeg  syntax-rulesg  patternsg  bodyg  ...   C5-R     h      ] L 6       		
   C7E       h   w   ]456   o       g  key
		 g  subr		 g  message			 g  errno			 g  port			  			   C      h      ] L O 6              		
   C    h   l   ]  O 6       d       g  port
		  g  filenamef  rnrs/io/ports.scm

 		  g  nameg  get-char CSR     h      ] L 6       		
   C7E       h   w   ]456   o       g  key
		 g  subr		 g  message			 g  errno			 g  port			  			   C      h      ] L O 6              		
   C    h   m   ]  O 6       e       g  port
		  g  filenamef  rnrs/io/ports.scm

 		  g  nameg  	get-datum CRR h      ] L 6             		

   C7E       h   w   ]456   o       g  key
		 g  subr		 g  message			 g  errno			 g  port			  			   C      h      ] L O 6              		
   C    h   l   ]  O 6       d       g  port
		  g  filenamef  rnrs/io/ports.scm

 		  g  nameg  get-line CQR     h      ] L 6       		
   C7E       h   w   ]456   o       g  key
		 g  subr		 g  message			 g  errno			 g  port			  			   C      h      ] L O 6              		
   C    h   r   ]  O 6       j       g  port
		  g  filenamef  rnrs/io/ports.scm

 		  g  nameg  get-string-all CPR     h@     ]454 
545$  C$  C
6          g  port
		< g  count		< g  s				< g  rv			<  g  filenamef  rnrs/io/ports.scm

 		<	  g  nameg  get-string-ng  documentationf  Read up to @var{count} characters from @var{port}.
If no characters could be read before encountering the end of file,
return the end-of-file object, otherwise return a string containing
the characters read. COR  h      ] L 6       		
   C7E       h   w   ]456   o       g  key
		 g  subr		 g  message			 g  errno			 g  port			  			   C      h      ] L O 6              		
   C    h   r   ]  O 6       j       g  port
		  g  filenamef  rnrs/io/ports.scm

 		  g  nameg  lookahead-char CNR h   d   ] Y4
>  ZCZF    \       g  filenamef  rnrs/io/ports.scm

 		
  g  nameg  standard-input-port CJR       h   e   ] Y4>  ZCZF    ]       g  filenamef  rnrs/io/ports.scm

 		
  g  nameg  standard-output-port CIR      h   d   ] Y4	>  ZCZF   \       g  filenamef  rnrs/io/ports.scm

 		
  g  nameg  standard-error-port CHRC             g  m
		+ g  iface
	2  g  iface
 8 g  iface
? g  iface
H g  iface
O g  iface
X g  iface
_ g  iface
h g  iface
o g  iface
x g  iface
   g  filenamef  rnrs/io/ports.scm		
 
< 
 
 
E 
 
P 
 
! 
# 
' 
( 
) 
*P 
, 
-
.
09
1
3>#
4V,
5T1
66
7?
9FK
:S
<^
>f
?tq
A)x
A
A
E
Gs
J
L
L
O
QX
S
T
V
Xu
Y
Y
Z7
 0	Z9
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                         ccache/rnrs/io/simple.go                                                                            0000644                 00000014771 15154557173 0011214 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4      h/      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  io	g  simple		 	
g  filenameS	f  rnrs/io/simple.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  only	g  ports	 	g  call-with-port	g  
close-port	g  open-file-input-port	g  open-file-output-port	g  
eof-object	g  eof-object?	g  file-options	g  buffer-mode	 g  native-transcoder	!g  get-char	"g  lookahead-char	#g  	get-datum	$g  put-char	%g  	put-datum	&g  input-port?	'g  output-port?	( !"#$%&' 	)g  call-with-deferred-observers	*) 	+) 	,g  module-use-interfaces!	-, 	., 	/g  current-module	0/ 	1/ 	2g  @@	3g  current-input-port	4g  current-output-port	5g  current-error-port	6g  define*	7g  with-input-from-port	8g  with-output-to-port	92345678 		:g  base	;: 	<g  files	=< 	>g  module-export!	?> 	@> 	Ag  module-re-export!	BA 	CA 	Dg  i/o-error-port	Eg  i/o-port-error?	Fg  make-i/o-port-error	Gg  	&i/o-port	Hg  i/o-file-does-not-exist-error?	Ig  "make-i/o-file-does-not-exist-error	Jg  &i/o-file-does-not-exist	Kg  i/o-file-already-exists-error?	Lg  "make-i/o-file-already-exists-error	Mg  &i/o-file-already-exists	Ng  i/o-file-is-read-only-error?	Og   make-i/o-file-is-read-only-error	Pg  &i/o-file-is-read-only	Qg  i/o-file-protection-error?	Rg  make-i/o-file-protection-error	Sg  &i/o-file-protection	Tg  i/o-error-filename	Ug  i/o-filename-error?	Vg  make-i/o-filename-error	Wg  &i/o-filename	Xg  i/o-error-position	Yg  i/o-invalid-position-error?	Zg  make-i/o-invalid-position-error	[g  &i/o-invalid-position	\g  i/o-write-error?	]g  make-i/o-write-error	^g  
&i/o-write	_g  i/o-read-error?	`g  make-i/o-read-error	ag  	&i/o-read	bg  
i/o-error?	cg  make-i/o-error	dg  &i/o	eDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcd543'& (	fg  module-replace!	gf 	hf 	ig  write	jg  display	kg  newline	lg  
write-char	mg  read	ng  	peek-char	og  	read-char	pg  close-output-port	qg  close-input-port	rg  open-output-file	sg  open-input-file	tg  with-output-to-file	ug  with-input-from-file	vg  call-with-output-file	wg  call-with-input-file	xijklmnopqrstuvw 	yj 	zj 	{g  enums	|{ 	}g  enum-set-constructor	~|} 	|}  g  make-enumeration |  |  g  	no-create g  no-fail g  no-truncate   g  blockC 5    h  7  ]4	
5 4 >  "  G   4(5 4+.1 h   D   ] 45 L  6<       g  filenamef  rnrs/io/simple.scm
	
 		
   C O >  "  G   495 4+.1   h   D   ] 45 L  6<       g  filenamef  rnrs/io/simple.scm
	
 		
   C O >  "  G   4;5 4+.1   h   D   ] 45 L  6<       g  filenamef  rnrs/io/simple.scm
	
 		
   C O >  "  G   4=5 4+.1   h   D   ] 45 L  6<       g  filenamef  rnrs/io/simple.scm
	
 		
   C O >  "  G   4+@1    h   D   ] 45 6    <       g  filenamef  rnrs/io/simple.scm
	
 		
   C>  "  G  4+C1e  h   D   ] 45 6   <       g  filenamef  rnrs/io/simple.scm
	
 		
   C>  "  G  4+h1x  h   D   ] 45 6   <       g  filenamef  rnrs/io/simple.scm
	
 		
   C>  "  G  zjR  h      ]4 56        g  filename
		 g  proc		  g  filenamef  rnrs/io/simple.scm
	w	 			  g  nameg  call-with-input-file CwR      h      ]4 56        g  filename
		 g  proc		  g  filenamef  rnrs/io/simple.scm
	z	 			  g  nameg  call-with-output-file CvRw7    h   ,   ] L 6      $       g  port
		
  		
   C h      ] O 6        g  filename
		 g  thunk		  g  filenamef  rnrs/io/simple.scm
	}	 			  g  nameg  with-input-from-file CuRv8    h   ,   ] L 6      $       g  port
		
  		
   C h      ] O 6        g  filename
		 g  thunk		  g  filenamef  rnrs/io/simple.scm
 	 			  g  nameg  with-output-to-file CtR      h    y   ] 44455545 6 q       g  filename
		  g  filenamef  rnrs/io/simple.scm
 	 		  g  nameg  open-input-file CsR     h    z   ] 44455545 6 r       g  filename
		  g  filenamef  rnrs/io/simple.scm
 	 		  g  nameg  open-output-file CrRiqRipR3!     h    p   -  . , 3  #  45   6 h       g  port
		  g  filenamef  rnrs/io/simple.scm
 	 		
  g  nameg  	read-char CoR3"     h    p   -  . , 3  #  45   6 h       g  port
		  g  filenamef  rnrs/io/simple.scm
 	 		
  g  nameg  	peek-char CnR3#     h    k   -  . , 3  #  45   6 c       g  port
		  g  filenamef  rnrs/io/simple.scm
 	 		
  g  nameg  read CmR4$  h(      - . , 3 #  45  6       z       g  char
		! g  port		!  g  filenamef  rnrs/io/simple.scm
 	 		!  g  nameg  
write-char ClR4$   h(   n   -  . , 3  #  45   
6       f       g  port
		!  g  filenamef  rnrs/io/simple.scm
 	 		!
  g  nameg  newline CkR4%       h(      - . , 3 #  45  6       w       g  object
		! g  port		!  g  filenamef  rnrs/io/simple.scm
 	 		!  g  nameg  write CiRC    /      g  m
		+ g  iface
	2  g  iface
 9 g  iface
@ g  iface
I  g  filenamef  rnrs/io/simple.scm		
	u	j	w	#	z	#	}	# 	 	 	 	 		K 		 	
 	U 	 	 	 	
   C6        ccache/rnrs/control.go                                                                              0000644                 00000002631 15154557173 0010764 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] - 4 h      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  control	 		g  filenameS	
f  rnrs/control.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  only	g  when	g  unless	g  do	g  case-lambda	 	g  call-with-deferred-observers	 	 	g  module-use-interfaces!	 	 	 g  current-module	!  	"  	#g  module-export!	$# 	%# 	&g  module-re-export!	'& 	(& 	) 	*g  module-replace!	+* 	,* C 5   h  g   ]4	
5 4 >  "  G   45 4" h   B   ] 45 L  6:       g  filenamef  rnrs/control.scm
	
 		
   C O >  "  G   4%"      h   B   ] 45 6    :       g  filenamef  rnrs/control.scm
	
 		
   C>  "  G  4(")    h   B   ] 45 6   :       g  filenamef  rnrs/control.scm
	
 		
   C>  "  G  ,"       h   B   ] 45 6    :       g  filenamef  rnrs/control.scm
	
 		
   C6    _       g  m
		+ g  iface
	2   g  filenamef  rnrs/control.scm		
 	
   C6                                                                                                        ccache/rnrs/records/syntactic.go                                                                    0000644                 00000052104 15154557173 0012746 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0,T      ] 4  hF&      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  records	g  	syntactic		 	
g  filenameS	f  rnrs/records/syntactic.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  only	g  and=>	g  gensym	 	g  call-with-deferred-observers	 	 	g  module-use-interfaces!	 	 	g  current-module	  	! 	"g  base	#" 	$g  
conditions	%$ 	&g  
exceptions	'& 	(g  
hashtables	)( 	*g  lists	+* 	,g  
procedural	-, 	.g  syntax-case	/. 	0g  srfi	1g  :1	201 	3g  take	423 	5g  module-export!	65 	75 	8g  record-constructor-descriptor	9g  define-record-type	:89 	;g  module-re-export!	<; 	=; 	>g  module-replace!	?> 	@> 	Ag  record-type-descriptor	BA 	Cg  make-eq-hashtable	Dg  record-type-registry	Eg  string->symbol	Fg  string-append	Gf  make-	Hg  symbol->string	Ig  guess-constructor-name	Jf  ?	Kg  guess-predicate-name	Lg  hashtable-set!	Mg  register-record-type	Ng  hashtable-ref	Og  car	Pg  lookup-record-type-descriptor	Qg  cdr	Rg  $lookup-record-constructor-descriptor	Sg  make-syntax-transformer	TS 	US 	Vg  macro	Wg  $sc-dispatch	XW 	YW 	Zg  _	[g  any	\[[[ 	]g  each-any	^\]	_Z^	`g  syntax-object	ag  define-record-type0	bg  top	cb 	dg  ribcage	eg  record-name	fg  constructor-name	gg  predicate-name	hg  record-clause	iefgh 	jcccc 	kf  l-17a5c5a65d375-22	lf  l-17a5c5a65d375-23	mf  l-17a5c5a65d375-24	nf  l-17a5c5a65d375-25	oklmn 	pdijo 	qd 	rg  stx	sr 	tc 	uf  l-17a5c5a65d375-1f	vu 	wdstv 	xcpqw 	yg  private	zy 	{`axz 	|[]	}Z|	~g  syntax->datum	g  datum->syntax [[  g  t-17a5c5a65d375-38 g  t-17a5c5a65d375-37   g  m-17a5c5a65d375-39 b    f  l-17a5c5a65d375-3d f  l-17a5c5a65d375-3e   d  g  f  l-17a5c5a65d375-35   dt  f  f  l-17a5c5a65d375-33   dt  g  record-name-sym   f  l-17a5c5a65d375-31   dt  eh  cc  f  l-17a5c5a65d375-2c f  l-17a5c5a65d375-2d   d  cqqqqqqqqw  `az  g  syntax-violation     f  -source expression failed to match any pattern 
  g  reverse g  sequence g  number-fields g  free-id g  	immutable g  x   f  l-17a5c5a65d375-135   dt  g  f g  guess-mutator-name g  guess-accessor-name g  record-name-str g  
id->string g  wrap   cccccc  f  l-17a5c5a65d375-12a f  l-17a5c5a65d375-128 f  l-17a5c5a65d375-126 f  l-17a5c5a65d375-124 f  l-17a5c5a65d375-122 f  l-17a5c5a65d375-120   d  g  fields e  f  l-17a5c5a65d375-11e f  l-17a5c5a65d375-11f   d  cq  `z    [  f  - [[  g  mutable `z    [  f  -set! [[[  g  identifier? f  invalid field specifier g  map g  process-fields g  list->vector g  	fold-left g  define g  t-17a5c5a65d375-79 g  t-17a5c5a65d375-78   g  m-17a5c5a65d375-7a b    f  l-17a5c5a65d375-7e f  l-17a5c5a65d375-7f   d  g  lst g  c   ccc  f  l-17a5c5a65d375-75 f  l-17a5c5a65d375-76 f  l-17a5c5a65d375-77   d  g  field-names   f  l-17a5c5a65d375-6e   dt    f  l-17a5c5a65d375-6c   dt  g  loop g  _fields g  _parent g  	_protocol g  _sealed g  _opaque g  _nongenerative g  _constructor g  _parent-rtd g  record-clauses  
 cccccccccc 
 f  l-17a5c5a65d375-54f  l-17a5c5a65d375-55f  l-17a5c5a65d375-56f  l-17a5c5a65d375-57f  l-17a5c5a65d375-58f  l-17a5c5a65d375-59f  l-17a5c5a65d375-5af  l-17a5c5a65d375-5bf  l-17a5c5a65d375-5c	f  l-17a5c5a65d375-5d
 	 
d
 f  l-17a5c5a65d375-4cf  l-17a5c5a65d375-4df  l-17a5c5a65d375-4ef  l-17a5c5a65d375-4f dij g  unspecified?g  *unspecified* cc f  l-17a5c5a65d375-46f  l-17a5c5a65d375-44 d f  l-17a5c5a65d375-43 dst cqqqqq `z g  record-accessor `z !g  length"g  t-17a5c5a65d375-8b#g  t-17a5c5a65d375-8a$"# %g  m-17a5c5a65d375-8c&%b '&& (f  l-17a5c5a65d375-90)f  l-17a5c5a65d375-91*() +d$'* ,f  l-17a5c5a65d375-87-f  l-17a5c5a65d375-88.f  l-17a5c5a65d375-89/,-. 0d/ 1g  field-accessors21 3f  l-17a5c5a65d375-7043 5d2t4 6cq+q0q5qqq 7`6z 8g  record-mutator9`86z :g  t-17a5c5a65d375-97;: <g  m-17a5c5a65d375-98=<b >= ?f  l-17a5c5a65d375-9b@? Ad;>@ Bg  field-mutatorsCB Df  l-17a5c5a65d375-82ED FdCtE GcqAqFq5qqq H`8Gz Ig  t-17a5c5a65d375-a0JI Kg  m-17a5c5a65d375-a1LKb ML Nf  l-17a5c5a65d375-a4ON PdJMO Qg  	parent-cdRQ Sf  l-17a5c5a65d375-94TS UdRtT VcqPqUqFq5qqq W`AVz X[[[[[[[[[]] Yg  beginZg  t-17a5c5a65d375-b2[g  t-17a5c5a65d375-b1\g  t-17a5c5a65d375-b0]g  t-17a5c5a65d375-af^g  t-17a5c5a65d375-ae_g  t-17a5c5a65d375-b4`g  t-17a5c5a65d375-b3ag  t-17a5c5a65d375-b6bg  t-17a5c5a65d375-b5cg  t-17a5c5a65d375-b8dg  t-17a5c5a65d375-b7eZ[\]^_`abcd fg  m-17a5c5a65d375-b9gfb hggggggggggg if  l-17a5c5a65d375-bdjf  l-17a5c5a65d375-bekf  l-17a5c5a65d375-bflf  l-17a5c5a65d375-c0mf  l-17a5c5a65d375-c1nf  l-17a5c5a65d375-c2of  l-17a5c5a65d375-c3pf  l-17a5c5a65d375-c4qf  l-17a5c5a65d375-c5rf  l-17a5c5a65d375-c6sf  l-17a5c5a65d375-c7tijklmnopqrs udeht vg  opaque?wv xf  l-17a5c5a65d375-acyx zdwty {g  sealed?|{ }f  l-17a5c5a65d375-aa~} d|t~ g  uid f  l-17a5c5a65d375-a8 dt g  protocol f  l-17a5c5a65d375-a6 dt g  
parent-rtd f  l-17a5c5a65d375-9d dt cquqqqqzqqqqqUqFq5qqq `Yz `z g  make-record-type-descriptor`z g  quote`z g  record-constructor`z g  "make-record-constructor-descriptor`z g  dummy`z g  let`z `Mz   g  record-predicate`z g  append  cq `z  ][g  raiseg  make-assertion-violationg  parent`z  [ [`z  [ [g  sealed`z  [ [g  opaque`z  [ [g  nongenerative`z   [g  t-17a5c5a65d375-f2 g  m-17a5c5a65d375-f3b  f  l-17a5c5a65d375-f6 d g  rest f  l-17a5c5a65d375-f0 dt cqq 	`z [ [ f  l-17a5c5a65d375-f9f  l-17a5c5a65d375-fa d cq `z `z  [[ [Z[ g  t-17a5c5a65d375-10a g  m-17a5c5a65d375-10bb  f  l-17a5c5a65d375-10e d g  name f  l-17a5c5a65d375-108 dt f  l-17a5c5a65d375-105 dst cqq `Pz g  t-17a5c5a65d375-116 g  m-17a5c5a65d375-117b  f  l-17a5c5a65d375-11a d f  l-17a5c5a65d375-114 dt f  l-17a5c5a65d375-111  dst  cqq `Rz C 5     hX*  b  ]4	
5 4 >  "  G   45 4! h   L   ] 45 L  6D       g  filenamef  rnrs/records/syntactic.scm
	
 		
   C O >  "  G   4#5 4!   h   L   ] 45 L  6D       g  filenamef  rnrs/records/syntactic.scm
	
 		
   C O >  "  G   4%5 4!   h   L   ] 45 L  6D       g  filenamef  rnrs/records/syntactic.scm
	
 		
   C O >  "  G   4'5 4!   h   L   ] 45 L  6D       g  filenamef  rnrs/records/syntactic.scm
	
 		
   C O >  "  G   4)5 4!   h   L   ] 45 L  6D       g  filenamef  rnrs/records/syntactic.scm
	
 		
   C O >  "  G   4+5 4!   h   L   ] 45 L  6D       g  filenamef  rnrs/records/syntactic.scm
	
 		
   C O >  "  G   4-5 4!   h   L   ] 45 L  6D       g  filenamef  rnrs/records/syntactic.scm
	
 		
   C O >  "  G   4/5 4!   h   L   ] 45 L  6D       g  filenamef  rnrs/records/syntactic.scm
	
 		
   C O >  "  G   445 4!   h   L   ] 45 L  6D       g  filenamef  rnrs/records/syntactic.scm
	
 		
   C O >  "  G   47!:  h   L   ] 45 6   D       g  filenamef  rnrs/records/syntactic.scm
	
 		
   C>  "  G  4=!    h   L   ] 45 6    D       g  filenamef  rnrs/records/syntactic.scm
	
 		
   C>  "  G  4@!B  h   L   ] 45 6   D       g  filenamef  rnrs/records/syntactic.scm
	
 		
   C>  "  G  4Ci5 DREFGH h      ]44 556           g  record-name
		  g  filenamef  rnrs/records/syntactic.scm
	#				$	# 		  g  nameg  guess-constructor-name CIREFHJ       h      ]44 556           g  record-name
		  g  filenamef  rnrs/records/syntactic.scm
	%			&	@ 		  g  nameg  guess-predicate-name CKRLD     h      ] 6        g  name
		 g  rtd		 g  rcd			  g  filenamef  rnrs/records/syntactic.scm
	'	 			  g  nameg  register-record-type CMRNDO      h      ]4 56             g  name
		  g  filenamef  rnrs/records/syntactic.scm
	)	 		  g  nameg  lookup-record-type-descriptor CPRNDQ       h      ]4 56             g  name
		  g  filenamef  rnrs/records/syntactic.scm
	+	 		  g  nameg  $lookup-record-constructor-descriptor CRR4U9VY_{  h      ]  C             g  record-name
		 g  constructor-name		 g  predicate-name			 g  record-clause			  			   C}~IKY   h   Z   ]L  L C      R       g  t-17a5c5a65d375-38
		 g  t-17a5c5a65d375-37		  			   C 
      h`      ]*4 54 4554 455 45$   O @	6            g  record-name
		[ g  record-clause		[ g  record-name-sym				[ g  constructor-name			[ g  predicate-name		)	[ g  tmp		2	[ g  tmp		=	[  		[	   C  h@   L   ]4 5$  @4 5$  @ 6       D       g  stx
		9 g  tmp		9 g  tmp		"	9  		9   C59R        h    ?   ] 
$  C 4L  5C       7       g  n
		  		  g  nameg  	seq-inner C    h       ]	O Q 4 56             g  n
		 g  	seq-inner	
	  g  filenamef  rnrs/records/syntactic.scm
	A	 		  g  nameg  sequence CR  h    c   ] (  C 4L  5C    [       g  fields
		 g  counter		  			  g  nameg  number-fields-inner C  h      ]	O Q  
6         g  fields
		 g  number-fields-inner	
	  g  filenamef  rnrs/records/syntactic.scm
	D	 		  g  nameg  number-fields CRY~EFH hP   }   ]	4 5 4L544M 44 55554L5 C       u       g  name
		I g  x		 g  x	6	D  g  filenamef  rnrs/records/syntactic.scm	&	T	( 		I   C~       h(   Q   ]
4 5 4L 5 C     I       g  name
		# g  accessor		# g  x			  		#	   C~EFH 	hx      ]	4 5 4L544M 44 55554L544M 44 55554L5 C             g  name
		r g  x		 g  x	6	D g  x	`	n  g  filenamef  rnrs/records/syntactic.scm	&	T	(	N	Y		\	Y	5 		r   C~ h(   f   ]4 5 4L 5 C    ^       g  name
		$ g  accessor		$ g  mutator			$ g  x			  		$	   C    h   ,   ] 6$       g  name
		  		   C~EFH  hP   }   ]	4 5 4L544M 44 55554L5 C       u       g  name
		I g  x		 g  x	6	D  g  filenamef  rnrs/records/syntactic.scm	&	T	( 		I   C9  h      ])4 5$  LL O @4 5$  L O @4 5$  LL O @4 5$  	L O @  4
?$  LL O @ 6        g  x
	  g  tmp	  g  tmp		)  g  tmp		E  g  tmp		c  g  tmp		{   g  filenamef  rnrs/records/syntactic.scm 	n	/ 	   g  nameg  f CH~       h0      ]HO  Q 44 55K6            g  record-name
		+ g  fields		+ g  record-name-str			+ g  f			+  g  filenamef  rnrs/records/syntactic.scm
	L	 		+	  g  nameg  process-fields CR4UaVY_YOY    h   Z   ] L   C     R       g  t-17a5c5a65d375-79
		 g  t-17a5c5a65d375-78		  			   C       hH   k   ] 45$  4L O ?"  
45 C      c       g  lst
		B g  x		B g  c			B g  tmp			> g  tmp			;  		B	   C!Y79 h   Z   ] L   C     R       g  t-17a5c5a65d375-8b
		 g  t-17a5c5a65d375-8a		  			   C       hP   k   ]$  A 45$  4L O ?"  
45 C C c       g  lst
		O g  x		O g  c			O g  tmp			H g  tmp		 	E  		O	   CHWYX  h     , 3 LL    L L   	L LL  
 LL  4	
5C       ~      g  t-17a5c5a65d375-b2
	  g  t-17a5c5a65d375-b1	  g  t-17a5c5a65d375-b0		  g  t-17a5c5a65d375-af		  g  t-17a5c5a65d375-ae		  g  t-17a5c5a65d375-b4		  g  t-17a5c5a65d375-b3		  g  t-17a5c5a65d375-b6		  g  t-17a5c5a65d375-b5		  g  t-17a5c5a65d375-b8			  g  t-17a5c5a65d375-b7	
	   	 	   C   h`     ]844LL &  "  L 55 4LO LL &  "  L 44LL &  "  L 5554LO LL &  "  L 44LL &  "  L 555LL&  LL&  "  L"  	L LL&  LL&  "  L"  
L LL&  "  LLL&  "  LLL&  "  L LL&  "  LLL&  "  L 45$  L
L	LO @6          g  field-names
	] g  field-accessors	T] g  field-mutators	 ] g  	parent-cd	 ] g  
parent-rtd	 ] g  tmp	2] g  tmp	=]  	]
   C        h0   G   ]L
L	&  L 4L 5LLLLLLL6	45 6?       g  record-fields
		0 g  rest		0  		0	   C    h@   E   ]L	L&  'L	L &  LL LLLLLL6	45 645 6      =       g  parent-name
		: g  rest		:  		:	   C      h0   D   ]L	L&  L LL LLLLL6	45 6       <       g  
expression
		) g  rest		)  		)	   C       h0   A   ]L	L&  L LLL LLLL6	45 6       9       g  sealed?
		) g  rest		)  		)	   C  h0   A   ]L	L&  L LLLL LLL6	45 6       9       g  opaque?
		) g  rest		)  		)	   C   h@   <   ]	L
L	&  ,L LLLLL4L45 5 LL 6	45 6 4       g  rest
		? g  tmp	"	.  		?   C    h0   =   ]L	L&  L LLLLL  LL6	45 6  5       g  uid
		. g  rest		.  		.	   C      h@   M   ]L	L&  ,L	L &  LLLLLLLL  6	45 645 6 E       g  rtd
		? g  cd		? g  rest			?  		?	   C    h    , 	3 45		$   LLLLO 	@45

$  L L LO 
@45$   L LO 
@45$  L  LO 
@4	5$  
L  LO 
@45$  L  LO 
@45$  L  LLO @45$  L  LO 
@45$   L LO 
@6            g  _fields
	 g  _parent	 g  	_protocol		 g  _sealed		 g  _opaque		 g  _nongenerative		 g  _constructor		 g  _parent-rtd		 g  record-clauses		 g  tmp			 g  tmp	
	> g  tmp		n g  tmp	  g  tmp	  g  tmp	  g  tmp	& g  tmp	V g  tmp	  			  g  nameg  loop C  h8      ]O  L Q L L L L L L L L 6	              g  record-name
		1 g  constructor-name		1 g  predicate-name			1 g  record-clause			1 g  loop			1  		1	   C       h0   V   ]4 5$  O @ 6    N       g  stx
		, g  *unspecified*		, g  tmp			,  		,   C5aR4UAVY~  h    <   ]	4L 4 5 5 C 4       g  name
		 g  tmp		  		   C     h(   ;   ]	4 5$   O @ 6 3       g  stx
		' g  tmp		'  		'   C5AR4U8VY~     h    <   ]	4L 4 5 5 C 4       g  name
		 g  tmp		  		   C     h(   ;   ]	4 5$   O @ 6 3       g  stx
		' g  tmp		'  		'   C58RC      Z      g  m
		+ g  iface
	2  g  iface
 I g  iface
P g  iface
i g  iface
p g  iface
  g  iface
 g  iface
  g  iface
9  
g  filenamef  rnrs/records/syntactic.scm		
	!		#	K	%			'			)	
	+		A	O	D	]	L	 	*R
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                             ccache/rnrs/records/procedural.go                                                                   0000644                 00000024303 15154557173 0013105 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0(      ]  4 h
      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  records	g  
procedural		 	
g  filenameS	f  rnrs/records/procedural.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  base	 	g  call-with-deferred-observers	 	 	g  module-use-interfaces!	 	 	g  current-module	 	 	 g  only	!g  cons*	"g  logand	#g  logior	$g  ash	%g  and=>	&g  throw	'g  display	(g  make-struct	)g  make-vtable	*g  map	+g  simple-format	,g  string-append	-g  symbol-append	.g  struct?	/g  struct-layout	0g  
struct-ref	1g  struct-set!	2g  struct-vtable	3g  vtable-index-layout	4g  make-hash-table	5g  	hashq-ref	6g  
hashq-set!	7g  vector->list	8 !"#$%&'()*+,-./01234567 	9g  ice-9	:g  receive	;9: 	<g  srfi	=g  :1	><= 	?g  fold	@g  split-at	Ag  take	B >?@A 	Cg  module-export!	DC 	EC 	Fg  record-mutator	Gg  "make-record-constructor-descriptor	Hg  record-type-descriptor?	Ig  make-record-type-descriptor	JFGHI 	Kg  module-re-export!	LK 	MK 	Ng  module-replace!	ON 	PN 	Qg  record-accessor	Rg  record-predicate	Sg  record-constructor	TQRS 	Ug  record-internal?	Vg  rtd-index-name	Wg  rtd-index-uid	Xg  rtd-index-parent	Yg  rtd-index-sealed?	Zg  rtd-index-opaque?	[g  rtd-index-predicate	\g  rtd-index-field-names	]g  rtd-index-field-bit-field	^g  rtd-index-field-binder	_g  rctd-index-rtd	`g  rctd-index-parent	ag  rctd-index-protocol	bg  symbol->string	cf   	dg  vtable-base-layout	ef  prprprprprprprprprpr	ff  #<r6rs:record-type:~A>	gg  record-type-vtable	hf  prprpr	if  #<r6rs:record-constructor:~A>	jg  record-constructor-vtable	kg  	uid-table	lg  	immutable	mg  pr	ng  mutable	og  pw	pg  
r6rs-raise	qg  make-assertion-violation	rg  list->vector	sg  cadr	tf  #<r6rs:record:~A>	ug  vector-length	vg  length	wg  
&condition	x  	yg  !&condition-constructor-descriptor	zg  &serious	{g  &serious-constructor-descriptor	|g  make-serious-condition	}g  
&violation	~g  !&violation-constructor-descriptor	g  make-violation g  
&assertion g  &raise-object-wrapper g  obj l  g  continuation l    g  make-raise-object-wrapper g  raise-object-wrapper? g  raise-object-wrapper-obj g  !raise-object-wrapper-continuation g  r6rs:exception g  r6rs-raise-continuableC 5       h  Q  ]4	
5 4 >  "  G   45 4 h   M   ] 45 L  6E       g  filenamef  rnrs/records/procedural.scm
	
 		
   C O >  "  G   485 4  h   M   ] 45 L  6E       g  filenamef  rnrs/records/procedural.scm
	
 		
   C O >  "  G   4;5 4  h   M   ] 45 L  6E       g  filenamef  rnrs/records/procedural.scm
	
 		
   C O >  "  G   4B5 4  h   M   ] 45 L  6E       g  filenamef  rnrs/records/procedural.scm
	
 		
   C O >  "  G   4EJ h   M   ] 45 6   E       g  filenamef  rnrs/records/procedural.scm
	
 		
   C>  "  G  4M   h   M   ] 45 6    E       g  filenamef  rnrs/records/procedural.scm
	
 		
   C>  "  G  4PT h   M   ] 45 6   E       g  filenamef  rnrs/records/procedural.scm
	
 		
   C>  "  G  H        h   }   ] $   6C      u       g  obj
		  g  filenamef  rnrs/records/procedural.scm
	<	 		  g  nameg  record-internal? CUR	VR		WR	
XR	YR	ZR	[R	\R	]R	^R
_R`R	aR4bi4/i4)ic555dR4)i4,idie5+fV        h   s   ] 6 k       g  obj
		 g  port		  g  filenamef  rnrs/records/procedural.scm		R	' 			   C5gR4)ih+i_V     h   s   ] 6      k       g  obj
		 g  port		  g  filenamef  rnrs/records/procedural.scm		X	' 			   C5jR44i5 kRU%     h0   ^   ]	4 5$   M$  C 
L 6C      V       g  obj
		* g  t		(  		*  g  nameg  private-record-predicate Cl-mnopq7r*sY5kZVX\]g+t  h   t   ]L 6    l       g  obj
		 g  port		  g  filenamef  rnrs/records/procedural.scm	 	* 			   C(      h   a   - 1 3 M 
 @    Y       g  parent-struct
			 g  args			  			
  g  nameg  field-binder C6  h  _  ]^H
H	HHHO 
Q "  w(  	"  $  45"$  "45"445 5"  4	5

"rKJKJK4
44	555K	K
$  &$  445 >  "  G  "   "   $  45"  $  "  $  	"  $  A J	J  $  C45 6J O  J	J
O  K
$  4>  "  G  "   C    W      g  name
	 g  parent	 g  uid		 g  sealed?		 g  opaque?		 g  fields		 g  fields-pair		 g  fields-layout		 g  fields-bit-field		 g  field-names			 g  late-rtd	
	 g  private-record-predicate		 g  
field-list		%  g  
layout-sym		%  g  layout-bit-field		%  g  counter		%  g  key		8  g  matching-rtd	3 g  opaque?	3 g  rtd	  g  filenamef  rnrs/records/procedural.scm
	^	 		  g  nameg  make-record-type-descriptor CIRg        h      ] $   CC      }       g  obj
		  g  filenamef  rnrs/records/procedural.scm
 	 		  g  nameg  record-type-descriptor? CHRu\X%G h   )   ]L 6      !       g  d
		
  		
   Cj@v    h8   d   -  1  3 4 4 5M>  G 4L ?@    \       g  args
			4 g  n-args		4 g  p-args			4 g  p		,	4  			4


   C h   P   ] L O C    H       g  n
		  		  g  nameg  default-inherited-protocol C      h   F   ] C   >       g  p
		  		  g  nameg  default-protocol C 	      h`     ]H4 5K $  "  4O 5 $  "  $  O "   C         g  rtd
		] g  parent-constructor-descriptor		] g  protocol			] g  	rtd-arity			] g  prtd			] g  pcd		2	]  g  filenamef  rnrs/records/procedural.scm
 	 		]	  g  nameg  "make-record-constructor-descriptor CGR_`aS^  h   .   -  1  3 LL  @    &       g  args
			  			


   C       h    A   -  1  3 4L  ?LO C    9       g  args
			 g  struct		  			


   C^ h   .   -  1  3 L  @     &       g  args
			  			


   C       hH      ]!   $  45O "  O 6        g  rctd
		G g  rtd		G g  parent-rctd			G g  protocol			G g  parent-record-constructor		&	:  g  filenamef  rnrs/records/procedural.scm
 	 		G  g  nameg  record-constructor CSR[        h   ~   ] Cv       g  rtd
		  g  filenamef  rnrs/records/procedural.scm
 	 		  g  nameg  record-predicate CRR%        h    M   ] L&   LC 
L 6    E       g  obj
		  		  g  nameg  record-accessor-inner CUpq%       h@   +   ]4 5$  "  445 >  "  G   L &   LC 
L6#       g  obj
		@  		@   C  h(      ]
O  Q  O C              g  rtd
		! g  k		! g  record-accessor-inner			!  g  filenamef  rnrs/records/procedural.scm
 	 		!	  g  nameg  record-accessor CQR   h@   l   ]
 $  / L&   L"  $  C 
 "C       d       g  obj
		9 g  val		9 g  t			7  		9	  g  nameg  record-mutator-inner C]pq    h   <   ]L  6      4       g  obj
		
 g  val		
  		
	   C hP      ]O  Q  
$  445 >  "  G  "   O C          g  rtd
		M g  k		M g  record-mutator-inner			M g  	bit-field			E  g  filenamef  rnrs/records/procedural.scm
 	 		M	  g  nameg  record-mutator CFR4Iiwx5wR4Giwi5yR4Iizwix5zR4Giziyi5{R4Si{i5|R4Ii}zix5}R4Gi}i{i5~R4Si~i5R4Ii}ix5R4Si4Gii~i55qR4Ii5R4Si4Gii55R4Rii5R4Qii
5R4Qii5R&     h   x   ]4 56p       g  obj
		  g  filenamef  rnrs/records/procedural.scm
	 		  g  nameg  
r6rs-raise CpR&  h   `   ]4L  56       X       g  continuation
		  		  g  nameg  r6rs-raise-continuable-internal C     h      ] O B      |       g  obj
		
  g  filenamef  rnrs/records/procedural.scm
	 		
  g  nameg  r6rs-raise-continuable CRC       I      g  m
		+ g  iface
	2  g  iface
 J g  iface
Q g  iface
j  g  filenamef  rnrs/records/procedural.scm		
	<		?		@		A		B		C		D		E		F		G		I		J		K		M	I	M		P	3	O		V	P	U	Z	\		^	@ 	 	 	 	 	 	 	 	 	 	 	4 	G 	U	j							{		 .	
   C6                                                                                                                                                                                                                                                                                                                              ccache/rnrs/records/inspection.go                                                                   0000644                 00000012223 15154557173 0013116 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0{      ] _ 4       h      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  records	g  
inspection		 	
g  filenameS	f  rnrs/records/inspection.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  
arithmetic	g  bitwise	 	g  call-with-deferred-observers	 	 	g  module-use-interfaces!	 	 	g  current-module	 	  	!g  base	"! 	#g  
procedural	$# 	%g  only	&g  
struct-ref	'g  struct-vtable	(g  vtable-index-layout	)g  @@	*%&'() 	+g  module-export!	,+ 	-+ 	.g  record-field-mutable?	/g  record-type-field-names	0g  record-type-opaque?	1g  record-type-sealed?	2g  record-type-generative?	3g  record-type-uid	4g  record-type-parent	5g  
record-rtd	6./012345 	7g  module-re-export!	87 	97 	:g  module-replace!	;: 	<: 	=g  record-type-name	>g  record?	?=> 	@# 	Ag  record-internal?	B@A 	C@A 	Dg  rtd-index-name	E@D 	F@D 	Gg  rtd-index-parent	H@G 	I@G 	Jg  rtd-index-uid	K@J 	L@J 	Mg  rtd-index-sealed?	N@M 	O@M 	Pg  rtd-index-opaque?	Q@P 	R@P 	Sg  rtd-index-field-names	T@S 	U@S 	Vg  rtd-index-field-bit-field	W@V 	X@V 	Yg  assertion-violation	Zf  not a record	[g  record-type-descriptor?	\f  not a record type descriptor	]g  guarantee-rtd	^g  bitwise-bit-set?C 5h   Y  ]4	
5 4 >  "  G   45 4  h   M   ] 45 L  6E       g  filenamef  rnrs/records/inspection.scm
	
 		
   C O >  "  G   4"5 4   h   M   ] 45 L  6E       g  filenamef  rnrs/records/inspection.scm
	
 		
   C O >  "  G   4$5 4   h   M   ] 45 L  6E       g  filenamef  rnrs/records/inspection.scm
	
 		
   C O >  "  G   4*5 4   h   M   ] 45 L  6E       g  filenamef  rnrs/records/inspection.scm
	
 		
   C O >  "  G   4- 6 h   M   ] 45 6   E       g  filenamef  rnrs/records/inspection.scm
	
 		
   C>  "  G  49    h   M   ] 45 6    E       g  filenamef  rnrs/records/inspection.scm
	
 		
   C>  "  G  4< ? h   M   ] 45 6   E       g  filenamef  rnrs/records/inspection.scm
	
 		
   C>  "  G  CARFDRIGRLJROMRRPRUSRXVRA0      h    t   ]4 5$  
4 5CC       l       g  obj
		  g  filenamef  rnrs/records/inspection.scm
	/	 		  g  nameg  record? C>RAPY5Z   h@      ]	4 5$   $  "  "  $  C 6        g  record
		? g  rtd		% g  t	*	?  g  filenamef  rnrs/records/inspection.scm
	3		;	7	) 		?  g  nameg  
record-rtd C5R[Y\   h       ]45$  C 6             g  who
		 g  rtd		  g  filenamef  rnrs/records/inspection.scm
	9			<	! 			  g  nameg  guarantee-rtd C]R]=D        h   }   ]4 5C u       g  rtd
		  g  filenamef  rnrs/records/inspection.scm
	>	 		  g  nameg  record-type-name C=R]4G      h      ]4 5C w       g  rtd
		  g  filenamef  rnrs/records/inspection.scm
	@	 		  g  nameg  record-type-parent C4R]3J    h   |   ]4 5C t       g  rtd
		  g  filenamef  rnrs/records/inspection.scm
	B	 		  g  nameg  record-type-uid C3R3]2       h      ]44 55C      |       g  rtd
		  g  filenamef  rnrs/records/inspection.scm
	D	 		  g  nameg  record-type-generative? C2R]1M       h      ]4 5C x       g  rtd
		  g  filenamef  rnrs/records/inspection.scm
	F	 		  g  nameg  record-type-sealed? C1R]0P   h      ]4 5C x       g  rtd
		  g  filenamef  rnrs/records/inspection.scm
	H	 		  g  nameg  record-type-opaque? C0R]/S   h      ]4 5C |       g  rtd
		  g  filenamef  rnrs/records/inspection.scm
	J	 		  g  nameg  record-type-field-names C/R^].V     h      ]4 56           g  rtd
		 g  k		  g  filenamef  rnrs/records/inspection.scm
	L	 			  g  nameg  record-field-mutable? C.RC  Q      g  m
		+ g  iface
	2  g  iface
 J g  iface
Q g  iface
j  g  filenamef  rnrs/records/inspection.scm		
	#		%		&		'		(		)		*		,		/		3		9	0	>		@		B		7	D			F	
	H	7	J		L	 	
   C6                                                                                                                                                                                                                                                                                                                                                                              ccache/rnrs/r5rs.go                                                                                 0000644                 00000003636 15154557173 0010205 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] 8 4      h      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  r5rs	 		g  filenameS	
f  rnrs/r5rs.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  only	g  exact->inexact	g  inexact->exact	g  quotient	g  	remainder	g  modulo	g  delay	g  force	 		g  call-with-deferred-observers	 	 	 g  module-use-interfaces!	!  	"  	#g  current-module	$# 	%# 	&g  ice-9	'& 	(g  scheme-report-environment	)'( 	*g  	safe-r5rs	+&* 	,g  null-environment	-+, 	.g  module-export!	/. 	0. 	1g  module-re-export!	21 	31 	4(, 		5g  module-replace!	65 	75 C 5    h     ]4	
5 4 >  "  G   45 4"% h   ?   ] 45 L  67       g  filenamef  rnrs/r5rs.scm
	
 		
   C O >  "  G   4)5 4"%        h   ?   ] 45 L  67       g  filenamef  rnrs/r5rs.scm
	
 		
   C O >  "  G   4-5 4"%        h   ?   ] 45 L  67       g  filenamef  rnrs/r5rs.scm
	
 		
   C O >  "  G   40% h   ?   ] 45 6    7       g  filenamef  rnrs/r5rs.scm
	
 		
   C>  "  G  43%4       h   ?   ] 45 6   7       g  filenamef  rnrs/r5rs.scm
	
 		
   C>  "  G  7%  h   ?   ] 45 6    7       g  filenamef  rnrs/r5rs.scm
	
 		
   C6              g  m
		+ g  iface
	2  g  iface
 4 g  iface
;  g  filenamef  rnrs/r5rs.scm		
 		
   C6                                                                                                   ccache/rnrs/hashtables.go                                                                           0000644                 00000020415 15154557173 0011422 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0       ]  4        h
      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  
hashtables	 		g  filenameS	
f  rnrs/hashtables.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  rename	g  only	g  string-hash-ci	g  string-hash	g  hashq	g  hashv	g  modulo	g  *unspecified*	g  @@	 		g  string-ci-hash	 	  	!g  call-with-deferred-observers	"! 	#! 	$g  module-use-interfaces!	%$ 	&$ 	'g  current-module	(' 	)' 	*g  ice-9	+g  optargs	,*+ 	-g  define*	.,- 	/g  srfi	0g  :69	1/0 	2g  make-hash-table	3g  hash	4g  hash-by-identity	5g  hash-table-size	6g  hash-table-ref/default	7g  hash-table-set!	8g  hash-table-delete!	9g  hash-table-exists?	:g  hash-table-update!/default	;g  hash-table-copy	<g  hash-table-equivalence-function	=g  hash-table-hash-function	>g  hash-table-keys	?g  hash-table-fold	@123456789:;<=>? 	Ag  
equal-hash	B3A 	Cg  symbol-hash	D4C 	E@BD 	Fg  base	GF 	Hg  records	Ig  
procedural	JHI 	Kg  module-export!	LK 	MK 	Ng  hashtable-mutable?	Og  hashtable-hash-function	Pg  hashtable-equivalence-function	Qg  hashtable-entries	Rg  hashtable-keys	Sg  hashtable-clear!	Tg  hashtable-copy	Ug  hashtable-update!	Vg  hashtable-contains?	Wg  hashtable-delete!	Xg  hashtable-set!	Yg  hashtable-ref	Zg  hashtable-size	[g  
hashtable?	\g  make-hashtable	]g  make-eqv-hashtable	^g  make-eq-hashtable	_NOPQRSTUVWXYZ[\]^ 	`g  module-re-export!	a` 	b` 	cCA 	dg  module-replace!	ed 	fd 	gg  make-record-type-descriptor	hg  r6rs:hashtable	ig  mutable	jg  wrapped-table	kij 	lg  	immutable	mg  orig-hash-function	nlm 	oli 	pkno 	qg  record-predicate	rg  record-constructor	sg  "make-record-constructor-descriptor	tg  make-r6rs-hashtable	ug  record-accessor	vg  r6rs:hashtable-wrapped-table	wg  record-mutator	xg  !r6rs:hashtable-set-wrapped-table!	yg  !r6rs:hashtable-orig-hash-function	zg  r6rs:hashtable-mutable?	{g  srfi-69	|/{ 	}g  caller-with-default-size	~|} 	|}  g  hash-by-value g  wrap-hash-function g  eq? g  eqv? g  srfi-69:hash-table |  |  g  srfi-9 /  g  throw-bad-struct     g  list->vector g  make-vectorC 5     h    ]4	
5 4 >  "  G   4 5 4#&) h   E   ] 45 L  6=       g  filenamef  rnrs/hashtables.scm
	
 		
   C O >  "  G   4.5 4#&)  h   E   ] 45 L  6=       g  filenamef  rnrs/hashtables.scm
	
 		
   C O >  "  G   4E5 4#&)  h   E   ] 45 L  6=       g  filenamef  rnrs/hashtables.scm
	
 		
   C O >  "  G   4G5 4#&)  h   E   ] 45 L  6=       g  filenamef  rnrs/hashtables.scm
	
 		
   C O >  "  G   4J5 4#&)  h   E   ] 45 L  6=       g  filenamef  rnrs/hashtables.scm
	
 		
   C O >  "  G   4#M)_ h   E   ] 45 6   =       g  filenamef  rnrs/hashtables.scm
	
 		
   C>  "  G  4#b)c h   E   ] 45 6   =       g  filenamef  rnrs/hashtables.scm
	
 		
   C>  "  G  4#f)   h   E   ] 45 6    =       g  filenamef  rnrs/hashtables.scm
	
 		
   C>  "  G  4gihp5hR4qihi5[R4ri4sihi55tR4uihi
5vR4wihi
5xR4uihi5yR4uihi	5zRziNR4i5R    h   A   ]4L  5C   9       g  key
		 g  capacity		  			   C    h   x   ] O C      p       g  proc
		
  g  filenamef  rnrs/hashtables.scm
	[	 		
  g  nameg  wrap-hash-function CRt2C       h@   u   -  . , 3  #    $  4 5"  	456      m       g  k
		:  g  filenamef  rnrs/hashtables.scm
	^	 		:
  g  nameg  make-eq-hashtable C^Rt2  h@   v   -  . , 3  #    $  4 5"  	456      n       g  k
		:  g  filenamef  rnrs/hashtables.scm
	d	 		:
  g  nameg  make-eqv-hashtable C]Rt2     hH      - . , 3 #  4 5$  45"  	45 6            g  hash-function
		C g  equiv		C g  k			C g  wrapped-hash-function			C  g  filenamef  rnrs/hashtables.scm
	j	 		C	  g  nameg  make-hashtable C\R5v  h   y   ]4 56   q       g  	hashtable
		  g  filenamef  rnrs/hashtables.scm
	s	 		  g  nameg  hashtable-size CZR6v    h      ]4 56              g  	hashtable
		 g  key		 g  default			  g  filenamef  rnrs/hashtables.scm
	v	 			  g  nameg  hashtable-ref CYRz7v     h0      ]4 5$  44 5>  "  G  "   C         g  	hashtable
		. g  key		. g  obj			.  g  filenamef  rnrs/hashtables.scm
	z	 		.	  g  nameg  hashtable-set! CXRz8v        h0      ]4 5$  44 5>  "  G  "   C           g  	hashtable
		, g  key		,  g  filenamef  rnrs/hashtables.scm
		 		,	  g  nameg  hashtable-delete! CWR9v        h      ]4 56        g  	hashtable
		 g  key		  g  filenamef  rnrs/hashtables.scm
 	 			  g  nameg  hashtable-contains? CVRz:v   h0      ]4 5$  !44 5>  "  G  "   C       g  	hashtable
		0 g  key		0 g  proc			0 g  default			0  g  filenamef  rnrs/hashtables.scm
 	 		0	  g  nameg  hashtable-update! CURt;vy    h8      - . , 3 #  44 554 5$  "  6       g  	hashtable
		8 g  mutable		8  g  filenamef  rnrs/hashtables.scm
 	 		8  g  nameg  hashtable-copy CTRzv<yx2 
       h      - . , 3 #  4 5$  x4 5&  		"  	454 5454 $  4	5"  	4	5>  "  G  "   C             g  	hashtable
	  g  k	  g  ht		'  g  equiv		D  g  hash-function		M  g  wrapped-hash-function		V   g  filenamef  rnrs/hashtables.scm
 	 	   g  nameg  hashtable-clear! CSR>v        h   z   ]44 556      r       g  	hashtable
		  g  filenamef  rnrs/hashtables.scm
 	 		  g  nameg  hashtable-keys CRRv5?h   G   ]L L C    ?       g  k
		 g  v		 g  i			  			   C      hP      ]!4 545454544 5O 
>  "  G  D          g  	hashtable
		M g  ht			M g  size			M g  keys			M g  vals		$	M  g  filenamef  rnrs/hashtables.scm
 	 		M  g  nameg  hashtable-entries CQRv<       h(      ]	4 5&  	C6             g  	hashtable
		" g  s			"  g  filenamef  rnrs/hashtables.scm
 	 		"  g  nameg  hashtable-equivalence-function CPRy       h      ] 6{       g  	hashtable
		  g  filenamef  rnrs/hashtables.scm
 	 		  g  nameg  hashtable-hash-function CORC      g  m
		+ g  iface
	2  g  iface
 : g  iface
A g  iface
J g  iface
Q  g  filenamef  rnrs/hashtables.scm		
L	H	Z	O	q	P		S		T		U		V		X		Z		[		^	a	d		j		$	s			v	
	z			k 	h 	J 	 	 	M 	+ 	 	 	
   C6                                                                                                                                                                                                                                                    ccache/rnrs/files.go                                                                                0000644                 00000011136 15154557173 0010406 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0F      ] y 4     hG	      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  files	 		g  filenameS	
f  rnrs/files.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  rename	g  only	g  file-exists?	g  delete-file	g  catch	g  @@	 	g  delete-file-internal	 	 	g  call-with-deferred-observers	 	  	!g  module-use-interfaces!	"! 	#! 	$g  current-module	%$ 	&$ 	'g  base	(' 	)g  
conditions	*) 	+g  
exceptions	,+ 	-g  module-export!	.- 	/- 	0g  i/o-error-port	1g  i/o-port-error?	2g  make-i/o-port-error	3g  	&i/o-port	4g  i/o-file-does-not-exist-error?	5g  "make-i/o-file-does-not-exist-error	6g  &i/o-file-does-not-exist	7g  i/o-file-already-exists-error?	8g  "make-i/o-file-already-exists-error	9g  &i/o-file-already-exists	:g  i/o-file-is-read-only-error?	;g   make-i/o-file-is-read-only-error	<g  &i/o-file-is-read-only	=g  i/o-file-protection-error?	>g  make-i/o-file-protection-error	?g  &i/o-file-protection	@g  i/o-error-filename	Ag  i/o-filename-error?	Bg  make-i/o-filename-error	Cg  &i/o-filename	Dg  i/o-error-position	Eg  i/o-invalid-position-error?	Fg  make-i/o-invalid-position-error	Gg  &i/o-invalid-position	Hg  i/o-write-error?	Ig  make-i/o-write-error	Jg  
&i/o-write	Kg  i/o-read-error?	Lg  make-i/o-read-error	Mg  	&i/o-read	Ng  
i/o-error?	Og  make-i/o-error	Pg  &i/o	Q0123456789:;<=>?@ABCDEFGHIJKLMNOP !	Rg  module-re-export!	SR 	TR 	U 	Vg  module-replace!	WV 	XV 	Y 	Zg  raise	[) 	\g  make-record-type-descriptor	][\ 	^[\ 	_g  &error	`g  list->vector	a[` 	b[` 	cg  record-constructor	d[c 	e[c 	fg  "make-record-constructor-descriptor	g[f 	h[f 	ig  condition-predicate	j[i 	k[i 	lg  	immutable	mg  position	nlmD 	og  condition-accessor	p[o 	q[o 	rg  record-accessor	s[r 	t[r 	ug  filename	vlu@ 	wg  port	xlw0 C 5    hX    ]4	
5 4 >  "  G   45 4 #& h   @   ] 45 L  68       g  filenamef  rnrs/files.scm
	
 		
   C O >  "  G   4(5 4 #&       h   @   ] 45 L  68       g  filenamef  rnrs/files.scm
	
 		
   C O >  "  G   4*5 4 #&       h   @   ] 45 L  68       g  filenamef  rnrs/files.scm
	
 		
   C O >  "  G   4,5 4 #&       h   @   ] 45 L  68       g  filenamef  rnrs/files.scm
	
 		
   C O >  "  G   4 /&Q      h   @   ] 45 6   8       g  filenamef  rnrs/files.scm
	
 		
   C>  "  G  4 T&U      h   @   ] 45 6   8       g  filenamef  rnrs/files.scm
	
 		
   C>  "  G  4 X&Y      h   @   ] 45 6   8       g  filenamef  rnrs/files.scm
	
 		
   C>  "  G    h      ] L 6       		
   CZB       h   >   - 1 3 4L 56    6       g  key
			 g  args			  			
   C       h   p   ] O  O 6   h       g  filename
		  g  filenamef  rnrs/files.scm
	@	 		  g  nameg  delete-file CR4^P_i4b55PR4e4hPi55OR4kPi5NR4^MPi4b55MR4e4hMi55LR4kMi5KR4^JPi4b55JR4e4hJi55IR4kJi5HR4^GPi4bn 55GR4e4hGi55FR4kGi5ER4qGi4tGi
55DR4^CPi4bv 55CR4e4hCi55BR4kCi5AR4qCi4tCi
55@R4^?Ci4b55?R4e4h?i55>R4k?i5=R4^<?i4b55<R4e4h<i55;R4k<i5:R4^9Ci4b559R4e4h9i558R4k9i57R4^6Ci4b556R4e4h6i555R4k6i54R4^3Pi4bx 553R4e4h3i552R4k3i51R4q3i4t3i
550RC        g  m
		+ g  iface
	2  g  iface
 5 g  iface
< g  iface
E  g  filenamef  rnrs/files.scm		
	@		I	"	J	X	K		L		O	.	R	d	T		W		Z		]	 	W
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                   ccache/rnrs/unicode.go                                                                              0000644                 00000005550 15154557173 0010735 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0P      ] K 4   h      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  unicode	 		g  filenameS	
f  rnrs/unicode.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  only	g  char-upcase	g  char-downcase	g  char-titlecase	g  	char-ci=?	g  	char-ci<?	g  	char-ci>?	g  
char-ci<=?	g  
char-ci>=?	g  char-alphabetic?	g  char-numeric?	g  char-whitespace?	 g  char-upper-case?	!g  char-lower-case?	"g  char-set-contains?	#g  char-set:title-case	$g  char-general-category	%g  string-upcase	&g  string-downcase	'g  string-titlecase	(g  string-ci=?	)g  string-ci<?	*g  string-ci>?	+g  string-ci<=?	,g  string-ci>=?	-g  string-normalize-nfd	.g  string-normalize-nfkd	/g  string-normalize-nfc	0g  string-normalize-nfkc	1 !"#$%&'()*+,-./0 !	2g  call-with-deferred-observers	32 	42 	5g  module-use-interfaces!	65 	75 	8g  current-module	98 	:8 	;g  base	<; 	=g  module-export!	>= 	?= 	@g  string-foldcase	Ag  char-title-case?	Bg  char-foldcase	C@AB 	Dg  module-re-export!	ED 	FD 	G0/.-,+*)('&%$!  	Hg  module-replace!	IH 	JH C 5   h     ]4	
5 4 >  "  G   415 447: h   B   ] 45 L  6:       g  filenamef  rnrs/unicode.scm
	
 		
   C O >  "  G   4<5 447:     h   B   ] 45 L  6:       g  filenamef  rnrs/unicode.scm
	
 		
   C O >  "  G   44?:C    h   B   ] 45 6   :       g  filenamef  rnrs/unicode.scm
	
 		
   C>  "  G  44F:G    h   B   ] 45 6   :       g  filenamef  rnrs/unicode.scm
	
 		
   C>  "  G  44J:      h   B   ] 45 6    :       g  filenamef  rnrs/unicode.scm
	
 		
   C>  "  G   h0   p   ]   0$  "     1$   C4 56   h       g  char
		-  g  filenamef  rnrs/unicode.scm
	`	 		-  g  nameg  char-foldcase CBR"#     h   s   ] 6      k       g  char
		
  g  filenamef  rnrs/unicode.scm
	d	 		
  g  nameg  char-title-case? CAR&%  h   q   ]4 56   i       g  str
		  g  filenamef  rnrs/unicode.scm
	f	 		  g  nameg  string-foldcase C@RC         g  m
		+ g  iface
	2  g  iface
 7  g  filenamef  rnrs/unicode.scm		
S	`		d		f	 	
   C6                                                                                                                                                         ccache/rnrs/mutable-pairs.go                                                                        0000644                 00000002647 15154557173 0012060 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] + 4   h      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  mutable-pairs	 		g  filenameS	
f  rnrs/mutable-pairs.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  only	g  set-car!	g  set-cdr!	 	g  call-with-deferred-observers	 	 	g  module-use-interfaces!	 	 	g  current-module	 	  	!g  module-export!	"! 	#! 	$g  module-re-export!	%$ 	&$ 	' 	(g  module-replace!	)( 	*( C 5      h(  m   ]4	
5 4 >  "  G   45 4  h   H   ] 45 L  6@       g  filenamef  rnrs/mutable-pairs.scm
	
 		
   C O >  "  G   4#         h   H   ] 45 6    @       g  filenamef  rnrs/mutable-pairs.scm
	
 		
   C>  "  G  4& '      h   H   ] 45 6   @       g  filenamef  rnrs/mutable-pairs.scm
	
 		
   C>  "  G  *  h   H   ] 45 6    @       g  filenamef  rnrs/mutable-pairs.scm
	
 		
   C6      e       g  m
		+ g  iface
	2   g  filenamef  rnrs/mutable-pairs.scm		
 	"
   C6                                                                                          ccache/rnrs/sorting.go                                                                              0000644                 00000004240 15154557173 0010767 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] 1 4     h      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  sorting	 		g  filenameS	
f  rnrs/sorting.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  base	 	g  call-with-deferred-observers	 	 	g  module-use-interfaces!	 	 	g  current-module	 	 	g  only	 g  *unspecified*	!g  stable-sort	"g  sort!	# !" 	$g  module-export!	%$ 	&$ 	'g  vector-sort!	(g  vector-sort	)g  	list-sort	*'() 	+g  module-re-export!	,+ 	-+ 	.g  module-replace!	/. 	0. C 5h     ]4	
5 4 >  "  G   45 4 h   B   ] 45 L  6:       g  filenamef  rnrs/sorting.scm
	
 		
   C O >  "  G   4#5 4     h   B   ] 45 L  6:       g  filenamef  rnrs/sorting.scm
	
 		
   C O >  "  G   4&*    h   B   ] 45 6   :       g  filenamef  rnrs/sorting.scm
	
 		
   C>  "  G  4-      h   B   ] 45 6    :       g  filenamef  rnrs/sorting.scm
	
 		
   C>  "  G  40      h   B   ] 45 6    :       g  filenamef  rnrs/sorting.scm
	
 		
   C>  "  G  !   h   ~   ] 6      v       g  proc
		
 g  list		
  g  filenamef  rnrs/sorting.scm
		 		
	  g  nameg  	list-sort C)R! h      ] 6      z       g  proc
		
 g  vector		
  g  filenamef  rnrs/sorting.scm
		 		
	  g  nameg  vector-sort C(R"     h      ]4 >  "  G  C{       g  proc
		 g  vector		  g  filenamef  rnrs/sorting.scm
		 			  g  nameg  vector-sort! C'RC       g  m
		+ g  iface
	2  g  iface
 7  g  filenamef  rnrs/sorting.scm		
A						 	
   C6                                                                                                                                                                                                                                                                                                                                                                 ccache/rnrs/eval.go                                                                                 0000644                 00000004713 15154557173 0010236 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0	      ] 9 4     ht      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  eval	 		g  filenameS	
f  rnrs/eval.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  only	g  make-module	g  module-uses	g  beautify-user-module!	g  set-module-uses!	 	g  call-with-deferred-observers	 	 	g  module-use-interfaces!	 	 	 g  current-module	!  	"  	#g  base	$# 	%g  io	&g  simple	'%& 	(g  lists	)( 	*g  module-export!	+* 	,* 	-g  environment	.- 	/g  module-re-export!	0/ 	1/ 	2 	3g  module-replace!	43 	53 	6g  member	7g  for-each	8g  importC 5       h0     ]4	
5 4 >  "  G   45 4" h   ?   ] 45 L  67       g  filenamef  rnrs/eval.scm
	
 		
   C O >  "  G   4$5 4"        h   ?   ] 45 L  67       g  filenamef  rnrs/eval.scm
	
 		
   C O >  "  G   4'5 4"        h   ?   ] 45 L  67       g  filenamef  rnrs/eval.scm
	
 		
   C O >  "  G   4)5 4"        h   ?   ] 45 L  67       g  filenamef  rnrs/eval.scm
	
 		
   C O >  "  G   4,".       h   ?   ] 45 6   7       g  filenamef  rnrs/eval.scm
	
 		
   C>  "  G  41"2       h   ?   ] 45 6   7       g  filenamef  rnrs/eval.scm
	
 		
   C>  "  G  45" h   ?   ] 45 6    7       g  filenamef  rnrs/eval.scm
	
 		
   C>  "  G  678 h   3   ]  L 6 +       g  import-spec
		  		   C 	     hp      -  1  3 45 4 54>  "  G  4O  >  "  G  $  445>  "  G  "   C         g  import-specs
			n g  module		n g  needs-purify?			n  g  filenamef  rnrs/eval.scm
		 			n


  g  nameg  environment C-RC       g  m
		+ g  iface
	2  g  iface
 4 g  iface
; g  iface
D  g  filenamef  rnrs/eval.scm		
.		 	0
   C6                                                      ccache/rnrs/bytevectors.go                                                                          0000644                 00000007010 15154557173 0011651 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] n 4        ho
      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  bytevectors	 		g  filenameS	
f  rnrs/bytevectors.scm	g  versionS		 	g  exportsS	g  
endianness	g  native-endianness	g  bytevector?	g  make-bytevector	g  bytevector-length	g  bytevector=?	g  bytevector-fill!	g  bytevector-copy!	g  bytevector-copy	g  uniform-array->bytevector	g  bytevector-u8-ref	g  bytevector-s8-ref	g  bytevector-u8-set!	g  bytevector-s8-set!	g  bytevector->u8-list	g  u8-list->bytevector	g  bytevector-uint-ref	g  bytevector-uint-set!	 g  bytevector-sint-ref	!g  bytevector-sint-set!	"g  bytevector->sint-list	#g  bytevector->uint-list	$g  uint-list->bytevector	%g  sint-list->bytevector	&g  bytevector-u16-ref	'g  bytevector-s16-ref	(g  bytevector-u16-set!	)g  bytevector-s16-set!	*g  bytevector-u16-native-ref	+g  bytevector-s16-native-ref	,g  bytevector-u16-native-set!	-g  bytevector-s16-native-set!	.g  bytevector-u32-ref	/g  bytevector-s32-ref	0g  bytevector-u32-set!	1g  bytevector-s32-set!	2g  bytevector-u32-native-ref	3g  bytevector-s32-native-ref	4g  bytevector-u32-native-set!	5g  bytevector-s32-native-set!	6g  bytevector-u64-ref	7g  bytevector-s64-ref	8g  bytevector-u64-set!	9g  bytevector-s64-set!	:g  bytevector-u64-native-ref	;g  bytevector-s64-native-ref	<g  bytevector-u64-native-set!	=g  bytevector-s64-native-set!	>g  bytevector-ieee-single-ref	?g  bytevector-ieee-single-set!	@g  !bytevector-ieee-single-native-ref	Ag  "bytevector-ieee-single-native-set!	Bg  bytevector-ieee-double-ref	Cg  bytevector-ieee-double-set!	Dg  !bytevector-ieee-double-native-ref	Eg  "bytevector-ieee-double-native-set!	Fg  string->utf8	Gg  string->utf16	Hg  string->utf32	Ig  utf8->string	Jg  utf16->string	Kg  utf32->string	L !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJK >	Mg  set-current-module	NM 	OM 	Pg  load-extension	Qg  string-append	Rf  	libguile-	Sg  effective-version	Tf  scm_init_bytevectors	Ug  make-syntax-transformer	VU 	WU 	Xg  macro	Yg  $sc-dispatch	ZY 	[Y 	\g  _	]g  any	^\]	_g  syntax->datum	`_ 	a_ 	bg  datum->syntax	cb 	db 	eg  big	fg  little	gg  quote	hg  error	if  unsupported endianness	jg  syntax-violation	kj 	lj 	mf  -source expression failed to match any patternC 5    hX     ]4	
L5 4O >  "  G   4Pi4QiR4Si5 5T>  "  G  4WX[^adefghi h(      ] &  "   $    C 6x       g  sym
		(  g  filenamef  rnrs/bytevectors.scm
	M
	
	N			N			O		$	P		(	P	 		(   C     h   h   ]	4 5L 4?6`       g  args
		 g  v			  g  filenamef  rnrs/bytevectors.scm		M
 		   Clm h(   f   ]	4 5$   O @ 6 ^       g  y
		' g  tmp		'  g  filenamef  rnrs/bytevectors.scm
	M
 		'   C5RC          g  m
		,  g  filenamef  rnrs/bytevectors.scm		
	-	J
	2	J		8	J		9	J	+	A	J		C	K		H	J
 		U
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                         ccache/rnrs/conditions.go                                                                           0000644                 00000023021 15154557173 0011451 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0%      ] 4       h$      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  
conditions	 		g  filenameS	
f  rnrs/conditions.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  only	g  and=>	g  @@	 	g  call-with-deferred-observers	 	 	g  module-use-interfaces!	 	 	g  current-module	 	  	!g  base	"! 	#g  lists	$# 	%g  records	&g  
procedural	'%& 	(g  module-export!	)( 	*( 	+g  undefined-violation?	,g  make-undefined-violation	-g  
&undefined	.g  syntax-violation-subform	/g  syntax-violation-form	0g  syntax-violation?	1g  make-syntax-violation	2g  &syntax	3g  lexical-violation?	4g  make-lexical-violation	5g  &lexical	6g  %implementation-restriction-violation?	7g  )make-implementation-restriction-violation	8g  &implementation-restriction	9g  non-continuable-violation?	:g  make-non-continuable-violation	;g  &non-continuable	<g  condition-who	=g  who-condition?	>g  make-who-condition	?g  &who	@g  condition-irritants	Ag  irritants-condition?	Bg  make-irritants-condition	Cg  
&irritants	Dg  assertion-violation?	Eg  make-assertion-violation	Fg  
&assertion	Gg  
violation?	Hg  make-violation	Ig  
&violation	Jg  error?	Kg  
make-error	Lg  &error	Mg  serious-condition?	Ng  make-serious-condition	Og  &serious	Pg  warning?	Qg  make-warning	Rg  &warning	Sg  condition-message	Tg  message-condition?	Ug  make-message-condition	Vg  &message	Wg  define-condition-type	Xg  condition-accessor	Yg  condition-predicate	Zg  
condition?	[g  simple-conditions	\g  	condition	]g  
&condition	^+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\] 3	_g  module-re-export!	`_ 	a_ 	bg  module-replace!	cb 	db 	eg  make-record-type-descriptor	fg  &compound-condition	gg  	immutable	hg  
components	igh 	ji 	kg  record-predicate	lg  compound-condition?	mg  record-constructor	ng  "make-record-constructor-descriptor	og  make-compound-condition	pg  record-accessor	qg  condition-internal?	rg  assertion-violation	sf  not a condition	tg  for-all	uf  non-condition argument	vg  length	wg  append	xg  map	yg  make-syntax-transformer	zy 	{y 	|g  macro	}g  $sc-dispatch	~} 	}  g  any g  each          g  syntax-object g  letrec-syntax g  top   g  ribcage g  dummy g  condition-type g  	supertype g  constructor g  	predicate g  field g  accessor   g  m-2f221686982dd3-f     f  l-2f221686982dd3-14 f  l-2f221686982dd3-15 f  l-2f221686982dd3-16 f  l-2f221686982dd3-17 f  l-2f221686982dd3-18 f  l-2f221686982dd3-19 f  l-2f221686982dd3-1a       g  x     f  l-2f221686982dd3-11       g  private     g  transform-fields   g  syntax-rules   g  _   g  f   g  a     g  rest     g  cons   g  quote   g                     g  generate-accessors   g  counter    ό g  begin   g  define   X  p    g  +        ܌           e    g  list->vector   x  x  g  list m  n    Y  
  g  syntax-violation     f  -source expression failed to match any pattern %&  ]  ]  g  !&condition-constructor-descriptor g  exists g  find g  message gS  O  O  N  N  I  I H H F F E E g  	irritantsg@ 	g  who
g	< g  formg/ g  subformg. C 5       h    ]4	
5 4 >  "  G   45 4  h   E   ] 45 L  6=       g  filenamef  rnrs/conditions.scm
	
 		
   C O >  "  G   4"5 4   h   E   ] 45 L  6=       g  filenamef  rnrs/conditions.scm
	
 		
   C O >  "  G   4$5 4   h   E   ] 45 L  6=       g  filenamef  rnrs/conditions.scm
	
 		
   C O >  "  G   4'5 4   h   E   ] 45 L  6=       g  filenamef  rnrs/conditions.scm
	
 		
   C O >  "  G   4* ^ h   E   ] 45 6   =       g  filenamef  rnrs/conditions.scm
	
 		
   C>  "  G  4a    h   E   ] 45 6    =       g  filenamef  rnrs/conditions.scm
	
 		
   C>  "  G  4d    h   E   ] 45 6    =       g  filenamef  rnrs/conditions.scm
	
 		
   C>  "  G  4eifj5fR4kifi5lR4mi4nifi55oR4pifi
5 lqr[s   h0   _   ]4 5$  L  64 5$    C 6  W       g  	condition
		.  g  filenamef  rnrs/conditions.scm	*	j	$ 		.   C O  [Rlq      h    }   ]	4 5$  C 6      u       g  obj
		 g  t			  g  filenamef  rnrs/conditions.scm
	m	 		  g  nameg  
condition? CZRtZr\uvowxl[     h    @   ]4 5$   6  C       8       g  cond
		  		  g  nameg  flatten C     hh      -  1  3 4 5$  "  4 >  "  G   (  "  	4 5$  44	
 5?6 C   ~       g  
conditions
			e g  t		7  g  filenamef  rnrs/conditions.scm	%	u	* 			e


  g  nameg  	condition C\R4{W|     h      ]	
      45       45  C              g  dummy
	  g  condition-type	  g  	supertype		  g  constructor		  g  	predicate		  g  field		  g  accessor		   	 	   C        h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  		"  g  
macro-typeg  syntax-rulesg  patternsg  condition-typeg  	supertypeg  constructorg  	predicateg  fieldg  accessor g  ...   C5WR]R4ni]i5R4ki]i5qRkl[q     h0   +   ]4 5$  L 4 564 5$  L  6C   #       g  obj
		-  		-   C  h      ]	4 5O C            g  rtd
		 g  rtd-predicate			  g  filenamef  rnrs/conditions.scm
 	 		  g  nameg  condition-predicate CYRkl[   h8   +   ]4L 5$  L  64 5$  4L4 55L 6C    #       g  obj
		4  		4   C  h      ]
4 5O C          g  rtd
		 g  proc		 g  rtd-predicate				  g  filenamef  rnrs/conditions.scm
 	 			  g  nameg  condition-accessor CXR4eiV]i4i 55VR4mi4niVi55UR4YiVi5TR4XiVi4piVi
55SR4eiR]i4i55RR4mi4niRi55QR4YiRi5PRORNR4YiOi5MR4eiLOi4i55LR4mi4niLi55KR4YiLi5JR IRHR4YiIi5GRFRER4YiFi5DR4eiC]i4i 55CR4mi4niCi55BR4YiCi5AR4XiCi4piCi
55@R4ei?]i4i
 55?R4mi4ni?i55>R4Yi?i5=R4Xi?i4pi?i
55<R4ei;Ii4i55;R4mi4ni;i55:R4Yi;i59R4ei8Ii4i558R4mi4ni8i557R4Yi8i56R4ei5Ii4i555R4mi4ni5i554R4Yi5i53R4ei2Ii4i 552R4mi4ni2i551R4Yi2i50R4Xi2i4pi2i
55/R4Xi2i4pi2i55.R4ei-Ii4i55-R4mi4ni-i55,R4Yi-i5+RC        g  m
		+ g  iface
	2  g  iface
 : g  iface
A g  iface
J g  compound-ref
  g  filenamef  rnrs/conditions.scm		
	Y		\		^		a	`	m		p		 		 		 	
 	H 	I 	 	 	 	 	 	D 	J 	X 	^ 	d 	r 	s 	 	1 	q 	 	 	m 	  	
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                ccache/rnrs/exceptions.go                                                                           0000644                 00000033674 15154557173 0011500 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.07      ] 4    ht      ] g  guile	 	g  define-module*	 	 	g  rnrs	g  
exceptions	 		g  filenameS	
f  rnrs/exceptions.scm	g  pureS	g  versionS		 	g  set-current-module	 	 	g  resolve-r6rs-interface	 	 	g  base	 	g  call-with-deferred-observers	 	 	g  module-use-interfaces!	 	 	g  current-module	 	 	g  control	  	!g  
conditions	"! 	#g  records	$g  
procedural	%#$ 	&g  
inspection	'#& 	(g  only	)g  format	*g  newline	+g  display	,g  filter	-g  acons	.g  assv-ref	/g  throw	0g  set-exception-printer!	1g  with-throw-handler	2g  *unspecified*	3g  @@	4()*+,-./0123 	5g  module-export!	65 	75 	8g  raise-continuable	9g  with-exception-handler	:g  guard	;89: 	<g  module-re-export!	=< 	>< 	?g  module-replace!	@? 	A? 	Bg  raise	CB 	D! 	Eg  make-record-type-descriptor	FDE 	GDE 	Hg  &guile	Ig  
&condition	Jg  list->vector	KDJ 	LDJ 	Mg  	immutable	Ng  key	Og  guile-condition-key	PMNO 	Qg  args	Rg  guile-condition-args	SMQR 	Tg  record-constructor	UDT 	VDT 	Wg  "make-record-constructor-descriptor	XDW 	YDW 	Zg  make-guile-condition	[g  condition-predicate	\D[ 	]D[ 	^g  guile-condition?	_g  condition-accessor	`D_ 	aD_ 	bg  record-accessor	cDb 	dDb 	eg  	condition	fg  make-serious-condition	gg  guile-common-conditions	hg  !default-guile-condition-converter	ig  make-who-condition	jg  make-message-condition	kg  make-irritants-condition	lg  guile-condition-converters	mg  convert-guile-condition	n#$ 	og  
r6rs-raise	pno 	qno 	rg  r6rs-raise-continuable	snr 	tnr 	ug  raise-object-wrapper?	vnu 	wnu 	xg  raise-object-wrapper-obj	ynx 	znx 	{g  !raise-object-wrapper-continuation	|n{ 	}n{ 	~g  r6rs:exception	g  make-non-continuable-violation g  make-syntax-transformer     g  guard0 g  macro g  $sc-dispatch     g  any g  each-any    g  syntax-object g  call/cc g  top   g  ribcage g  dummy g  variable g  cond-clause g  body   g  m-302a4a91bf89d3-3f     f  l-302a4a91bf89d3-44 f  l-302a4a91bf89d3-45 f  l-302a4a91bf89d3-46 f  l-302a4a91bf89d3-47       g  x     f  l-302a4a91bf89d3-41       g  private     g  lambda   g  continuation     9  g  cond   g  syntax-violation     f  -source expression failed to match any pattern g  each+ g  free-id g  else g  m-302a4a91bf89d3-4d     f  l-302a4a91bf89d3-4f                Ō  ǌ g  else-clause     f  l-302a4a91bf89d3-52 f  l-302a4a91bf89d3-53 f  l-302a4a91bf89d3-54 f  l-302a4a91bf89d3-55 f  l-302a4a91bf89d3-56         g  append         f  l-302a4a91bf89d3-5f f  l-302a4a91bf89d3-60 f  l-302a4a91bf89d3-61 f  l-302a4a91bf89d3-62           B  g  length g  
condition? f  ERROR: R6RS exception:
 g  format-condition f  ERROR: R6RS exception: `~s' g  exception-printer g  simple-conditions f  Empty condition object f    ~a.  g  format-simple-condition g  record-type-name g  
record-rtd g  record-type-field-names g  record-type-parent g  vector-length g  reverse f  ~a f  ~a: ~s f  ~a:
 f        ~a: ~s g  make-syntax-violation g   guile-syntax-violation-converter g  make-lexical-violation g  !guile-lexical-violation-converter g  make-assertion-violation g  #guile-assertion-violation-converter g  make-undefined-violation g  #guile-undefined-violation-converter g  )make-implementation-restriction-violationg  *guile-implementation-restriction-converterg  
make-errorg  guile-error-converterg  guile-system-error-converterg  
read-errorg  syntax-errorg  unbound-variableg  wrong-number-of-args	g  wrong-type-arg
g  keyword-argument-errorg  out-of-rangeg  regular-expression-syntaxg  program-errorg  goops-errorg  null-pointer-errorg  system-errorg  host-not-foundg  getaddrinfo-errorg  no-datag  no-recoveryg  	try-againg  stack-overflowg  numerical-overflowg  memory-allocation-errorg  set-guile-condition-converter!C 5       h@    ]4	
5 4 >  "  G   45 4 h   E   ] 45 L  6=       g  filenamef  rnrs/exceptions.scm
	
 		
   C O >  "  G   4 5 4  h   E   ] 45 L  6=       g  filenamef  rnrs/exceptions.scm
	
 		
   C O >  "  G   4"5 4  h   E   ] 45 L  6=       g  filenamef  rnrs/exceptions.scm
	
 		
   C O >  "  G   4%5 4  h   E   ] 45 L  6=       g  filenamef  rnrs/exceptions.scm
	
 		
   C O >  "  G   4'5 4  h   E   ] 45 L  6=       g  filenamef  rnrs/exceptions.scm
	
 		
   C O >  "  G   445 4  h   E   ] 45 L  6=       g  filenamef  rnrs/exceptions.scm
	
 		
   C O >  "  G   47; h   E   ] 45 6   =       g  filenamef  rnrs/exceptions.scm
	
 		
   C>  "  G  4>   h   E   ] 45 6    =       g  filenamef  rnrs/exceptions.scm
	
 		
   C>  "  G  4AC h   E   ] 45 6   =       g  filenamef  rnrs/exceptions.scm
	
 		
   C>  "  G  4GHIi4LPS 55HR4V4YHi55ZR4]Hi5^R4aHi4dHi
55OR4aHi4dHi55RRefg    h      ]45 4 56           g  key
		 g  args		  g  filenamef  rnrs/exceptions.scm
	2	 			  g  nameg  !default-guile-condition-converter ChReijk        h8   z   *   1 3 4 545456-  1  3 L 6    r       g  subr
		% g  msg		% g  margs			% g  _			% g  _
	.	4  		%	
	 	.	4


   C   h      ]O @          g  key
		 g  args		  g  filenamef  rnrs/exceptions.scm
	6	 			  g  nameg  guile-common-conditions CgR.lehZ hH      ]4 5$  4 5"  $  "  	4 54 56       g  key
		H g  args		H g  	converter			H g  t		#	=  g  filenamef  rnrs/exceptions.scm
	?	 		H	  g  nameg  convert-guile-condition CmR^/ORq   h(   j   ]4 5$  4 54 5@ 6   b       g  obj
		%  g  filenamef  rnrs/exceptions.scm
	O	 		%  g  nameg  raise CBRt8RwuRzxR}{R1~ux{Bm  h      - 1 3  &  N(  "  45$  545454L 5$  645 6C4 54L >  "  G  45 6          g  key
		  g  args		  g  cargs		+	] g  obj		4	] g  continuation		=	] g  handler-return		F	] g  obj		h   		 
   C        h      ] O 6       g  handler
		 g  thunk		  g  filenamef  rnrs/exceptions.scm
	]	 			  g  nameg  with-exception-handler C9R4       h0   n   ]      C f       g  dummy
		/ g  variable		/ g  cond-clause			/ g  body			/  		/	   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  		"  g  
macro-typeg  syntax-rulesg  patternsg  variableg  cond-clauseg  ... g  body  C5R4:        h       ]4 5C            g  dummy
		 g  variable		 g  cond-clause			 g  else-clause			 g  body			  			   C   h(   n   ]4   5C      f       g  dummy
		" g  variable		" g  cond-clause			" g  body			"  		"	   C   h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  		9  g  
macro-typeg  syntax-rulesg  patternsg  variableg  cond-clauseg  ...g  elseg  else-clauseg  ...  g  bodyg  variableg  cond-clauseg  ... g  body  C5:Rux+) 
       h`      ]45$  K45$  ;4545$  4 >  "  G   6 	66 6          g  port
		^ g  key		^ g  args			^ g  punt			^ g  obj		#	V  g  filenamef  rnrs/exceptions.scm
 		5 		R 	! 		^	  g  nameg  exception-printer CR)*     h      ]45(   6"  `$  W4 >  "  G  4 >  "  G  $  4 >  "  G  "   "C"       g  port
	  g  	condition	  g  
components			  g  i			} g  
components			}  g  filenamef  rnrs/exceptions.scm
 		 		+ 	  	 	  g  nameg  format-condition CR,       h   2   ]4 5
C  *       g  
rtd.fields
		  		   C)b*   hx    ]Z4455" P$  ,454545"4455
$  
	 
6$  	 44
5564	 >  "  G  "  $  
	4
5"  ]$  "  W4	 
44	55>  "  G  $  "  4 >  "  G  "
"	
$  4 >  "  G  "   "IC"?45
"       g  port
	w g  	condition	w g  condition-name		w g  rtd		d g  rtd.fields-list		d g  n-fields		d g  field-names		!	F g  rtd.fields-list		Td g  lst	 \ g  
rtd.fields	 Z g  rtd		 3 g  field-names	
 3 g  n-fields	 - g  i	 #  g  filenamef  rnrs/exceptions.scm
 		d 	%	v 	%  	!  	 	w	  g  nameg  format-simple-condition CR40i~i>  "  G  eij   h8      *   !1 3 454 5456-  1  3 C             g  who
		' g  what		' g  where			' g  form			' g  subform			' g  extra			' g  _
	0	2  		'	
	 	0	2


   C        h      ]@       g  key
		 g  args		  g  filenamef  rnrs/exceptions.scm
 	 			  g  nameg   guile-syntax-violation-converter CReg   h      ]45 4 56           g  key
		 g  args		  g  filenamef  rnrs/exceptions.scm
 	 			  g  nameg  !guile-lexical-violation-converter CReg  h      ]45 4 56           g  key
		 g  args		  g  filenamef  rnrs/exceptions.scm
 	 			  g  nameg  #guile-assertion-violation-converter CReg        h      ]45 4 56           g  key
		 g  args		  g  filenamef  rnrs/exceptions.scm
 	 			  g  nameg  #guile-undefined-violation-converter CRe g       h      ]45 4 56           g  key
		 g  args		  g  filenamef  rnrs/exceptions.scm
 	 			  g  nameg  *guile-implementation-restriction-converter CReg       h      ]45 4 56           g  key
		 g  args		  g  filenamef  rnrs/exceptions.scm
 	 			  g  nameg  guile-error-converter CReg        h0      *   1 3 45 4LL 56-  1  3 LL 6        g  subr
		 g  msg		 g  msg-args			 g  errno			 g  rest			 g  _
	'	/  			
	 	'	/


   C  h      ] O @        g  key
		 g  args		  g  filenamef  rnrs/exceptions.scm
 	 			  g  nameg  guile-system-error-converter CRiiii	i
iiiiiiiiiiiiiii lRl   h      ]  C         g  key
		 g  proc		  g  filenamef  rnrs/exceptions.scm
	 			  g  nameg  set-guile-condition-converter! CRC          g  m
		+ g  iface
	2  g  iface
 : g  iface
A g  iface
J g  iface
Q g  iface
Z  g  filenamef  rnrs/exceptions.scm		
	-		2	q	6		?		5	O		:	S		?	V		D	X		I	Z	U	]	 	 	x 	y 	; 	 	 	 	v 	9 	 	 	:	 	<
   C6                                                                     ccache/sxml/fold.go                                                                                 0000644                 00000022763 15154557173 0010237 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0%      ] - 4 h      ] g  guile	 	g  define-module*	 	 	g  sxml	g  fold	 		g  filenameS	
f  sxml/fold.scm	g  importsS	g  srfi	g  srfi-1	 	 	 	g  exportsS	g  foldt	g  foldts	g  foldts*	g  fold-values	g  foldts*-values	g  fold-layout	 	g  set-current-module	 	 	g  atom?	g  map	g  apply	g  append	 g  assq	!g  assq-ref	"g  error	#f  no binding available	$g  @	%g  macro	&g  pre	'g  reverse	(g  bindings	)g  
pre-layout	*g  post	+g  	*default*	,g  *text*C 5   hp"     ]4	
5 4 >  "  G     h   q   ] C i       g  x
		  g  filenamef  sxml/fold.scm
	&
		'			'	 		  g  nameg  atom? CR h   Z   ]LL  6    R       g  kid
		  g  filenamef  sxml/fold.scm
	0			1	 		   C   h(   0  ]45$  6 4 O 56 (      g  fup
		' g  fhere		' g  tree			'  g  filenamef  sxml/fold.scm
	)
		.			.			/			0		'	0	 		'	  g  nameg  foldtg  documentationf  jThe standard multithreaded tree fold.

@var{fup} is of type [a] -> a. @var{fhere} is of type object -> a.
 CR  h   m   ]LLL  6e       g  kid
		 g  kseed		  g  filenamef  sxml/fold.scm
	:			;	 			   C        h8   j  ]45$  64 O 4 556b      g  fdown
		8 g  fup		8 g  fhere			8 g  seed			8 g  tree			8  g  filenamef  sxml/fold.scm
	4
		7			7			8			:		(	<		4	:		8	9	 			8	  g  nameg  foldtsg  documentationf  nThe single-threaded tree fold originally defined in SSAX.
@xref{sxml ssax,,(sxml ssax)}, for more information. CR        h   m   ]LLL  6e       g  kid
		 g  kseed		  g  filenamef  sxml/fold.scm
	J			K	 			   C        hH     ]45$  64 >  G 4 O 56         g  fdown
		E g  fup		E g  fhere			E g  seed			E g  tree			E g  kseed		"	E g  tree		"	E  g  filenamef  sxml/fold.scm
	@
		D			D			E			G		%	F		.	J		E	I	
 			E	  g  nameg  foldts*g  documentationf  A variant of @ref{sxml fold foldts,,foldts} that allows pre-order
tree rewrites. Originally defined in Andy Wingo's 2007 paper,
@emph{Applications of fold to XML transformation}. CR h8     - 1 3 (  E4 >  G @           g  proc
			3 g  list			3 g  seeds				3 g  seeds		#	3  g  filenamef  sxml/fold.scm
	Q
		U			V			X			X	!	"	X		&	W		/	Z	"	3	Z	
 
			3	
	  g  nameg  fold-valuesg  documentationf  A variant of @ref{SRFI-1 Fold and Map, fold} that allows multi-valued
seeds. Note that the order of the arguments differs from that of
@code{fold}. CR  h   o   - 1 3 LLL  @ g       g  tree
			 g  seeds			  g  filenamef  sxml/fold.scm
	h			i	 			
   C    h`     - 1 3 45$  @4 >  G4 O >  G45@      g  fdown
			` g  fup			` g  fhere				` g  tree				` g  seeds				` g  tree		+	` g  kseeds		+	` g  kseeds		L	`  g  filenamef  sxml/fold.scm
	\
	
	`			`			a			c		.	b		3	g		O	e	
	V	m		`	m	 			`	
	  g  nameg  foldts*-valuesg  documentationf  A variant of @ref{sxml fold foldts*,,foldts*} that allows
multi-valued seeds. Originally defined in Andy Wingo's 2007 paper,
@emph{Applications of fold to XML transformation}. CR       h       ]4 5$  CC             g  alist
		 g  key		 g  default			 g  t			  g  filenamef  sxml/fold.scm
	o
		p				p	 			  g  nameg  assq-ref C!R"#       h   x   -  1  3  6       p       g  args
			  g  filenamef  sxml/fold.scm
 		 		 	 			


  g  nameg  err C     h      -  1  3 LL  @      z       g  args
			  g  filenamef  sxml/fold.scm
 		 	)	 	 			


  g  nameg  cont-with-tag C!$%&'      h      ]45D          g  params
		 g  layout		 g  
old-layout			 g  kids			  g  filenamef  sxml/fold.scm
 		 		 	 			   C()    h   {   ]C   s       g  tag
		 g  params		 g  layout			  g  filenamef  sxml/fold.scm
 	 			   C*+      h`  b  ]>"  O 	 Q 	$  45"  4L  5
 (  
	D"   
	D $  / &   4 5 
	D""4 5$  45$  !4 ? "45$  4 ?D4544	
5 544L55"4L5" Z      g  tree
	_ g  bindings	_ g  pcont		_ g  params		_ g  layout		_ g  ret		_ g  new-bindings		  g  
new-layout		  g  cont		  g  cont-with-tag			  g  bindings	
	6  g  style-params		6  g  params	   g  tag-bindings	 _ g  t	 G g  t	 G  g  filenamef  sxml/fold.scm
 		 		 		 		 		, 		3 	/	4 	:	6 		6 		= 		A 		B 		K 	&	N 	L	P 	
	W 		` 	-	c 	S	e 	
	e 		h 		j 		n 		q 	(	u 	5	y 	
	z 		 	&  	  	  	
  	  	B  	  	  	+  	  	  	  	  	  	  	  	  	  	  	  	  	  	 	 	 	 	 	 	 	 	! 	) 	* 	0 	1 	7 	$; 	= 	G 	K 	Q 	1U 	_ 	 I	_	  g  nameg  fdown C'      h8     , 3 4	4
5>  G D            g  tree
		2 g  bindings		2 g  cont			2 g  params			2 g  layout			2 g  ret			2 g  	kbindings			2 g  kcont			2 g  kparams			2 g  klayout				2 g  kret	
		2 g  klayout			2 g  kret			2  g  filenamef  sxml/fold.scm
 		 	
	 	(	 	
	 		0 	-	2 	 		2	  g  nameg  fup C!,        h0   6  ]44L 5 >  G D.      g  tree
		0 g  bindings		0 g  cont			0 g  params			0 g  layout			0 g  ret			0 g  tlayout			0 g  tret			0  g  filenamef  sxml/fold.scm
 		 	
	 		
 		 		 	
	 		. 	-	0 	 
		0	  g  nameg  fhere C       hP     ]=O Q 4O   >	  G 
	
D        g  tree
		N g  bindings		N g  params			N g  layout			N g  
stylesheet			N g  err			N g  fdown			N g  bindings		:	N g  cont		:	N g  params			:	N g  layout	
	:	N g  ret		:	N  g  filenamef  sxml/fold.scm
	s
	 		1 	7	4 	C	9 		= 		J 		N 	 			N	  g  nameg  fold-layoutg  documentationf 	A traversal combinator in the spirit of SSAX's @ref{sxml transform
pre-post-order,,pre-post-order}.

@code{fold-layout} was originally presented in Andy Wingo's 2007 paper,
@emph{Applications of fold to XML transformation}.

@example
bindings := (<binding>...)
binding  := (<tag> <bandler-pair>...)
          | (*default* . <post-handler>)
          | (*text* . <text-handler>)
tag      := <symbol>
handler-pair := (pre-layout . <pre-layout-handler>)
          | (post . <post-handler>)
          | (bindings . <bindings>)
          | (pre . <pre-handler>)
          | (macro . <macro-handler>)
@end example

@table @var
@item pre-layout-handler
A function of three arguments:

@table @var
@item kids
the kids of the current node, before traversal
@item params
the params of the current node
@item layout
the layout coming into this node
@end table

@var{pre-layout-handler} is expected to use this information to return a
layout to pass to the kids. The default implementation returns the
layout given in the arguments.

@item post-handler
A function of five arguments:
@table @var
@item tag
the current tag being processed
@item params
the params of the current node
@item layout
the layout coming into the current node, before any kids were processed
@item klayout
the layout after processing all of the children
@item kids
the already-processed child nodes
@end table

@var{post-handler} should return two values, the layout to pass to the
next node and the final tree.

@item text-handler
@var{text-handler} is a function of three arguments:
@table @var
@item text
the string
@item params
the current params
@item layout
the current layout
@end table

@var{text-handler} should return two values, the layout to pass to the
next node and the value to which the string should transform.
@end table
 CRC       g  m
		,  g  filenamef  sxml/fold.scm		
 	&
	)
	4
	@
		Q
	\
	o
"n	s
 
	"p
   C6              ccache/sxml/match.go                                                                                0000644                 00000277563 15154557173 0010421 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0[     ] 4     hx      ] g  guile	 	g  define-module*	 	 	g  sxml	g  match	 		g  filenameS	
f  sxml/match.scm	g  importsS	g  srfi	g  srfi-1	 	 	g  srfi-11	 	 	g  ice-9	g  control	 	 	 	g  exportsS	g  
sxml-match	g  sxml-match-let	g  sxml-match-let*	 	g  set-current-module	 	 	 g  make-syntax-transformer	!  	"  	#g  syntax-object->datum	$g  macro	%g  $sc-dispatch	&% 	'% 	(g  any	)(( 	*g  syntax-object	+g  syntax->datum	,g  top	-, 	.g  ribcage	/g  dummy	0g  stx	1/0 	2g  m-cd60791-1	32, 	43- 	5f  l-cd60791-6	6f  l-cd60791-7	756 	8.147 	9. 	:g  x	;: 	<3 	=f  l-cd60791-3	>= 	?.;<> 	@-89? 	Ag  hygiene	BA 	C*+@B 	Dg  syntax-violation	ED 	FD 	Gf  -source expression failed to match any pattern	Hg  void	I( 	Jg  *unspecified*	K/ 	Lg  m-cd60791-b	ML, 	NM 	Of  l-cd60791-10	PO 	Q.KNP 	Rf  l-cd60791-d	SR 	T.;NS 	U-Q9T 	V*JUB 	Wg  throw	Xg  sxml-match-error	Yg  raise-syntax-error	Zg  module	[g  free-id	\g  provide	]g  m-cd60791-1a	^], 	_^ 	`f  l-cd60791-1c	a` 	b.;_a 	c-9b 	d*\cB 	e[d 	fg  each-any	gef	hg  require	i*hcB 	j[i 	kjf	lkf	mgl	n(m	o(n	p(o	qg  begin	rg  name	sg  lang	tg  p_	ug  r_	vg  body	w/rstuv 	x^----- 	yf  l-cd60791-1f	zf  l-cd60791-20	{f  l-cd60791-21	|f  l-cd60791-22	}f  l-cd60791-23	~f  l-cd60791-24	yz{|}~  .wx  -9b  *qB  g  nodeset? g  error g  xml-element-tag f  expected an xml-element, given g  xml-element-attributes g  
fold-right g  @ g  filter g  xml-element-contents g  match-xml-attribute g  member g  filter-attributes g  compile-clause g  map f(  g  
let-values g  cata-binding g  body-stx   --  f  l-cd60791-b1 f  l-cd60791-b2   .  g  	cata-defs v  f  l-cd60791-ac f  l-cd60791-ad   .  g  sxml-match-syntax-error g  	ellipsis? g  literal? g  keyword? g  extract-cata-fun g  add-pat-var g  add-cata-def g  process-cata-exp g  process-cata-defs g  cata-defs->pvar-lst g  process-output-action g  compile-element-pat g  compile-end-element g  compile-attr-list g  compile-item-list g  compile-dotted-pattern-list g  compile-item   -----------------  f  l-cd60791-31 f  l-cd60791-32 f  l-cd60791-33 f  l-cd60791-34 f  l-cd60791-35 f  l-cd60791-36 f  l-cd60791-37 f  l-cd60791-38 f  l-cd60791-39 f  l-cd60791-3a f  l-cd60791-3b f  l-cd60791-3c f  l-cd60791-3d f  l-cd60791-3e f  l-cd60791-3f f  l-cd60791-40 f  l-cd60791-41   .  0  -  f  l-cd60791-30   .  -999  *B  g  identifier? (( (ό g  ... g  quote g  lst   f  l-cd60791-fe   .  g  process-quasiquote g  expand-quasiquote-body g  expand-dotted-item g  select-dotted-vars g  merge-pvars g  dotted-var? g  member-var? g  
expand-lst g  finite-lst?  	 --------- 	 f  l-cd60791-e0 f  l-cd60791-de f  l-cd60791-dc f  l-cd60791-da f  l-cd60791-d8 f  l-cd60791-d6 f  l-cd60791-d4 f  l-cd60791-d2 f  l-cd60791-d0  	 .  g  action g  dotted-vars   f  l-cd60791-ce f  l-cd60791-cf   .  -99  *B    g  cons g  exp-lft g  exp-rgt   f  l-cd60791-122 f  l-cd60791-123   .  g  fstg  rst  f  l-cd60791-11bf  l-cd60791-11c . -999 *B 	g  append
f  l-cd60791-116f  l-cd60791-117
 . g  dots  --- f  l-cd60791-10df  l-cd60791-10ef  l-cd60791-10f . -999 *	B g  bound-identifier=?g  free-identifier=?g  unquoteg  y f  l-cd60791-13d .  g  walk-quasi-body!  "- #f  l-cd60791-13a$# %.!"$ &f  l-cd60791-139'& (.;' )-9%(9 
**)B +[* ,+( -,(.g  unquote-splicing/*.)B 0[/ 10( 21(3-%(9 4*3B 5[4 65(7g  
quasiquote8*73B 9[8 :9(;g  dv<; =f  l-cd60791-174>= ?.<> @f  l-cd60791-16fA@ B.;A Cg  dvarsDC Ef  l-cd60791-167FE G.DF Hg  itemIH Jf  l-cd60791-166KJ L.IK M-9?B9G9L9 N*MB Og  lambdaP*OMB Qf  l-cd60791-179RQ S.;R T-9S9 U*7TB V[U WV(X*TB Y[X ZY( [g  expanded-item\[ ]f  l-cd60791-183^] _.\^ `f  l-cd60791-17fa` b.Ia c-9_b9S9 d*cB e*.TB f[e gf( hf  l-cd60791-18aih j.\i kf  l-cd60791-186lk m.Il n-9jm9S9 o*.nB pZόqH rf  l-cd60791-1a7sf  l-cd60791-1a8tf  l-cd60791-1a9urst v.qu w-v9S9 	x*7wB yg  expanded-rstz[y {f  l-cd60791-1b0|f  l-cd60791-1b1}{| ~.z} -9~v9S9 *.B f  l-cd60791-19cf  l-cd60791-19d .z f  l-cd60791-193f  l-cd60791-194f  l-cd60791-195 .q -99S9 *.B f  bad quasiquote-formg  s f  l-cd60791-5b . g  msgg  expg  sub f  l-cd60791-56f  l-cd60791-57f  l-cd60791-58 . -999 *B -9 *B [ (*7B [ (g  applyf  l-cd60791-1e6f  l-cd60791-1e7 . f  l-cd60791-1d8f  l-cd60791-1d9 . -99 	*B g  eleg  nextpg  fail-kg  pvar-lstg  depthg  cata-fun 	--------- 	f  l-cd60791-1f5f  l-cd60791-1f6f  l-cd60791-1f7f  l-cd60791-1f8f  l-cd60791-1f9f  l-cd60791-1faf  l-cd60791-1fbf  l-cd60791-1fcf  l-cd60791-1fd 	. -99 *B [ (((ƌg  generate-temporaries(((( g  ifg  bxg  fail-to:v ---- f  l-cd60791-23df  l-cd60791-23ef  l-cd60791-23ff  l-cd60791-240 . g  testsg  new-pvar-lstg  new-cata-defsg  new-dotted-vars f  l-cd60791-236f  l-cd60791-237f  l-cd60791-238f  l-cd60791-239 . g  body-exp f  l-cd60791-22f . g  tagg  items f  l-cd60791-22bf  l-cd60791-22c . -999999 *B g  and*B g  pair?*B g  eq?*B *B *B g  let*B *B ((((( g  ax:v ----- f  l-cd60791-21cf  l-cd60791-21df  l-cd60791-21e f  l-cd60791-21ff  l-cd60791-220  . f  l-cd60791-215f  l-cd60791-216f  l-cd60791-217f  l-cd60791-218 	. 
g  attr-exp
 f  l-cd60791-20cf  l-cd60791-20d . g  
attr-items f  l-cd60791-206f  l-cd60791-207f  l-cd60791-208 . -99	9999 *B *B *B *B *B *B *B *B  *B !g  attr-lst"g  body-lst#g  attr-key-lst$!"
# %------------ &f  l-cd60791-26f'f  l-cd60791-270(f  l-cd60791-271)f  l-cd60791-272*f  l-cd60791-273+f  l-cd60791-274,f  l-cd60791-275-f  l-cd60791-276.f  l-cd60791-277/f  l-cd60791-2780f  l-cd60791-2791f  l-cd60791-27a2&'()*+,-./01 3.$%2 4-939 5*4B 6[5 76( 8g  ->9*84B :[9 ;:f<(;=6< >=( ?(> @?(A6f BA( C(B DC(E7( F(E GF(H(= IH(J(A KJ(L(7 ML(N(f ON(P)(Qg  string?Rg  char?Sg  number?Tg  boolean?U((( Vv Wf  l-cd60791-3b1Xf  l-cd60791-3b2Yf  l-cd60791-3b3ZWXY [.VZ \f  l-cd60791-3aa]f  l-cd60791-3ab^f  l-cd60791-3ac_f  l-cd60791-3ad`\]^_ a.` bg  atagcg  literaldbc ef  l-cd60791-39fff  l-cd60791-3a0gf  l-cd60791-3a1hefg i.dh j-9[9ai939 k*jB lg  bindingm*ljB n*jB o*jB p*jB qg  equal?r*qjB sg  cadrt*sjB utm vg  kwdwg  ixbw yf  l-cd60791-390zf  l-cd60791-391{f  l-cd60791-392|yz{ }.x| ~-}939 *v~B f  bad attribute patternf  l-cd60791-380f  l-cd60791-381f  l-cd60791-382 .x -939 *vB f  l-cd60791-373f  l-cd60791-374f  l-cd60791-375 .V f  l-cd60791-36cf  l-cd60791-36df  l-cd60791-36ef  l-cd60791-36f . g  varb f  l-cd60791-361f  l-cd60791-362f  l-cd60791-363 . -99939 *B *lB *B *B *B *sB   f  <sxml-match pattern: catamorphism not allowed in this contextg  ctv f  l-cd60791-350f  l-cd60791-351f  l-cd60791-352f  l-cd60791-353 . f  l-cd60791-349f  l-cd60791-34af  l-cd60791-34bf  l-cd60791-34c . g  ctemp f  l-cd60791-33f . g  cvarb f  l-cd60791-339f  l-cd60791-33af  l-cd60791-33b . -999939 *B *lB *B *B *B *sB   f  l-cd60791-32af  l-cd60791-32bf  l-cd60791-32cf  l-cd60791-32d . f  l-cd60791-323f  l-cd60791-324f  l-cd60791-325f  l-cd60791-326 . f  l-cd60791-31a . g  catab f  l-cd60791-312f  l-cd60791-313f  l-cd60791-314f  l-cd60791-315 . -9999939 *B *lB *B *B *B *sB   v f  l-cd60791-305f  l-cd60791-306 . f  l-cd60791-2fef  l-cd60791-2fff  l-cd60791-300f  l-cd60791-301 . g  defaultb f  l-cd60791-2f1f  l-cd60791-2f2f  l-cd60791-2f3f  l-cd60791-2f4 . -99939 *B *lB *B *B *B  *sB   v f  l-cd60791-2e0f  l-cd60791-2e1f  l-cd60791-2e2 . f  l-cd60791-2d9	f  l-cd60791-2da
f  l-cd60791-2dbf  l-cd60791-2dc	
 . f  l-cd60791-2cf . b f  l-cd60791-2c7f  l-cd60791-2c8f  l-cd60791-2c9f  l-cd60791-2ca . -999939 *B *lB *B *B *B *sB   f  l-cd60791-2b8!f  l-cd60791-2b9"f  l-cd60791-2ba# !" $.# %f  l-cd60791-2b1&f  l-cd60791-2b2'f  l-cd60791-2b3(f  l-cd60791-2b4)%&'( *.) +f  l-cd60791-2a8,+ -., .b /f  l-cd60791-29e0f  l-cd60791-29f1f  l-cd60791-2a02f  l-cd60791-2a13f  l-cd60791-2a24/0123 5..4 6-9$9*99-5939 7*6B 8*l6B 9*6B :*6B ;*6B <*s6B =<8 >g  matched-attrs?>v @f  l-cd60791-28dAf  l-cd60791-28eBf  l-cd60791-28fC@AB D.?C Ef  l-cd60791-286Ff  l-cd60791-287Gf  l-cd60791-288Hf  l-cd60791-289IEFGH J.I K Lf  l-cd60791-27fML N.KM O-9D9JN939 P*OB Q*OB R*OB S:v Tf  l-cd60791-25dUf  l-cd60791-25eVf  l-cd60791-25fWTUV X.SW Yg  
next-testsZY [f  l-cd60791-256\f  l-cd60791-257]f  l-cd60791-258^f  l-cd60791-259_[\]^ `.Z_ a b------ cf  l-cd60791-24bdf  l-cd60791-24cef  l-cd60791-24dff  l-cd60791-24egf  l-cd60791-24fhf  l-cd60791-250icdefgh j.abi k-9X9`99j9 l*kB mg  null?n*mkB og  ellipsis-allowed?po 
q---------- 
rf  l-cd60791-3c2sf  l-cd60791-3c3tf  l-cd60791-3c4uf  l-cd60791-3c5vf  l-cd60791-3c6wf  l-cd60791-3c7xf  l-cd60791-3c8yf  l-cd60791-3c9zf  l-cd60791-3ca{f  l-cd60791-3cb|rstuvwxyz{ 
}.pq| ~-9}9 *~B [ ( *8~B [ f( :v f  l-cd60791-3f8f  l-cd60791-3f9f  l-cd60791-3fa . f  l-cd60791-3f1f  l-cd60791-3f2f  l-cd60791-3f3f  l-cd60791-3f4 .Z f  l-cd60791-3e8 .  f  l-cd60791-3e4f  l-cd60791-3e5 . -99999}9 *B f  1improper list pattern not allowed in this context-9}9 *B f f  l-cd60791-412f  l-cd60791-413f  l-cd60791-414 . f  l-cd60791-40bf  l-cd60791-40cf  l-cd60791-40df  l-cd60791-40e .Z f  l-cd60791-401 .  f  l-cd60791-3ff . -9999}9 *B g  tailH 
f  l-cd60791-43cf  l-cd60791-43df  l-cd60791-43ef  l-cd60791-43ff  l-cd60791-440f  l-cd60791-441f  l-cd60791-442f  l-cd60791-443f  l-cd60791-444f  l-cd60791-445 
.q -9999 *B g  valuesg  npv f  l-cd60791-458 .  f  l-cd60791-452f  l-cd60791-453f  l-cd60791-454 . -999999 *B *B g  fail*B g  t-cd60791-446g  t-cd60791-447g  t-cd60791-448g  t-cd60791-449 g  m-cd60791-44e,  f  l-cd60791-45ff  l-cd60791-460f  l-cd60791-461f  l-cd60791-462 . -99999 
*B f  l-cd60791-46e . g  new-exp f  l-cd60791-467f  l-cd60791-468f  l-cd60791-469f  l-cd60791-46a . -9999999 *B *B g  cdr*B *B  *B w f  l-cd60791-4bf . g  temp-item-pvar-lst f  l-cd60791-492  .  g  final-testsg  final-pvar-lstg  final-cata-defsg  final-dotted-vars f  l-cd60791-48ef  l-cd60791-48f	f  l-cd60791-490
f  l-cd60791-491	
 . g  
item-testsg  item-pvar-lstg  item-cata-defsg  item-dotted-varsg  
tail-testsg  tail-pvar-lstg  tail-cata-defsg  tail-dotted-vars -------- f  l-cd60791-479f  l-cd60791-47af  l-cd60791-47bf  l-cd60791-47cf  l-cd60791-47df  l-cd60791-47ef  l-cd60791-47ff  l-cd60791-480  . !g  t-cd60791-44a"g  t-cd60791-44b#g  t-cd60791-44c$g  t-cd60791-44d%!"#$ &f  l-cd60791-475'f  l-cd60791-476(f  l-cd60791-477)f  l-cd60791-478*&'() +.%* ,-99999 9+9999 -*H,B .- /f  l-cd60791-4c10/ 1.0 2-919999 9+9999 3*H2B 43 5f  l-cd60791-4c365 7.6 8-979999 9+9999 9*8B :9 ;g  xa<g  xb=;< >f  l-cd60791-4cb?f  l-cd60791-4cc@>? A.=@ Bg  aCg  bDBC Ef  l-cd60791-4c6Ff  l-cd60791-4c7GEF H.DG I-9A99H9999 9+9999 J*IB K(((((fffffff Lg  letrecMg  	tail-bodyNg  	item-bodyOg  
final-bodyPg  ipvQg  gpvRg  tpvSg  	item-voidTg  	tail-voidUg  	item-nullVg  	item-consW:MNOPQRSTUV Xf  l-cd60791-497Yf  l-cd60791-498Zf  l-cd60791-499[f  l-cd60791-49a\f  l-cd60791-49b]f  l-cd60791-49c^f  l-cd60791-49d_f  l-cd60791-49e`f  l-cd60791-49faf  l-cd60791-4a0bf  l-cd60791-4a1cf  l-cd60791-4a2dXYZ[\]^_`abc e.W%d f-9e9999 9+9999 g*LfB hg  
match-taili*hfB j*OfB k*fB l*fB mkl ng  
match-itemo*nfB pk q*fB r*fB s*fB tg  match-dottedu*tfB v*fB wg  tail-resx*wfB y*fB z	 {	 |g  res}*|fB ~g  new-x*~fB u  g  last-tail-res*fB f  $ellipses not allowed in this context:v f  l-cd60791-3dff  l-cd60791-3e0 . f  l-cd60791-3d8f  l-cd60791-3d9f  l-cd60791-3daf  l-cd60791-3db .Z f  l-cd60791-3d1 .K -999}9 *B -9}9 *B H 	f  l-cd60791-4d8f  l-cd60791-4d9f  l-cd60791-4daf  l-cd60791-4dbf  l-cd60791-4dcf  l-cd60791-4ddf  l-cd60791-4def  l-cd60791-4dff  l-cd60791-4e0 	. -99 *B [ ( *8B [ f( g  nx:v f  l-cd60791-514f  l-cd60791-515f  l-cd60791-516f  l-cd60791-517f  l-cd60791-518 . f  l-cd60791-50df  l-cd60791-50ef  l-cd60791-50ff  l-cd60791-510 .Z  f  l-cd60791-502f  l-cd60791-503 . f  l-cd60791-4fef  l-cd60791-4ff . -999999 *B *B *B *B g  car*B f f  l-cd60791-534f  l-cd60791-535f  l-cd60791-536f  l-cd60791-537f  l-cd60791-538 . f  l-cd60791-52df  l-cd60791-52ef  l-cd60791-52ff  l-cd60791-530 .Z f  l-cd60791-521f  l-cd60791-522 . f  l-cd60791-51f . -99999 *B *B *B *B *B (ff  +bad pattern syntax (not an element pattern)f  7bad pattern syntax (symbol not allowed in this context):v f  l-cd60791-594f  l-cd60791-595f  l-cd60791-596f  l-cd60791-597 . f  l-cd60791-58df  l-cd60791-58ef  l-cd60791-58ff  l-cd60791-590 .Z  f  l-cd60791-586 . c f  l-cd60791-584 . -999999 *B  *B *B *qB *B *B *B f  l-cd60791-54d .; 	f  l-cd60791-547
	 .
 H f  l-cd60791-543f  l-cd60791-544 . -999999 *B :v f  l-cd60791-561f  l-cd60791-562f  l-cd60791-563 . f  l-cd60791-55af  l-cd60791-55bf  l-cd60791-55cf  l-cd60791-55d .Z g  more-pvar-lst g  more-cata-defs!g  more-dotted-vars" ! #f  l-cd60791-552$f  l-cd60791-553%f  l-cd60791-554&#$% '."& (-9999'99999 )*(B **(B +f  l-cd60791-572,f  l-cd60791-573-f  l-cd60791-574.+,- /.S. 0g  after-tests1g  after-pvar-lst2g  after-cata-defs3g  after-dotted-vars40123 5f  l-cd60791-56b6f  l-cd60791-56c7f  l-cd60791-56d8f  l-cd60791-56e95678 :.49 ;-9/9:9999 <*;B =*;B >f  l-cd60791-4f5?f  l-cd60791-4f6@f  l-cd60791-4f7Af  l-cd60791-4f8B>?@A C.B Df  l-cd60791-4eeEf  l-cd60791-4efFf  l-cd60791-4f0Gf  l-cd60791-4f1HDEFG I.ZH Jf  l-cd60791-4e7KJ L.K Mf  l-cd60791-4e5NM O.KN P-9C9I99LO99 Q*PB R*PB S*PB T*PB U*PB Vf  &duplicate pattern variable not allowedWg  nctXWv Yf  l-cd60791-a4Zf  l-cd60791-a5[f  l-cd60791-a6\YZ[ ].X\ ^g  	new-ctemp_^ `f  l-cd60791-9fa` b._a cg  cfundc ef  l-cd60791-95ff  l-cd60791-96gf  l-cd60791-97hefg i.dh j-9]99b9i9 k*jB l*OjB m nf  l-cd60791-59con p.mo q-9p99 r*qB s[r ts( ug  guardv*uqB w[v xwfyx挤zty{(z((( |*8qB }[| ~}f(~s y(((( g  gexpg  action0g  fail-exp 	f  l-cd60791-5c3f  l-cd60791-5c4f  l-cd60791-5c5f  l-cd60791-5c6f  l-cd60791-5c7f  l-cd60791-5c8f  l-cd60791-5c9f  l-cd60791-5caf  l-cd60791-5cb 	. -9p99 *B *B *B *qB sf y(((( g  atom  f  l-cd60791-5d9f  l-cd60791-5daf  l-cd60791-5dbf  l-cd60791-5dcf  l-cd60791-5ddf  l-cd60791-5def  l-cd60791-5dff  l-cd60791-5e0 . -9p99 *B *B *B *qB t挤(((( 挤((((  f  l-cd60791-60cf  l-cd60791-60df  l-cd60791-60ef  l-cd60791-60ff  l-cd60791-610f  l-cd60791-611f  l-cd60791-612f  l-cd60791-613 . -9p99 *B 挤((((  ------- f  l-cd60791-61ff  l-cd60791-620f  l-cd60791-621f  l-cd60791-622f  l-cd60791-623f  l-cd60791-624f  l-cd60791-625 . -9p99 *B y(((( 挤(((( fy(((( f挤(((( (y(((( (挤(((( c f  l-cd60791-7c0f  l-cd60791-7c1f  l-cd60791-7c2f  l-cd60791-7c3f  l-cd60791-7c4f  l-cd60791-7c5f  l-cd60791-7c6 . -9p99 *B *qB *qB c f  l-cd60791-79ff  l-cd60791-7a0f  l-cd60791-7a1f  l-cd60791-7a2f  l-cd60791-7a3f  l-cd60791-7a4f  l-cd60791-7a5f  l-cd60791-7a6 . -9p99 *B *B *qB *qB f  l-cd60791-71bf  l-cd60791-71cf  l-cd60791-71d .   f  l-cd60791-707f  l-cd60791-708f  l-cd60791-709f  l-cd60791-70a f  l-cd60791-70bf  l-cd60791-70cf  l-cd60791-70df  l-cd60791-70e  . -999p99 *qB g  failure	-99 
*	B v f  l-cd60791-72af  l-cd60791-72b . g  result f  l-cd60791-723f  l-cd60791-724f  l-cd60791-725f  l-cd60791-726 . -9999p99 *B f  l-cd60791-6dbf  l-cd60791-6dcf  l-cd60791-6dd .   	 f  l-cd60791-6c5!f  l-cd60791-6c6"f  l-cd60791-6c7#f  l-cd60791-6c8$f  l-cd60791-6c9%f  l-cd60791-6ca&f  l-cd60791-6cb'f  l-cd60791-6cc(f  l-cd60791-6cd) !"#$%&'( 	*.) +-99*9p99 ,*q+B -v .f  l-cd60791-6e1/f  l-cd60791-6e20./ 1.-0 2-9199*9p99 3*2B 4*2B 5f  l-cd60791-6f26f  l-cd60791-6f3756 8.7 9f  l-cd60791-6eb:f  l-cd60791-6ec;f  l-cd60791-6ed<f  l-cd60791-6ee=9:;< >.= ?-9899>*9p99 @*?B Ag  listBf  l-cd60791-69fCf  l-cd60791-6a0Df  l-cd60791-6a1EBCD F.E G Hf  l-cd60791-68bIf  l-cd60791-68cJf  l-cd60791-68dKf  l-cd60791-68eLf  l-cd60791-68fMf  l-cd60791-690Nf  l-cd60791-691Of  l-cd60791-692PHIJKLMNO Q.GP R-9F9Q9p99 S*qRB Tf  l-cd60791-6aeUf  l-cd60791-6afVTU W.-V Xf  l-cd60791-6a7Yf  l-cd60791-6a8Zf  l-cd60791-6a9[f  l-cd60791-6aa\XYZ[ ].\ ^-9W99]Q9p99 _*^B `*^B a*^B bf  l-cd60791-65ccf  l-cd60791-65ddf  l-cd60791-65eebcd f.e g 	hf  l-cd60791-646if  l-cd60791-647jf  l-cd60791-648kf  l-cd60791-649lf  l-cd60791-64amf  l-cd60791-64bnf  l-cd60791-64cof  l-cd60791-64dpf  l-cd60791-64eqhijklmnop 	r.gq s-9f9r9p99 t*qsB ug  exp-bodyvu wf  l-cd60791-662xf  l-cd60791-663ywx z.vy {-9z9f9r9p99 |*{B }*{B ~f  l-cd60791-673f  l-cd60791-674~ . f  l-cd60791-66cf  l-cd60791-66df  l-cd60791-66ef  l-cd60791-66f . -999r9p99 *B *B *B  f  l-cd60791-5fcf  l-cd60791-5fdf  l-cd60791-5fef  l-cd60791-5fff  l-cd60791-600f  l-cd60791-601f  l-cd60791-602 . -9p99 *B  f  l-cd60791-5b0f  l-cd60791-5b1f  l-cd60791-5b2f  l-cd60791-5b3f  l-cd60791-5b4f  l-cd60791-5b5f  l-cd60791-5b6f  l-cd60791-5b7 . -9p99 *B *B *B *qB g  sxml-match1g  clause/ g  m-cd60791-7cf, --- f  l-cd60791-7d4f  l-cd60791-7d5f  l-cd60791-7d6f  l-cd60791-7d7 .  f  l-cd60791-7d1 .; -9 *B *OB *B *B *B  f  no matching clause found*B    (֌(Čg  let/ecg  clause0/ ---- f  l-cd60791-7ddf  l-cd60791-7def  l-cd60791-7dff  l-cd60791-7e0f  l-cd60791-7e1 . -9 *B g  escape*B *B *OB g  call-with-values*B *B  g  val/ g  m-cd60791-7e8, --- f  l-cd60791-7edf  l-cd60791-7eef  l-cd60791-7eff  l-cd60791-7f0 .  f  l-cd60791-7ea .; -9 *LB *cB *OB *B  *B g  sxml-match-let1挤(((g  syntagg  synformg  body0/v g  m-cd60791-7f6, ---- f  l-cd60791-7fbf  l-cd60791-7fcf  l-cd60791-7fd f  l-cd60791-7fef  l-cd60791-7ff  .  f  l-cd60791-7f8 .; -9 	*B 
) 
挤(((g  pat/v ------ f  l-cd60791-807f  l-cd60791-808f  l-cd60791-809f  l-cd60791-80af  l-cd60791-80bf  l-cd60791-80cf  l-cd60791-80d . -9 *B *B *B *OB  *B !*B "f  could not match pattern ~s#*"B $g  each%$) &)%'&挤((')((*()+g  pat0,g  exp0-/+,v 	.-------- 	/f  l-cd60791-8170f  l-cd60791-8181f  l-cd60791-8192f  l-cd60791-81a3f  l-cd60791-81b4f  l-cd60791-81c5f  l-cd60791-81d6f  l-cd60791-81e7f  l-cd60791-81f8/01234567 	9.-.8 :-99 ;*:B <*:B = > ?*:B @*O:B A*:B B*:B C*":B Dg  sxml-match-let-helpE%挤F(EG(FH(GIg  	temp-nameJI Kf  l-cd60791-841LK M.JL NDv Of  l-cd60791-830Pf  l-cd60791-831Qf  l-cd60791-832Rf  l-cd60791-833Sf  l-cd60791-834Tf  l-cd60791-835Uf  l-cd60791-836VOPQRSTU W.NV Xf  l-cd60791-82dYX Z.Y [-9MW9Z \*[B ]*[B ^ _f  l-cd60791-859`_ a.^` bv cf  l-cd60791-84ddf  l-cd60791-84eef  l-cd60791-84fff  l-cd60791-850gf  l-cd60791-851hcdefg i.bh jf  l-cd60791-84akj l.k m-9ai9l n*DmB ov pf  l-cd60791-862qf  l-cd60791-863rf  l-cd60791-864spqr t.os uf  l-cd60791-85fvu w.v x-t9w y*xB zf  l-cd60791-87a{z |.^{ }+,v ~f  l-cd60791-86af  l-cd60791-86bf  l-cd60791-86cf  l-cd60791-86df  l-cd60791-86ef  l-cd60791-86ff  l-cd60791-870~ .} -9|9w *DB C 5   hx     ]4	
5 4 >  "  G   4"#$')C  h   >   ] C      6       g  dummy
		
 g  stx		
  		
	   CFG   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  sxml/match.scm
	+
 		"  g  
macro-typeg  syntax-rulesg  patternsg  stx   C5#R4"H$'IV h   -   ]C   %       g  dummy
		  		   CFG    h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  sxml/match.scm
	.
 		"  g  
macro-typeg  syntax-rulesg  patterns  C5HRWX    h      ] 6       g  x
		 g  msg		 g  obj			 g  sub			  g  filenamef  sxml/match.scm
	1
		2				2	 			  g  nameg  raise-syntax-error CYR4"Z$'p h      ]C{       g  dummy
		 g  name		 g  lang			 g  p_			 g  r_			 g  body			  			   CFG      h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  sxml/match.scm
	5	 		"  g  
macro-typeg  syntax-rulesg  patternsg  nameg  langg  provideg  p_g  ... g  requireg  r_g  ... g  bodyg  ...   C5ZR  h(      ]	 $  	 "  $  C C             g  x
		" g  t		"  g  filenamef  sxml/sxml-match.ss
												%										!		0 			"  g  nameg  nodeset? CR   h0      ]"  
 6 $   $   C""            g  s
		+  g  filenamef  sxml/sxml-match.ss
			
					 															 							"		 		+  g  nameg  xml-element-tag CR        h      ] $  
 "  C  }       g  i
		  g  filenamef  sxml/sxml-match.ss
		&			<				7			K			N			F			2 		   C   h(      ]"   C $   &  C""        g  c
		' g  d		'  g  filenamef  sxml/sxml-match.ss
		*		!	0			,			5			,			D			G			0 			'	   C h8      ] $  & &  (  	 6 6CC             g  a
		2 g  b		2  g  filenamef  sxml/sxml-match.ss
												.			1									Z	!			*	"	,	,		 		2	   C h8      ]"  
 6 $   $  
 6""              g  s
		1  g  filenamef  sxml/sxml-match.ss
			
	&			&	'		&													 							$	$		'	%		)		 		1  g  nameg  xml-element-attributes CR      h      ] $  
 "  C  }       g  i
		  g  filenamef  sxml/sxml-match.ss
	*			+				+			+	+		+	.		+	&		+	 		   C        h0      ]"  
 6 $   $  	 6""       g  s
		0  g  filenamef  sxml/sxml-match.ss
	(		
	-			-	%		-			)			)			)			)	 		)			)		&	,		(	*	 		0  g  nameg  xml-element-contents CR h(      ]$   &  C 6C             g  key
		" g  l		"  g  filenamef  sxml/sxml-match.ss
	/			0				0			2			2			2			3			4	%	 	4	 
		"	  g  nameg  match-xml-attribute CR       h8      ](  C4 5$  	 64 5C              g  keys
		1 g  lst		1  g  filenamef  sxml/sxml-match.ss
	6			7				8			9			9			9			9		 	:	$	"	:		%	;		&	;		-	;	4	/	;		0	;	 		1	  g  nameg  filter-attributes CR4"$')    h   >   ]  C      6       g  bvar
		
 g  bval		
  		
	   CFG   h@      ] 4L    5 45$  @6         g  def
		> g  tmp		> g  tmp		'	>  g  filenamef  sxml/sxml-match.ss
	v	&		w	<		x	<		x	N		y	N		z	N		x	<		w	( 			>   C'      h   J   ]  C    B       g  cata-binding
		 g  body-stx		  			   CFG       h@      ] (  C4L O  5 45$  @6       g  	cata-defs
		@ g  body		@ g  tmp			@ g  tmp		)	@  g  filenamef  sxml/sxml-match.ss
	r			s			v	!		u	 		@	  g  nameg  process-cata-defs C h   Z   ] 6R       g  item
		  g  filenamef  sxml/sxml-match.ss	 	 		   C    h   ,   ]C    $       g  item
		  		   C'h      ] C           		
   C h   j   ]L 6b       g  fst
		 g  rst		  g  filenamef  sxml/sxml-match.ss	 	 			   CFG+        h       ]45$  45CC             g  fst
		 g  dots		 g  rst			  g  filenamef  sxml/sxml-match.ss		E			E			E	*		E	/		E	% 			   C   h   N   ]C    F       g  fst
		 g  dots		 g  rst			  			   C       h      ]!  4?$  @4 5$  @4 5"  %4 5$  L O @	 6$  4
?$  @""            g  lst
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		H	d  g  filenamef  sxml/sxml-match.ss
 	 	   g  nameg  finite-lst? C'       h      ] C          		
   C h   Z   ] 6R       g  item
		  g  filenamef  sxml/sxml-match.ss	 	 		   C    h   ,   ] C   $       g  item
		  		   C')    h   D   ]  C    <       g  exp-lft
		 g  exp-rgt		  			   CFG     h8      ]4L  L54L5 45$  @6        g  fst
		7 g  rst		7 g  tmp			7 g  tmp		 	7  g  filenamef  sxml/sxml-match.ss	 	*	 	*	 	 		7	   CFG+    h       ]45$  45CC             g  fst
		 g  dots		 g  rst			  g  filenamef  sxml/sxml-match.ss		E			E			E	*		E	/		E	% 			   C') h   D   ]  C    <       g  exp-lft
		 g  exp-rgt		  			   CFG     h@      ]4L 4L L554L5 45$  @6           g  fst
		< g  dots		< g  rst			< g  tmp			< g  tmp		%	<  g  filenamef  sxml/sxml-match.ss	 	*	 	+	 	*	 	*	 	 		<	   C   h      ]!4 5$  @  4?$  @4 5"  )4 5$  LLLO @	 6$   4
?$  L LLLO @""             g  lst
	  g  tmp	
  g  tmp		  g  tmp		9  g  tmp		H	h  g  filenamef  sxml/sxml-match.ss
 	 	   g  nameg  
expand-lst C       hP     ]"  ;(  C4 5$  "  
4 5$  C""             g  var
		I g  lst		I g  lst			A g  t			2  g  filenamef  sxml/sxml-match.ss
 		 		 		 		 	6	 		 		& 		- 	5	/ 		6 		; 	 	A 		A 	 		I	  g  nameg  member-var? Ch   y   ]L L 6      q       g  var
		
  g  filenamef  sxml/sxml-match.ss
 		
 	 		
  g  nameg  dotted-var? C     h8      ] (  C4L  5$    " 4L 5C          g  lst1
		5 g  lst2		5  g  filenamef  sxml/sxml-match.ss
 		 		 		 	%	 		 		 	%	& 		) 		* 	)	/ 	6	3 	)	4 	 		5	  g  nameg  merge-pvars C'-h   z   ]L4L 54L 56    r       g  a
		 g  rst		  g  filenamef  sxml/sxml-match.ss	 	"	 	"	 	 			   C2 h   z   ]L4L 54L 56    r       g  a
		 g  rst		  g  filenamef  sxml/sxml-match.ss	 	"	 	"	 	 			   C  h   |   ]L4L  54L 56    t       g  fst
		 g  rst		  g  filenamef  sxml/sxml-match.ss	 	"	 	"	 	 			   C hh      ]4 5$  LLL O @4 5$  LLL O @4 5$  LL O @C             g  y
		b g  tmp		b g  tmp		+	b g  tmp		K	b  g  filenamef  sxml/sxml-match.ss
 		a 	 		b  g  nameg  walk-quasi-body C'6    h   Y   ]C    Q       g  rst
		  g  filenamef  sxml/sxml-match.ss	 	! 		   C:  h   Y   ]L  6Q       g  rst
		  g  filenamef  sxml/sxml-match.ss	 	& 		   C   h   |   ]L4L  54L 56    t       g  fst
		 g  rst		  g  filenamef  sxml/sxml-match.ss	 	 	 	 	 	 			   C      h   l   ]4 5$  L  6C   d       g  item
		  g  filenamef  sxml/sxml-match.ss	 		 		 	 		   C  h   Z   ]  CR       g  item
		  g  filenamef  sxml/sxml-match.ss	 	 		   C   h      ])O LLQ 4 5$  @4 5$  O @4 5$  LLO @  4	L O ?$  
@C          g  x
	  g  walk-quasi-body	  g  tmp		  g  tmp		5  g  tmp		Q  g  tmp		k   g  filenamef  sxml/sxml-match.ss
 	  	 	   g  nameg  select-dotted-vars C   h   W   ] 6O       g  x
		  g  filenamef  sxml/sxml-match.ss	 	 		   C       h   )   ] C   !       g  x
		  		   C'fNP h   *   ] L   C      "       g  dv
		  		   CFG       hH      ]4L  5  4?$  @45$   O @6       g  item
		H g  dvars			H g  tmp			H g  tmp		,	H  g  filenamef  sxml/sxml-match.ss
 		 			 	 		H  g  nameg  expand-dotted-item C'W  h   Y   ]LL 6Q       g  rst
		  g  filenamef  sxml/sxml-match.ss	 	& 		   CZd     h   s   ]	4L  L5 C   k       g  item
		 g  tmp		  g  filenamef  sxml/sxml-match.ss	 	0	 	 		   Cgo   h   s   ]	4L  L5 C   k       g  item
		 g  tmp		  g  filenamef  sxml/sxml-match.ss	 	0	 	 		   Cp')       h   N   ] CF       g  expanded-fst
		 g  expanded-rst		  			   CFG   h8      ]4L  54L 5 45$  @6          g  fst
		5 g  rst		5 g  tmp			5 g  tmp			5  g  filenamef  sxml/sxml-match.ss	 	/	
 	/	 	 		5	   C+        h       ]45$  45CC             g  item
		 g  dots		 g  rst			  g  filenamef  sxml/sxml-match.ss		E			E			E	*		E	/		E	% 			   Cx')     h   O   ]  C   G       g  expanded-item
		 g  expanded-rst		  			   CFG  hH      ]4L 4L  L554L5 45$  @6              g  item
		A g  dots		A g  rst			A g  tmp			A g  tmp		*	A  g  filenamef  sxml/sxml-match.ss	 	0	 	1	 	0	 	/	 	 		A	   C+   h       ]45$  45CC             g  item
		 g  dots		 g  rst			  g  filenamef  sxml/sxml-match.ss		E			E			E	*		E	/		E	% 			   C')        h   O   ]  C   G       g  expanded-item
		 g  expanded-rst		  			   CFG  h@      ]4L 4L L554L5 45$  @6           g  item
		< g  dots		< g  rst			< g  tmp			< g  tmp		%	<  g  filenamef  sxml/sxml-match.ss	 	0	 	1	 	0	 	/	 	 		<	   C  h      ]14 5$   LO @4 5$  L LO @4 5$  L LO @4 5"  X4 	5"  4 
5$  LO @ C$   4?$  LLL LO @""$   4?$  LLL LO @""~          g  x
	  g  tmp	  g  tmp		)  g  tmp		G  g  tmp		e  g  tmp		t  g  tmp	    g  filenamef  sxml/sxml-match.ss
 	 	   g  nameg  expand-quasiquote-body C')  h      ]
4L 5  C            g  
quasiquote
		 g  term		 g  tmp				  g  filenamef  sxml/sxml-match.ss	 	B		 	% 			   CY h0      ]	4 5$  LO @L   6         g  x
		. g  tmp		.  g  filenamef  sxml/sxml-match.ss
 		# 	1	.	B	 		.  g  nameg  process-quasiquote C'   h   +   ]L C   #       g  rst
		  		   Ch   Y   ]LL 6Q       g  rst
		  g  filenamef  sxml/sxml-match.ss	 	$ 		   C')      h   D   ] C<       g  exp-lft
		 g  exp-rgt		  			   CFG h   D   ]  C    <       g  exp-lft
		 g  exp-rgt		  			   C h      ]4LL5$  74L L54LL5 45$  @64L L54L 5 45$  @6              g  fst
		y g  rst		y g  tmp		"	D g  tmp		-	D g  tmp		W	y g  tmp		b	y  g  filenamef  sxml/sxml-match.ss		!				8		8	"	!	E	8	N	8	W	! 			y	   C        h     ]bO O O O O O O 		O 
Q LQ Q Q Q Q L	
Q 	L 	Q 
4
 5$   O @4
 5$   
O @4
 5$  L O @ C           g  action
	  g  dotted-vars	  g  finite-lst?		R  g  
expand-lst		R  g  member-var?		R  g  dotted-var?		R  g  merge-pvars		R  g  select-dotted-vars		R  g  expand-dotted-item		R  g  expand-quasiquote-body			R  g  process-quasiquote	
	R  g  tmp	   g  tmp	   g  tmp	    g  filenamef  sxml/sxml-match.ss
 	 	 	  g  nameg  process-output-action C'FG   h   l   ] 6d       g  tag
		 g  items		  g  filenamef  sxml/sxml-match.ss	,	 			   C' 	      hH   `   ]  L             C      X       g  x
		B g  bx		B g  body			B g  fail-to			B  		B	   CFG h   Q  ]:4L  54LLLLLLLL>
  G L L 45$  4 O ?"  
45D    I      g  tag
		| g  items		| g  body-exp			| g  tests		+	| g  new-pvar-lst		+	| g  new-cata-defs		+	| g  new-dotted-vars		+	| g  tmp		A	t g  tmp		L	q  	g  filenamef  sxml/sxml-match.ss	-	&	
-	<	-	&	-	!	-		/	!	..		A9		|9	 
		|	   C h      ] 6|       g  tag
		 g  
attr-items		 g  items			  g  filenamef  sxml/sxml-match.ss		 			   C'  
   hP   p   ]  L         	       C  h       g  x
		N g  ax		N g  bx			N g  body			N g  fail-to			N  		N	   CFG h     ]C4L  54L  54LLLLLLLL>  G L L 	4	5

$  4 O 
?"  
4	5
	D       g  tag
	  g  
attr-items	  g  items		  g  attr-exp		  g  body-exp		  g  tests		<  g  new-pvar-lst		<  g  new-cata-defs		<  g  new-dotted-vars		<  g  tmp			T  g  tmp	
	_   g  filenamef  sxml/sxml-match.ss		&	
	<		&		!		&		<		&		!				!	(	4	;	!	?		T	 	 	 	   C 
  h   L  , 	3 4 5	"  L4 5
"  	 6
$  *4
?$  L O 	
@""	$  *4	?$  	LO 		@""   D      g  ele
	  g  exp	  g  nextp		  g  fail-k		  g  pvar-lst		  g  depth		  g  cata-fun		  g  	cata-defs		  g  dotted-vars		  g  tmp			  g  tmp	
		a  g  filenamef  sxml/sxml-match.ss
	 	 		  g  nameg  compile-element-pat C'7@DGIKMOP    h    G   ] L	LLLLLLLLL 6
       ?       g  filenamef  sxml/sxml-match.ss	F	 		
   CFG+QRST hH      ]4 5$  64545$  C45$  C45$  C6C          g  atag
		E g  literal		E g  rst			E g  x			C  g  filenamef  sxml/sxml-match.ss	+		+			H			H			I		!	I		"	I		$	J		.	I		/	J		1	K		;	I		<	K		C	L	 		E	   C'Ukmnopru h@   Q   ]L     L       C I       g  ax
		? g  body		? g  fail-to			?  		?	   CFG        hx   4  ]34LL
L	L LLLLLLLL >  G L	L 45$  4 O ?"  
45D ,      g  atag
		w g  literal		w g  rst			w g  tests		&	w g  new-pvar-lst		&	w g  new-cata-defs		&	w g  new-dotted-vars		&	w g  tmp		:	o g  tmp		E	l  	g  filenamef  sxml/sxml-match.ss	-		1	2	%-		),		:9		w9	 		w	   C      h      ]4 5$  6C          g  atag
		 g  i		 g  rst			  g  filenamef  sxml/sxml-match.ss	&		&		&	2 			   CY     h       ] L  6            g  atag
		 g  i		 g  rst			 g  sub				  g  filenamef  sxml/sxml-match.ss		'		'	*		B	 			   C      h   z   ] 6r       g  atag
		 g  i		 g  rst			  g  filenamef  sxml/sxml-match.ss	!	 			   CY       h       ] L  6            g  atag
		 g  i		 g  rst			 g  sub				  g  filenamef  sxml/sxml-match.ss		"		"	*		B	 			   C      h      ]4 5$  6C          g  atag
		 g  var		 g  rst			  g  filenamef  sxml/sxml-match.ss						2 			   C'U      h@   Q   ]L     L      C       I       g  ax
		9 g  body		9 g  fail-to			9  		9	   CFG        h   9  ]34LLL
L	 LLL4LL5LLLL >  G L
L 45$  4 O ?"  
45D  1      g  atag
		~ g  var		~ g  rst			~ g  tests		-	~ g  new-pvar-lst		-	~ g  new-cata-defs		-	~ g  new-dotted-vars		-	~ g  tmp		A	v g  tmp		L	s  	g  filenamef  sxml/sxml-match.ss					2		2	,			0		A		~	 		~	   C h   }   ] 6u       g  atag
		 g  cvar		 g  rst			  g  filenamef  sxml/sxml-match.ss		 			   CY'    h@   a   ]L           C       Y       g  ax
		9 g  ct		9 g  body			9 g  fail-to			9  		9	   CFG 
       h     ];4 5L$  "  4L >  "  G  4L LLL LLL4LL5L	LL	L L
L>  G LL 45		$  4 O 	?"  
4	5	D         g  atag
	  g  cvar	  g  rst		  g  ctemp		  g  tests		l  g  new-pvar-lst		l  g  new-cata-defs		l  g  new-dotted-vars		l  g  tmp	   g  tmp		    
g  filenamef  sxml/sxml-match.ss		#								B			0	-	B		6	!	E	4	J	4	a	e		d	e		k	!	o	 	 	 	 	   C h      ] 6       g  atag
		 g  cata		 g  cvar			 g  rst			  g  filenamef  sxml/sxml-match.ss		 			   C'  h@   a   ]L           C       Y       g  ax
		9 g  ct		9 g  body			9 g  fail-to			9  		9	   CFG        h     ]<4 54LLL
L	 LLL4LL5LLL LL >  G L
L 	4	5

$  4 O 
?"  
4	5
	D       g  atag
	  g  cata	  g  cvar		  g  rst		  g  ctemp		  g  tests		F  g  new-pvar-lst		F  g  new-cata-defs		F  g  new-dotted-vars		F  g  tmp			\  g  tmp	
	g   g  filenamef  sxml/sxml-match.ss		#						!		4	$	4	;	e		>	e		E	!	I		\	 	 	 	   C   h      ]4 5$  6C          g  atag
		 g  var		 g  default			 g  rst			  g  filenamef  sxml/sxml-match.ss						2 			   C')  h8   <   ]L     L L     C4       g  ax
		8 g  body		8  		8	   CFG     h   N  ]44LLL
L	 LLL4LL5LLLL >  G L
 45		$  4 O 	?"  
45	D  F      g  atag
		~ g  var		~ g  default			~ g  rst			~ g  tests		-	~ g  new-pvar-lst		-	~ g  new-cata-defs		-	~ g  new-dotted-vars		-	~ g  tmp		?	v g  tmp			J	s  
g  filenamef  sxml/sxml-match.ss				2		2	,		0		?		~	 		~	   C    h      ] 6       g  atag
		 g  cvar		 g  default			 g  rst			  g  filenamef  sxml/sxml-match.ss		 			   CY'U       h8   L   ]L     L      CD       g  ax
		8 g  ct		8 g  body			8  		8	   CFG 
    h     ]<4 5L$  "  4L >  "  G  4L LLL LLL4LL5L	LL	L L
L>  G L 	4	5

$  4 O 
?"  
4		5
	D         g  atag
	  g  cvar	  g  default		  g  rst		  g  ctemp		  g  tests		l  g  new-pvar-lst		l  g  new-cata-defs		l  g  new-dotted-vars		l  g  tmp		   g  tmp	
    g  filenamef  sxml/sxml-match.ss		#								B			0	-	B		6	!	E	4	J	4	a	e		d	e		k	!	o	 	 	 	 	   C   h      ] 6       g  atag
		 g  cata		 g  cvar			 g  default			 g  rst			  g  filenamef  sxml/sxml-match.ss	h	 			   C'U789:;=     h8   L   ]L     L      CD       g  ax
		8 g  ct		8 g  body			8  		8	   CFG     h     ]=4 54LLL
L	 LLL4LL5LLL LL >  G 	L
 
4
5$  4 O ?"  
4
5
	D       g  atag
	  g  cata	  g  cvar		  g  default		  g  rst		  g  ctemp		  g  tests		F  g  new-pvar-lst		F  g  new-cata-defs		F  g  new-dotted-vars			F  g  tmp	
	Z  g  tmp		e   g  filenamef  sxml/sxml-match.ss	i	#	i		i		k	!	o	4	$r	4	;	e		>	e		Ek	!	Ij		Z{	 {	 	 	   C     h   Y   ] 6Q       g  var
		  g  filenamef  sxml/sxml-match.ss	S	 		   C'UPQR    h    W   ]L       CO       g  ax
		  g  matched-attrs		  g  body			   		 	   CFG  hx     ]14LLL
L	L4L L5LLLL>
  G LL  45$  4 O ?"  
45D          g  var
		t g  tests	%	t g  new-pvar-lst		%	t g  new-cata-defs		%	t g  new-dotted-vars		%	t g  tmp		9	l g  tmp		D	i  g  filenamef  sxml/sxml-match.ss	U		Z	2	$U		(T		9_		t_	 		t   C "h   C  , 3 4 5" 4 5" `4 5" 4 5" 4 5" }4 5" 04 5"  4 	5"  4 
5"  4 
5"  64 5$  
	LO 
@ 6$  04?$  !
	L O @""$  4?$  LO @"a"]$  4?$  LO @"."*$  24?$  #
	LL O @""$  44?$  %L L
L	O @""$  24?$  #
	LL O @"K"G$  24?$  #
	LL O @" "$  44?$  %L L
L	O @""$  24?$  #
	LL O @"h"d$  24 ?$  #!
	LLO @""    ;      g  attr-lst
	 g  body-lst	 g  attr-exp		 g  body-exp		 g  attr-key-lst		 g  nextp		 g  fail-k		 g  pvar-lst		 g  depth		 g  cata-fun			 g  	cata-defs	
	 g  dotted-vars		 g  tmp		 g  tmp		 g  tmp		- g  tmp		<F g  tmp		K
 g  tmp		Z g  tmp		i g  tmp		xT g  tmp	 0 g  tmp	  g  tmp	    g  filenamef  sxml/sxml-match.ss
P	 		  g  nameg  compile-attr-list C''Uln  h   P   ]    C  H       g  x
		 g  body		 g  fail-to			  			   CFG h`      ]04LLLL>  G  L L  45$  4?"  
45D            g  
next-tests
		[ g  new-pvar-lst		[ g  new-cata-defs			[ g  new-dotted-vars			[ g  tmp		%	S g  tmp		0	P  g  filenamef  sxml/sxml-match.ss	G		F		%H		[H	 		[
   C'U    h   K   ]    C    C       g  ct
		 g  x		 g  body			  			   CFGY   h     ]:L$  y4 54L4LL5L  LL>  G L 45$  4?"  
45D	L  
6             g  cata
	  g  cvar	  g  ctemp		  g  
next-tests		7  g  new-pvar-lst		7  g  new-cata-defs		7  g  new-dotted-vars		7  g  tmp		K	y g  tmp		V	v  	g  filenamef  sxml/sxml-match.ss	c			g	'	g	"	g		i	%	i	,	,	e		/	e		6i	%	:h		Kp	! p	 d	. 	B	 	 	   CY'U     h   K   ]    C    C       g  ct
		 g  x		 g  body			  			   CFG 
     h   |  ]94  5L$  "  4L  >  "  G  4L 4LL5L L LL>  G L 45$  4?"  
4	5D       t      g  cvar
	  g  ctemp	  g  
next-tests		W  g  new-pvar-lst		W  g  new-cata-defs		W  g  new-dotted-vars		W  g  tmp		k  g  tmp		v   g  filenamef  sxml/sxml-match.ss	x	#	x		x		y			B		z	0	-	B		6~	!	9~	(	L	e		O	e		V~	!	Z}		k	 	 	    C     h       ]LL LLLLL 6
             g  new-exp
		 g  new-pvar-lst		 g  new-cata-defs			 g  new-dotted-vars			  g  filenamef  sxml/sxml-match.ss
			! 			   C      h0   k   ]L
 L	LLLLLLO LLLLLL 6	       c       g  item
		) g  rst		)  g  filenamef  sxml/sxml-match.ss	)	 		)	   CFG+       h       ]45$  45CC             g  item
		 g  dots		 g  rst			  g  filenamef  sxml/sxml-match.ss		E			E			E	*		E	/		E	% 			   C'f h   +   ] C     #       g  npv
		  		   CFG      h8      ]4 5$  4?"  
4 5 D            g  new-pvar-lst
		3 g  new-cata-defs		3 g  new-dotted-vars			3 g  tmp			+  g  filenamef  sxml/sxml-match.ss
	/	3	1 		3	   C'f     h   +   ] C  #       g  npv
		  		   CFG      h8      ]45$  4?"  
45D            g  new-exp
		3 g  new-pvar-lst		3 g  new-cata-defs			3 g  new-dotted-vars			3 g  tmp			+  g  filenamef  sxml/sxml-match.ss
	*	3	, 		3	   C	.      h   V   ]C   N       g  i
		  g  filenamef  sxml/sxml-match.ss
	0 		   C4   h   V   ]C   N       g  i
		  g  filenamef  sxml/sxml-match.ss
	0 		   C:   h   V   ]C   N       g  i
		  g  filenamef  sxml/sxml-match.ss
	0 		   C')J      h   :   ]  C    2       g  xa
		 g  xb		  			   CFG       h0      ]  45$  @6            g  a
		+ g  b		+ g  tmp				+ g  tmp			+  g  filenamef  sxml/sxml-match.ss
	0			2 		+	   C'Kgijmopqlrskuvxy{}   h     , 3   	
         	
	    	4
5    45 	45     	4
5        45      C           g  x
	 g  fail-to	 g  	tail-body		 g  	item-body		 g  
final-body		 g  ipv		 g  gpv		 g  tpv		 g  	item-void		 g  	tail-void			 g  	item-null	
	 g  	item-cons		  		   CFGY h  ;  ]{L$  4LLL>
  G 4L LL
L>	  G 
	4L4L54	L544L	5L5>  G 45LL	4	
54	54	54	5 45$  4?"  
45DL  6   3      g  item
	 g  dots	 g  rst		 g  t-cd60791-446		! g  t-cd60791-447		! g  t-cd60791-448		! g  t-cd60791-449		! g  t-cd60791-44a		F g  t-cd60791-44b		F g  t-cd60791-44c			F g  t-cd60791-44d	
	F g  final-tests	  g  final-pvar-lst	  g  final-cata-defs	  g  final-dotted-vars	  g  temp-item-pvar-lst	  g  tmp	   g  tmp	    g  filenamef  sxml/sxml-match.ss							/		/		/	 		$		-		8	*	;	*	>	*	E		I		R		U	%	`	%	k	%	p	-	|	% 	 	 	, 	 	+ 	+ 	+ 	+ 		
	.	B	  		   C       h   Y   ] 6Q       g  var
		  g  filenamef  sxml/sxml-match.ss	U	 		   C')   h   ;   ]L     C    3       g  x
		 g  body		  			   CFGY 
  h   +  ]1L$  c4L4L L5LL>  G L 45$  4 O ?"  
45DL  	6     #      g  var
		{ g  
next-tests		k g  new-pvar-lst			k g  new-cata-defs			k g  new-dotted-vars			k g  tmp		0	c g  tmp		;	`  g  filenamef  sxml/sxml-match.ss	V			[	#	[	*	[	#	!Z		0\		k\		pW	.	{	B	 
		{   C  hH    , 
3 4 5

$  	O 
@4 5"  4 5$  LL 	O 	@4 5$  L 	LO 	@4 5"  94 	5$  
	LLO @ 6$  24?$  #LL	LLO @""$  (4?$  LL 	O @""      g  lst
	H g  exp	H g  nextp		H g  fail-k		H g  ellipsis-allowed?		H g  pvar-lst		H g  depth		H g  cata-fun		H g  	cata-defs		H g  dotted-vars			H g  tmp	
	H g  tmp		4H g  tmp		C g  tmp		o g  tmp	  g  tmp	    g  filenamef  sxml/sxml-match.ss
Q	 	H	
  g  nameg  compile-item-list C''      h8   p   ]            C  h       g  x
		6 g  nx		6 g  ct			6 g  body			6 g  fail-to			6  		6	   CFG h     ]B4L 54 54L4LL5L  LL>  G LL  45		$  4	?"  
45	D        g  cata
	  g  cvar	  g  new-exp		  g  ctemp		  g  
next-tests		@  g  new-pvar-lst		@  g  new-cata-defs		@  g  new-dotted-vars		@  g  tmp		X  g  tmp			c   
g  filenamef  sxml/sxml-match.ss	/	%	
/	;	/	%	/	 	0	#	0		/		2	!	"3	(	5	e		8	e		?2	!	C1		X:	 :	 	 	   CY' h8   p   ]            C  h       g  x
		6 g  nx		6 g  ct			6 g  body			6 g  fail-to			6  		6	   CFG 
h     ]A4L 54  5L	$  "  4L  >  "  G  4L 4LL5L L	 LL>  G LL 45$  4?"  
4	5D          g  cvar
	  g  new-exp	  g  ctemp		  g  
next-tests		f  g  new-pvar-lst		f  g  new-cata-defs		f  g  new-dotted-vars		f  g  tmp		~  g  tmp	    	g  filenamef  sxml/sxml-match.ss	I	%	
I	;	I	%	I	 	J	#	J		I		"K		'	B		,L	0	:	B		CP	!	HQ	(	[	e		^	e		eP	!	iO		~X	 X	 	    CfY        h   _   ]L   6      W       g  i
		  g  filenamef  sxml/sxml-match.ss		*		B	 		   C   h   W   ] 6O       g  i
		  g  filenamef  sxml/sxml-match.ss		 		   CY     h   _   ]L   6      W       g  i
		  g  filenamef  sxml/sxml-match.ss		*		B	 		   C+QRST       h8      ]	4 545$  C45$  C45$  C6       g  literal
		8 g  x			8  g  filenamef  sxml/sxml-match.ss		H				H			I			I			I			J		#	I		$	J		&	K		0	I		1	K		8	L	 		8   C'     h@   `   ]  L            C   X       g  x
		= g  nx		= g  body			= g  fail-to			=  		=	   CFG hx   E  ]94L 54LLLL>  G LL  45$  4 O ?"  
45D       =      g  literal
		q g  new-exp		q g  
next-tests		 	q g  new-pvar-lst		 	q g  new-cata-defs		 	q g  new-dotted-vars		 	q g  tmp		6	i g  tmp		A	f  g  filenamef  sxml/sxml-match.ss		%	
	;		%		 				!	#		6		q	 
		q   CFG h   k   ] 6c       g  tag
		 g  item		  g  filenamef  sxml/sxml-match.ss	f	 			   C'U)*      h    K   ]     C       C       g  x
		 g  nx		 g  body			  			   CFG      h`   L  ]34LL >  G L L 45$  4?"  
45D   D      g  more-pvar-lst
		] g  more-cata-defs		] g  more-dotted-vars			] g  
next-tests			] g  new-pvar-lst			] g  new-cata-defs			] g  new-dotted-vars			] g  tmp		'	U g  tmp		2	R  	g  filenamef  sxml/sxml-match.ss
l	6	p	F	m	8	't	B	]t	: 		]	   C'U<=     h   P   ]    C  H       g  x
		 g  body		 g  fail-to			  			   CFG 	h   d  ]:4L 54L L LLO LLLLLL >	  G LL 45$  4?"  
45D   \      g  tag
	  g  item	  g  new-exp		  g  after-tests		;  g  after-pvar-lst		;  g  after-cata-defs		;  g  after-dotted-vars		;  g  tmp		O	} g  tmp		Z	z  	g  filenamef  sxml/sxml-match.ss	g	%	
g	;	g	%	g	 	g		i	!	>h		O	 	 
	 	   C      h   Y   ] 6Q       g  var
		  g  filenamef  sxml/sxml-match.ss		 		   C'QRSTU   h8   `   ]     L        C  X       g  x
		6 g  nx		6 g  body			6 g  fail-to			6  		6	   CFG hx   S  ]94L 54L4L L5LL>  G LL  45$  4 O ?"  
45DK      g  var
		x g  new-exp		x g  
next-tests		'	x g  new-pvar-lst		'	x g  new-cata-defs		'	x g  new-dotted-vars		'	x g  tmp		=	p g  tmp		H	m  g  filenamef  sxml/sxml-match.ss		%	
	;		%		 			 	!	 	0	& 	!	*		=!		x!	 		x   C  hP    , 	3 4 5	" 4 5

$  LO 
@4 5$  LLO 
@4 5"  i4 5$  	LO @  4
?$  LO @  4?$  O @ 6$  *4?$  L O 	@"g"c	$  &4	?$  LO 	@""             g  item
	I g  exp	I g  nextp		I g  fail-k		I g  pvar-lst		I g  depth		I g  cata-fun		I g  	cata-defs		I g  dotted-vars		I g  tmp			I g  tmp	
	 g  tmp		H g  tmp		v g  tmp	   g  tmp	   g  tmp	    g  filenamef  sxml/sxml-match.ss
	 	I		  g  nameg  compile-item CYV    h8      ] (  C4 L 5$  L L 6  "              g  lst
		1  g  filenamef  sxml/sxml-match.ss
	Y			Z			\			\	,		\			\			]	1	(	B		+	`	$	1	`	 		1  g  nameg  
check-pvar C       h0      ]
O  L Q 4>  "  G   C          g  pvar
		- g  pvar-lst		- g  
check-pvar			-  g  filenamef  sxml/sxml-match.ss
	X			a		,	b	 		-	  g  nameg  add-pat-var C')   h   :   ]  C      2       g  cf
		
 g  ct		
  		
	   CFGUkl  h   M   ]    C  E       g  ct
		 g  nct		 g  body			  			   C 	       hx   V  ] 
$  ) 45$  @64 54L  5 45$  @6   N      g  depth
		u g  cfun		u g  ctemp			u g  tmp			3 g  tmp			3 g  	new-ctemp		>	u g  tmp		S	u g  tmp		^	u  g  filenamef  sxml/sxml-match.ss
	g			h		
	h			i		4	l	(	;	l	>	=	l	(	>	l	#	>	l		E	o	(	J	o	:	P	o	(	S	m	 		u	  g  nameg  process-cata-exp C'    h   P   ] LL 6       H       g  filenamef  sxml/sxml-match.ss	 	/		 	 			
   C    h   s   ] 4L 5C   k       g  fst
		 g  rst		  g  filenamef  sxml/sxml-match.ss	 	6	 	# 			   CFG      hH      ]4 5$  LLO @4 5$  L O @ 6           g  items
		D g  tmp	
	D g  tmp		(	D  g  filenamef  sxml/sxml-match.ss
 	 		D  g  nameg  iter C h(      ]	 (  CO L  Q  6         g  lst
		& g  iter		&  g  filenamef  sxml/sxml-match.ss
 		 			 		 		" 	*	# 	$	& 	 		&  g  nameg  cata-defs->pvar-lst C'{ h8      , 	3 	      C             g  compile-clause
		2 g  cata		2 g  cvar			2 g  gexp			2 g  action0			2 g  action			2 g  exp			2 g  cata-fun			2 g  fail-exp			2  			2		   C'   h      ] C           		
   CY        hh     , 3 	45$  4?"  $  ,      C	
L  6       g  compile-clause
		g g  cvar		g g  gexp			g g  action0			g g  action			g g  exp			g g  cata-fun			g g  fail-exp			g g  tmp			'  	g  filenamef  sxml/sxml-match.ss	+		\	*	g	B	 		g	   C   h       , 3    C        g  compile-clause
		 g  cata		 g  cvar			 g  action0			 g  action			 g  exp			 g  cata-fun			 g  fail-exp			  			   C'     h      ] C           		
   CY hP      ]45$  4?"  $     CL  6       g  compile-clause
		P g  cvar		P g  action0			P g  action			P g  exp			P g  cata-fun			P g  fail-exp			P g  tmp			#  g  filenamef  sxml/sxml-match.ss	'		E	*	P	B	 		P	   CY     h      , 3 L  6         g  compile-clause
		 g  i		 g  gexp			 g  action0			 g  action			 g  exp			 g  cata-fun			 g  fail-exp			  g  filenamef  sxml/sxml-match.ss	B	&		B	 			   CY      h      ]L  6             g  compile-clause
		 g  i		 g  action0			 g  action			 g  exp			 g  cata-fun			 g  fail-exp			  g  filenamef  sxml/sxml-match.ss	F	&		B	 			   CFG+QRST   h8   E  ]4545$  C45$  C45$  C6=      g  compile-clause
		8 g  literal		8 g  action0			8 g  action			8 g  exp			8 g  cata-fun			8 g  fail-exp			8 g  x				8  g  filenamef  sxml/sxml-match.ss		H				H			I			I			I			J		#	I		$	J		&	K		0	I		1	K		8	L	 		8	   C      h       ]   C         g  compile-clause
		 g  literal		 g  action0			 g  action			 g  exp			 g  cata-fun			 g  fail-exp			  			   C+QRST     h@   W  , 3 	4545$  C45$  C45$  C6    O      g  compile-clause
		< g  literal		< g  gexp			< g  action0			< g  action			< g  exp			< g  cata-fun			< g  fail-exp			< g  x			<  	g  filenamef  sxml/sxml-match.ss		H			H			I			I			I			J		'	I		(	J		*	K		4	I		5	K		<	L	 		<	   C h0      , 3     C           g  compile-clause
		, g  literal		, g  gexp			, g  action0			, g  action			, g  exp			, g  cata-fun			, g  fail-exp			,  		,	   C       h      ]6       g  compile-clause
		 g  pat		 g  action0			 g  action			 g  exp			 g  cata-fun			 g  fail-exp			  g  filenamef  sxml/sxml-match.ss	O	 			   CY h      ]L  6             g  compile-clause
		 g  pat		 g  action0			 g  action			 g  exp			 g  cata-fun			 g  fail-exp			  g  filenamef  sxml/sxml-match.ss	P	&		B	 			   C       h      , 3 6           g  compile-clause
		 g  pat		 g  gexp			 g  action0			 g  action			 g  exp			 g  cata-fun			 g  fail-exp			  g  filenamef  sxml/sxml-match.ss	J	 			   CY       h      , 3 L  6         g  compile-clause
		 g  pat		 g  gexp			 g  action0			 g  action			 g  exp			 g  cata-fun			 g  fail-exp			  g  filenamef  sxml/sxml-match.ss	K	&		B	 			   C     h      , 3 6           g  compile-clause
		 g  fst		 g  rst			 g  action0			 g  action			 g  exp			 g  cata-fun			 g  fail-exp			  g  filenamef  sxml/sxml-match.ss	*	 			   C    h       ]4L4L LL55 D       g  new-pvar-lst
		  g  new-cata-defs		  g  new-dotted-vars			   g  filenamef  sxml/sxml-match.ss
.	0	/	:	0	M	/	:	 /	2 		 	   C
' h      ] C           		
   C)      h   A   ] L    C    9       g  fail-to
		 g  body		  			   CFG 
       h     , 3 4LLL O 
45$  4?"  >	  G 
	 45$  O @	6           g  compile-clause
	  g  fst	  g  rst		  g  action0		  g  action		  g  exp		  g  cata-fun		  g  fail-exp		  g  tmp		*	B g  result		J  g  pvar-lst			J  g  	cata-defs	
	J  g  dotted-vars		J  g  tmp		\  g  tmp		g   g  filenamef  sxml/sxml-match.ss	,		 8	0	C;	0	D<	0	I,		M+		\=	 	 	   C    h      , 	3 	6           g  compile-clause
		 g  fst		 g  rst			 g  gexp			 g  action0			 g  action			 g  exp			 g  cata-fun			 g  fail-exp			  	g  filenamef  sxml/sxml-match.ss		 				   C,
')34    h   A   ]L    C    9       g  body
		 g  fail-to		  			   CFG        hX      ]4L 4LLL55 45$  4LO ?"  
45 D       g  new-pvar-lst
		X g  new-cata-defs		X g  new-dotted-vars			X g  tmp			P g  tmp		(	M  g  filenamef  sxml/sxml-match.ss
	0		>		Q		>		3	X	2 		X	   C
'      h      ] C           		
   C)@      h   A   ] L    C    9       g  fail-to
		 g  body		  			   CFG 
       h     , 	3 4LLL O 
45		$  4	?"  	>	  G 
		 45$  O @	6         g  compile-clause
	  g  fst	  g  rst		  g  gexp		  g  action0		  g  action		  g  exp		  g  cata-fun		  g  fail-exp		  g  tmp			,	D g  result			L  g  pvar-lst	
	L  g  	cata-defs		L  g  dotted-vars		L  g  tmp		^  g  tmp		i   g  filenamef  sxml/sxml-match.ss			" 	0	E#	0	F$	0	K		O		^%	 	 		   CA+    h      , 3 45$  45CC        g  compile-clause
		 g  lst		 g  rst			 g  action0			 g  action			 g  exp			 g  cata-fun			 g  fail-exp			  g  filenamef  sxml/sxml-match.ss						2		8		- 			   CS        h       ]4L4L LL55 D       g  new-pvar-lst
		  g  new-cata-defs		  g  new-dotted-vars			   g  filenamef  sxml/sxml-match.ss
	.		8		K		8	 	0 		 	   C
' h      ] C           		
   C)_`a        h(   A   ]L  L      C   9       g  body
		% g  fail-to		%  		%	   CFG 
       h     , 3 4LLL O 
45$  4?"  >
  G 
	 45$  O @	6           g  compile-clause
	  g  lst	  g  rst		  g  action0		  g  action		  g  exp		  g  cata-fun		  g  fail-exp		  g  tmp		(	@ g  result		H  g  pvar-lst			H  g  	cata-defs	
	H  g  dotted-vars		H  g  tmp		Z  g  tmp		e   g  filenamef  sxml/sxml-match.ss				.	A	.	B	.	G		K		Z	 	 	   CA+       h    "  , 	3 	45$  45CC        g  compile-clause
		 g  lst		 g  rst			 g  gexp			 g  action0			 g  action			 g  exp			 g  cata-fun			 g  fail-exp			  	g  filenamef  sxml/sxml-match.ss						2		8		- 				   Ct
')|}        h   E   ]L    C    =       g  exp-body
		 g  fail-to		  			   CFG    hX      ]4L 4LLL55 45$  4LO ?"  
45 D       g  new-pvar-lst
		X g  new-cata-defs		X g  new-dotted-vars			X g  tmp			P g  tmp		(	M  g  filenamef  sxml/sxml-match.ss
	.		@		S		@		1	X	0 		X	   C
'      h      ] C           		
   C)        h(   A   ] L  L      C   9       g  fail-to
		% g  body		%  		%	   CFG 
       h     , 	3 4LLL O 
45		$  4	?"  	>
  G 
		 45$  O @	6         g  compile-clause
	  g  lst	  g  rst		  g  gexp		  g  action0		  g  action		  g  exp		  g  cata-fun		  g  fail-exp		  g  tmp			*	B g  result			J  g  pvar-lst	
	J  g  	cata-defs		J  g  dotted-vars		J  g  tmp		\  g  tmp		g   g  filenamef  sxml/sxml-match.ss			 	.	C	.	D	.	I		M		\	 	 		   C h      ]6       g  compile-clause
		 g  var		 g  action0			 g  action			 g  exp			 g  cata-fun			 g  fail-exp			  g  filenamef  sxml/sxml-match.ss		 			   C      h      ]  C         g  compile-clause
		 g  var		 g  action0			 g  action			 g  exp			 g  cata-fun			 g  fail-exp			  			   C     h      , 3 6           g  compile-clause
		 g  var		 g  gexp			 g  action0			 g  action			 g  exp			 g  cata-fun			 g  fail-exp			  g  filenamef  sxml/sxml-match.ss		 			   C   h0      , 3      C          g  compile-clause
		- g  var		- g  gexp			- g  action0			- g  action			- g  exp			- g  cata-fun			- g  fail-exp			-  		-	   C 3     h@    ]O O O O O O O O 	O 	Q  Q Q  Q  	Q  Q  Q Q 	Q 	4
 5
" s4
 5$  @4
 5$   O @4
 5" 4
 5$  @4
 5$   O @4
 5" 4
 5" q4
 5" :4
 5" 4
 5$   O @4
 5$   O @4
 5"  4
 5"  e4
 5"  74
 5"  	 6$  4?$   @""$  4!?$  "@""$  4#?$  $ O @"{"w$  4%?$  & O @"H"D$  4'?$  (O @""$  4)?$  *O @""$  4+?$  ,O @"k"g$  4-?$  .O @"4"0$  4/?$  0@""
$  41
?$  2
@"r"n             g  stx
	9 g  process-cata-defs	U9 g  process-output-action		U9 g  compile-element-pat		U9 g  compile-attr-list		U9 g  compile-item-list		U9 g  compile-item		U9 g  add-pat-var		U9 g  process-cata-exp		U9 g  cata-defs->pvar-lst			U9 g  tmp	
 9 g  tmp	  g  tmp	  g  tmp	  g  tmp	  g  tmp		 g  tmp	% g  tmp	4 g  tmp	C g  tmp	R g  tmp	a[ g  tmp	}[ g  tmp	[ g  tmp	7 g  tmp	 g  tmp	  g  filenamef  sxml/sxml-match.ss
	>		
	?	 	9   C5R4"$'       h   h   ]C       `       g  dummy
		 g  exp		 g  cata-fun			 g  clause			  			   C    h8   }   ]    C      u       g  dummy
		2 g  exp		2 g  cata-fun			2 g  clause0			2 g  clause			2  		2	   CFG    h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  sxml/sxml-match.ss
_	 		9  g  
macro-typeg  syntax-rulesg  patternsg  expg  cata-fung  clause g  expg  cata-fung  clause0g  clauseg  ...   C5R4"$'        h0   g   ]     C    _       g  dummy
		, g  val		, g  clause0			, g  clause			,  		,	   CFG  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  sxml/sxml-match.ss
l	 		"  g  
macro-typeg  syntax-rulesg  patternsg  valg  clause0g  clauseg  ...   C5R4"$'	    h   {   ]C   s       g  dummy
		 g  syntag		 g  synform			 g  body0			 g  body			  			   C !# h8      ]      C         g  dummy
		6 g  syntag		6 g  synform			6 g  pat			6 g  exp			6 g  body0			6 g  body			6  		6	   C*;<>A?@ABC 
hP      , 	3 	45  	    C             g  dummy
		J g  syntag		J g  synform			J g  pat0			J g  exp0			J g  pat			J g  exp			J g  body0			J g  body			J  			J		   CFG 
       hP     ]4 5$  @4 5$  @4 5$  @	 6      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  sxml/sxml-match.ss
s	 		P  g  
macro-typeg  syntax-rulesg  patternsg  syntagg  synformg  body0g  bodyg  ... g  syntagg  synformg  patg  exp  g  body0g  bodyg  ... g  syntagg  synformg  pat0g  exp0 g  patg  exp g  ... g  body0g  bodyg  ...   C5R4"D$'H'f\>A]   h0   1   ]4 L5L L4L 5LL C   )       g  	temp-name
		-  		-   CFG        h@     ]4545$  O @6             g  sxml-match-let-help
		: g  syntag		: g  synform			: g  pat			: g  exp			: g  body0			: g  body			: g  tmp				: g  tmp			:  	g  filenamef  sxml/sxml-match.ss		(				 		:	   CFG     h(   h   ]	4 5$  @ 6      `       g  stx
		" g  tmp		"  g  filenamef  sxml/sxml-match.ss
	 		"   C5DR4"$'Fn>A        h    }   ] L 45C   u       g  sxml-match-let
		 g  pat		 g  exp			 g  body0			 g  body			  			   CFG    h(   h   ]	4 5$   O @ 6 `       g  stx
		' g  tmp		'  g  filenamef  sxml/sxml-match.ss
	 		'   C5R4"$'y       h   \   ]C   T       g  sxml-match-let*
		 g  body0		 g  body			  			   C(>A    h0      ] L    45 C             g  sxml-match-let*
		* g  pat0		* g  exp0			* g  pat			* g  exp			* g  body0			* g  body			*  		*	   CFG       h@   y   ]4 5$  @4 5$   O @ 6  q       g  stx
		> g  tmp		> g  tmp		"	>  g  filenamef  sxml/sxml-match.ss
	 		>   C5RC       g  m
		,  g  filenamef  sxml/match.scm		
e	1
g  filenamef  sxml/sxml-match.ss		$		
			(		/		6	 
	      x
   C6                                                                                                                                              ccache/sxml/xpath.go                                                                                0000644                 00000025456 15154557173 0010441 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0+      ] @ 4      h      ] g  guile	 	g  define-module*	 	 	g  sxml	g  xpath	 		g  filenameS	
f  sxml/xpath.scm	g  importsS	g  ice-9	g  pretty-print	 	 	 	g  exportsS	g  nodeset?	g  node-typeof?	g  node-eq?	g  node-equal?	g  node-pos	g  filter	g  
take-until	g  
take-after	g  	map-union	g  node-reverse	g  
node-trace	g  select-kids	g  	node-self	g  	node-join	 g  node-reduce	!g  node-or	"g  node-closure	#g  node-parent	$g  sxpath	% !"#$ 	&g  set-current-module	'& 	(& 	)g  *	*g  memq	+g  @	,g  *PI*	-+, 	.g  *any*	/g  *text*	0g  string?	1g  length	2g  error	3f  yikes!	4g  reverse	5g  append	6g  cons	7g  display	8f  
-->	9f   :	:g  
procedure?	;g  //	<g  equal?	=g  eq?	>g  number?	?f  Invalid path step: C 5  h%     ]4	
%5 4( >  "  G     h(      ]	 $  	 "  $  C C             g  x
		" g  t		"  g  filenamef  sxml/xpath.scm
	o
		p				p			p	#		p			p			p		!	p	. 			"  g  nameg  nodeset? CR)*-./0 hP      ]L $   $  4 5CCL $  CL $   6 $  L  CC             g  node
		J  g  filenamef  sxml/xpath.scm
 		 		 		 		 	"	 	(	 	"	 		) 		: 		= 		A 		F 	#	G 	 		J   C   h   m   ] O C      e       g  crit
		
  g  filenamef  sxml/xpath.scm
 
 		
  g  nameg  node-typeof? CR     h   ^   ]L  CV       g  node
		  g  filenamef  sxml/xpath.scm
 		 	 		   C       h   j   ] O C      b       g  other
		
  g  filenamef  sxml/xpath.scm
 
 		
  g  nameg  node-eq? CRh   ^   ]L  CV       g  node
		  g  filenamef  sxml/xpath.scm
 		 	 		   C       h   m   ] O C      e       g  other
		
  g  filenamef  sxml/xpath.scm
 
 		
  g  nameg  node-equal? CR123 hx   5  ]	4 5$  e (   CL &    CL 
$  4L 4 55 6L 
$  "  4>  "  G  4L 5 6C    -      g  nodeset
		t g  t	D	e  g  filenamef  sxml/xpath.scm
 		 		 		  		# 		' 		, 		- 		2 		3 	&	: 		< 		@ 		C 	
	D 		Q 		U 		Z 		f 		k 		m 		p 		r 		s 	 		t   C        h   f   ] O C      ^       g  n
		
  g  filenamef  sxml/xpath.scm
 
 		
  g  nameg  node-pos CR4      hh   9  ]"  ?(  64L 5$  (  "  "  "4 5$   "    "    1      g  lst
		d g  lst		E g  res			E g  pred-result			E  g  filenamef  sxml/xpath.scm
 		 		 		 	
	 		 	$	 		 	
	 		% 		+ 		4 		7 		E 		E 		F 		P 		[ 	+	\ 	=	d 	 		d   C    h   h   ] O C      `       g  pred?
		
  g  filenamef  sxml/xpath.scm
 
 		
  g  nameg  filter CR h@      ]	 (   C4L 5"   4L  5C$  (  "C"           g  lst
		< g  pred-result		<  g  filenamef  sxml/xpath.scm
 		 		 		 	$	 		 	
	 		 	 	" 	&	$ 	 	% 		& 		2 		7 	 		<  g  nameg  loop C h0      ]	O L Q 4 5$   "    6           g  lst
		, g  loop		,  g  filenamef  sxml/xpath.scm
 		 		 		 		* 	+	, 	 		,   C   h   l   ] O C      d       g  pred?
		
  g  filenamef  sxml/xpath.scm
 
 		
  g  nameg  
take-until CR  h`     ]"  8(  C4L 5"  	"$  (  "C"4 5$   "    "            g  lst
		Z g  lst		> g  pred-result			>  g  filenamef  sxml/xpath.scm
 		 		 		 		 	$	 		 	
	  		& 		& 		2 		9 		> 		? 		I 		T 	+	Z 	 		Z   C        h   l   ] O C      d       g  pred?
		
  g  filenamef  sxml/xpath.scm
 
 		
  g  nameg  
take-after CR56     h8      ]
(  C4 545$  "  4 56         g  proc
		6 g  lst		6 g  proc-res			6  g  filenamef  sxml/xpath.scm
 
	 		 		 		 		 		 		  			+ 		2 	"	4 		6 	 		6	  g  nameg  	map-union CR4 h       ]4 5$   6  C              g  node-or-nodeset
		  g  filenamef  sxml/xpath.scm
									) 		  g  nameg  node-reverse CR789   hP      ]4>  "  G  4L >  "  G  4>  "  G  4 >  "  G   C          g  node-or-nodeset
		M  g  filenamef  sxml/xpath.scm
										'		+		0		9	 
		M   C     h   l   ] O C      d       g  title
		
  g  filenamef  sxml/xpath.scm

 		
  g  nameg  
node-trace CR      h8      ] (   C $  ! $  4L 5 64L 5 6C          g  node
		5  g  filenamef  sxml/xpath.scm
3		4		6		4		7		7		4		8		$8		&8		)9		39		46	 		5   C    h   r   ] O C      j       g  
test-pred?
		
  g  filenamef  sxml/xpath.scm
2
 		
  g  nameg  select-kids CRiR   hH      ]"  5(  C45$  45"  45" L "        g  nodeset
		G g  nodeset		; g  	selectors			;  g  filenamef  sxml/xpath.scm
I		J		K		M		M		N		 N		$N		)O		,O		0O		3P		;L	
	;J	 		G   C     h   q   -  1  3  O C       i       g  	selectors
			  g  filenamef  sxml/xpath.scm
H
 			


  g  nameg  	node-join CR h0      ]"  (  C45" L "         g  nodeset
		. g  nodeset		" g  
converters			"  g  filenamef  sxml/xpath.scm
]		^		_		`		`		`		`	+	"`	
	"^	 
		.   C h   t   -  1  3  O C       l       g  
converters
			  g  filenamef  sxml/xpath.scm
\
 			


  g  nameg  node-reduce C R5  hH     ]"  5(  C44 5$  "  5"L "        g  node-or-nodeset
		F g  result		; g  
converters			; g  t			.  g  filenamef  sxml/xpath.scm
p		q		r		s		s	#	s	$	s	#	s		+s	F	0s		3t		;s	
	;q		<q		Fq	 		F   C     h   p   -  1  3  O C       h       g  
converters
			  g  filenamef  sxml/xpath.scm
o
 			


  g  nameg  node-or C!R)5        hH     ]"  5(  C444555444L 555" "        g  node
		F g  parent		; g  result			;  g  filenamef  sxml/xpath.scm
													,					 		!		&		'		1		3		;	
	;		>	%	F	 		F   C       h   s   ] O C      k       g  
test-pred?
		
  g  filenamef  sxml/xpath.scm

 		
  g  nameg  node-closure C"R#! )+"   hx     ]	4 5$  4L 5 64444554	4
 55544	4554	4
 5555445455L 6      ~      g  node
		r g  pred	Y	r  g  filenamef  sxml/xpath.scm
							#							!		$		(	*	*		,		-		0		8		:		;		>		A		E	,	G		I		J		M		U		W		Y		Y		\		_		f		n		r	
 "		r   C       h   p   ] O C      h       g  rootnode
		
  g  filenamef  sxml/xpath.scm

 		
  g  nameg  node-parent C#R$:;56".<=>2?       h    ](   C4 5$  45 645$  4 5 "&  444 5$  "   444	
55 55 "$  444	55 5 "^$  &  444?5 5 ".&  444?5 5 ""  T(   "45$  4455"444555"$  444	55 5"  4L  5"u6          g  nodeset
	 g  path	 g  nodeset	 T g  reducing-path	 T  g  filenamef  sxml/xpath.scm
										#		$		)		+		/		0		3		7		:	!	B		D		G		K		L		M		W		b		c			f		j	%	l		n			r		t		w			 	 	 	 	 	 	 	( 	 	 	 	 	 	 	 	 	# 	+ 	 	 	 	 	- 	 	 	 	 	 	# 	( 	 	 	 	 	* 	 	 	 	 	 			.	 	
		
	 	!	&	(	,	/	7	
8	9	<	A	$C	E	I	L	T	
T	W	"Y	]	^	_	b	'g	5j	'l	p	u	|	'		#			#	 r		  g  nameg  loop C h   r   ]	O Q  L 6 j       g  nodeset
		 g  loop	
	  g  filenamef  sxml/xpath.scm
		
	 		   C   h   g   ] O C      _       g  path
		
  g  filenamef  sxml/xpath.scm

 		
  g  nameg  sxpath C$RC           g  m
		,  g  filenamef  sxml/xpath.scm		d
	o
 
 
 
) 
	k 
 
 
_ 
0

u2
|A
lH
\
o
6

%
 	%
   C6                                                                                                                                                                                                                   ccache/sxml/ssax/input-parse.go                                                                     0000644                 00000031005 15154557173 0012525 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.01      ] 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	423	5g  syntax->datum	65 	75 	8g  datum->syntax	98 	: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-refC 5    hP(    ]4	
5 4 >  "  G    i!R"i#R
$R%R&i'R(i)R4,-.147:;<=>?       hp   r  - 1 3 4 5$  $$  &  "  "  "  $  4455C C  j      g  bindings
			n g  body			n g  	body-rest				n g  rev-bindings			n g  opt-bindings		>	n  g  filenamef  sxml/ssax/input-parse.scm
	J
	
	K			K			M			M	
		M	+		M	$	!	M	
	#	N		&	N		+	M	
	.	O		>	K		F	P		H	Q		I	Q		L	Q		S	Q	5	T	Q	$	V	Q		Z	Q		_	Q		d	T	 			n	
	   C   h   m   ]	4 5L 4?6e       g  args
		 g  v			  g  filenamef  sxml/ssax/input-parse.scm		J
 		   CBC    h(   k   ]	4 5$   O @ 6 c       g  y
		' g  tmp		'  g  filenamef  sxml/ssax/input-parse.scm
	J
 		'   C5-RDE        h      - 1 3  @          g  port
			 g  message			 g  rest				  g  filenamef  sxml/ssax/input-parse.scm
	V
		W			W	 				
	  g  nameg  parser-error CERFGH  h8      -  . , 3  #  45  4 >  "  G   6              g  port
		1  g  filenamef  sxml/upstream/input-parse.scm
	,
		,	,		-		1	.	 		1
  g  nameg  peek-next-char CRFGIEJKLMN"OPQ hh   H  - . , 3 #  45 454 5$  C45$  "  4	4
5	5 6
 @      g  expected-chars
		g g  comment		g g  port			g g  c		 	g  g  filenamef  sxml/upstream/input-parse.scm
	;
		<	.		=		 	=		#	>		/	>		8	?		<	@		=	@		G	@		I	@	&	N	A		Q	A	$	[	A		]	A	;	a	B		e	B	'	g	?	 		g	  g  nameg  assert-curr-char CRFRLGEST)IUVW h     - . , 3 #  45 4 5$  O"  C
$  94455$  4 >  "  G  "   45"C ""  B4	 5$  C45$  4
 5$  C 645"45"        g  arg
	  g  port	  g  i		(	k g  c		w   g  filenamef  sxml/upstream/input-parse.scm
	Q
		Q	,		S		$	R		(	T		+	U		0	T		1	V		4	V		<	V		@	V	
	A	W		G	W		K	X		P	W		]	T		i	T		w	Z		x	\	
 	[	 	]	
 	[	 	^	 	^	 	^	 	^	 	_	  	_	 	`	 	`	 	Z	 	Z	 	Z	 "	   g  nameg  
skip-until CRFIGH       h`      - . , 3 #  45 "  /4 5$  4>  "  G  45"C45"              g  
skip-chars
		Y g  port		Y g  c			L  g  filenamef  sxml/upstream/input-parse.scm
	k
		k	3		l			m		*	l		+	n		=	l		I	l		M	l	
	Y	l	 		Y  g  nameg  
skip-while CR4Xi 5        h   Q   ] L C   I       g  filenamef  sxml/upstream/input-parse.scm
 	 		
   C O  YRZFY[I\LUVE]^X_G'H    h     - . , 3 	#  #  45 45 H4J5HJH"  45$  	J
645$   4	5$  	J
6
6J$  !4J4J55KJK4J5K"   4J>  "  G  4>  "  G  4545"W
4 5"E        g  prefix-skipped-chars
	  g  break-chars	  g  comment		  g  port		  g  buffer		(  g  curr-buf-len		1  g  quantum		5  g  i		;  g  c		;   	g  filenamef  sxml/upstream/input-parse.scm
 
	 	+	 	5	$ 		( 		+ 		1 		; 		< 			H 		Q 		R 			\ 		] 		a 		e 		i 	
	r 		x 		| 	  	  	
  	  	1  	  	  	  	!  	  	
  	
  	  	  	
  	  	  	 &	 		  g  nameg  next-token-old C`RZF[I\aLUVE]X_G'HY     h    - . , 3 
#  #  45 "  45"  4	5$  (  	
664	5$  04	5$  (  	
66
6$  45	"q4	>  "  G  4>  "  G  4545	"@
	"545 4 5"      g  prefix-skipped-chars
	 g  break-chars	 g  comment		 g  port		 g  buffer		'  g  filled-buffer-l		'  g  c		'  g  curr-buf-len		.  g  i		4  g  c			4   
g  filenamef  sxml/upstream/input-parse.scm
 
	 	%	 	/	' 		( 		. 		4 		5 		A 		G 		P 	(	Z 		[ 		e 		f 		j 		n 		r 		x 	  	*  	  	!  	  	  	  	  	  	  	  	  	  	  	  	  	  	 	B 	 	 (			  g  nameg  
next-token CRFY[bXH_G'\aI        hh  j  - . , 3 #  45 45 454 5$  "  "  $  45"4 455$  54>  "  G  4>  "  G  4	5"(  	

66
"z"k"  "  $  45"454 5$  54>  "  G  4>  "  G  4	5"(  	

66
"x"ib      g  incl-list/pred
	h g  port	h g  buffer		h g  curr-buf-len		'h g  buffer		8  g  filled-buffer-l		8  g  i		<  g  c		e  g  buffer	 ] g  filled-buffer-l	 ] g  i	 V g  c	 V  g  filenamef  sxml/upstream/input-parse.scm
 
	 	+	 		 		! 		' 		* 		4 		8 		< 		A 		E 		F 		Q 	,	Y 	
	Z		]	#	e		e	
	m		n	 	 	 	 	 	* 		  	  	  	1  	 	 	 	 	 	 	, 	
 	 	
 					1	=	C	L	,V	V	]	`	1h	 6	h  g  nameg  next-token-of CR$i%iV cRFLHcdG% 	      h   J  -  . , 3  #  45  44 55$   64 54 5$  (4 5
$  4 >  "  G  "   "   C      B      g  port
		z g  line	;	z g  c		D	z  g  filenamef  sxml/upstream/input-parse.scm
*
	*	,	+		+		%+		)+		/+	%	0-		3-		7.		;-		;,		>/		D,		K0		O0		P0	'	Y0	!	]0		^1		 		z
  g  nameg  read-text-line CRFXL\'_GZ 	      h     - . , 3 #  45  
$  m4 5"  P45$  	
6454>  "  G   $  C45"
45"C             g  n
	  g  port	  g  buffer		(  g  i		.	~ g  c		.	~ g  i1		I	~  g  filenamef  sxml/upstream/input-parse.scm
<
	<	+	=		!=		">		(>		.?		/@		9@		B@		CA		IA	
	LB		fC		jC		pD		~D		~?	 ?	 ?	 =	 	   g  nameg  read-string CRZFefVLHUE]gh        h     - . , 3 #  #  45 44554 (  45"  	4 55$  4	5$  C
6454455$  4	5$  C
6C            g  prefix-skipped-chars
	  g  break-chars	  g  comment		  g  port		  g  delims		1  g  token		{   g  filenamef  sxml/ssax/input-parse.scm
	]
		^	+		^	5	$	_		'	_		+	_	&	/	_		1	_		1	_		4	`		<	`		=	a		H	b		R	`		V	`		W	c		[	c		_	c		c	c		e	d		l	e		p	e		q	f		y	f	1	{	f		{	f		~	g	 	g	  	g	 	g	
 	h	 	h	 	h	 	g	 	i	! 	i	 %	 		  g  nameg  
next-token CRFi       h       -  . , 3  #  45   6        g  port
		  g  filenamef  sxml/ssax/input-parse.scm
	l
		l	,		m	 		
  g  nameg  read-text-line CRRHLb      hp     ]4M5  $  "  MM $  K4L5 M $   C4 5$  C4M5$  N 4M 5$  C CM $  C CC	      g  t
	
	 g  c
	*	n  g  filenamef  sxml/ssax/input-parse.scm
	|			|	!	
	|		
	|			}		#	|		$	~	!	*	~		2			6 	!	@			C 	!	M			P 	!	Q 	%	[ 	!	e 	!	i		 		p
  g  nameg  my-peek-char CGjk[    hp    - 1 3 
HJ(  "  JKHHO "  G45 $  8K4>  "  G  JK44 
55$  "  
"C"  b4 5$  JC45 $  B44 55$  #K4>  "  G  JK""  C"  c
$  "<"  E	$  "r44 	54 	55$  			""
	"Q 
KK"       ~      g  str
	i g  <input-port>	i g  max-no-char		i g  no-chars-read		i g  peeked?		i g  c		7	y g  pos-to-match		}  g  c	   g  i	 F g  matched-substr-len	 F g  j	 F g  k		 ? g  my-peek-char	Fi g  no-chars-read	Se g  peeked?	Se  g  filenamef  sxml/ssax/input-parse.scm
	t
		w			w	/		w			x		2 		3 		7 	
	? 		B 		C 	/	W 	/	Y 		Z 		_ 	&	h 		l 		s 		w 		} 	  	  	  	
  	  	  	  	  	(  	  	  	  	/  	/  	  	3  	   	  	  	  	
  	  	  	  	  	 	 	 	 	" 	"! 	2# 	"% 	) 	, 	 2 	5 	%? 	? 	F	x	i 	 >		i	
	  g  nameg  find-string-from-port?g  documentationf  dLooks for @var{str} in @var{<input-port>}, optionally within the
first @var{max-no-char} characters. CRC           g  m
		, g  buffer
]  g  filenamef  sxml/ssax/input-parse.scm		6
	3	B
	:	C
	?	D
	D	E
	K	F
	R	G
	V
g  filenamef  sxml/upstream/input-parse.scmi	,
C	;
		Q
S	k
T 	] 	 
 
 
 
(	:(	(
*
<
g  filenamef  sxml/ssax/input-parse.scm	]
 	l
(I	t
 	(K
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                            ccache/sxml/ssax.go                                                                                 0000644                 00000210602 15154557173 0010260 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0j     ] 4       h$c      ] g  guile	 	g  define-module*	 	 	g  sxml	g  ssax	 		g  filenameS	
f  sxml/ssax.scm	g  importsS	g  input-parse	 	 	g  srfi	g  srfi-1	 	 	g  srfi-13	 	 	 	g  exportsS	g  current-ssax-error-port	g  with-ssax-error-to-port	g  
xml-token?	g  xml-token-kind	g  xml-token-head	g  make-empty-attlist	g  attlist-add	g  attlist-null?	 g  attlist-remove-top	!g  attlist->alist	"g  attlist-fold	#g  define-parsed-entity!	$g   reset-parsed-entity-definitions!	%g  ssax:uri-string->symbol	&g  ssax:skip-internal-dtd	'g  ssax:read-pi-body-as-string	(g   ssax:reverse-collect-str-drop-ws	)g  ssax:read-markup-token	*g  ssax:read-cdata-body	+g  ssax:read-char-ref	,g  ssax:read-attributes	-g  ssax:complete-start-tag	.g  ssax:read-external-id	/g  ssax:read-char-data	0g  ssax:xml->sxml	1g  ssax:make-parser	2g  ssax:make-pi-parser	3g  ssax:make-elem-parser	4 !"#$%&'()*+,-./0123 	5g  set-current-module	65 	75 	8g  throw	9g  parser-error	:g  integer->char	;g  ascii->char	<g  char->integer	=g  char->ascii	>g  make-parameter	?g  current-error-port	@g  parameter-fluid	Ag  *current-ssax-error-port*	Bg  
parameter?	CB 	DB 	Eg  	scm-error	Fg  wrong-type-arg	Gf  parameterize	Hf  Not a parameter: ~S	Ig  with-output-to-port	Jg  display	Kf  ;;; SSAX warning: 	Lg  for-each	Mg  newline	Ng  	ssax:warn	Og  string	Pg  ucscode->string	Qg  char-newline	Rg  char-return	Sg  char-tab	Tf  
	Ug  nl	Vg  amp	Wf  &	XVW	Yg  lt	Zf  <	[YZ	\g  gt	]f  >	^\]	_g  apos	`f  '	a_`	bg  quot	cf  "	dbc	eX[^ad 	fg  ssax:predefined-parsed-entities	gg  make-syntax-transformer	hg 	ig 	jg  begin0	kg  macro	lg  $sc-dispatch	ml 	nl 	og  any	pg  each-any	qop	roq	sg  syntax-object	tg  let	ug  top	vu 	wg  ribcage	xg  dummy	yg  form	zg  form1	{xyz 	|g  m-b6cceb-18	}|u 	~}vv 	f  l-b6cceb-1d f  l-b6cceb-1e f  l-b6cceb-1f   w{~  w  g  x   }  f  l-b6cceb-1a   w  v  g  hygiene   st  g  val s  g  append       g  syntax-violation     f  -source expression failed to match any pattern g  let*-values o o g  begin g  bodies x  g  m-b6cceb-24 u  v  f  l-b6cceb-29 f  l-b6cceb-2a   w    f  l-b6cceb-26   w  v  s  o  o  o o o g  var g  initializer g  rest x  vvvv  f  l-b6cceb-2e f  l-b6cceb-2f f  l-b6cceb-30 f  l-b6cceb-31 f  l-b6cceb-32   w  v  st  s  oo  o o o g  call-with-values g  vars x  f  l-b6cceb-39 f  l-b6cceb-3a f  l-b6cceb-3b f  l-b6cceb-3c f  l-b6cceb-3d   w  v  s  g  lambda s  s  g  1+ g  inc g  1- g  dec g  include-from-path/filtered g  with-input-from-file g  %search-load-path g  eof-object? g  reverse g  read g  memq g  _ oo  g  datum->syntax g  syntax->datum g  exp   v  f  l-b6cceb-5d   w  g  accept-list g  file   vv  f  l-b6cceb-56 f  l-b6cceb-57   w  g  read-filtered   v  f  l-b6cceb-45   w  f  l-b6cceb-44   w  v  s  g  assert g  atom f  doit   opp  g  condg  exprg  r-expx g  m-b6cceb-62u vv f  l-b6cceb-67f  l-b6cceb-68	f  l-b6cceb-69
	 w
  f  l-b6cceb-64 w v s  g  ands g  =>s s s    g  elses g  errors f  assertion failure: ~a s !g  list"s! #g  quote$s# %f  collect&% 'o&p (x )v *f  l-b6cceb-71+f  l-b6cceb-72,*+ -w(), .v- /s. 0s. 1 2g  free-id3g  report:4v 5s34 625 76p8p79&8:o9;f  l-b6cceb-77<f  l-b6cceb-78=f  l-b6cceb-79>;<= ?w> @v? As@ Bs@ CpqD&CEoDFg  expr1Gg  stuffHxFG Ivvv Jf  l-b6cceb-80Kf  l-b6cceb-81Lf  l-b6cceb-82Mf  l-b6cceb-83NJKLM OwHIN PvO QsP Rs%P SxG Tf  l-b6cceb-8bUf  l-b6cceb-8cVTU WwS)V XvW YsX Zs%X [g  assure\ooo ]g  	error-msg^x] _g  m-b6cceb-90`_u a`vv bf  l-b6cceb-95cf  l-b6cceb-96df  l-b6cceb-97ebcd fw^ae g` hf  l-b6cceb-92ih jwgi kvfj lsk ms3k ng  run-testof  scan-exppo qg  definerg  m-b6cceb-9csru ts uf  l-b6cceb-9evu wwtv xvw ysqx z2y {zoo |op{ }g  body~x} svv f  l-b6cceb-a1f  l-b6cceb-a2f  l-b6cceb-a3 w~ vw sq sn so opo g  letrec-syntaxg  ?bodyx sv f  l-b6cceb-a8f  l-b6cceb-a9 w vw s g  scan-exps g  syntax-ruless s# g  
quasiquotes g  !s   g  k-heads g  argss   g  hds g  tls  g  ks  g  scan-lit-lsts g  do-wraps       s   g  ifs g  string?s  g  string->symbols   Ȍ  g  do-tls     Ҍ    g  processed-hds g  fns   ތ g  old-tls  g  do-conss      g  processed-tls  쌤   s      g  	do-finishs g  new-bodys       g  unquotes g  unquote-splicings  	 
	                      !  " #" $
!# 	%$ &% ' (' )x} *f  l-b6cceb-ad+f  l-b6cceb-ae,*+ -w), .v-w /s. 0g  map10 20 3sn. 4so. 5g  make-xml-token6g  pair?7g  car8g  token9x8 :g  m-b6cceb-b2;:u <;v =f  l-b6cceb-b7>f  l-b6cceb-b8?=> @w9<? A; Bf  l-b6cceb-b4CB DwAC Ev@D Fs7E Gg  cdrHg  m-b6cceb-bbIHu JIv Kf  l-b6cceb-c0Lf  l-b6cceb-c1MKL Nw9JM OI Pf  l-b6cceb-bdQP RwOQ SvNR TsGS Ug  string-lengthVg  char-whitespace?Wg  
string-refXg  string-whitespace?Yg  assq-valuesZg  
fold-right[g  fold\	 	
			 ]g  ssax:S-chars^g  
skip-while_g  ssax:skip-S`g  char?ag  char-alphabetic?bg  char=?cg  ssax:ncname-starting-char?dg  	peek-charef  XMLNS [4] for 'fg  next-token-ofgg  string-indexhf  0123456789.-_ig  ssax:read-NCNamejg  	read-charkg  ssax:read-QNamelf  xmlmg  ssax:Prefix-XMLng  =og  string<?pg  symbol->stringqg  <rg  >sg  ssax:largest-unres-nametg  name-compareuf  #LARGEST-SYMBOLvg  assert-curr-charw< xf  start of the tokenyg  ENDz> {f  XML [42]|g  PI}g  peek-next-char~- f  XML [15], second dashg  find-string-from-port?f  -->f  XML [15], no -->g  COMMENTg  string=?f  CDATA[g  read-stringg  port	   g  CDSECTg  DECLg  STARTf  ?>f  $Failed to find ?> terminating the PIg  ssax:skip-pig  string-concatenate/sharedg  
next-token? f  reading PI contentf  ?f  ]>f  5Failed to find ]> terminating the internal DTD subsetf  reading CDATAf  ]f   f  ]]g  string-null?f  gt; f  XML [66]g  string->numberg  integer?f  [wf-Legalchar] broken for 'f  ampf  ltf  aposf  quotg  assqg  call-with-input-stringg  
procedure?g  close-input-portf  [norecursion] broken for g  	*DEFAULT*f  [wf-entdeclared] broken for g  ssax:handle-parsed-entityg  null?<& f  XML [10]f   g  memvf  XML [68]g  *eof*f  [CleanAttrVals] broken= f  XML [25]'" g  !string-concatenate-reverse/sharedf  [uniqattspec] broken for f   [nsc-NSDeclared] broken; prefix g  ssax:resolve-namef  xmlnsf  [dt-NSName] broken for >/ f  XML [40], XML [44], no '>'f  XML [44], no '>'g  assocg  	EMPTY-TAGf  #[elementvalid] broken, no decl for g  ANYg  applyg  valuesg  REQUIREDf  [RequiredAttr] broken forf  [ValueType] broken for g  FIXEDf  [FixedAttr] broken for g  CDATAg  memberf  [enum] broken for f  =f  declared content type f   not verified yetf  ,[uniqattspec] after NS expansion broken for f  space after SYSTEM or PUBLICf  XML [11], XML [12]f  SYSTEMf  XML [11]f  PUBLICg  
skip-untilf  space after PubidLiteralf  
XML [75], f   rather than SYSTEM or PUBLICf  #XML [22], unexpected token of kind f  XML [22], char 'f  ' unexpectedg  ssax:scan-Miscf  reading char datag  
ENTITY-REFg  ssax:assert-tokeng  orig-handlersx g  m-b6cceb-c4u v f  l-b6cceb-c9f  l-b6cceb-ca w  f  l-b6cceb-c6 w v s g  loops s s  s g  accums s g  targets g  seed s   g  	make-cases s sN f  Skipping PI: s sU 	 
s 
 	    g  defaults        g  handlerss g  old-defs       !g  tag"s! #g  handler$s# %"$&%'&  (" )$  *() +*,+  -', . - /. 0g  clauses1s0 21 3g  case4s3 51645726 8g  clause9s8 :91;: <9=1< >;= ?7> @? A/@ Bs C  D  Eooooo Fg  my-new-level-seedGg  my-finish-elementHg  my-char-data-handlerIg  my-pi-handlersJxFGHI Kg  m-b6cceb-cdLKu MLvvvv Nf  l-b6cceb-d2Of  l-b6cceb-d3Pf  l-b6cceb-d4Qf  l-b6cceb-d5Rf  l-b6cceb-d6SNOPQR TwJMS UL Vf  l-b6cceb-cfWV XwUW YvTX ZsY [g  start-tag-head\s[Y ]sY ^g  elems_s^Y `g  entitiesas`Y bg  
namespacescsbY dg  preserve-ws?esdY fsY g\]_acef hsqY ig  xml-space-gijsiY kg  conslskY msmY nsY of  spacepsoY qnp rlmq shjr tstY ug  handle-start-tagvsuY w\\ x]] yaa zcc {ee |g  parent-seed}s|Y ~}f wxyz{~ sY g  elem-gisY g  
attributessY g  expected-contentsY c s-Y \]_ac  f c} s3Y sY  c}f g  EMPTYsY  sY sY g  eqv?sY s<Y s_Y ]  s)Y ]  s#Y syY  s8Y g  exp-kindsY g  exp-headsY  s9Y f  [elementvalid] broken for sY f   while expecting sY ] Z \ sY s Y sY j sY g  
name-valuesY  g  equal?sY f  preservesY sGY   Z  e  e  sY g  expect-eof?sY sY  ff xy g  
term-tokensY f s/Y sY sY  sY   f  [GIMatch] broken for sY ] Z \ s|Y  s2Y sY  ]f ]af  sY  sY ]af sY ]af Z sY  g  eq?sY g  PCDATAsY   f  * with char content only; unexpected token sY ]  v]acef f  t  f  XML [43] broken for sY ]    g   ssax:make-parser/positional-argsoooooooo g  *handler-DOCTYPEg  *handler-UNDECL-ROOTg  *handler-DECL-ROOTg  *handler-NEW-LEVEL-SEEDg  *handler-FINISH-ELEMENTg  *handler-CHAR-DATA-HANDLERg  *handler-PI	x 
g  m-b6cceb-dc
u vvvvvvv f  l-b6cceb-e1f  l-b6cceb-e2f  l-b6cceb-e3f  l-b6cceb-e4f  l-b6cceb-e5f  l-b6cceb-e6f  l-b6cceb-e7f  l-b6cceb-e8 w	  f  l-b6cceb-de w v s s s   sq !g  handle-decl"s! #g  
token-head$s# %"$ &g  or's& (s )s *f  DOCTYPE+s* ,)+ -(,$ .s9 /f  .XML [22], expected DOCTYPE declaration, found 0s/ 1.0$ 2'-1 3sv 4s] 5f  XML [28], space after DOCTYPE6s5 7346 8s_ 98 :s ;g  docname<s; =< >sk ?> @=? Ag  systemidBsA CB Ds Esc FE9 Gs. HG IDFH JCI Kg  internal-subset?LsK ML Ns Os Ps[ Qs# Rs> SRP TQS Uf  XML [28], end-of-DOCTYPEVsU W3TV XOPW YN9X ZMY [s^ \s` ]sb ^[\] _<BL `g  #scan-for-significant-prolog-token-2as` ba[\] cb dg  #scan-for-significant-prolog-token-1esd fe gst hs8 is ji khj lk ms ns onh pf  XML [22], unexpected EOFqsp r.q ss3 ts uth vs| wv xs2 ys zyh {z |f }s ~} "z ~ s  z g  element-parsers s z[\]  s f  XML [22], unexpected markup s .h   s3 g  ssax:define-labeled-arg-macrog  eachoo ooo g  define-syntaxg  labeled-arg-macro-nameg  positional-macro-nameg  arg-nameg  arg-defx g  m-b6cceb-f1u vvvv f  l-b6cceb-f6f  l-b6cceb-f7f  l-b6cceb-f8f  l-b6cceb-f9f  l-b6cceb-fa w  f  l-b6cceb-f3 w v s s g  kw-val-pairss s g  finds g  k-argss s s g  otherss g  nexts  g  keys g  arg-no-match-names ÌČƌǌ  ˌ g  valss g  keyss ьҌӌԌόь،ٌ  g  	rev-applys      sy s g  xss 猤 䌤       g  m-b6cceb-105u x g  m-b6cceb-106u  f  l-b6cceb-10bf  l-b6cceb-10c w  f  l-b6cceb-108 w  g  shift  s s s g  DOCTYPEv s g  UNDECL-ROOT	s 
g  	DECL-ROOTs
 g  NEW-LEVEL-SEEDs g  FINISH-ELEMENTs g  CHAR-DATA-HANDLERs s| 	 s s s s s  !  "	#	$"#%$&%'&  ()*()+*,+-,  ./0./102132  45645768798  :;<:;=<>=?>  @AB@ACBDCED  Fs Gs HGIFHJIKJLFMLNMOKN P QP RSRTQS U	 VU WVS X YX ZYS [ \[ ]\S ^ _^ `_S a ba cbS d ed feS g!'-39?EOTWZ]`cf hg is js kFjlikmlnmoipojqi rs s trsi uqt vu wsy xs ys zxy{rwz |xw}r|y ~{} rw w ~ r  s  s s s; sA sK s  g  whens sN f  -Internal DTD subset is not currently handled s  s&   f  DOCTYPE DECL s s f   found and skippeds  s s s#     s   	        
 g  ssax:reverse-collect-strg  *PI*>[ g  string-appendf  :g  @g  *TOP*g  *NAMESPACES*g  SSAX:XML->SXMLC 5       hТ    ]4	
45 47 >  "  G   89    h      - 1 3  @          g  port
			 g  message			 g  rest				  g  filenamef  sxml/ssax.scm
 
	 		 	 				
	  g  nameg  parser-error C9R:i;R<i=R4>i4?i5 5R4@ii5ARDEFGH        hP      ]
45$  "  4 >  "  G  4	 5Y4>   ZCZF          g  port
		M g  thunk		M g  
t-b6cceb-a			M  g  filenamef  sxml/ssax.scm
 
	 		B 	 		M	  g  nameg  with-ssax-error-to-port CRIJKLM        h0   n   ] 4>  "  G  4L >  "  G  6     f       g  filenamef  sxml/ssax.scm
 		 		 		 		 		, 	 		,
   C       h       - 1 3 45 O 6              g  port
			 g  args			  g  filenamef  sxml/ssax.scm
 
	 		 	 			
  g  nameg  	ssax:warn CNRO:       h      ]4 56   ~       g  	codepoint
		  g  filenamef  sxml/ssax.scm
 
	 	
	 	 		  g  nameg  ucscode->string CPR
QRRR	SRTURef   h      ]  C       g  filenamef  sxml/ssax.scm
 
	 		 	 		
  g  nameg   reset-parsed-entity-definitions!g  documentationf  BRestore the set of parsed entity definitions to its initial state. C$Rf        h   \  ]  C  T      g  entity
		 g  str		  g  filenamef  sxml/ssax.scm
 
	 		 	 			  g  nameg  define-parsed-entity!g  documentationf  Define a new parsed entity. @var{entity} should be a symbol.

Instances of &@var{entity}; in XML text will be replaced with the
string @var{str}, which will then be parsed. C#R4ijknr h    R   ]  45C      J       g  dummy
		 g  form		 g  form1			  			   C       h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  sxml/ssax.scm
 	 		"  g  
macro-typeg  syntax-rulesg  patternsg  formg  form1g  ...   C5jR4ikn       h   A   ]C9       g  dummy
		 g  bodies		  			   C     h    }   ]   C      u       g  dummy
		 g  var		 g  initializer			 g  rest			 g  bodies			  			   C       h    ~   ]   C v       g  dummy
		 g  vars		 g  initializer			 g  rest			 g  bodies			  			   C 
  hP     ]4 5$  @4 5$  @4 5$  @	 6      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  sxml/ssax.scm
 	 		P  g  
macro-typeg  syntax-rulesg  patternsg  bodiesg  var g  initializer g  restg  bodiesg  varsg  initializer g  restg  bodies  C5RiRiR4ik hh     ]"  S4 5$  6"  45  " $  $4 L 5$  45   """45  "       g  sexp
		Y g  out		Y  g  filenamef  sxml/ssax.scm
 		 	
	 		 		 	!	 		* 		* 		- 		1 		2 	 	7 	&	; 	 	? 		@ 		I 		Q 		Y 	
	Z 		_ 	(	g 	
 		g
   C     h      ]45 O 6           g  accept-list
		 g  file		  g  filenamef  sxml/ssax.scm
 		 		 	 			  g  nameg  read-filtered Cnnp    h   +   ] C#       g  exp
		  		   C      h@      ]4L 4L4 5455545$  @6         g  accept-list
		> g  file		> g  tmp			> g  tmp		'	>  g  filenamef  sxml/ssax.scm	 	 	 	!		"		"	 	!	 	 	 	 		>	   C   h0   |   ]4 5$   O @ 6   t       g  x
		- g  read-filtered		- g  tmp			-  g  filenamef  sxml/ssax.scm
 	 		-   C5R4ikn "$ 	      h0   R   ]    C    J       g  dummy
		, g  expr		, g  r-exp			,  		,	   C'/01      h   ?   ]C  7       g  dummy
		 g  expr		  			   C:AB    h   R   ] C  J       g  dummy
		 g  expr		 g  r-exp			  			   CEQR       h   e   ]4 5C]       g  dummy
		 g  expr		 g  expr1			 g  stuff			  			   CqYZ       h   @   ]C   8       g  dummy
		 g  stuff		  			   C h     ])4 5$  @4 5$  @4 5$  @4 5$  	@4 
5$  @ 6        g  x
		~ g  tmp		~ g  tmp		"	~ g  tmp		9	~ g  tmp		P	~ g  tmp		g	~  g  filenamef  sxml/upstream/assert.scm
		 		~  g  
macro-typeg  syntax-rulesg  patternsf  doitg  exprg  ... g  r-expg  ...  f  collectg  exprg  ...  f  collectg  exprg  ... g  report:g  r-expg  ... f  collectg  exprg  ... g  expr1g  stuffg  ... g  stuffg  ...   C5R4i[kn\lm       h   U   ] C  M       g  dummy
		 g  exp		 g  	error-msg			  			   C    h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  sxml/upstream/assert.scm
	 	 		"  g  
macro-typeg  syntax-rulesg  patternsg  expg  	error-msg   C5[R4inkn|       h   Q   ]  C     I       g  dummy
		 g  vars		 g  body			  			   C&(    h   @   ] C      8       g  dummy
		 g  ?body		  			   Cq/234     h   5   ]  C    -       g  tmp-b6cceb-b1
		  		   C        h   ?   ]45C 7       g  dummy
		 g  body		  			   C 
 hP     ]4 5$  @4 5$  @4 5$  @	 6      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  sxml/upstream/SSAX.scm
2 		P  g  
macro-typeg  syntax-rulesg  patternsf  scan-expg  defineg  varsg  body  f  scan-expg  ?body g  bodyg  ...   C5nR h      ] C       g  kind
		 g  head		  g  filenamef  sxml/upstream/SSAX.scm

		# 			  g  nameg  make-xml-token C5R6iR4iknF       h   @   ] C      8       g  dummy
		
 g  token		
  		
	   C h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  sxml/upstream/SSAX.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  token   C5R4iknT    h   @   ] C      8       g  dummy
		
 g  token		
  		
	   C h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  sxml/upstream/SSAX.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  token   C5RUVW        h     ]4 5
$  C$  4 
56	$  44 
55$  4 56C"  1$  C44 55$  45"C
"         g  str
	  g  len		  g  i		U  g  t		Z   g  filenamef  sxml/upstream/SSAX.scm
q
	r			r		t		s		u		s		 u	"	)u		.v		2s		3v		6v	'	?v		Cv		Fw	'	Ow		Uy		Zz		Zz		f{		i{	#	s{		w{		x|	 |	 y	 	   g  nameg  string-whitespace? CXR     hH   P  ]"  6(  D $  45D"" H      g  val
		G g  alist		G g  alist			< g  scanned			<  g  filenamef  sxml/upstream/SSAX.scm

															 		'	*	)		+		.		1		4		<		<		?	$	G	 		G	  g  nameg  assq-values CYR h       ]	 (  LC L 4L 56         g  lis
		 g  head		  g  filenamef  sxml/upstream/SSAX.scm
											 				 			  g  nameg  recur C       h       ]O  Q 6            g  kons
		 g  knil		 g  lis1			 g  recur			  g  filenamef  sxml/upstream/SSAX.scm

		 			  g  nameg  
fold-right CZR       h0      ]"  (  C4 5""       g  kons
		0 g  knil		0 g  lis1			0 g  lis			$ g  ans			$  g  filenamef  sxml/upstream/SSAX.scm

						
							$		$	 
		0	  g  nameg  fold C[R40i;i\5]R^]    h   }   ] 6      u       g  port
		
  g  filenamef  sxml/upstream/SSAX.scm

	
	 		
  g  nameg  ssax:skip-S C_R`ab  h0      ]	4 5$  4 5$  C_ 6C              g  a-char
		) g  t		'  g  filenamef  sxml/upstream/SSAX.scm

									'	 		)  g  nameg  ssax:ncname-starting-char? CcRdc9e`fagh h0      ]4 5$  C4 5$   C4 5$   CC        g  c
		/  g  filenamef  sxml/upstream/SSAX.scm
												"		&		*	 
		/   C 	  hP      ]4 545$  "  4 >  "  G  4 56              g  port
		I g  
first-char			< g  t			9  g  filenamef  sxml/upstream/SSAX.scm

												%		)	6	.		?		I	 		I  g  nameg  ssax:read-NCName CiRidj      h@      ]4 54 5:$  4 >  "  G  4 5CC          g  port
		= g  prefix-or-localpart			= g  key			=  g  filenamef  sxml/upstream/SSAX.scm

							
					2	!	9	 			=  g  nameg  ssax:read-QName CkR4il5mRnopqrs       h     ] $  2$  ( &  C44 5455$  CCC$  C&  C &  C &  2 &  C445455$  CC &  C445455$  CC             g  name1
	  g  name2	  g  symb1		k  g  symb2		k  g  symb1	   g  symb2	    g  filenamef  sxml/upstream/SSAX.scm
														"					&	1	.		2		4		7		:		>		B		D		M		O	,	X		Z	,	^		a		e		h		k	$	k		w		y	"	{		~	 	1 	 	 	 	 	 	) 	 	 	" 	 	 	1 	 	 	 	 2	 	   CtR4iu54iu5sRvwxdj5yk_z{|i}~9     h    ]4 >  "  G  4 5/$  M4 >  "  G  44 554	 >  "  G  4
 >  "  G  C?$  4 >  "  G  4 56!$  4 5-$  T4 >  "  G  4 >  "  G  4 5$  "  4 >  "  G  6[$  O4 >  "  G  44	 55$  "  4 >  "  G  64 564 56      g  port
	 g  key	 g  val		J	w g  key	 s g  t	9_  g  filenamef  sxml/upstream/SSAX.scm
b		c		c			c		c		d	
	d		+e		=f		Af		Bf	$	Jf		Jf		Mg		_h		ch	!	eh	(	lh	 d	 i	 i	. i	2 i	 d	 k	 k	 l	 X	 X	 X	 X	 Y	 Y	% Y	 Y	 Z	 Z	 Z	[	[	k	m	*_	._	/_	9_	9_	c`	f`	jn	kn	%sn	wo	xo	#o	 8	   C)R9      h       ]4 5$  C 6              g  port
		  g  filenamef  sxml/upstream/SSAX.scm
t
	u		u	#	u		u		v		v	 		  g  nameg  ssax:skip-pi CR_}j    hH      ]4L5 >4L5$  4L>  "  G    C 4L 5 C             g  pi-fragment
		B  g  filenamef  sxml/upstream/SSAX.scm
								
	$													5	 	:		;	#	@	 		B
  g  nameg  loop C  h0      ]	4 >  "  G  O  Q 45 6       g  port
		0 g  loop		.  g  filenamef  sxml/upstream/SSAX.scm
~
					0	 		0  g  nameg  ssax:read-pi-body-as-string C'R9      h       ]4 5$  C 6              g  port
		  g  filenamef  sxml/upstream/SSAX.scm

				#								 		  g  nameg  ssax:skip-internal-dtd C&RRi
]&  jUd}fa       h    ~   ]4 5$  C4 5$   CC v       g  c
		  g  filenamef  sxml/upstream/SSAX.scm
							,		 		   CW]     h    ]+" ~4L  54 5
$  45"]$  4 5]$  x"  R4 5>$  4 >  "  G  C]$  45"4	5"b4
5$  "  45"45"/&$  o4 5"  4455"45$  54 5;$  #4 >  "  G  45"""4 5
$  4 >  "  G  "   45""z          g  port
	 g  str-handler	 g  seed		 g  seed		 g  fragment		 g  key		 g  seed		R  g  key		Y  g  ent-ref	 O  	g  filenamef  sxml/upstream/SSAX.scm
						
	$		$									'		7		@		A		J		N		R		S		Y		e	 	 	 	% 	) 	 	 	 	) 	. 	 	 	 	 	 	 	1 	 	 	 	( 	 	 	 	 	 	 	" 	 	0						

				
	/ 	)$	%	7	=	(A	G	P	Y	]		^	/t				 H		   C O  *RdjP9`     hx   i  ]4 5x$  4 >  "  G  	"  	
4 5454 >  "  G  45$  6	 
6    a      g  port
		t g  base	*	t g  name		8	t g  	char-code		C	t  g  filenamef  sxml/upstream/SSAX.scm

								.	*		-		0		2		4	&	8		8		;		C		F		X		b		h		n 		r 	<	t 	 		t  g  nameg  ssax:read-char-ref C+R4i5W4i5Z4i5]4i5`4i5c fR    h   f   ]L LL 6    ^       g  port
		  g  filenamef  sxml/upstream/SSAX.scm
F		F	 		   C9f     h   f   ]L LL 6    ^       g  port
		  g  filenamef  sxml/upstream/SSAX.scm
X		X	 		   C    h   %  ].45$  h45$  O 645$  )45 	4	5
4	>  "  G  
C 64	5$  
645$  ;
	4	5$  4	 5
O 6 6 6         g  port
	  g  name	  g  entities		  g  content-handler		  g  str-handler		  g  seed		  g  t		  g  ent-body			{ g  new-entities			{ g  port			M	q g  val	
	Z	q g  t	   g  t	   g  fallback		   g  new-entities	
    g  filenamef  sxml/upstream/SSAX.scm
<
	?		>		A		B	 	B		A		"D	
	,C		=E	
	>G	
	HC		IH		MH	
	PJ		ZI		]K		wM		{M	
	|N	 >	 P	 P	( P		 Q	 Q	
 Q	 >	 S	 T	  T	 S	 V	
 U	 W	" W	
 Z	 Z	
 [	 [		 )	 	  g  nameg  ssax:handle-parsed-entity CR     h   q   ] C    i       g  filenamef  sxml/upstream/SSAX.scm
c
	c	 		
  g  nameg  make-empty-attlist CRtnq     hH     ]
 (   C4 5$  C$   C 4 5C         g  attlist
		E g  
name-value		E g  key			E  g  filenamef  sxml/upstream/SSAX.scm
i
	j		j		k		k		k	+	k		k		5m		9n		:n	"	?n	/	Cn	"	Dn	 		E	  g  nameg  attlist-add CRiR      h      ]  D             g  attlist
		
  g  filenamef  sxml/upstream/SSAX.scm
t
	u	
	u		
u	 		
  g  nameg  attlist-remove-top C R  h   z   ] C   r       g  attlist
		  g  filenamef  sxml/upstream/SSAX.scm
w
 		  g  nameg  attlist->alist C!R[i"R4i]i5 jRd]+iv        h      ]L  6         g  port
		 g  entities		 g  	fragments			  g  filenamef  sxml/upstream/SSAX.scm
					
 			   C     h       ]$   C C             g  str1
		 g  str2		 g  	fragments			  g  filenamef  sxml/upstream/SSAX.scm
							
				 			   C9     hH    ]4 L 54545$  "   $  C$  ;45
$  4>  "  G  "     "|4	5$    "X&$  45#$  .4>  "  G   4
5 " 454>  "  G  4LO 5 "6             g  	delimiter
	A g  port	A g  entities		A g  prev-fragments		A g  new-fragments		A g  cterm		A g  t		&	; g  name	 -  g  filenamef  sxml/upstream/SSAX.scm
							"													 		&			8	!	?		G			K		L		U		Y	
	Z	0	w	#	z	 	
 		 	 	# 	 	
 		 	 	 	 	
 	 	 	 	 	 	 					9	?	!A	 0	A	  g  nameg  read-attrib-value CO  Q c_kv9       h     ]""  44 55$  4 54 >  "  G  4 >  "  G  4 >  "  G  4 54	4
4L  555$  "  4 5"cC45 "U             g  port
	  g  entities	  g  	attr-list		  g  name		  g  	delimiter		d  g  t	    g  filenamef  sxml/upstream/SSAX.scm
						
	+								
	 		2		6		8	%	?		H		Z		^	%	`	1	d		d		g		n		q		z	6	|		~			 	 	 	 	& 	 	 	 	 	 $	 	   CO  ,Rm9   hx     ]$  =45$  "  &  "  4 5C$  '45$  $  CCCC        g  port
		v g  
unres-name		v g  
namespaces			v g  apply-default-ns?			v g  t			A g  
default-ns		U	s  g  filenamef  sxml/upstream/SSAX.scm
4
	6			5		
9		9		9		8		&:		,8		3<		9<		<<	<	><		D=		E7		L5		M?		Q?		U?		U?		]@		`@		e@	
	hA		lA	
 		v	  g  nameg  ssax:resolve-name CR     h      ] 6       g  uri-str
		  g  filenamef  sxml/upstream/SSAX.scm
i
	j	 		  g  nameg  ssax:uri-string->symbol C%R4i5si  9% hp     ]$  4 >  "  G  "   45"  5(  C&  C""       g  port
		o g  prefix		o g  uri-str			o g  
namespaces			o g  
uri-symbol		,	o g  nss		2	g  g  filenamef  sxml/upstream/SSAX.scm
																	&		,		2		8		?		C	
	I		O		T		Y		]	
	a		g		g	 		o	  g  nameg  add-ns C,_vz99   hP   O  ]"4 >  G &  4L >  "  G  "   $  	CC  G      g  	decl-attr
		N g  result		N g  	attr-name			N g  content-type			N g  use-type			N g  default-value			N  g  filenamef  sxml/upstream/SSAX.scm
								"			#		)	!	0		B			G		J	 		N	  g  nameg  add-default-decl C" tq9rN   h    ]S4 5$  
L64 >  G 45$  L	"  "  
4>  G 45$  KL$  "  $  L"  $   "WL 6$  h 4	
>  G 
	
&  4L >  "  G  "   $  "  	
 "4	
>  G 
	
&  /$  "  4L >  "  G  "  c	&  "  W	$  84	5$  "  4L >  "  G  "  4L 	>  "  G   "           g  attlist
	 g  
decl-attrs	 g  result		 g  attr		" g  attr-others		" g  	decl-attr		M g  other-decls		M g  key		_ g  t		p  g  	attr-name	  g  content-type		  g  use-type	
  g  default-value	  g  	attr-name	3 g  content-type		3 g  use-type	
3 g  default-value	3 g  t	Lq g  t	  g  filenamef  sxml/upstream/SSAX.scm
			
				
			%	
	*		4		>		C		P	
	U		Z		]	*	_		_		o	!	p		p	 	" 	 	 	9 	. 	 	/ 	 	% 	 	 	 	 	 		 	 	! 				
	&	'	6	B	F	I	L	L	Y	_	(f	y	#}									(	G				!			-	 G		  g  nameg  loop C!Z9    h0      ]
44L L 5 5$  CL 6        g  
name-value
		/ g  attlist		/ g  t			/  g  filenamef  sxml/upstream/SSAX.scm
							)											+		/	 		/	   C  h    ]E454>  "  G  /45$  45"  $  B4 5$  $  	"  	"  ,"  4
 >  "  $  	"  	"  G $  :O 	Q 	O 

L L	Q 
4
5
	"  45	"  
(  
	"  L 
&  6

$  "  4L
5
""  


"
$  0L 
&  !
4L

5
"b""	
"KG 
4 54O 45 
5D             g  tag-head
	 g  port	 g  elems		 g  entities		 g  
namespaces		 g  attlist		 g  empty-el-tag?		A g  t		R  g  elem-content	  g  
decl-attrs	  g  add-default-decl		   g  loop	
   g  merged-attrs		  g  attrs	
  g  proper-attrs	  g  
namespaces	  g  proper-attrs	
 g  
namespaces	  g  filenamef  sxml/upstream/SSAX.scm
							"		&	 	(	+	,		-		1		2		6		8	!	<		A		I		J		R			`		b	 	i	+	m		u 		z	 	 	 	
 	 	' 		 	 		 	 	A 	 
	 	 	 		
							!	$	(	-	3	6	*;	E	L	O	 R	^	^	a	c	g	l	-r	u	x			)				+							 Q		   C O  -Riv]_j9 h     ]!4 54 >  "  G  4 >  "  G  4 54	5&  &4
  54 >  "  G  C45&  r4  >  "  G  4 >  "  G  4 >  "  G  4 54
  54 >  "  G  C 6        g  port
	  g  discriminator		  g  	delimiter		>  g  val		\	s g  	delimiter	   g  systemid	    g  filenamef  sxml/upstream/SSAX.scm

									#			"		4	
	8		:	(	>	
	>		C		G	,	I		M		N		Q		V		X	-	\		\	
	_		v		z	-	|	 	 	 	 	 	 	* 	 	 	 	$ 	0 	 	 	 	  	$ 	5 	 	 	 	 	 	 2	   g  nameg  ssax:read-external-id C.Rb)_|9    h   n  ]"  }45$  C4<5$  V4 5$  4 5"$  "  $  "  $  C	 
6	 64 5"vf      g  port
	  g  c	  g  token		(	w g  key		-	w  g  filenamef  sxml/upstream/SSAX.scm

								
		!		"		(		-		-	
	9		E		N	
	s	!	u		w		}	 	0 	 	 	 	 	   g  nameg  ssax:scan-Misc CR<&Ri <&Ri  d)y*/}j+iv5O      h0    ],<4 5$  h4 5$  "  $  D$  4 5 6$   6D" 4	$  L "  L
 54 545$   45$  "  45D<$  4 5$  +4 45$  "  455"g$  "45$  "  45"<45$  "  45D&$  4 5#$  (4 >  "  G  44 55"4 54 >  "  G  45$  "  4545D4 5
$  4 >  "  G  "   44
55"Y"Q           g  port
	+ g  expect-eof?	+ g  str-handler		+ g  seed		+ g  token			x g  key			x g  seed		O	] g  seed		|# g  fragment	 # g  	term-char	 # g  token	 ` g  key	 ` g  key	p g  name	  g  filenamef  sxml/upstream/SSAX.scm
M		Q		Q			Q		T		T			U		U		;W		DU		EY		OY		]Z		fU		r[		x^		|e		}g	 g	! c	 h	! g	 f	 i	 f	 k	 k	 I	 I		 J	 J	# J	 l	 o	 q	# q	 r	 r	 u	 I	 I		J		J	#J	u	t	r	I	)I		0J	6J	#:J	@x	AI	KI		RJ	XJ	#\J	`z	io	j~	p~	|			'			%			-	4	I	I		J	J	#J			,			 					2	#	#e	 \	+	   C O  /R        h@     ]4 5$   &  
 "  "  $  C 6           g  token
		; g  kind		; g  gi			; g  
error-cont			; g  t		&	;  g  filenamef  sxml/upstream/SSAX.scm

														&		;	 
		;	  g  nameg  ssax:assert-token CR4i2knABCD      h    H   ]  C       @       g  dummy
		 g  orig-handlers		  			   C h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  sxml/upstream/SSAX.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  orig-handlers   C52R4i3knEZgstv]fa )     h      ]	
    	     !  " #$%&'	  " (         C             g  dummy
	  g  my-new-level-seed	  g  my-finish-element		  g  my-char-data-handler		  g  my-pi-handlers		   	 	   C  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  sxml/upstream/SSAX.scm
o	 		"  g  
macro-typeg  syntax-rulesg  patternsg  my-new-level-seedg  my-finish-elementg  my-char-data-handlerg  my-pi-handlers   C53R4i kn %279:@JZ^_cfglmorsuwx{|bz[\] *      h   !  , 3 	
              !    "#$%&'(      ")  C       g  dummy
	  g  *handler-DOCTYPE	  g  *handler-UNDECL-ROOT		  g  *handler-DECL-ROOT		  g  *handler-NEW-LEVEL-SEED		  g  *handler-FINISH-ELEMENT		  g  *handler-CHAR-DATA-HANDLER		  g  *handler-PI		   	 	   C        h(   @  ]	4 5$  @ 6      8      g  x
		" g  tmp		"  g  filenamef  sxml/upstream/SSAX.scm
	 	 		"  g  
macro-typeg  syntax-rulesg  patternsg  *handler-DOCTYPEg  *handler-UNDECL-ROOTg  *handler-DECL-ROOTg  *handler-NEW-LEVEL-SEEDg  *handler-FINISH-ELEMENTg  *handler-CHAR-DATA-HANDLERg  *handler-PI   C5 R4ikn2    h   6   ]  C .       g  tmp-b6cceb-102
		  		   C       h   6   ]  C      .       g  tmp-b6cceb-101
		  		   Ck      hX      ]445	4
55 45    C       g  dummy
		X g  labeled-arg-macro-name		X g  positional-macro-name			X g  arg-name			X g  arg-def			X  		X	   C  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  sxml/upstream/SSAX.scm
		 		"  g  
macro-typeg  syntax-rulesg  patternsg  labeled-arg-macro-nameg  positional-macro-nameg  arg-nameg  arg-defg  ...    C5R4i1knhnpFv        h0   G   ] 	 
C    ?       g  dummy
		, g  kw-val-pairs		,  		,	   C  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  sxml/upstream/SSAX.scm
	
 		"  g  
macro-typeg  syntax-rulesg  patternsg  kw-val-pairs  C51R  h     ] (  C (   C"  c(  (  C45C45$  "(  "  
45" "             g  	fragments
	  g  	fragments		{ g  result			{ g  strs			{  g  filenamef  sxml/upstream/SSAX.scm


	
			
		
		
		
		
		$
		(
		1
		3
		8
		:
		>
		A
		F
	/	I
	)	S
		V
		Y
		_
		f
		o
		p
		q
		{
		{
		~
	/	
	: 
	 	   g  nameg  ssax:reverse-collect-str CRX     h   t  ]! (  C (   4 5$  4 5$  C C C"  {(  $  C45C45$  *$  45"  "$  "  
45" "t       l      g  	fragments
	  g  	fragments	5  g  result		5  g  strs		5  g  all-whitespace?		5   g  filenamef  sxml/upstream/SSAX.scm


	
			 				
											(	#	<	%	(	)			*		5		;		A			E
		N
		P		U		W		[		^		c	/	f	)	l		m		r	$	t	 	 	 	 	 	 	 	 	 	 	 	/ 	: 	 ,	   g  nameg   ssax:reverse-collect-str-drop-ws C(R0%       h      ] 4 5C              g  el
		  g  filenamef  sxml/upstream/SSAX.scm
%		&		&	"	&	;	&	"	&	 		   C9p|'*/v]5_kc.UN&mo-"p       h@      ]
 $   "  $ 44454555  C        g  attr
		? g  accum		? g  res-name			5  g  filenamef  sxml/upstream/SSAX.scm
4		+	
	,		-		"-		$-		&.		'/		,/		./		0,		2+	
	84	 		?	   Cp_)y9     h      ]L  6             g  token
		 g  exp-kind		 g  exp-head			  g  filenamef  sxml/upstream/SSAX.scm
4	 			   Cp      h@      ]
 $   "  $ 44454555  C        g  attr
		? g  accum		? g  res-name			5  g  filenamef  sxml/upstream/SSAX.scm
4		+	
	,		-		"-		$-		&.		'/		,/		./		0,		2+	
	84	 		?	   C/      h       ]45$   C C           g  string1
		 g  string2		 g  seed			  g  filenamef  sxml/upstream/SSAX.scm
4	 			   Cy9     h      ]LL 6             g  token
		 g  exp-kind		 g  exp-head			  g  filenamef  sxml/upstream/SSAX.scm
4	 			   C"p h@      ]
 $   "  $ 44454555  C        g  attr
		? g  accum		? g  res-name			5  g  filenamef  sxml/upstream/SSAX.scm
4		+	
	,		-		"-		$-		&.		'/		,/		./		0,		2+	
	84	 		?	   Cp|'       h      ]L  6   }       g  port
		 g  entities		 g  seed			  g  filenamef  sxml/upstream/SSAX.scm
4	 			   C    h       ]45$   C C           g  string1
		 g  string2		 g  seed			  g  filenamef  sxml/upstream/SSAX.scm
4	 			   C9     h    ],4 >  G 45$  C$  v4L O >  "  G  454	L5L$  L"  4
44L54L555(  "  LC$  /4 5   "$  -4 L O 5  "$  NL&  4 L>  "  G  "   4L LL5  " 6           g  port
	{ g  entities	{ g  expect-eof?		{ g  seed		{ g  seed		{ g  
term-token		{ g  key		+{ g  seed		f  g  attrs		f  g  target	   g  seed	   g  seed	 g  seed	[q  g  filenamef  sxml/upstream/SSAX.scm
4		x+	
	{,		~-	 -	 -	 .	 /	 /	 /	 ,	 +	
 4	 	{	  g  nameg  loop C     hh    ]64 L>  G 		$  V4545
$  "  4445	4555(  
"  

C	$  4<45$  45"   O >  "  G  4545
$  "  4445	4555(  
"  

C4M5

$  

"  

O 	
L 	 Q 6          g  start-tag-head
	d g  port	d g  entities		d g  
namespaces		d g  preserve-ws?		d g  parent-seed		d g  elem-gi		d g  
attributes		d g  
namespaces		d g  expected-content			d g  seed	
	9	 g  attrs		9	 g  seed	
  g  attrs	  g  t	
3 g  preserve-ws?	
3d g  loop	Ed  g  filenamef  sxml/upstream/SSAX.scm
4		K+	
	N,		Q-		V-		X-		Z.		[/		`/		b/		d,		f+	
	l4	 +	
 ,	 -	 -	 -	 .	 /	 /	 /	 ,	 +	
 4	 	d	  g  nameg  handle-start-tag C     h   v   ]   C    n       g  ns
		  g  filenamef  sxml/upstream/SSAX.scm
l	&	l	9	l	B	l	3 		   C '      h    ]RH45K4" 4545$  45" $  *	4
5 "$ 45$  "  4>  "  G  4>  "  G  4>  "  G  454455$  45"  	4>  "  G  [45

$  *4>  "  G  4>  "  G  "   4	>  "  G  J"  P
	$  "J	"  45"  "  4545$  45"  		$  6
	
4
5 


"
	$  $	"  45"  R	"  =H
 4!5K
"O 
Q 4	5"  
 "T5#(  "  $%4&5 C            g  port
	 g  namespace-prefix-assig	 g  
namespaces		 g  
namespaces			 g  port		 g  seed		 g  token		% g  key		B g  target		P	f g  seed		f	w g  
token-head	  g  t	   g  docname	  g  systemid		 g  internal-subset?	
# g  port	~ g  elems	~ g  entities	~ g  
namespaces	~ g  seed	~ g  token	~ g  key		{ g  target	
	 g  seed	
< g  start-tag-head	 g  port	 g  elems	 g  entities	 g  
namespaces	 g  preserve-ws?	 g  seed		 g  xml-space-gi	
 g  handle-start-tag	 g  result	  "g  filenamef  sxml/upstream/SSAX.scm
"
	#		%		3		4	g	4	3	2	h	i	k	k	 l	!k	k	j	h	 		  g  nameg  ssax:xml->sxml C0R0iRC            g  m
		, g  cdata-delimiters
6< g  value-delimeters
GQ g  read-attrib-valueNQ g  xmlns
T-gS g  largest-dummy-decl-attrT-gS g  add-ns	VHgM g  terminators-usual
mu g  terminators-usual-eofmu  	g  filenamef  sxml/ssax.scm	 
 

 
 
 	 	 	" 
# 	0 
W 
 
 
 
 
 
 	 
 
 
 
 
g  filenamef  sxml/upstream/SSAX.scm

q
!
#g
$
$	$	&$	$
%a
&l
(
*
*	*	(*	*
-
-	"-	2-	"- 	"- 	2- 	"-	 -
2SR
3?t
5~
6
6	6	<
>
>6	>6	>6	>5	>7	>7	>7	>5	?8	?	8	?8	?5	?9	?9	?9	?5	?:	?%:	?':	?)5	?04
D<
Ec
Fi
Fq
GLt
Gw
Gx
G	G	.G	GQ
Sl4
Ti
T	T 	T"	T-	 T-gV
kW
m
mD	mE	'mE	mCuB
v
      

      ?

      "
      r
 p	      
   C6                                                                                                                               ccache/sxml/transform.go                                                                            0000644                 00000015604 15154557173 0011322 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0l      ] ; 4   h      ] g  guile	 	g  define-module*	 	 	g  sxml	g  	transform	 		g  filenameS	
f  sxml/transform.scm	g  exportsS	g  SRV:send-reply	g  foldts	g  
post-order	g  pre-post-order	g  replace-range	 	g  set-current-module	 	 	g  make-syntax-transformer	 	 	g  let*-values	g  macro	g  $sc-dispatch	 	 	g  _	g  any		 g  syntax->datum	!  	"  	#g  datum->syntax	$# 	%# 	&g  begin	'g  let	(g  call-with-values	)g  lambda	*g  syntax-violation	+* 	,* 	-f  -source expression failed to match any pattern	.g  
procedure?	/g  display	0g  assq	1g  	*default*	2g  *text*	3g  
*preorder*	4g  *macro*	5g  append	6g  map	7g  error	8f  Unknown binding for 	9f   and no default	:g  reverseC 5  h     ]4	
5 4 >  "  G   4"%&'()        hX      ]
L L $  1 (      C    C    C        g  vars
		W g  initializer		W g  cont			W  g  filenamef  sxml/transform.scm
	V			X			Y		
	Y			X			W				[			Z			]			Z			^		 	^		%	^		0	`		G	\	 		W	   C  h(      - 1 3  (  C O  @            g  bindings
			# g  body			#  g  filenamef  sxml/transform.scm
	S
		T			T			T		!	b		#	U	 			#
   C       h   f   ]	4 5L 4?6^       g  args
		 g  v			  g  filenamef  sxml/transform.scm		S
 		   C,-   h(   d   ]	4 5$   O @ 6 \       g  y
		' g  tmp		'  g  filenamef  sxml/transform.scm
	S
 		'   C5R./      h     ] (  C $   (    " &    " $   4L  5 "4 5$  4 >   "  G    "4 >  "  G    "c  "V          g  	fragments
	  g  result	   g  filenamef  sxml/transform.scm
	n			o			q			o			r			o			r	%	&	r		*	s		.	o		1	s	&	:	s	 	=	t		>	t		B	o		E	u		F	u		K	u	$	O	u		W	u		X	v		]	v		_	v		c	o		d	w		g	w			l	w		w	x	 	x	 	z	 	z	 	z	 	{	 	{	 	q	# 	q	 %	 	  g  nameg  loop C        h      -  1  3 O Q  6         g  	fragments
			 g  loop		  g  filenamef  sxml/transform.scm
	d
		n	 			


  g  nameg  SRV:send-replyg  documentationf Output the @var{fragments} to the current output port.

The fragments are a list of strings, characters, numbers, thunks,
@code{#f}, @code{#t} -- and other fragments. The function traverses the
tree depth-first, writes out strings and characters, executes thunks,
and ignores @code{#f} and @code{'()}. The function returns @code{#t} if
anything was written at all; otherwise the result is @code{#f} If
@code{#t} occurs among the fragments, it is not written out but causes
the result of @code{SRV:send-reply} to be @code{#t}. CR012.034567892       h     ] (  C $   $   4L 5$  "  L$  _$  F&   @&  4 ? "4 4L 55@4L 5@	6L 6L$  L
 6
	6           g  tree
	  g  trigger	  g  t		'	: g  binding		:   g  filenamef  sxml/transform.scm
 		 			 		 		 		 		 		 		 		 	
	 		' 		: 	
	B 		E 		F 		J 		L 		O 	 	T 		W 		\ 		^ 		a 		f 		g 		j 		o 		u 		x 		| 	  	"  	-  	5  	-  	  	  	  	-  	7  	-  	  	  	6  	  	$  	  	  	  	  	  	4  	 6	   g  nameg  loop C     hp     ]"4545$  "  $  45$  "  "  O Q  6           g  tree
		k g  bindings		k g  default-binding			k g  t			) g  text-binding		)	k g  text-handler		M	k g  loop		Z	k  g  filenamef  sxml/transform.scm
 
	 		 	 	 		 		 		 	!	 		 		) 		1 		2 		7 		9 		= 		@ 		G 	$	M 		Z 	 		k	  g  nameg  pre-post-order CRiR   h`   l  ](  C$  C"  +(  
64 5"4 5"6   d      g  fdown
		] g  fup		] g  fhere			] g  seed			] g  tree			] g  kid-seed			A g  kids			A  g  filenamef  sxml/transform.scm
 
	 		 			 		 		 		& 	
	' 		4 	1	6 		9 		A 	
	A 		B 		M 	2	U 		] 	 		]	  g  nameg  foldts CR:5        hP    ]+ (  45D $  4L 5$   4455 "$  K4L$  "  >  G  $  
"   "g  "S4L5$  4 5 "-$  c4L$  "  >  G  $  "  $  $  
"  "   "  "~      g  forest
	P g  keep?	P g  
new-forest		P g  node		P g  t		%  g  node?		T  g  new-kids		p  g  keep?		p  g  t	 P g  node?	 ? g  new-kids	 ? g  keep?	 ?  g  filenamef  sxml/transform.scm
 		 			 		 		 		 		 	
			% 		0		2		5	 	?		I		L		P 		S		$	T			T		W		_		b	#	j	7	o		z	 	 	( 	" 	 	 	 	) 	 	 	 	 	. 	 	 	 	 	$ 	 	 	 	 	# 	7 				%	  	# 	,& 	&/	?	B	P	 =	P	  g  nameg  loop C       h0     ]O  Q 4>  G C           g  beg-pred
		, g  end-pred		, g  forest			, g  loop			, g  
new-forest		"	, g  keep?		"	,  g  filenamef  sxml/transform.scm
 
	%	$	%	4	!%	$	%%	 		,	  g  nameg  replace-range CRC  z       g  m
		(  g  filenamef  sxml/transform.scm		H
	d
 
 
 
 
 	
   C6                                                                                                                             ccache/sxml/simple.go                                                                               0000644                 00000050334 15154557173 0010577 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0P      ]  4       hI      ] g  guile	 	g  define-module*	 	 	g  sxml	g  simple	 		g  filenameS	
f  sxml/simple.scm	g  importsS	g  ssax	g  input-parse	 	 	 	 	g  	transform	 	 	g  ice-9	g  match	 	 	g  srfi	g  srfi-13	 	 	 	g  exportsS	g  	xml->sxml	 g  	sxml->xml	!g  sxml->string	" ! 	#g  set-current-module	$# 	%# 	&g  string-concatenate/shared	'g  string?	(g  ssax:reverse-collect-str	)g  
next-token	*] 	+f  reading internal DOCTYPE	,g  peek-next-char	-g  	read-char	.f  ]	/g  read-internal-doctype-as-string	0g  
namespacesS	10	2g  declare-namespaces?S	32		4g  trim-whitespace?S	54		6g  entitiesS	76		8g  default-entity-handlerS	98		:g  doctype-handlerS	;:		<13579; 	=g  current-input-port	>g  map	?g  ssax:uri-string->symbol	@g  error	A@ 	B@ 	Cf  no matching pattern	Dg  symbol-append	Eg  string->symbol	Ff  :	Gg  ssax:scan-Misc	HG 	IG 	Jg  eof-object?	KJ 	LJ 	Mg  parser-error	NM 	OM 	Pf  XML [22], unexpected EOF	Qg  PI	Rg  *PI*	Sg  ssax:read-pi-body-as-string	Tg  DECL	UE 	VE 	Wf  DOCTYPE	Xf  .XML [22], expected DOCTYPE declaration, found 	Yg  assert-curr-char	ZY 	[Y 	\g  ssax:S-chars	]\ 	^\ 	_f  XML [28], space after DOCTYPE	`g  ssax:skip-S	a` 	b` 	cg  ssax:read-QName	dc 	ec 	fg  ssax:ncname-starting-char?	gf 	hf 	ig  ssax:read-external-id	ji 	ki 	l>[ 	mf  XML [28], end-of-DOCTYPE	ng  call-with-values	og  ssax:skip-internal-dtd	p6
	qp1 	rg  append	sg  assq	tg  	*DEFAULT*	ug  START	vf  XML [22], unexpected markup 	wg  ssax:Prefix-XML	xw 	yw 	zf  space	{g  ssax:complete-start-tag	|{ 	}{ 	~g  	EMPTY-TAG	g   ssax:reverse-collect-str-drop-ws g  attlist-fold g  @ g  EMPTY g  ssax:assert-token     g  ssax:read-markup-token     g  END f  [elementvalid] broken for  f   while expecting  g  assoc     f  preserve g  ssax:read-char-data     g  string-null? f  [GIMatch] broken for  g  
ENTITY-REF g  ssax:handle-parsed-entity     g  PCDATA f  * with char content only; unexpected token  f  XML [43] broken for  g  open-input-string g  reverse g  *TOP* g  make-hash-table g  	hashq-ref g  symbol->string g  string-index g  	substring f  "Invalid QName: more than one colon g  for-each g  char-alphabetic? g  
string-ref f  Invalid name starting character g  string-for-each f  0123456789.-_ f  Invalid name character g  
hashq-set! g  
check-name g  attribute-value->xml g  string->escaped-xml g  
procedure? g  with-output-to-port g  call-with-output-string g  display f  =" g  attribute->xml f  bad attribute f  bad attributes f  </ f  > f  bad element body f   /> g  element->xml g  entity->xml f  <? f  ?> g  pi->xml g  current-output-port g  *ENTITY* f  bad *ENTITY* args g  length f  bad *PI* args g  string-concatenate-reverse g  foldts g  append! g  list->char-set g  car g  string-length g  assv g  make-char-quotator f  &lt; <Ό f  &gt; >Ќ f  &amp; &Ҍ f  &quot; "Ԍ  C 5  hh?    ]4	
"5 4% >  "  G   &'    h     ] (  C (   C"  c(  (  C45C45$  "(  "  
45" "             g  	fragments
	  g  	fragments		{ g  result			{ g  strs			{  g  filenamef  sxml/simple.scm
	,
		-				.			/			-			1			2		$	4		(	5		1	5		3	6		8	6		:	6		>	2		A	7		F	7	/	I	7	)	S	7		V	9		Y	;		_	<		f	=		o	=		p	:		q	>		{	9		{	1		~	1	/		1	: 	1	 	   g  nameg  ssax:reverse-collect-str C(R&)*+,-.     hH      ]4L5 >4L5$  4L>  "  G    C 4L 5 C             g  fragment
		B  g  filenamef  sxml/simple.scm
	B			D			D			D		
	D	$		D			C			E			E			E			G		5	H		:	I		;	I	 	@	I	 		B
  g  nameg  loop C   h       ]	O  Q 45 6         g  port
		 g  loop		  g  filenamef  sxml/simple.scm
	@
		B			A	 		  g  nameg  read-internal-doctype-as-string C/R<=>?BC        h@      ] $  #  L $  "  45C4 56               g  el
		9 g  w		, g  x			,  g  filenamef  sxml/simple.scm
	l				m			o		#	q		*	o		-	m	 		9   C     h      ]L O  6 x       g  
namespaces
		  g  filenamef  sxml/simple.scm
	k			l	 		  g  nameg  munge-namespaces CDEF      h(      ] $    456 C          g  name
		% g  w		" g  x			"  g  filenamef  sxml/simple.scm
	}			~		 		 	-	 		" 	 		%  g  nameg  
name->sxml CILOPQRSTVWX[^_behklmn/o        h@   C   ] L$  LL LL$  4L5"  6L$  4L>  "  G  "   D ;       g  filenamef  sxml/simple.scm
 	 		@
   Cqrst hp     -  /     0   3  #   #  4 L$  4L5$  L"  LL"  L544L54LL55L D           g  entities
		k g  
namespaces		k  g  filenamef  sxml/simple.scm
 		 		# 	/	' 		1	x		2	y		6	y		:	y		>	x		F	z		I	z		T 		U 		X 		_	u		g 		k 	 		k

g  entitiesS
g  
namespacesS    Cu     h   C   ] L $  L 6D        ;       g  filenamef  sxml/simple.scm
 	 		
   Cqrst hp     -  /     0   3  #   #  4 L$  4L5$  L"  LL"  L544L54LL55L D           g  entities
		k g  
namespaces		k  g  filenamef  sxml/simple.scm
 		 		# 	/	' 		1	x		2	y		6	y		:	y		>	x		F	z		I	z		T 		U 		X 		_	u		g 		k 	 		k

g  entitiesS
g  
namespacesS    CvILOPQRSuv 
h   +  ]4 545$   6$  34 5   "$  L 6 	6#      g  port
	  g  elems	  g  entities		  g  
namespaces		  g  seed		  g  token			  g  key		!  g  target		/	E g  seed		E	_  	g  filenamef  sxml/simple.scm
 	 	 	  g  nameg  #scan-for-significant-prolog-token-2 CyVz}~( h   i   ]4L  5  C    a       g  attr
		 g  accum		  g  filenamef  sxml/simple.scm
 	 			   CbO h      ]L  6      {       g  token
		 g  exp-kind		 g  exp-head			  g  filenamef  sxml/simple.scm
 	 			   C   h   i   ]4L  5  C    a       g  attr
		 g  accum		  g  filenamef  sxml/simple.scm
 	 			   C  h       ]45$   C C    x       g  string1
		 g  string2		 g  seed			  g  filenamef  sxml/simple.scm
 	 			   CLO        h      ]LL 6      {       g  token
		 g  exp-kind		 g  exp-head			  g  filenamef  sxml/simple.scm
 	 			   C(     h   i   ]4L  5  C    a       g  attr
		 g  accum		  g  filenamef  sxml/simple.scm
 	 			   CQRS h   ~   ]L  6   v       g  port
		 g  entities		 g  seed			  g  filenamef  sxml/simple.scm
 	 			   C    h       ]45$   C C    x       g  string1
		 g  string2		 g  seed			  g  filenamef  sxml/simple.scm
 	 			   CuO hp  d  ],4 >  G 45$  C$  j4L O >  "  G  L$  45"  454	
L
O L54L
L	5(  "  LC$  /4 5   "*$  -4 L O 5  "$  NL&  4 L	>  "  G  "   4L LL5  " 6 \      g  port
	o g  entities	o g  expect-eof?		o g  seed		o g  seed		o g  
term-token		o g  key		+o g  seed		|  g  attrs		|  g  target	   g  seed	   g  seed	  g  seed	Oe  g  filenamef  sxml/simple.scm
 	 	o	  g  nameg  loop C hP    ]64 L>  G 		$  IL $  
45"  454LO 5
4L5(  
"  
C	$  ~4	<4
5$  45"   O >  "  G  L $  
45"  454LO 5
4L5(  
"  
C4M5

$  

"  

O 
L	 L LQ 6      g  start-tag-head
	P g  port	P g  entities		P g  
namespaces		P g  preserve-ws?		P g  parent-seed		P g  elem-gi		P g  
attributes		P g  
namespaces		P g  expected-content			P g  seed	
	N	r g  attrs		N	r g  seed	
   g  attrs	   g  t	
 g  preserve-ws?	
P g  loop	-P  g  filenamef  sxml/simple.scm
 	 	P	  g  nameg  handle-start-tag C        h@   2  ]H45KO L LQ  6      *      g  start-tag-head
		: g  port		: g  elems			: g  entities			: g  
namespaces			: g  preserve-ws?			: g  seed			: g  xml-space-gi			: g  handle-start-tag			:  	g  filenamef  sxml/simple.scm
 	 		:	  g  nameg  element-parser C   h  o  ]r" 4545$  6$  '45 "$  4	
5		$  "  4>  "  G  	4>  "  G  4>  "  G  45	4455$  45"  
4>  "  G  [454	
LO LLLLO >  G 6$  @4LO LLLLO >  G 
		
66O O Q LL Q  "B    g      g  port
	 g  seed	 g  port		 g  seed		 g  token		 g  key		% g  target		3	I g  seed		I	W g  
token-head		cE g  t			o  g  docname		 E g  systemid	
 E g  internal-subset?	E g  elems	,E g  entities	,E g  
namespaces	,E g  seed	,E g  elems	q g  entities		q g  
namespaces	
q g  seed	q g  #scan-for-significant-prolog-token-2	 g  element-parser	  g  filenamef  sxml/simple.scm
 	 		  g  nameg  parser C' 
     h   V  -  /    0   3  #  45  #  #  #  #  #  #  O O 	Q Q 	4 5$  4 5"   
44	
55	C   N      g  string-or-port
	  g  
namespaces	  g  declare-namespaces?		  g  trim-whitespace?		  g  entities		  g  default-entity-handler		  g  doctype-handler		  g  munge-namespaces		p  g  
name->sxml		p  g  parser			p  g  port	
   g  elements	    g  filenamef  sxml/simple.scm
	V
		V	/	'	W	 	B	Z	  	  	  	  	  	  	  	)  	  	  	  	 	 
g  
namespacesSg  declare-namespaces?S	g  trim-whitespace?S	g  entitiesS	g  default-entity-handlerS	g  doctype-handlerS	   g  nameg  	xml->sxmlg  documentationf  Use SSAX to parse an XML document into SXML. Takes one optional
argument, @var{string-or-port}, which defaults to the current input
port. CR4i5  @@@      h8      ]	4 5$  C4 5$  C LL 6           g  c
		4 g  t			4 g  t		4  g  filenamef  sxml/simple.scm
 		 			 		 	0	 	>	 	0	 		, 	"	4 	 
		4   C      hh      ] $  X44 
55$  "  &4 
5_$  "  4 L 5$  L  O  6CC             g  s
		b g  t		K g  t		-	H  g  filenamef  sxml/simple.scm
 		 			 		 	*	 		 		# 		- 		- 		; 		? 		E 		O 		^ 	 		b   C 
     h     ]!4L  5$  C4 54:5$  4
5"  $  "  $  45"  $  1445:5$  4 >  "  G  "   "   4 O  >  "  G  	L  6          g  name
	  g  str	  g  i		#  g  t		:	M g  head		M  g  tail		d   g  filenamef  sxml/simple.scm
 		 		 		 		 	
	 		# 	
	+ 		, 	"	: 		M 	
	U 		V 		] 	-	_ 		d 	
	l 		m 		p 	!	w 	0	y 	!	} 	  	  	  	  	  	  	  	  	 	    C O  R'       h   _   ]L  6      W       g  port
		
  g  filenamef  sxml/simple.scm
		
	- 		
   C      hh     ] $  4 >  "  G   6 (  C4 5$   64 5$   64 O 56       g  value
		g g  port		g  g  filenamef  sxml/simple.scm
 
	 			 		
 		 		 		# 		' 		- 		0 		: 		B 		C 		M 		U 		X		g	 		g	  g  nameg  attribute-value->xml CR        hX      ]4 >  "  G  4 >  "  G  4>  "  G  4>  "  G  "6       g  attr
		X g  value		X g  port			X  g  filenamef  sxml/simple.scm

					)		-		4		=			X
	 			X	  g  nameg  attribute->xml CR@        hp    ]4 >  "  G  4<>  "  G  4 >  "  G  $  "  $  ^4 >  "  G  $  4>  "  G  "  4 >  "  G  "(  "  "4 >  "  G  "  "o"   $  4>>  "  G  "  e$  4>  "  G  "(  04>  "  G  4 >  "  G  	6
 6"6       g  tag
	o g  attrs	o g  body		o g  port		o g  attrs		F  g  attr		P  g  body	 _  g  filenamef  sxml/simple.scm

					)		B		F		I		M		P		P		S		i		m		n		s	"	v	-	}	 	 	 	 	 	 	 	 	 	 	 	 	 	 	  		
!	!	!	"	"	%	
&$	*$	1$	:%	Q&	U&	Y(	_(	_	k)	o)	 3	o	  g  nameg  element->xml CR h8      ]4&>  "  G  4 >  "  G  ;6             g  name
		2 g  port		2  g  filenamef  sxml/simple.scm
,
	-		.		2/	 		2	  g  nameg  entity->xml CR h`      ]4>  "  G  4 >  "  G  4 >  "  G  4>  "  G  6             g  tag
		Z g  str		Z g  port			Z  g  filenamef  sxml/simple.scm
2
	3		3		3		4		+5		?6		V7		Z7	 
		Z	  g  nameg  pi->xml CR @R        h   \   ] L 6      T       g  x
		
  g  filenamef  sxml/simple.scm
T		
T	 		
   C'    h   _   ]L  6      W       g  port
		
  g  filenamef  sxml/simple.scm
^		
^	- 		
   C      hp    - . , 3 #  45  $   $   $  	 6$  5"  	 6 $  4 5$  
 6""	$  ;"  	
 6 $  "4 5	$    6"" $  $$  &  "  "  "  $  "  6O  64 5$   6 (  C $  . &  C4 5$   64 O 56C           g  tree
	k g  port	k g  tag		+ g  elems	  g  attrs	   g  filenamef  sxml/simple.scm
9
	9	*	>		 =		#?		$?		(?		+A		+A		6B	
	;D		?D		HB	
	PH		SH	,	UH		UF		XF		YF		]F		^F	,	cF	4	eF	,	gF	)	kF		pG		uG	 B	
 L	 L	( L	 J	 J	 J	 J	 J	, J	4 J	, J	) J	 K	 K	& K	 N	 N	 O	  O	 O	5 O	. O	 P	% P	( O	 Q	  N	 R	'R	1R	T	U	%=	-V	3=	EZ	O=	W[	Z^	i]	 E	k  g  nameg  	sxml->xmlg  documentationf  Serialize the sxml tree @var{tree} as XML. The output will be written
to the current output port, unless the optional argument @var{port} is
present. C R   h   q   ]C    i       g  seed
		 g  tree		  g  filenamef  sxml/simple.scm
f		g	 			   C h      ] 6             g  seed
		
 g  kid-seed		
 g  tree			
  g  filenamef  sxml/simple.scm
h		
i	 		
	   C'   h      ]45$   C C  {       g  seed
		 g  tree		  g  filenamef  sxml/simple.scm
j		k	
	k		k	 			   C  h      ]4 56           g  sxml
		  g  filenamef  sxml/simple.scm
a
	e		l		e		d	 		  g  nameg  sxml->stringg  documentationf  MDetag an sxml tree @var{sxml} into a string. Does not perform any
formatting. C!R> h     ]*4 L 
5$  "  4 5$  C$  s44 5L54 L 5$  !44 5>  "  G  "   4>  "  G  "w4 4 556
"V 6            g  str
	  g  port	  g  bad-pos		  g  from		  g  to		  g  i		B	R g  quoted-char		R  g  new-to		R   g  filenamef  sxml/simple.scm
y		v		z		{		}				"		&~		/		2	"	>		?		B	'	B		Ev		R		[		_		`		c		t	 	 	 	 	 	- 	 	 }	 |	 	 	   C     h       ]	44 55 O C           g  char-encoding
		 g  	bad-chars		  g  filenamef  sxml/simple.scm
o
	p		p	#	p		p	 		  g  nameg  make-char-quotator CR4i5RC
      g  m
		, g  *good-cache*
"(  g  filenamef  sxml/simple.scm		
x	,
	@
"	V
" 	" 	( 
*, 
+w
/
0,
12
89
;a
?Zo
?[	?a	?c	?f
 	?h
   C6                                                                                                                                                                                                                                                                                                     ccache/sxml/apply-templates.go                                                                      0000644                 00000004526 15154557173 0012431 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0>	      ] " 4    h      ] g  guile	 	g  define-module*	 	 	g  sxml	g  apply-templates	 		g  filenameS	
f  sxml/apply-templates.scm	g  importsS	g  ssax	 	 	g  xpath	 	g  hideS	g  filter	 	 	 	g  exportsS	 	g  set-current-module	 	 	g  node-typeof?	g  
procedure?	g  error	f  ambiguous template match	g  nodeset?	 g  	map-union	!g  appendC 5   h  d   ]4	
5 4 >  "  G        hP   *  ](  C$  /445 5$  4L  5C  "  " "      g  node
		O g  	templates		O  g  filenamef  sxml/apply-templates.scm
	>			?			A			A			?			C			C			C			C		!	C		%	?		(	D		*	D		1	D	4	3	D		4	D		:	F		B	F		G	B		O	B	 		O	  g  nameg  filter-templates C    hH      ] $  ;4 5$  &4L  5$  4>  "  G  "    C  "C         g  	templates
		F  g  filenamef  sxml/apply-templates.scm
	K			L					L		
	N			N			N			M				O			O			O		!	O		"	P		&	P		+	P		:	Q		>	R		D	R	 		F  g  nameg  find-handler C      h   h   ]L L 6      `       g  a-tree
		
  g  filenamef  sxml/apply-templates.scm
	W		
	W	$ 		
   C!   h`   @  ]4 5$  LO  644L 54L L554L 5$   6 $    "C8      g  tree
		` g  active-templates		` g  still-active-templates		3	` g  t		<	`  g  filenamef  sxml/apply-templates.scm
	T			V			V			W			Y		 	Z		)	[		3	Y		3	X		6	^		<	\	
	J	_		M	`		Q	\	
	T	b		^	b		_	`	 		`	  g  nameg  loop C     h@      ]O O Q Q O Q  6              g  tree
		9 g  	templates		9 g  filter-templates			9 g  find-handler			9 g  loop		'	9  g  filenamef  sxml/apply-templates.scm
	8
	'	T		7	T	+	9	T	 		9	  g  nameg  apply-templates CRC \       g  m
		,  g  filenamef  sxml/apply-templates.scm		2
	8
 	
   C6                                                                                                                                                                           ccache/statprof.go                                                                                  0000644                 00000070760 15154557173 0010172 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0q      ]  4       h_      ] g  guile	 	g  define-module*	 	 	g  statprof	 	g  filenameS		f  statprof.scm	
g  importsS	g  srfi	g  srfi-1	 	 	g  system	g  vm	 	 	g  frame	 	 	g  program	 	 	 	g  exportsS	g  statprof-active?	g  statprof-start	g  statprof-stop	g  statprof-reset	g  statprof-accumulated-time	 g  statprof-sample-count	!g  statprof-fold-call-data	"g  statprof-proc-call-data	#g  statprof-call-data-name	$g  statprof-call-data-calls	%g  statprof-call-data-cum-samples	&g  statprof-call-data-self-samples	'g  statprof-call-data->stats	(g  statprof-stats-proc-name	)g  statprof-stats-%-time-in-proc	*g  statprof-stats-cum-secs-in-proc	+g   statprof-stats-self-secs-in-proc	,g  statprof-stats-calls	-g  !statprof-stats-self-secs-per-call	.g   statprof-stats-cum-secs-per-call	/g  statprof-display	0g  statprof-display-anomolies	1g  statprof-fetch-stacks	2g  statprof-fetch-call-tree	3g  with-statprof	4g  gcprof	5 !"#$%&'()*+,-./01234 	6g  	autoloadsS	7g  ice-9	8g  format	978 	:8 	;9: 	<g  set-current-module	=< 	>< 	?g  accumulated-time	@g  last-start-time	Ag  sample-count	Bg  sampling-frequency	Cg  remaining-prof-time	Dg  profile-level	Eg  %count-calls?	Fg  gc-time-taken	Gg  record-full-stacks?	Hg  stacks	Ig  procedure-data	Jg  make-call-data	Kg  call-data-proc	Lg  procedure-name	Mg  call-data-name	Ng  with-output-to-string	Og  write	Pg  call-data-printable	Qg  call-data-call-count	Rg  call-data-cum-sample-count	Sg  call-data-self-sample-count	Tg  inc-call-data-call-count!	Ug  inc-call-data-cum-sample-count!	Vg   inc-call-data-self-sample-count!	Wg  make-syntax-transformer	XW 	YW 	Zg  accumulate-time	[g  macro	\g  $sc-dispatch	]\ 	^\ 	_g  _	`g  any	a_`	bg  syntax->datum	cb 	db 	eg  datum->syntax	fe 	ge 	hg  set!	ig  +	je  0.0	kg  -	l@ 	mg  syntax-violation	nm 	om 	pf  -source expression failed to match any pattern	qg  program?	rg  program-num-free-variables	sg  program-objcode	tg  	hashq-ref	ug  
hashq-set!	vg  get-call-data	wg  stack-length	xg  frame-procedure	yg  
count-call	zg  frame-previous	{g  make-hash-table	|g  	hash-fold	}g  and=>	~g  	stack-ref	g  sample-stack-procs g  inside-profiler? g  get-internal-run-time g  
make-stack g  profile-signal-handler g  pk g  what! g  set-vm-trace-level! g  the-vm g  vm-trace-level g  	setitimer g  ITIMER_PROF g  assq g  gc-stats g  	add-hook! g  vm-apply-hook g  remove-hook! g  error f  /Can't reset profiler while profiler is running. g  	sigaction g  SIGPROF f  :Can't call statprof-fold-called while profiler is running. e  100.0 e  1.0 g  max g  stats-sorter g  current-output-port f  No samples recorded.
 g  sort f  !~5a ~10a   ~7a ~8a ~8a ~8a  ~8@a
 f  %   f  
cumulative f  self f    f  total f   ~5a  ~9a  ~8a ~8a ~8a ~8a  ~8@a
 f  time f  seconds f  calls f  ms/call f  name f  ~5a ~10a   ~7a  ~8@a
 f  % f  ~5a  ~10a  ~7a  ~8@a
 g  for-each f  #~6,2f ~9,2f ~9,2f ~7d ~8,2f ~8,2f   f  ~6,2f ~9,2f ~9,2f   g  display g  newline f  ---
 g  simple-format f  Sample count: ~A
 f  *Total time: ~A seconds (~A seconds in GC)
 g  internal-time-units-per-second f  ==[~A ~A ~A]
 f  Total time: ~A
 f  5Can't get accumulated time while profiler is running. g  procedure=? g  map g  lists->trees g  cadr g  find g  	assq-set! g  filter g  identity g  unfold-right g  stack->procedures g  loopS  g  hzS 	 g  count-calls?S 	 g  full-stacks?S 	   g  inexact->exact g  floor e  	1000000.0 f  Invalid macro body g  keyword? g  eq? g  @   g  lambda 	   g  after-gc-hookC 5    h0]  F  ]4	
56;5	 4> >  "  G   ?R@RARBRCR
DRER
FRGRHRIR  h      ]  C         g  proc
		 g  
call-count		 g  cum-sample-count			 g  self-sample-count			  g  filenamef  statprof.scm
 
	 	 			  g  nameg  make-call-data CJRh   t   ] 
C l       g  cd
		  g  filenamef  statprof.scm
 
	 	 		  g  nameg  call-data-proc CKRLK h   }   ]4 56   u       g  cd
		  g  filenamef  statprof.scm
 
	 	,	 	 		  g  nameg  call-data-name CMRMNOK   h   R   ] 4L 56   J       g  filenamef  statprof.scm
 		 	/	 	( 		
   C   h       ]	4 5$  C O 6        g  cd
		 g  t			  g  filenamef  statprof.scm
 
	 			 		 	 		  g  nameg  call-data-printable CPR  h   z   ] C r       g  cd
		  g  filenamef  statprof.scm
 
	 	" 		  g  nameg  call-data-call-count CQR h      ] 	Cx       g  cd
		  g  filenamef  statprof.scm
 
	 	( 		  g  nameg  call-data-cum-sample-count CRR   h      ] 	Cy       g  cd
		  g  filenamef  statprof.scm
 
	 	) 		  g  nameg  call-data-self-sample-count CSR  h      ]  C          g  cd
		  g  filenamef  statprof.scm
 
		 		
 		 	 		  g  nameg  inc-call-data-call-count! CTR  h      ] 	 	C        g  cd
		  g  filenamef  statprof.scm
 
	 		 		 	 		  g  nameg  inc-call-data-cum-sample-count! CUR    h      ] 	 	C        g  cd
		  g  filenamef  statprof.scm
 
	 		 		 	 		  g  nameg   inc-call-data-self-sample-count! CVR4YZ[^adgh?ijkl    h    `   ]   C     X       g  	stop-time
		  g  filenamef  statprof.scm
 
	 	 		   C     h   a   ]	4 5L 4?6Y       g  args
		 g  v			  g  filenamef  statprof.scm	 
 		   Cop        h(   _   ]	4 5$   O @ 6 W       g  y
		' g  tmp		'  g  filenamef  statprof.scm
 
 		'   C5ZRqrstIJu  hp   #  ]4 5$  "  	4 5
$   "  4 545$  C4 


54>  "  G  C       g  proc
		o g  t	
	# g  k	4	o g  t		?	o g  	call-data		T	o  g  filenamef  statprof.scm
 
	 		
 		
 		 		 		' 		. 		4 		7 		? 		K 		T 		W 	
 		o  g  nameg  get-call-data CvRwGHAxyz{u|Uv     h      ]4 56          g  proc
		 g  val		 g  accum			  g  filenamef  statprof.scm
 			 		 	 			   C}vV~    h    ])H4 >  "  G  $    "    "  $  45$  Z&  K454	5"4	>  "  G  45$  "  "45"|4
>  "  G  445>  "  !G  "  4 
54	5"+JC             g  stack
		 g  hit-count-call?		 g  frame		1  g  
procs-seen		1  g  self		1  g  t		>   g  filenamef  statprof.scm
 
	 		 		 		" 		$ 		+ 		- 		1 		7 		8 		> 		N 		Q		R		Y	,	j		k	 	 		 	 	 	  	  	  	  	  	  	  	 	  		  g  nameg  sample-stack-procs CRRDE?j@B     h   S  ] 
$  45 45$  "  445545$  "  7	$  $4
45 445 5>  "  G  "    4

>  "  G  $  "  145  	$  $4
45 445 5>  "  G  "   "    C   K      g  sig
	  g  	stop-time	  g  t			: g  stack		:  g  inside-apply-trap?		C   g  filenamef  statprof.scm

															+		/		0	#	7		:		=	!	C		K!		U)		V*		Y*	'	^+	+	a+	;	g+	+	h+	'	m*		} 	 ,	 .	 0	 1	 .	 3	 5	$ 5	 6	 7	 7	' 8	+ 8	; 8	+ 8	' 7	 :	 +	   g  nameg  profile-signal-handler CR?j@}xTv   h   e   ]4 56   ]       g  proc
		  g  filenamef  statprof.scm
E		G		F	 		   C 	       h@      ]$  C45  44 5>  "  G  45  C           g  frame
		<  g  filenamef  statprof.scm
?
	@		 		B		B		D		D		+D		4I		:I	 		<  g  nameg  
count-call CyRD    h      ] 
C        g  filenamef  statprof.scm
M
	P	 		
  g  nameg  statprof-active?g  documentationf  uReturns @code{#t} if @code{statprof-start} has been called more times
than @code{statprof-stop}, @code{#f} otherwise. CRDC@FFBEy     h   U  ] $    $   
$  "   
"   45  445 5 $  4	


  >  "  G  "  4	


>  "  G  $   4445 5>  "  G  "   445 445 5>  "  G  CC    M      g  rpt
	  g  t		4 g  use-rpt?	9   g  filenamef  statprof.scm
S
	W		W		X		X		Y		Z		[	+	[	 	[		/\	+	0\	 	9Y		>]		?^		E^		F`		J`		K`	(	Q`		R`		T_		Za		[b		db	'	gb	1	lb		yc	 e	 f	 c	 g	 h	 h	 h	& h	 h	 i	 i	 i	* i	: i	* i	& i	 -	 
  g  nameg  statprof-startg  documentationf  Start the profiler.@code{} CRDFFEyC?j@      h     ]  
$  z445 5 445 445 5>  "  G  	$   4
445 5>  "  G  "   4



5 45   CC           g  filenamef  statprof.scm
m
	q		q		
r		r		u		u		u	+	u		u		u		!t		"v		%v		*v	*	-v	:	3v	*	4v	&	9v		Gw		Hx		Kx		Nx	)	Tx		[x		h{	"	t{		x 		z|	 |	 }	  	 
  g  nameg  statprof-stopg  documentationf  Stop the profiler.@code{} CRDE?@ABC{IGH        hx     - . , 3 #  
$  4>  "  G  "    
  
    	4
 5   4>  "  G  C             g  sample-seconds
		q g  sample-microseconds		q g  count-calls?			q g  full-stacks?			q  g  filenamef  statprof.scm

							"		'		7		:		=		@		E		G		J		K		T		X		Y		[		\	 		q	  g  nameg  statprof-resetg  documentationf VReset the statprof sampler interval to @var{sample-seconds} and
@var{sample-microseconds}. If @var{count-calls?} is true, arrange to
instrument procedure calls as well as collecting statistical profiling
data. If @var{full-stacks?} is true, collect all sampled stacks into a
list for later analysis.

Enables traps and debugging as necessary. CRD|       h      ]L 6             g  key
		
 g  value		
 g  prior-result			
  g  filenamef  statprof.scm
		
	 		
	   CI   h0     ]
$  4>  "  G  "    O 6       g  proc
		/ g  init		/  g  filenamef  statprof.scm

			
								/	 		/	  g  nameg  statprof-fold-call-datag  documentationf 7Fold @var{proc} over the call-data accumulated by statprof. Cannot be
called while statprof is active. @var{proc} should take two arguments,
@code{(@var{call-data} @var{prior-result})}.

Note that a given proc-name may appear multiple times, but if it does,
it represents different functions with the same name. C!RDtI    h(     ]
$  4>  "  G  "    6      g  proc
		(  g  filenamef  statprof.scm

			
								(	 		(  g  nameg  statprof-proc-call-datag  documentationf  TReturns the call-data associated with @var{proc}, or @code{#f} if
none is available. C"RPSR E$j     h     ]14 54 54 545 45 45 $  4 5"  		$  
$  
"  	"  $  	45"   C         g  	call-data
	  g  	proc-name		  g  self-samples		  g  cum-samples		  g  all-samples		"  g  secs-per-sample		/  g  	num-calls		C   g  filenamef  statprof.scm

																"		%		*		/		/		7		8	'	C		L		N	,	O		T		V	+	W		\		^	,	_		g		j		o		q	*	z		|	9	}	 	 	 	 	 	 	 	 (	   g  nameg  statprof-call-data->statsg  documentationf  0Returns an object of type @code{statprof-stats}. C'R     h      ] 
C y       g  stats
		  g  filenamef  statprof.scm

		) 		  g  nameg  statprof-stats-proc-name C(R  h      ] C ~       g  stats
		  g  filenamef  statprof.scm

		. 		  g  nameg  statprof-stats-%-time-in-proc C)R     h      ] 	C       g  stats
		  g  filenamef  statprof.scm

		0 		  g  nameg  statprof-stats-cum-secs-in-proc C*R   h      ] 	C       g  stats
		  g  filenamef  statprof.scm

		1 		  g  nameg   statprof-stats-self-secs-in-proc C+R  h   }   ] 	Cu       g  stats
		  g  filenamef  statprof.scm

		% 		  g  nameg  statprof-stats-calls C,R      h      ] 	C       g  stats
		  g  filenamef  statprof.scm

		2 		  g  nameg  !statprof-stats-self-secs-per-call C-R h      ] 	C       g  stats
		  g  filenamef  statprof.scm

		1 		  g  nameg   statprof-stats-cum-secs-per-call C.R+*    h8      ]
4 545
$  4 545"  
C            g  x
		3 g  y		3 g  diff			3  g  filenamef  statprof.scm

			
													#		*			1	 		3	  g  nameg  stats-sorter CR 8!' h   ~   ]4 5C   v       g  data
		 g  prior-value		  g  filenamef  statprof.scm
			 		 			   CEE8)*+,-.(      h   =  ]$  J4M 4 54 54 54 54 54	 5>  "  G  "  )4M 
4 54 54 5>  "  G  44 5M >  "  G  M 6      5      g  stats
	   g  filenamef  statprof.scm
															%		/		6		:		A		F		S		Y		Z		a 		h		s		|			 	 	 	   g  nameg  display-stats-line CF $     h(    -  1  3  H J (  45 K "   45 
$  J 64545	$  H4J 
>	  "  G  4J >	  "  G  "  84J >  "  G  4J >  "  G  4 O >  "  G  4J >  "  G  445 >  "  G  4 5 !"#6         g  port
	% g  
stats-list	9% g  sorted-stats		D%  g  filenamef  statprof.scm

									$		)		/		1		2		7		9		9		<		D		L		M		S		U		W		Y	(	[	/	]	2	_	9	a	A	f		o			u			w
		y
		{
	&	}
	0	
	8 
	B 
	L 		 	 	 	 	 	& 	- 	 	 	 	 	 	& 	0 	 	 	 	 	 	 	 	-					& 	%	 @		%


  g  nameg  statprof-displayg  documentationf  Displays a gprof-like summary of the statistics collected. Unless an
optional @var{port} argument is passed, uses the current output port. C/R!EQRM        hH      ]$  :4 5
$  +4 5
$  4 54 54 56CCC           g  data
		D g  prior-value		D  g  filenamef  statprof.scm
												 		 		"			'"		(#		/$		6%		>!		 		D	   C    h@     ] 4>  "  G  445 >  "  G  45 6             g  filenamef  statprof.scm

			'		'		'	'	%'		2(		3(	)	9(	 
		9
  g  nameg  statprof-display-anomoliesg  documentationf  QA sanity check that attempts to detect anomolies in statprof's
statistics.@code{} C0RD?  h(      ] 
$  4>  "  G  "   C         g  filenamef  statprof.scm
*
	,		
,		-		-		-		%.	 		&
  g  nameg  statprof-accumulated-timeg  documentationf  AReturns the time accumulated during the last statprof run.@code{} CRDA       h(      ] 
$  4>  "  G  "   C            g  filenamef  statprof.scm
0
	2		
2		3		3		3	 		#
  g  nameg  statprof-sample-countg  documentationf  HReturns the number of samples taken during the last statprof run.@code{} C RMi#RQi$RRi%RSi&RH       h   >  ] C   6      g  filenamef  statprof.scm
;
 		
  g  nameg  statprof-fetch-stacksg  documentationf  Returns a list of stacks, as they were captured since the last call
to @code{statprof-reset}.

Note that stacks are only collected if the @var{full-stacks?} argument
to @code{statprof-reset} is true. C1Rqs       h8      ] &  C4 5$  45$  4 545CCC         g  a
		6 g  b		6  g  filenamef  statprof.scm
D		
E		F		G		E		G		"G		#H		*H		1H	 		6	  g  nameg  procedure=? CR    h      ] 4 L 5C       x       g  tail
		  g  filenamef  statprof.scm
R		S	 	T	 	T	.	T	 	S	 		   Cih   z   ] C    r       g  a
		 g  b		  g  filenamef  statprof.scm
X		X	%		X	.	X	" 			   C  h   k   ]L L 6   c       g  x
		  g  filenamef  statprof.scm
[		[	 	
[	(	[	 		   C 
       h     ]""  (  +4O 5445?45C(  "4O 5$  !4	5"} "` 
"R          g  lists
	  g  equal?	  g  in		  g  
n-terminal		  g  tails		  g  trees			7 g  t		`   g  filenamef  statprof.scm
N
	O		P		R		R		V		"V	"	,V		-W		6V		:Y		>P		AZ	
	DZ		PZ		Q[		`P		k^		n`		ua		xb	 	|b	*	}b		`	 ^	 d	
 f	 f	! f	 f	
 d	 O	 O	, O	 #	 	  g  nameg  lists->trees CR     h   Y   ] C  Q       g  x
		  g  filenamef  statprof.scm
j		j	$ 		   Cxz~      h       ]44 
556            g  stack
		  g  filenamef  statprof.scm
h
	j	
	m		j	
	i	 		  g  nameg  stack->procedures CRH  h   T  ] 4455C   L      g  filenamef  statprof.scm
o
	v		v		v		v	 		
  g  nameg  statprof-fetch-call-treeg  documentationf  Return a call tree for the previous statprof run.

The return value is a list of nodes, each of which is of the type:
@code
 node ::= (@var{proc} @var{count} . @var{nodes})
@end code C2R   h0      ]
 
$  E4L >   G  "              g  i
		) g  result		) g  result			)  g  filenamef  statprof.scm
				
								)	 		)	  g  nameg  lp C        h    l   ]O  L  Q   L6       d       g  lp
		  g  filenamef  statprof.scm
							 		
   C      h@      ] 444L554L4L55LL >  "  G  6          g  filenamef  statprof.scm
								&		-		&						)		0		0	#	7	%	0	&	-	'	&	)		2		>	 		>
   C/I     h(   [   ] 4>   "  G  4>   "  G   C S       g  filenamef  statprof.scm
						%	 		'
   C       h@      ] 444L554L4L55LL >  "  G  6          g  filenamef  statprof.scm
								&		-		&						)		0		0	#	7	%	0	&	-	'	&	)		2		>	 		>
   C/I     h(   [   ] 4>   "  G  4>   "  G   C S       g  filenamef  statprof.scm
						%	 		'
   C/I   h(   [   ] 4>   "  G  4>   "  G   C S       g  filenamef  statprof.scm
						%	 		'
   C  h   .  - /   0   3 #  #  	d#  #  O  Q O 4O >   "  G  V4>   X4>   "  G  CX4>   "  G  F     &      g  thunk
	  g  loop	  g  hz		  g  count-calls?		  g  full-stacks?		  g  thunk		A   g  filenamef  statprof.scm
x
	A	 	 
g  loopSg  hzS	g  count-calls?S	g  full-stacks?S	   g  nameg  statprofg  documentationf Profile the execution of @var{thunk}, and return its return values.

The stack will be sampled @var{hz} times per second, and the thunk
itself will be called @var{loop} times.

If @var{count-calls?} is true, all procedure calls will be recorded. This
operation is somewhat expensive.

If @var{full-stacks?} is true, at each sample, statprof will store away the
whole call tree, for later analysis. Use @code{statprof-fetch-stacks} or
@code{statprof-fetch-call-tree} to retrieve the last-stored stacks. CR4Y3[^adg hP   	  ](  645$    &  C  "4 5$  CC        g  kw
		N g  args		N g  def			N  g  filenamef  statprof.scm
																		#		&	
	-		:	
	;		H	 		N	  g  nameg  
kw-arg-ref C        h`      -  1  3 O Q 4 54 54 	d54 54 5 
C            g  args
			[ g  
kw-arg-ref		[  g  filenamef  statprof.scm

					%		)		4		5	
	A		B		M		N		Z	 			[


   C       h   a   ]	4 5L 4?6Y       g  args
		 g  v			  g  filenamef  statprof.scm	
 		   Cop        h(   w  ]	4 5$   O @ 6 o      g  y
		' g  tmp		'  g  filenamef  statprof.scm

 		'  g  documentationf Profile the expressions in the body, and return the body's return values.

Keyword arguments:

@table @code
@item #:loop
Execute the body @var{loop} number of times, or @code{#f} for no looping

default: @code{#f}
@item #:hz
Sampling rate

default: @code{20}
@item #:count-calls?
Whether to instrument each function call (expensive)

default: @code{#f}
@item #:full-stacks?
Whether to collect away all sampled stacks into a list

default: @code{#f}
@end tableg  
macro-typeg  defmacrog  defmacro-argsg  args  C53R?j@ 
  hx   .  ]  $   C 45 4L 
5  $   "  4455  4>  "  G   	 45  	  C    &      g  t
		t g  t
	!	? g  	stop-time
	?	o g  stack	?	o  g  filenamef  statprof.scm
										!		0		4		5	"	<		?		D		Y 		b		c		i		r	 		t
  g  nameg  gc-callback CD?@AE{IGHCFF  h     ] 
$  4>  "  G  "   
  
  4 5 	L 
  $  O 45  445 5 4L >  "  G  445 445 5>  "  G  CC     y      g  filenamef  statprof.scm
				
								#		&		)		,		-		6		:		;		=		@		B		F		J		M	
	N	 	T	
	U	#	Y	)	Z	8	`	#	a		c	
	d	
	x	
	{	 	, 	< 	, 	( 	
 %	 
   C     h8      ]"  # 
$  C4L >   "  G    "L "              g  i
		)  g  filenamef  statprof.scm
													#		)		)	 			1
   CDFF?j@/I   hh      ]  
$  =445 5 4L >  "  G  	4
5   "   4>   "  G   C              g  filenamef  statprof.scm
						
									-							!	
	"	
	9 		; 		E 	
	H	
	M		_	 		a
   C   h   W  - /   0   3 #  #  O Q O O O Q  Q Q 4>   "  G  V4>   X4>   "  G  CX4>   "  G  FO      g  thunk
	  g  loop	  g  full-stacks?		  g  gc-callback		-  g  pre		L  g  thunk		L  g  post		L   g  filenamef  statprof.scm

	;	 	 
g  loopSg  full-stacks?S	   g  nameg  gcprofg  documentationf +Do an allocation profile of the execution of @var{thunk}.

The stack will be sampled soon after every garbage collection, yielding
an approximate idea of what is causing allocation in your program.

Since GC does not occur very frequently, you may need to use the
@var{loop} parameter, to cause @var{thunk} to be called @var{loop}
times.

If @var{full-stacks?} is true, at each sample, statprof will store away the
whole call tree, for later analysis. Use @code{statprof-fetch-stacks} or
@code{statprof-fetch-call-tree} to retrieve the last-stored stacks. C4RC    >      g  m
		0  g  filenamef  statprof.scm		}
	4 
	8 
	< 
	@ 
	D 
	H 
	L 
	P 
	T 
	U 		X 
	\ 
F 
 
p 
 
E 
 
t 
$ 
 
 
 
 


.?
;M
S
m

!
"
&
'
'
([
(
)
*5
*
,
3
6p
7*
80
86
87
88
89
:Q;
;kC
@"N
Ahh
Bo
Lx
]*
 ;	],
   C6                 ccache/texinfo.go                                                                                   0000644                 00000126470 15154557173 0010004 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0       ]p 4      h)      ] g  guile	 	g  define-module*	 	 	g  texinfo	 	g  filenameS		f  texinfo.scm	
g  importsS	g  sxml	g  simple	 	 	g  	transform	 	 	g  ssax	g  input-parse	 	 	g  srfi	g  srfi-1	 	 	g  srfi-11	 	 	g  srfi-13	 	 	  	!g  exportsS	"g  call-with-file-and-dir	#g  texi-command-specs	$g  texi-command-depth	%g  texi-fragment->stexi	&g  texi->stexi	'g  stexi->sxml	("#$%&' 	)g  set-current-module	*) 	+) 	,g  throw	-g  parser-error	.g  getcwd	/g  chdir	0g  dirname	1g  call-with-input-file	2g  basename	3g  include	43 	5g  para	6g  	PARAGRAPH	756 	8g  item	9g  ITEM	:89 	;g  entry	<g  ENTRY	=g  heading	><=	?;>	@g  noindent	Ag  EMPTY-COMMAND	B@A 	Cg  
*fragment*	Dg  FRAGMENT	ECD 	Fg  *braces*	Gg  INLINE-TEXT	HFG 	Ig  bold	JIG 	Kg  sample	LKG 	Mg  samp	NMG 	Og  code	POG 	Qg  math	RQG 	Sg  kbd	TSG 	Ug  key	VUG 	Wg  var	XWG 	Yg  env	ZYG 	[g  file	\[G 	]g  command	^]G 	_g  option	`_G 	ag  dfn	baG 	cg  cite	dcG 	eg  acro	feG 	gg  email	hgG 	ig  emph	jiG 	kg  strong	lkG 	mg  sc	nmG 	og  	titlefont	poG 	qg  asis	rqG 	sg  b	tsG 	ug  i	vuG 	wg  r	xwG 	yg  	sansserif	zyG 	{g  slanted	|{G 	}g  t	~}G 	g  value g  INLINE-ARGS U  g  ref g  node g  optS g  name g  section g  	info-file g  manual   g  xref   g  pxref g  INLINE-TEXT-ARGS   g  url g  ALIAS g  uref   g  title g  replacement   g  anchor   g  dots   g  result   g  bullet   g  	copyright   g  tie   g  image g  width g  height g  alt-text g  	extension [  g  acronym g  meaning   g  EOL-ARGS g  next g  previous g  up   g  c g  all   g  comment  g  setchapternewpage  g  sp  g  page   g  vskip  g  syncodeindex  g  contents   g  shortcontents   g  summarycontents   g  insertcopying   g  dircategory g  category   g  top   g  
printindex g  type   g  paragraphindent g  indent   g  *ENVIRON-ARGS* g  EOL-TEXT   g  itemx   g  set   g  center     g  subtitle   g  author   g  chapter     g  appendix   g  appendixsec   g  
unnumbered   g  unnumberedsec   g  
subsection   g  subsubsection   g  appendixsubsec   g  appendixsubsubsec   g  unnumberedsubsec   g  unnumberedsubsubsec   g  chapheading   g  majorheading   =  g  
subheading   g  subsubheading  g  deftpxg  EOL-TEXT-ARGSg  
attributes	g  defcvx
g  class	
 g  defivarx
 g  deftypeivarxg  	data-type
 g  defopxg  	arguments
g  
deftypeopx
g  
defmethodx !g  deftypemethodx"#!"$g  defoptx%$ &g  defvrx'& (g  defvarx)( *g  
deftypevrx+* ,g  deftypevarx-, .g  deffnx/0/1.02g  
deftypefnx3435246g  defspecx78679g  defmacx:97;g  defunx<;7=g  deftypefunx>?=>@g  cindexAg  INDEXBA;C@BDg  findexEDBFg  vindexGFBHg  kindexIHBJg  pindexKJBLg  tindexMLBNg  ENVIRONONPOQg  ignoreRQN Sg  ifinfoTSN Ug  iftexVUN Wg  ifhtmlXWN Yg  ifxmlZYN [g  ifplaintext\[N ]g  	ifnotinfo^]N _g  ifnottex`_N ag  	ifnothtmlbaN cg  ifnotxmldcN eg  ifnotplaintextfeN gg  	titlepagehgN ig  menujiN kg  direntrylkN mg  copyingnmN og  examplepoN qg  smallexamplerqN sg  displaytsN ug  smalldisplayvuN wg  verbatimxwN yg  formatzyN {g  smallformat|{N }g  lisp~}N g  	smalllispN g  	cartoucheN g  	quotationN g  deftpNg  defcvN
 g  defivarN
 g  deftypeivarN
 g  defopNg  	deftypeopNg  	defmethodNg  deftypemethodNg  defoptN g  defvrN g  defvarN g  	deftypevrN g  
deftypevarN g  deffnN/g  	deftypefnN3g  defspecNg  defmacg  defung  
deftypefunNg  tableg  TABLE-ENVIRONg  	formatter g  itemize g  	enumerateg  start g  ftable g  vtable 47:?BEHJLNPRTVXZ\^`bdfhjlLnprtvxz|~ #%')+-158:<?CEGIKMPRTVXZ\^`bdfhjlnprtvxz|~ 			
				g  appendixsection			 g  command-depthsg  and=>g  assqg  cdrg  memqg  %oqw}i g  space-significant?g  command-specf  Unknown commandg  inline-content?g  string-null?g  string-everyg  char-whitespace?g  string-whitespace?g  *eof*
 g  read-eof-breaksg  eof-object?g  	peek-charg  
next-tokenf  reading a lineg  	read-charg  read-eof-lineg  
skip-while 	
 g  skip-whitespace 	 g  skip-horizontal-whitespaceg  char-alphabetic?f  Nonalphabetic @-command char: 'f  'g  string->symbolg  next-token-ofg  read-commandg  
make-tokeng  pair?g  token?g  carg  
token-kindg  
token-headg  assert-curr-char@ f  start of the commandg  STRINGg  string g  endg  string-trim-bothf  malformed @endg  ENDg  byeg  INCLUDEg  STARTg  read-command-token
 	f  reading verbatim
g  string=?f  @end verbatimf  
g  read-verbatim-bodyf  arguments of @-commandg  mapg  string-splitg  read-argumentsg  reversef  "@-command expected more arguments:f  '@-command didn't expect more arguments:f  #@-command missing required argumentg  arguments->attlistg  read-text-lineg  string-lengthg  
string-refg  	substringf  @item formatter must be INLINEf  Invalid @item formatterg  char-numeric?f  Invalid enumerate start  g  parse-table-args!{ "f  Inline element lacks {#g  parse-environment-args$g  parse-eol-text-args%f  can't happen&g  complete-start-command'g  find-string-from-port?(f  
@settitle )f  No \n@settitle  found*f  "You have a @settitle, but no title+g  take-until-settitle,g  identity-{}@
 .f  reading char data/f   0g  peek-next-char1f  EOF while reading char data2f   3g  PARA4g  read-char-data5f  Expecting @end for 6f  , got 7g  assert-token8g  error9f  no file listed:g  read-include-file-name;g  string->list<g  sxml->string=g  sxml->node-name>g  string-append?g  symbol->string@f  -Ag  indexB5C Cf  /@item not ended by @end table/enumerate/itemizeDf  (@item must be within a table environmentEf  Unknown token typeF@} Gg  call-with-input-stringHN<9D Ig  make-command-parserJg  string?Kg  reverse-collect-str-drop-wsLg  string-indexMg  string-trim-rightNg  string-trimOg  appendPg  parse-inline-text-argsQg  make-dom-parserRg  reverse!Sf  !@-command didn't expect more argsTf  @-command expects more argsUg  substring/sharedVf  @-command doesn't take argsWg  postprocessXg  input-port?Yg  car-eq?Zf  Table of Contents[Z \g  make-contents]g  string-prefix?^g  string-suffix?_g  append!`g  string-tokenizea/ bg  string-joincg  trim-whitespacedf  @set missing argumentsef  &expected a constant to define for @setfg  
fold-rightgg  conshg  associf  unknown valuejf  copying isn't set yetkg  foldlg  pre-post-ordermg  texinfo-argumentsng  *text*og  	*default*C 5       hp~    ]4	
 !(5 4+ >  "  G   ,-    h      - 1 3  @          g  port
			 g  message			 g  rest				  g  filenamef  texinfo.scm
	Z
		[			[	 				
	  g  nameg  parser-error C-R./0       h   N   ] 4L 56   F       g  filenamef  texinfo.scm
	e			e			e	 		
   C/    h   F   ] L 6>       g  filenamef  texinfo.scm
	h			h	 		
   C12   hp     ]
45  O O 4 O >   "  G  V44 5>  X4O >   "  G  CX4O >   "  G  F          g  filename
		l g  proc		l g  current-dir			l  g  filenamef  texinfo.scm
	]
		c			c			d		.	g	
	1	g	 	>	g	
	@	d	 			l	  g  nameg  call-with-file-and-dirg  documentationf $Call the one-argument procedure @var{proc} with an input port that
reads from @var{filename}. During the dynamic extent of @var{proc}'s
execution, the current directory will be @code{(dirname
@var{filename})}. This is useful for parsing documents that can include
files by relative path name. C"R#RR    h0     ]
44 55$  $  CCC            g  command
		* g  	max-depth		* g  depth			*  g  filenamef  texinfo.scm
n
	z		z		z		z		{		{		#{	 			*	  g  nameg  texi-command-depthg  documentationf Given the texinfo command @var{command}, return its nesting level, or
@code{#f} if it nests too deep for @var{max-depth}.

Examples:
@example
 (texi-command-depth 'chapter 4)        @result{} 1
 (texi-command-depth 'top 4)            @result{} 0
 (texi-command-depth 'subsection 4)     @result{} 3
 (texi-command-depth 'appendixsubsec 4) @result{} 3
 (texi-command-depth 'subsection 2)     @result{} #f
@end example C$R  h   |   ] 6      t       g  command
		
  g  filenamef  texinfo.scm
~
	
	 		
  g  nameg  space-significant? CR#-     h8      ]	4 5$  &  6C 6              g  command
		1 g  spec		1  g  filenamef  texinfo.scm

													"		%		-		1	 		1  g  nameg  command-spec CRG  h0   y   ] $  "   $  "   $  CC     q       g  content
		+  g  filenamef  texinfo.scm

		 		+  g  nameg  inline-content? CR      h       ]	4 5$  C 6           g  str
		 g  t			  g  filenamef  texinfo.scm

							 		  g  nameg  string-whitespace? CRR       hh     ]44 55$   64 54 5&  '4 5
&  4 >  "  G  "   "   C             g  port
		a g  line	$	a g  c		-	a  g  filenamef  texinfo.scm

															 		$		$		'		-		7		8	'	D		E	 		a  g  nameg  read-eof-line CR       h      ] 6      w       g  port
		
  g  filenamef  texinfo.scm

			
	 		
  g  nameg  skip-whitespace CR   h      ] 6             g  port
		
  g  filenamef  texinfo.scm

			
	 		
  g  nameg  skip-horizontal-whitespace CR-   h    s   ]4 5$  C4 5$   CC k       g  c
		  g  filenamef  texinfo.scm
									 		   C 	 hP      ]4 545$  "  4 >  "  G  4 56              g  port
		I g  
first-char			< g  t			9  g  filenamef  texinfo.scm

												%		)	H	.		?		I	 		I  g  nameg  read-command CRh      ] C{       g  kind
		 g  head		  g  filenamef  texinfo.scm

		 			  g  nameg  
make-token CRiRiRiR -893 h@  i  ]!4 >  "  G  4 5!&  "  S:&  "  F.&  "  9?&  "  ,@&  "  \&  "  {&  "  }$  44 5564	 5
$  Y44 5545$  "  	45$  "  4 >  "  G  456$  6$  6$  66    a      g  port
	< g  peeked	< g  name	 < g  command	  g  t	    g  filenamef  texinfo.scm

														)	 	 	 	 	" 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	$ 	 	 							 	"	$	-	1	4	8	<	 -	<  g  nameg  read-command-token CR	
  hP   \  ]"  A4 54 >  "  G  45$  C45"" T      g  port
		O g  str-handler		O g  seed			O g  seed			G g  fragment			G  g  filenamef  texinfo.scm

					
	 		$		 							'	
	-		/	
	3		7		=	&	A		G	
	G	 		O	  g  nameg  read-verbatim-body CR    h   a   ]4 5$  C C      Y       g  x
		  g  filenamef  texinfo.scm
5		5	$	5	  		   C      h`   Y  ]4  54 >  "  G  444,555$  &  (  CCCC Q      g  port
		_ g  	stop-char		_ g  str			_ g  ret		<	_  g  filenamef  texinfo.scm
2
	:			:		:		;		:			:		4		&5		+6		06	*	:6		<5		<5		A7		E7		H7	 	M7	
	P7	5	T7	
	U8	
 		_	  g  nameg  read-arguments CR-      h   H  ]$   (  "   6(  "  $    " (  %(  "  $  6LLL6(  
L 6 $  0  $   "     "F$  4L  5"  $  C6      @      g  in
	  g  names	  g  opt?		  g  out		  g  t	    g  filenamef  texinfo.scm
V		X			W		Y		Y	"	!Y		'Z		/Z	$	2Z		6W		;[		J[		PW		V]	
	W]		a]		g^	
	m_		u_	
	{W	 b	 b	 c	 W	 h	 h	 i	 j	 j	 j	 j	( j	7 j	1 i	 h	 d	
 d	 d	 d	# d	 d	 e	 f	 e	
 -	 	  g  nameg  loop C     h(      ]O  Q 6             g  port
		" g  args		" g  	arg-names			" g  loop			"  g  filenamef  texinfo.scm
U
	V		 V	8	"V	 		"	  g  nameg  arguments->attlist CR- 	h   0  ]L 
$  "  Z4L
5@&  K44L55 44 55$  "  4L >  "  G    "    $   CLL6  (      g  f
	*	d g  t	:	_ g  t
	i	~  g  filenamef  texinfo.scm
p		q		
q	
	r		q	
	s		!s	(	*s		*s		-t		0t	,	7t	&	:t		:t		Gu		Mv		Tu		iq		zx		~x	
 		~
  g  nameg  get-formatter C-        h  I  ]"445545O Q  $  Z
$  C&  44
55"  $  "  	4	
5$  "  45  C $  X&  "  $  &  "  "  +45$  "  $  "  45    C45    C       A      g  command
	 g  port	 g  line		 g  length		 g  get-formatter		# g  t		Z	s g  t	    g  filenamef  texinfo.scm
m
	n		n	!	n		n		o		n		5y		8{		={		>|		A}		H~		I		L	.	U		Z~		h		w~		~	 	 	 }	 y	 	 	 	 	 	 	 	( 	 	 	 	 	 	 	 '		  g  nameg  parse-table-args C RG!"N<A# $6A9D-%    h    ]"4 5$  4>  "  G  D$  .4>  "  G  44}55D	$  4>  "  G  D
$  44
55D$  "  $  "  $  !4>  "  G  45D$  !4>  "  G  45D$  4>  "  G  D$  !4>  "  G  45D$  "  !$  "  $  "  $  D6        g  command
	 g  port	 g  spec			 g  command		 g  type		 g  	arg-names		  g  filenamef  texinfo.scm

																		%		&		*		,	 	3		>		B		K		L		P		R	 	Y		d		i		u		y	 	 	 	 	  	 	 	 	 	 	 	 	 	 	 				$	0	9	:	N	R	[	\	p	|						 ;		  g  nameg  complete-start-command C&R'(-)*  hX      ]	4 5$  "  4 >  "  G  4 >  "  G  4 5
&   6C        g  port
		W g  t		.  g  filenamef  texinfo.scm

													#		/		A		M		S		U	 		W  g  nameg  take-until-settitle C+R,-./F0-1235  h  v  ]=4$  "  5" 4 54 545$  ?"  45"  (4	5$  4	5$  "  ""  "D@&  "  {&  "  }$  "  45"  (4	5$  4	5$  "  ""  "@$  4
 5"  >{$  45"  (}$  4 >  "  G  45"  D
& 4 5	4	5$  ]$  "  4 >  "  G  "  45"  (4	5$  4	5$  "  ""  "	D	@&  4
 5
4
5"  '4$  "  $  "  5"  @4	5$  14	$  "  $  "  5$  "  ""  "
D$  "  	
$  l4 >  "  G  4 >  "  G  "  45"  (4	5$  4	5$  "  ""  "45D"  4$  "  5"  44	5$  %4	$  "  5$  "  ""  ""C"  n      g  port
	 g  expect-eof?	 g  preserve-ws?		 g  str-handler		 g  seed		 g  	end-chars		 g  seed		 g  fragment		' g  	term-char		0 g  c		= g  token	
3 g  end?	3  g  filenamef  texinfo.scm
																		'	#	5	'		'	
	*		0	
	3		=		B	
	H	3	L	
	P		Q		[		\	#	`	3	b	#	f	
	|	 	 	 	
 	3 	
 	 	 	 	# 	3 	# 	
 	 	 	 	 	+ 	2 			 	0$	<'	0.	6	7	=	@	J	P	U	[	)`	m	
s	7w	
{	|			#	7	#	
			 		$	7			
 	 	& 	) 	: 	?	
				# 	 	& 	) 	: 	?	#	
3	9	C	*G	H	L	S	\	r	
x	7|	
				#	7	#	
		&	,			
	 	1	6	
				#	 	1	6	#	

		 		   C4R-56 hH      ]4 5$   4 5&  4 5"  "  $  C 6         g  token
		F g  kind		F g  name			F g  t		.	F  g  filenamef  texinfo.scm

											$		.		>		B	2	F	 		F	  g  nameg  assert-token C7R89 h(      ]	44 5545$  6C           g  port
		$ g  x		$  g  filenamef  texinfo.scm
?
	@		@		@		@		A		A		B		!B	 
		$  g  nameg  read-include-file-name C:R;<  h     ]"  g(  45@{&  "  }&  "  @&  "  ,$  ""44 55"            g  sxml
	  g  in		m g  out			m g  t			K  g  filenamef  texinfo.scm
E
	G		H		I		I		J		J		OJ		RK		\K		_L		bL	!	eL		mL		mG		nG		qG		yG		zG	: G	 	   g  nameg  sxml->node-nameg  documentationf  -Turn some sxml string into a valid node name. C=R>?@@DFHJL=; #h  m  ] $  "   $  "   $  "   $  "   $  "   $  "   $  "   $  "   	$  "   
$  "  u $  "  g $  "  Y $  "  K $  "  = $  "  / $  "  ! $  "   $  "   $  944 5455  456 $  "  = $  "  / $  "  ! $  "   $  "    $  <44 54!4"555  456C  e      g  command
	 g  	arguments	 g  fdown		 g  fup		 g  parent-seed		 g  args	(@ g  args	  g  filenamef  texinfo.scm
N
	O		S	
S	S	)S	BT	/T	5T	/T	)"S	%S	(S	.U	3V	7V	;V	 <V	->V	@U	IO	X	X	X	)X	BY	)Z	*Z	0Z	*Y	)X	X	X	[	\	\	\	 \	-\	[	 )		  g  nameg  index CAR&AB56   h      ]L  6          g  s
		  g  filenamef  texinfo.scm
j		j	,	j	2		j	6	j	% 		  g  nameg  new-para CAAw43,5      h   j   ]LL  6   b       g  s
		  g  filenamef  texinfo.scm
k	*	k	;	k	A	k	6 		   C/8;-CN79D3":3    h   d   ]L LLL 6\       g  port
		  g  filenamef  texinfo.scm
	$		1		& 		   C5        h   j   ]LL  6   b       g  s
		  g  filenamef  texinfo.scm
k	*	k	;	k	A	k	6 		   CEF5 h   j   ]LL  6   b       g  s
		  g  filenamef  texinfo.scm
k	*	k	;	k	A	k	6 		   C56 '      h  b  ]]" 54 LL >  G 45$  1$  "  $  645L	LLL645$  ^4$  "  5 $  L	O "  4L 45	4$  L"  55 "6
$  L&  "  L$  A4455		$  "  4 >  "  G  	"  "L&  4
L>  "  G  "   45L	LLL6$  L&  "  L$   4L L455L	LLL6L&   4L L455L	LLL6L&  "  L$  #LL L454L	LLL56 L6$   L "$  344 5LO 5  "$  4545		
	454$  $  "  "  5$  $  L	O "  "  "  "  $  $  L"  ""  " 4L
 L455 " 6$  wL$  "  4  5$  ]4!4" 5#5$  "  44" 55$  145 $L	O 4L
%&5 "R"R"N"J    Z      g  port
	 g  expect-eof?	 g  end-para		 g  need-break?		 g  seed		 g  seed		; g  token		; g  s		N	\ g  key		c; g  seed	   g  spec	 ( g  t		 % g  s	Uc g  s	 g  s	 g  s	 g  seed	Qk g  head	{1 g  spec		1 g  head	
1 g  type	1 g  inline?	1 g  seed	1 g  end-para	1 g  new-para	1 g  seed	  g  filenamef  texinfo.scm
z						!		+		4		G	$	H	 	N		\i		]		c		o	#	u	$ 	# 	 	 	 	, 	? 	, 	- 	, 	 	 	 	 	 	% 	3 	% 	 	$ 	0 	 			%	0	/4	5	;	-B	O	U	ci	l	t				$	7		i		/			$	8		i				9	5i							7/	8	9	#<	$Q	#Q	k	t	u	${	~	$		$		$		'		$	%	)	$		(	,		(	,		9		8#	1	7	*;	;	G	!M	-W	X	[	 e	i	o	r	'z	{				j	%j	,j	2j	6j	%	 		  g  nameg  loop CG,H       hP    ]L4 >  G 4LL 54L545		$  	"  		$  "  45
O LQ &  "  ,	&  "  
&  "  &  "  $  L 6&  4L5L 6O LL
L LQ &  4455"  	
$  "  	456            g  command
	J g  port	J g  sig-ws?		J g  parent-seed		J g  command		J g  	arguments		J g  expected-content		J g  parent-seed		'J g  seed		6J g  t			A	W g  eof-closes?			WJ g  sig-ws?	
	lJ g  new-para		vJ g  s	   g  loop	 J  g  filenamef  texinfo.scm
a		c		b		d		'd		*e		6d		9f	 	Af		Sg	6	Tg	 	Wd		_h		fh	$	ld	 s	 r	
 i	 w	 r	
 x	 x	 i	 z	n	&n	o	o	((o	8}	$>~	)Jz	 !	J	  g  nameg  visit C    h(      ]O LLL Q  6            g  command
		# g  port		# g  seed			# g  visit			#  g  filenamef  texinfo.scm
`		a	 		#	   C        h      ] O C         g  fdown
		 g  fup		 g  str-handler			  g  filenamef  texinfo.scm
_
 			  g  nameg  make-command-parser CIR>J2        h     ]! (  C"  "  (  $  C4?C45$  *$  45"  "(  "  %$  (  "  "  
4?"j "Y4 5$   (  4 5$  C"0","(        g  	fragments
	  g  	fragments	  g  result		  g  strs		  g  all-whitespace?		   g  filenamef  texinfo.scm

												"		+		-		2		4		8		;		@	+	C	%	I		J		O	'	Q		b		e		h		n	 	 	 	 	 	 	 	 	 	 	- 	8 	 	 		 	 		 	 	 	 		 	 		 	 	 0	   g  nameg  reverse-collect-str-drop-ws CKRJLMNO       hH    ];" 4(  i"  )4(  "  
455 6$  145$  !45$  """"$  "t4,5$  s4,5454545	4		5$  "  	4
44	5$  "  55"(  45"  ""      g  port
	H g  spec	H g  text		H g  in		: g  cur		: g  out		: g  args		+	9 g  parts	  g  head	  g  rev-tail	  g  last		   g  filenamef  texinfo.scm
 
									 
	)	)
	#	+		+	
	6	*	9		9		<		@		A		F		H		L	
	M		R	#	T		X	
	]		i	
	x		y		}	 	
 	 	 	 	 	 	 	 	 	" 	 	 	 	& 	 	 	 	  	 	 	 	  	 	 	 	 	 	( 	 	 	 	' 	#	?						
		 "	-$	 +	7.	
:	:	=	>	$H	 N	H	  g  nameg  parse-inline-text-args CPRIh      ]C           g  command
		 g  args		 g  content			 g  seed			  g  filenamef  texinfo.scm
		 	 			   CKP       hX   m  ]454 5&  45 C(  "  C    e      g  command
		T g  args		T g  parent-seed			T g  seed			T g  seed				T g  spec			T g  command			T  g  filenamef  texinfo.scm
!		"			"		#		"		$		"		%		%		#%		'&	%	(&	(	2&		5&		8&		A)		I)	/	L)	(	P(	 		T	   C    h       ]45$   C C           g  string1
		 g  string2		 g  seed			  g  filenamef  texinfo.scm
+		,			,		-			.		 			   C     h   c   ] 6    [       g  filenamef  texinfo.scm

		 		
  g  nameg  make-dom-parser CQR4Qi5  R-STJLUFV       hh  .  ]J4L 54 5$ *&  	 C" (  (  66$  6(  645$  4	 5"  		$  P4
	5
	
$  
"q
4
	5 "J"   "  -$  !&  "  ""  """(  C6  &      g  command
	f g  port	f g  args		f g  spec		f g  command		f g  	arg-names		"f g  args		>E g  	arg-names		>E g  out		>E g  t		 E g  rest	
    g  filenamef  texinfo.scm
3		4		4	!	
4	6	4		4		4		5		4		6		4		!7		"4		*8		3=		6=		9=	
	>?	
	D@		JB		PB		VC	%	\C		_E		c@		jF		oF		u@		{H	! H	 J	 J	 J	 J	 J	( J	6 J	( @	 L	 L	1 L	< L	 L	 M	 M	 N	* N	 N	 O	* O	 O	6 P	+ Q	+ Q	6 Q	+ P	% P	 O	 T	 T	W	$W	4W	
W	U	U	$U	U	U	5U	A U	#V	&V	/(V	ET	E?	
J?	<T?	
Z:	
[:	b;	!f;	 S	f	   C O  #R#       h      ] 6             g  command
		
 g  port		
  g  filenamef  texinfo.scm
Y
	
\	 		
	  g  nameg  parse-eol-text-args C$RWQC        h      ]445  56           g  port
		  g  filenamef  texinfo.scm
i		j		j		j	)	j	:	j		j		j	 			  g  nameg  parse CXWQCG    h0     ]	4 5$  445  56 6           g  string-or-port
		+ g  parse		+  g  filenamef  texinfo.scm
e
	k		k		j		j		j	)	j	:	 j		!j		#j		+m	 		+  g  nameg  texi-fragment->stexig  documentationf  Parse the texinfo commands in @var{string-or-port}, and return the
resultant stexi tree. The head of the tree will be the special command,
@code{*fragment*}. C%RQ+W   h0     ]	45 4 >  "  G  4 56      y      g  port
		* g  parser		*  g  filenamef  texinfo.scm
w
	{		{		
|		}		"}		%}	,	'}		(}		*}	 		*  g  nameg  texi->stexig  documentationf  Read a full texinfo document from @var{port} and return the parsed
stexi tree. The parsing will start at the @code{@@settitle} and end at
@code{@@bye} or EOF. C&R  h      ] $   CC             g  x
		 g  y		  g  filenamef  texinfo.scm

							*		% 			  g  nameg  car-eq? CYRR$Y8O5    h(  9  ]3 (   45D $  4 	5"  $  4 5$  4 5"  $   45D$  W(  "  (  	 "  4L  >  G 4	 5 "0 
$      "     "  "       1      g  in
	! g  out	! g  depth		! g  t		/! g  	node-name		Y g  out-cdr	   g  out-car	   g  new-in	   g  new-out	    	g  filenamef  texinfo.scm
					"		-													$	0	*		/		8	!	=	*	?	3	A	!	E		F	'	J	-	M	3	R	'	S	!	Y		`		d		h	 	i	+	p		r		w		{	 	 	. 	2 	 	4 	. 	; 	 	1 	8 	< 	1 	 	 	- 	 	 	 	 	 	 	" 	" 				!	 =	!	  g  nameg  lp C[ h0      ]O Q 4 >  G  C            g  tree
		+ g  lp	
	+ g  _			+ g  contents			+  g  filenamef  texinfo.scm

				'					%	 		+  g  nameg  make-contents C\R]2^_`ab/ 	   h`     ]$  "  	4 5$  "  	4 544 5$  "  5$  	"  6        g  str
		^ g  
trim-left?		^ g  trim-right?			^ g  left-space?			^ g  right-space?		,	^ g  tail		G	^  g  filenamef  texinfo.scm

						+							$		(	,	,		,		/		2		>		@	)	E	/	G		G		Q		S	'	V	!	^	 		^	  g  nameg  trim-whitespace CcRRJc8dLefghUimjk\  hx  ~  ] (  45D4 5$  4 $   "  4  5 " $  $   (  4 >  "  G  "   4 5$  r4  5$  : 4 
54 5  "    "	 6
$  \4 444 555$  "  4 55 "$     "f$  A4 45$  "  455 "$  & 44L55 "4L  $  "  45>  G   "   "  v      g  in
	v g  out	v g  state		v g  first?		v g  sig-ws?		v g  key		_Z g  i	 
 g  t	@` g  t	 g  kid-out	8Z g  state	8Z  g  filenamef  texinfo.scm
																	"		(		+		0		5	'	:	>	;	7	=		@		S		V		W		[		^		_		m		r			s		w	&	~	 	 	 	 		 	 	$ 	 	 	 	 	  	+ 	  	& 	1 	< 	& 	D 	  	 	 	 	- 	8 	&
					#	 $	'	 *	-.	31	86	-7	'<	 @	@	O	S	&V	6]	b	w					"						 	$	+	$				&								'						'%	,	*0	>2	*7	;		B	G	Z	]	`	c	v	 t	v	  g  nameg  loop C       h0      ]O  Q 4 >  G C            g  tree
		+ g  loop		+ g  out		!	+ g  state		!	+  g  filenamef  texinfo.scm

						 	 		$	 		+  g  nameg  postprocess CWRlm   h   q   - 1 3 C i       g  x
			 g  t			  g  filenamef  texinfo.scm
			!		 			
   Cn  h   ^   ]C   V       g  x
		 g  t		  g  filenamef  texinfo.scm
	 			   Co     h   h   - 1 3  C `       g  x
			 g  t			  g  filenamef  texinfo.scm
			# 			
   C     h      ]  6            g  tree
		  g  filenamef  texinfo.scm

				 		  g  nameg  stexi->sxmlg  documentationf  Transform the stexi tree @var{tree} into sxml. This involves
replacing the @code{%} element that keeps the texinfo arguments with an
element for each argument.

FIXME: right now it just changes % to @code{texinfo-arguments} -- that
doesn't hang with the idea of making a dtd at some point C'RC        g  m
		, g  parser
]c  g  filenamef  texinfo.scm		J
 	Z
o	]
r 	u	m
xi	|h
\n
 ~
	4
	



	


+







p
2
:U
"m
'
)'
3
4t
5?
7E
<iN
P_
T_
Y 
]
]1	]1	c0
d{Y
g>e
iw
i
oh
q
z
~l
 2	~n
   C6                                                                                                                                                                                                         ccache/texinfo/serialize.go                                                                         0000644                 00000037576 15154557173 0012003 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0f?      ]  4   hw      ] g  guile	 	g  define-module*	 	 	g  texinfo	g  	serialize	 		g  filenameS	
f  texinfo/serialize.scm	g  importsS	 	 	g  string-utils	 	 	g  sxml	g  	transform	 	 	g  srfi	g  srfi-1	 	 	g  srfi-13	 	 	 	g  exportsS	g  stexi->texi	 	 g  set-current-module	!  	"  	#g  reverse	$g  list-intersperse	%g  reverse!	&g  filter*	'g  append	(g  list*	)f  
	*f   	+f  @	,g  include	-g  empty-command	.g  string=?	/f  *braces*	0f  @}	1g  
append-map	2f  @{	3f  }	4f  {	5g  inline-text	6g  map	7g  warn	8f  Strange inline-args!	9g  error	:f  Invalid inline-args	;f   	<g  
drop-while	=g  not	>g  assq-ref	?f  ,	@g  inline-args	A? 	Bg  inline-text-args	C* 	Dg  serialize-text-args	Eg  eol-text-args	Fg  eol-text	Gf  , 	Hg  eol-args	If  @bye
	Jf  
@c %**end of header

	Kg  title	Lf  
@settitle 	Mg  and=>	Ng  filename	Of  @setfilename 	Pf  8\input texinfo   @c -*-texinfo-*-
@c %**start of header
	Qf  

	Rf  @end 	Sg  
string-ref	Tg  string-length	Ug  environ	Vg  symbol->string	Wg  table-environ	Xg  fill-string	Yg  string-concatenate	Zg  
line-widthS	[g  break-long-words?S	\g  wrap	]g  	paragraph	^f  @item
	_g  item	`f  @item 	ag  entry	bf  
@c %end of fragment
	cf  
@c %start of fragment

	dg  fragment	eg  EMPTY-COMMAND	fg  INLINE-TEXT	gg  INLINE-ARGS	hg  INLINE-TEXT-ARGS	ig  EOL-TEXT	jg  EOL-TEXT-ARGS	kg  INDEX	lg  EOL-ARGS	mg  ENVIRON	ng  TABLE-ENVIRON	og  ENTRY	pg  ITEM	qg  	PARAGRAPH	rg  FRAGMENT	sg  serializers	tf  Unknown command type	u}{@ 	vg  escaped-chars	wg  string	xg  memq	yg  string->list	zg  escape	{g  string-concatenate-reverse	|g  string?	}g  assq	~g  texi-command-specs	g  symbol? g  % f  $Unknown stexi command, not rendering f  Invalid stexiC 5    h5  <  ]4	
5 4" >  "  G   #      h@     ] (   C"   (  6"   "      g  src-l
		@ g  elem		@ g  l			/ g  dest			/  g  filenamef  texinfo/serialize.scm
	"
		#			$			%			%			&		!	&	 	&	&	(	'	&		/	&		/	$		2	$		5	$	-	8	$	9	@	$	 		@	  g  nameg  list-intersperse C$R%    hh   F  ]"  U(  6$  #4 5$  
"  "4 5$  	"  ""  >      g  pred
		f g  l		f g  in			[ g  out			[  g  filenamef  texinfo/serialize.scm
	)
		*			+			,			-			+			.			.		"	.	"	$	.		(	.		+	.	2	.	.	,	<	.		=	0		>	0		H	0		M	0	!	[	0		[	*		^	*		f	*	 		f	  g  nameg  filter* C&R#'       hx   z  -  1  3 4 5"  K(  C$  45"(  """     r      g  args
			s g  args		s g  tail			s g  in			f g  out			f  g  filenamef  texinfo/serialize.scm
	3
	
	4			4			5			4			6		!	7		'	8		(	8		,	7		/	8	"	0	8	+	5	8	3	9	8	+	A	8		D	9		H	7		K	9	"	U	9		X	:		[	:	%	^	:		f	:		f	6		i	6		s	6	 			s


  g  nameg  list* C(R()$*+     h      ]456             g  exp
		 g  lp		 g  command			 g  type			 g  formals			 g  args			 g  accum			  g  filenamef  texinfo/serialize.scm
	?			@			A			C			A			D			D			@	 				  g  nameg  include C,R(*+    h      ]6         g  exp
		 g  lp		 g  command			 g  type			 g  formals			 g  args			 g  accum			  g  filenamef  texinfo/serialize.scm
	F
		G			
	G			G	 			  g  nameg  empty-command C-R./(01    h   h   ]L  6       `       g  x
			  g  filenamef  texinfo/serialize.scm
	O			O	+			O	% 			   C#23h   h   ]L  6       `       g  x
			  g  filenamef  texinfo/serialize.scm
	L			L	+			L	% 			   C4+ hP     ]45$  4O 4 556	4
O 4 556       g  exp
		O g  lp		O g  command			O g  type			O g  formals			O g  args			O g  accum			O  g  filenamef  texinfo/serialize.scm
	I
		J				J			J			J			N			O			O	1	#	O	:	%	O	1	'	O		)	P		-	N		1	K		2	L		<	L	1	A	L	:	C	L	1	E	L		G	M		K	M		O	K	 		O	  g  nameg  inline-text C5R(3$6789:;    h@      ] $  3 $  $ $  4L >  "  G  "    CL 6C         g  x
		>  g  filenamef  texinfo/serialize.scm
	W			X			Y			X			Z	#		Z			Z			[			[	"	#	[		2	\		7	]	$	;	]		=	X	  		>   C<=>      h   `   ]L  6      X       g  x
		
  g  filenamef  texinfo/serialize.scm
	_	 	
	_	, 		
   C#?;4+   hP   b  ]$  144O 44O 4	5555
5"  6       Z      g  exp
		I g  lp		I g  command			I g  type			I g  formals			I g  args			I g  accum			I  g  filenamef  texinfo/serialize.scm
	R
		S				T				U			V			^			_		)	`	 	1	_		3	^		5	V		7	a		9	U		?	T		A	b			E	b		I	S	 		I	  g  nameg  inline-args C@R(3'$61   h   h   ]L  6       `       g  x
			  g  filenamef  texinfo/serialize.scm
	k	(		k	:			k	4 			   C#   h   h   ]L O 4 56    `       g  x
		  g  filenamef  texinfo/serialize.scm
	k			k	@		k	 		   C<=>      h   `   ]L  6      X       g  x
		
  g  filenamef  texinfo/serialize.scm
	m	!	
	m	- 		
   C#A;4+   hP   w  ]$  6444O 44	O 4
55555?"  6  o      g  exp
		N g  lp		N g  command			N g  type			N g  formals			N g  args			N g  accum			N  g  filenamef  texinfo/serialize.scm
	d
		e				f				g			i			j			l		"	m		,	n	!	4	m		6	l		8	j		:	o		<	i		>	g		D	f		F	p			J	p		N	e	 		N	  g  nameg  inline-text-args CBR'$61  h   h   ]L  6       `       g  x
			  g  filenamef  texinfo/serialize.scm
	v	#		v	5			v	/ 			   C     h   b   ]L O  6 Z       g  arg
		  g  filenamef  texinfo/serialize.scm
	v				v	 		   C#<=>  h   `   ]L  6      X       g  x
		
  g  filenamef  texinfo/serialize.scm
	z		
	z	  		
   CC 
  h@     ]44 O 444O 455555	5@             g  lp
		: g  formals		: g  args			:  g  filenamef  texinfo/serialize.scm
	r
		u			v			w				y	
		z		&	{		.	z		0	y	
	2	w			4	v		6	|		8	u		:	s	 		:	  g  nameg  serialize-text-args CDR()D*+        h      ]456           g  exp
		 g  lp		 g  command			 g  type			 g  formals			 g  args			 g  accum			  g  filenamef  texinfo/serialize.scm
	~
					 			 			 				 			  g  nameg  eol-text-args CER()1     h   k   ]L  6       c       g  x
			  g  filenamef  texinfo/serialize.scm
 		 	'		 	! 			   C#*+    h8   C  ]4O 4$   "   556      ;      g  exp
		2 g  lp		2 g  command			2 g  type			2 g  formals			2 g  args			2 g  accum			2  g  filenamef  texinfo/serialize.scm
 
	 			 			 		 		 	'	$ 	2	& 		( 			* 			. 		2 	 		2	  g  nameg  eol-text CFR()$'<=6>     h   b   ]L  6      Z       g  x
		
  g  filenamef  texinfo/serialize.scm
 	"	
 	. 		
   C#G*+   h8   ^  ]4444O 4	555?
56  V      g  exp
		6 g  lp		6 g  command			6 g  type			6 g  formals			6 g  args			6 g  accum			6  g  filenamef  texinfo/serialize.scm
 
	 			 			
 	
	 		 		 	"	$ 		& 		( 	
	* 	
	, 			. 			2 		6 	 		6	  g  nameg  eol-args CHR(I1    h   k   ]L  6       c       g  x
			  g  filenamef  texinfo/serialize.scm
 		 	*		 	$ 			   C#J>KLMN)#O     h      ]4 5C       g  filename
		  g  filenamef  texinfo/serialize.scm
 		 		 	$		 	3	 	-	 	$	 	 		   C;PQRh   k   ]L  6       c       g  x
			  g  filenamef  texinfo/serialize.scm
 	$	 	6		 	0 			   CST)D*+      h     ] $  T4O 4 5544	55
4455$  "  64O 4$   "   55(  "  4455
$  "  456
      g  exp
	  g  lp	  g  command		  g  type		  g  formals		  g  args		  g  accum		  g  key		  g  t		K	^ g  body	    
g  filenamef  texinfo/serialize.scm
 
	 		 		 		 		 	0	$ 	9	' 	0	) 		+ 		, 		/ 		5 	$	7 		9 		; 	-	< 		? 		E 	&	G 		K 		K 		[ 		` 		d 		h 		l 		m 		w 	$	 	-  	6  	A  	$  	  	  	  	  	  	(  	,  	;  	,  	(  	  	  	  	  	  	  	  	  	  	 6	 	  g  nameg  environ CUR(QR1   h   k   ]L  6       c       g  x
			  g  filenamef  texinfo/serialize.scm
 		 	'		 	! 			   C#);V+*      hh     ]4O 4$   "   55$  	"  $  4	5
 "  
6
      g  exp
		h g  lp		h g  command			h g  type			h g  formals			h g  args			h g  accum			h g  arg		?	^  g  filenamef  texinfo/serialize.scm
 
	 			
 		 			 		 		  	'	( 	2	* 		, 			. 			4 		7 		? 	+	? 			D 		H 		I 		N 	%	P 		R 	0	U 		` 			d 		h 	 		h	  g  nameg  table-environ CWRXYZ[   h      ]4 5	H6    y       g  strings
		  g  filenamef  texinfo/serialize.scm
 
	 		 	 		  g  nameg  wrap C\R(Q\#1       h   k   ]L  6       c       g  x
			  g  filenamef  texinfo/serialize.scm
 		 	)		 	# 			   C  h(   D  ]444O 4 55556<      g  exp
		( g  lp		( g  command			( g  type			( g  formals			( g  args			( g  accum			(  g  filenamef  texinfo/serialize.scm
 
	 			 			
 	
	 		 	/	 	8	 	/	  		" 	
	$ 			( 	 		(	  g  nameg  	paragraph C]R(1  h   k   ]L  6       c       g  x
			  g  filenamef  texinfo/serialize.scm
 		 	'		 	! 			   C#^      h      ]4O 4 556        g  exp
		 g  lp		 g  command			 g  type			 g  formals			 g  args			 g  accum			  g  filenamef  texinfo/serialize.scm
 
	 			 	-	 	6	 	-	 			 			 	 				  g  nameg  item C_R(1   h   k   ]L  6       c       g  x
			  g  filenamef  texinfo/serialize.scm
 		 	'		 	! 			   C#)       h   k   ]L  6       c       g  x
			  g  filenamef  texinfo/serialize.scm
 		 	'		 	! 			   C`        h8   R  ]4O 4 554O 4556  J      g  exp
		6 g  lp		6 g  command			6 g  type			6 g  formals			6 g  args			6 g  accum			6  g  filenamef  texinfo/serialize.scm
 
	 			 	-	 	6	 	-	 			 			 			& 	-	+ 	6	. 	-	0 			2 			6 	 		6	  g  nameg  entry CaR(b1  h   k   ]L  6       c       g  x
			  g  filenamef  texinfo/serialize.scm
 		 	'		 	! 			   C#c      h    (  ]4O 4 556       g  exp
		  g  lp		  g  command			  g  type			  g  formals			  g  args			  g  accum			   g  filenamef  texinfo/serialize.scm
 
	 			 			 	-	 	6	 	-	 			 			  	 
		 	  g  nameg  fragment CdRe-if5ig@ihBiiFijEikEilHimUinWioaip_iq]irdi,i sR>s9t   h8   &  ]45$  "  4 5 6          g  exp
		4 g  lp		4 g  command			4 g  type			4 g  formals			4 g  args			4 g  accum			4 g  t			4  g  filenamef  texinfo/serialize.scm
 
	 		 		 		 		$ 		4 	 		4	  g  nameg  	serialize CRuvRw#xvy    h`     ]"  D(  45@45$  @""4 5"            g  str
		Z g  in		J g  out			J  g  filenamef  texinfo/serialize.scm
 
	 		 		 		 		 		 		! 		% 		( 		+ 	"	0 		9 		< 		? 	!	B 		J 		J 		K 		R 	*	Z 	 		Z  g  nameg  escapeg  documentationf  BEscapes any illegal texinfo characters (currently @{, @}, and @@). CzR{|z}~V&79   h      ]
 $   "  $  C4 5$  4 5C $  4 5$  r L 4 545"  $  "  @ "  9 $  - $   	&  	 "  ""  ""  "64
 >  "  G  C 6       g  in
	  g  out	  g  command-spec		>   g  filenamef  texinfo/serialize.scm
 		 		 		 		 		 		" 		# 		, 		0 		4 		5 		: 	!	> 		> 		F 			M		R	(	T		W		Y		`	)	c		j		o			w		{			~
	&	
	 		 
	7 
	0 
	 	$ 	/ 
	 	 	 	 	 	 	 	 ,	 	  g  nameg  lp C     h       ]	O Q 4 56         g  tree
		 g  lp		  g  filenamef  texinfo/serialize.scm
 
	 		 		 		 	 		  g  nameg  stexi->texig  documentationf  2Serialize the stexi @var{tree} into plain texinfo. CRC     4      g  m
		,  g  filenamef  texinfo/serialize.scm		
	"
a	)
m	3
	?		F

	I
e	R
	d
	r
2	~
V 
 
  
#i 
$ 
&/ 
( 
* 
, 
, 	-) 
. 
. 	. 
0 
5 
 	5
   C6                                                                                                                                   ccache/texinfo/html.go                                                                              0000644                 00000037056 15154557173 0010751 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0>      ]^ 4        hp      ] g  guile	 	g  define-module*	 	 	g  texinfo	g  html	 		g  filenameS	
f  texinfo/html.scm	g  importsS	 	 	g  sxml	g  	transform	 	 	g  ice-9	g  match	 	 	g  srfi	g  srfi-13	 	 	 	g  exportsS	g  stexi->shtml	g  add-ref-resolver!	g  urlify	 	 g  set-current-module	!  	"  	#g  and=>	$g  assq	%g  arg-ref	&g  error	'f  Missing argument:	(g  arg-req	)g  car*	*g  string-downcase	+g  
string-map	,g  string-append	-f   	.f  #	/g  ref-resolvers	0g  or-map	1f  Could not resolve reference	2g  resolve-ref	3g  node	4g  section	5g  manual	6g  span	7g  xref	8f  See 	978 	:g  pxref	;f  see 	<:; 	=9< 	>g  cdr	?g  a	@g  @	Ag  href	Bg  ref	Cg  url	Dg  title	Eg  uref	Fg  name	G- 	Hg  defun	If  Function	Jg  defspec	Kf  Special Form	Lg  defvar	Mf  Variable	Ng  category	Og  div	Pg  table	Qg  cellpadding	Rf  0	SQR 	Tg  cellspacing	UTR 	Vg  width	Wf  100%	XVW 	Yg  class	Zf  def	[YZ 	\@SUX[ 	]g  tr	^g  td	_g  	data-type	`g  code	ag  b	bg  	deftypeop	cg  	deftypefn	dg  
deftypefun	eg  	arguments	fg  var	gg  reverse!	hf   	if  right	jYi 	k@j 	lf  [	mf  ]	nm 	of  description	pYo 	q@p 	rg  def	sg  ol	tg  %	ug  start	vg  
string-ref	wg  number?	xg  string->number	yg  char->integer	zg  char-upper-case?	{g  	enumerate	|g  ul	}g  itemize	~g  acronym	&  &  f  no matching pattern g  	formatter g  dl g  map g  dt g  append g  dd g  itemx g  heading g  entry g  	titlepage f  	titlepage Y  @  O  g  h2 f  title Y  @  D  g  subtitle g  h3 f  subtitle Y  @    g  author f  author Y  @    g  example g  pre   g  lisp   g  smallexample f  smaller Y  @    g  	smalllisp   g  	cartouche f  	cartouche Y  @  O  g  verbatim f  verbatim Y  @    g  chapter   4  g  
subsection g  h4   g  subsubsection g  h5   g  appendix   g  appendixsec   g  appendixsubsec   g  appendixsubsubsec   g  
unnumbered   g  unnumberedsec   g  unnumberedsubsec   g  unnumberedsubsubsec   g  majorheading   g  chapheading     g  
subheading   g  subsubheading   g  	quotation g  
blockquote   g  item g  li   g  para g  p   g  
*fragment* O  g  asis 6  g  bold a  g  sample g  samp     ``  g  kbd   g  key f  key Y  @  `  ff  g  env f  env Y  @  `  g  file f  file Y  @  `  g  command f  command Y @  ` g  optionf  optionY @ ` f  url	Y 
@	 C`
 g  dfn g  cite g  acro~ g  emailf  emailY @ ` g  emphg  em g  strong g  scf  
small-capsY @  6 !  3"g  tag-replacements#g  page$g  setfilename%g  setchapternewpage&g  iftex'g  ifinfo(g  ifplaintext)g  ifxml*g  sp+g  vskip,g  menu-g  ignore.g  syncodeindex/g  comment0g  c1g  dircategory2g  direntry3g  top4g  shortcontents5g  cindex6g  
printindex7#$%&'()*+,-./0123456 8g  ignore-list9g  
*preorder*:g  pre-post-order;g  xmlns<f  http://www.w3.org/1999/xhtml=;< >@= ?g  head@g  bodyAg  *text*Bg  	*default*Cg  	copyrightDg  *ENTITY*Ef  copyFDE Gg  resultHf  rArrIDH Jg  anchorKg  deftpLg  defcvMg  defivarNg  deftypeivarOg  defopPg  	defmethodQg  deftypemethodRg  defoptSg  defvrTg  	deftypevrUg  
deftypevarVg  deffnWg  defmacXg  ifnottexYg  memqZg  warn[f  Don't know how to convert\f  to HTML]g  rulesC 5   h&  $  ]4	
5 4" >  "  G   #$ h   c   ] 6       [       g  x
			  g  filenamef  texinfo/html.scm
	/	!		/	;			/	- 			   C  h      ]4 56             g  key
		 g  %-args		  g  filenamef  texinfo/html.scm
	.
		/				/			/				/	 			  g  nameg  arg-ref C%R%&'       h       ]
4 5$  C 6       g  key
		  g  %-args		  g  t			   g  filenamef  texinfo/html.scm
	0
		1			1			2		 	2	 		 	  g  nameg  arg-req C(Rh   s   ] $   CC  k       g  x
		  g  filenamef  texinfo/html.scm
	3
		3			3	 		  g  nameg  car* C)R*+   h0   [   ]  $  "   /$  "   :$  -C C   S       g  c
		-  g  filenamef  texinfo/html.scm
	8			9	 		-   C  h   w   ]4 56 o       g  str
		  g  filenamef  texinfo/html.scm
	5
		7			6	 		  g  nameg  urlify CR,-.  h       ]4$  "   56          g  	node-name
		 g  manual-name		  g  filenamef  texinfo/html.scm
	@			A			A			A	,		A	0		A			A	 			   C /R/        h     ]  C           g  proc
		  g  filenamef  texinfo/html.scm
	C
		K				K	 		  g  nameg  add-ref-resolver!g  documentationf XAdd @var{proc} to the head of the list of ref-resolvers. @var{proc}
will be expected to take the name of a node and the name of a manual and
return the URL of the referent, or @code{#f} to pass control to the next
ref-resolver in the list.

The default ref-resolver will return the concatenation of the manual
name, @code{#}, and the node name. CR0       h   [   ] LL 6      S       g  x
		
  g  filenamef  texinfo/html.scm
	N		
	N	 		
   C/&1    h(      ]
4 O 5$  C 6        g  node
		' g  manual		' g  t			'  g  filenamef  texinfo/html.scm
	M
		N			N		!	O		'	O	 		'	  g  nameg  resolve-ref C2R(3)%4526#$=>?@A   hx     ]"454455$  "  4455454	4
 55    C         g  tag
		u g  args		u g  node			u g  t			/ g  section		/	u g  manual		?	u g  target		J	u  g  filenamef  texinfo/html.scm
	Q
		R			R			R			R			R			S			S			S	%		S			S			S		/	R		2	T		5	T		9	T	 	=	T		?	T		?	R		B	U		J	R		N	V		O	V		R	V		X	V		Z	V		^	V		`	V	 		u	  g  nameg  ref CBR(C?@A)%D 	    hH      ]45  4455$  "   C              g  tag
		A g  args		A g  url			A g  t		*	=  g  filenamef  texinfo/html.scm
	Y
		Z			Z			Z			Z			Z			[			[		 	[	#	$	[	,	(	[	#	*	[		*	[		@	[	 		A	  g  nameg  uref CER?@F(G      h(      ]4455  C             g  tag
		" g  args		"  g  filenamef  texinfo/html.scm
	_
		`				`			`			`	&		`			`			`			`	 
		"	  g  nameg  node C3RHIJKLM(NOP\]^%_`YaFbcdefghklnq      h  6  - 1 3  $  "  ( $  "   $  "  
45	
45$  	"  45$  	"   $  	"  45$  	"   $  	"   &  "   &  "   $  "45$  	"  "  645$  	"   $  	"   "  E(  45"  ?(  "(  "  ""	   	 C     .      g  tag
		 g  args		 g  body			 g  category		@ g  x		U	j g  x		s  g  x	   g  x	   g  x	   g  x	 g  x	$9 g  x	<Q g  elts	T g  in	Z g  out	Z  g  filenamef  texinfo/html.scm
	b
		u			v		!	u		#	w	 	0	u		2	x		7	y	 	;	y	)	?	y	 	@	y		@	u		D	z		M	n		Q	n	 	U	n		U	n		]	c		_	c	 	b	c		k	o	 	o	o	)	s	o	 	s	o		{	c		}	c	  	c	 	o	 	o	 	e	 	e	 	e	 	p	  	p	) 	p	  	p	 	c	 	c	  	c	 	p	 	p	 	e	 	e	 	e	 	q	 	q	 	r	 	r	$	r		r	
	c		c	 	c		s	& 	s	/$	s	&$	s	 ,	c	.	c	 1	c	<	s	<	s	D	d	F	d	I	d	T	n	Z	g	`	h	a	h	n	i	r	h	u	i	"	i		j		k		l		l	6	l	0	k		j		g		g		g		z	 U			
	  g  nameg  def CrRst@u(vwxyz       h     - 1 3 $  $  s&  c454
545$  45"  !4	54	4
5$  A"  a5 "  "  "  C       g  tag
		  g  elts		  g  start		2	{ g  c		<	x  g  filenamef  texinfo/html.scm
 
	 		 		 			 	&	 		 		 	7	  	C	$ 		& 		) 	*	- 	3	0 	:	2 	*	2 	 	5 		< 		? 		I 		J 		U 		\ 		_ 	,	i 	(	s 		t 		u 		| 	  	  	  	 !		 
  g  nameg  	enumerate C{R|t        hX      - 1 3 $  =$   &  "  "  "  C            g  tag
			S g  elts			S g  w			K g  x			K g  w		&	?  g  filenamef  texinfo/html.scm
 
	 		 			R 	 			S
  g  nameg  itemize C}Rt~   h   	  - 1 3 	$  (  $  &  $  q$  T&  5$  !(   C456 456 456 456 456 456 456 456 456         g  tag
		  g  elts		  g  w		  g  w		)  g  x		)  g  w		?  g  w		R  g  x		R  g  w		o	y  	g  filenamef  texinfo/html.scm
 
	 		s 	 	z 	 		 
  g  nameg  acronym C~R(     h(      ] $   &   L   C C C          g  x
		%  g  filenamef  texinfo/html.scm
 		 			 		 	,	 	4	 		 		 	6	 	&	 	 		%   C      h0      - 1 3 454O 4?5C          g  tag
			- g  args			- g  body				- g  	formatter			-  g  filenamef  texinfo/html.scm
 
	
 		 	"	 		 		 		 	
	 	
	# 		+ 	
	, 	 			-	
	  g  nameg  table CPR( 	 h     - 1 3 "  ^"  45 6$  :$  .&   4455""""45 "          g  tag
		  g  args		  g  body			  g  out			k g  body			k  g  filenamef  texinfo/html.scm
 
	 		 		 		! 		& 		& 		) 		- 		0 	!	1 		5 		8 	2	; 	>	? 		@ 		F 		G 		N 	1	Q 		R 		T 		W 		_ 		k 		m 		n 		r 	!	v 		w 	  	  		 	
	  g  nameg  entry CR!"R78Rt9    h   Y   -  1  3  C    Q       g  args
			  g  filenamef  texinfo/html.scm
 	 			


   C:>?D(@t9 h   Y   -  1  3 C     Q       g  args
			  g  filenamef  texinfo/html.scm
 	( 			


   CA  h   e   ]C   ]       g  tag
		 g  x		  g  filenamef  texinfo/html.scm
 	( 			   CB      h   r   - 1 3  C j       g  tag
			 g  body			  g  filenamef  texinfo/html.scm
 	(	 	* 			
   C   hH      - 1 3 45   	
 6             g  tag
			B g  args			B g  body				B  g  filenamef  texinfo/html.scm
 		 		 	*	 	3	 	*	 	%	  		- 		B 	 
			B	
	   CCF        h   b   -  1  3 C    Z       g  args
			  g  filenamef  texinfo/html.scm
 		 	 			


   CGI   h   b   -  1  3 C    Z       g  args
			  g  filenamef  texinfo/html.scm
 		 	 			


   C7BiBBi:BiEEi33iJ3iPPi{{i}}i~~i9iKriLriMriNriOribriPriQriRriSriLriTriUriVricriWriJriHridriX    h   i   - 1 3 C    a       g  tag
			 g  body			  g  filenamef  texinfo/html.scm
	 			
   CA h   e   ]C   ]       g  tag
		 g  x		  g  filenamef  texinfo/html.scm
	 			   CB$"Y8Z[\ 	    hP      - 1 3 4 5$  	64 5$  C4 >  "  G  C            g  tag
			K g  body			K g  subst			K  g  filenamef  texinfo/html.scm
		
	!						&	#		$		0		3
		7
		;
	>	@
	 			K
   C %]R:]       h     ] 6            g  tree
		
  g  filenamef  texinfo/html.scm

	
	 		
  g  nameg  stexi->shtmlg  documentationf  ~Transform the stexi @var{tree} into shtml, resolving references via
ref-resolvers. See the module commentary for more details. CRC             g  m
		,  g  filenamef  texinfo/html.scm		&
w	.
^	0
	3
"	5
	?		>
	C
	M

	Q
J	Y
J	_
	b
( 
_ 
t 
 
 
 	 
 	 
 	% 
&
 	&
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                   ccache/texinfo/reflection.go                                                                        0000644                 00000072521 15154557173 0012133 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.09u      ], 4  h      ] g  guile	 	g  define-module*	 	 	g  texinfo	g  
reflection	 		g  filenameS	
f  texinfo/reflection.scm	g  importsS	g  srfi	g  srfi-1	 	g  selectS	g  
append-map	 	 	g  oop	g  goops	 	 	 	 	g  
plain-text	 	 	g  srfi-13	 	 	g  ice-9	 g  session	!  	"! 	#g  documentation	$# 	%$ 	&g  optargs	'& 	(' 	)g  sxml	*g  	transform	+)* 	,g  pre-post-order	-, 	.+- 	/"%(. 		0g  exportsS	1g  module-stexi-documentation	2g  script-stexi-documentation	3g  object-stexi-documentation	4g  package-stexi-standard-copying	5g   package-stexi-standard-titlepage	6g  package-stexi-generic-menu	7g  package-stexi-standard-menu	8g  package-stexi-extended-menu	9g  package-stexi-standard-prologue	:g  package-stexi-documentation	;g  'package-stexi-documentation-for-include	<123456789:; 	=g  set-current-module	>= 	?= 	@g  deftp	Ag  defcv	Bg  defivar	Cg  deftypeivar	Dg  defop	Eg  	deftypeop	Fg  	defmethod	Gg  deftypemethod	Hg  defopt	Ig  defvr	Jg  defvar	Kg  	deftypevr	Lg  
deftypevar	Mg  deffn	Ng  	deftypefn	Og  defmac	Pg  defspec	Qg  defun	Rg  
deftypefun	S@ABCDEFGHIJKLMNOPQR 	Tg  defs	Ug  assq	Vg  name	Wg  
list-index	Xg  =	Yg  <	Zg  string=?	[g  	string<=?	\g  string->symbol	]g  	sort-defs	^g  reverse!	_g  
list*-join	`g  map	ag  string?	bg  object->string	cf   	df   . 	eg  process-args	fg  procedure-arguments	gg  assq-ref	hg  required	ig  optional	jg  keyword	kg  rest	lg  append	mg  symbol->string	ng  format	of  	[~a = ~s]	pf  [~a]	qf  [#:~a]	rf  .	sg  get-proc-args	tg  syntax-rules	ug  procedure-property	vg  patterns	wg  identifier-syntax	xg  defmacro	yg  defmacro-args	zg  macro-arguments	{g  defspecx	|g  %	}g  	arguments	~g  macro-additional-stexi	g  make-regexp f  ![[:space:]][[:space:]][[:space:]] g  many-space? f  ^[[:space:]] g  initial-space? g  string-null? g  
*fragment*   g  string-index g  regexp-exec g  catch     g  texi-fragment->stexi g  verbatim g  string->stexi g  defined? g  method-formals g  reverse f   ( g  var g  code g  
class-name f  )   f  ... g  method-specializers g  method-source g  warn g  method-stexi-arguments g  forceS 	   f  	[unknown] g  object-documentation g  is-a? g  <method> g  method-procedure g  <class> g  category f  Class     g  <macro> g  macro-transformer g  
macro-type l  l  g  <procedure> f  Method   g  	<generic> f  Generic     g  generic-function-methods g  memq g  string-join g  module-name->node-name g  string-append f  / g  %search-load-path g  in-vicinity g  module-filename g  open-input-file g  eof-object? g  read g  read-module g  define-module g  and=> g  exportS g  cadr g  identity g  module-export-list g  docs-resolverS 	   g  issue-deprecation-warning f  Qmodule-stexi-documentation: use #:docs-resolver instead of a positional argument. g  module-commentary g  string-trim-both g  with-output-to-string g  display g  resolve-interface g  title g  node g  section f  Overview   f  Usage   g  append! g  sort! g  
module-map g  anchor f  variable unbound! f  
[unbound!]   g  file-commentary g  basename g  add-value-help-handler! g  stexi->plain-text g  add-name-help-handler! g  and-map g  symbol? !  !  g  copying g  para f  This manual is for  f  
 (version  f  
, updated  f  
Copyright  g  number->string f  , g  	quotation g  	titlepage g  subtitle f  version  g  author g  email g  page   g  vskip g  all f  0pt plus 1filll   |    g  insertcopying   g  ifnottexf  TopV |  g  top	g  menu
f  * f  ::g  make-stringg  maxg  string-lengthf  
 g  iftexg  shortcontents   g  consg  carg  cdrg  dircategoryg  direntryf  : (f  ).  r g  chapterg  *text* g  	*default*!g  stexi->chapter"g  module-stexi-documentation-argsS#"	$g  scriptsS%$	&#% 'g  error(f  2expected modules to be a list of a list of symbols)g  filename*"	+* C 5     hH]    ]4	
/0<5 4? >  "  G   STRUV      h      ]4 5C            g  x
		  g  filenamef  texinfo/reflection.scm
	>			?	
		?		
	=			?			?	
		?	 		  g  nameg  name C    h@     - 1 3 44 L54 L55$  (  CL @4 L54 L56       g  proc
			@ g  eq?			@ g  <				@ g  args				@  g  filenamef  texinfo/reflection.scm
	F		
	G			G			G			G		 	G		&	I		'	I		.	J		1	H		8	H		@	H	 			@	
	  g  nameg  compare-in-order CWT  h      ] 6   ~       g  x
		  g  filenamef  texinfo/reflection.scm
	@				=			A			A	 		  g  nameg  priority CXYZ[W\UV       h    ]#O Q  4 4	4
555$  "  	    I4 4	4
555$  "  	    I$  (  C@4 4	4
555$  "  	    I4 4	4
555$  "  	    IC       g  ordering
	 g  a	 g  b		 g  name		 g  compare-in-order		 g  args		( g  t		F	` g  t		|  g  t	   g  t	   
g  filenamef  texinfo/reflection.scm
	:
	(	K		+	C		0	C		3	?	
	7	?		:	=		<	?		@	?	
	A	?		D	C		F	C		F	C		a	C		f	C		i	?	
	m	?		p	=		r	?		v	?	
	w	?		z	C		|	C		|	C	 	G	 	G	 	I	 	I	 	J	 	C	 	C	 	?	
 	?	 	=	 	?	 	?	
 	?	 	C	 	C	 	C	 	C	 	C	 	?	
 	?	 	=	 	?	 	?	
 	?	 	C	 	C	 	C		H	 5		  g  nameg  	sort-defs C]R^      hX   @  ]"  C(  6$  6(  
 "  	" "    8      g  l
		T g  infix		T g  restfix			T g  in			I g  out			I  g  filenamef  texinfo/reflection.scm
	O
		P			Q			Q			R			Q		"	R	"	%	R		(	S		.	S		1	T	'	4	T	!	;	U	(	@	U	!	I	S		I	P		L	P		T	P	 		T	  g  nameg  
list*-join C_R`ab  h   q   ]4 5$   C 6  i       g  x
		  g  filenamef  texinfo/reflection.scm
	X			X			X			X	% 		   C_cd      h       ]4 $   "  56         g  args
		  g  filenamef  texinfo/reflection.scm
	W
		Y			Y			Y			Z			Z			Y			X	 			  g  nameg  process-args CeRfghijkel`mnop  h       ] $    6 6       g  a
		   g  filenamef  texinfo/reflection.scm
	j			k				k			l	#		l	/		l	7		l			m	#	 	m	 
		    Cnpq     h       ] $  
 6 6           g  a
		  g  filenamef  texinfo/reflection.scm
	q			r				r			s	#		s	*		s			t	#		t	 			   Cr  h     ])4 5$  g4545454544	
54	54	5$  4
5 "  56C            g  proc
		z g  t			z g  required-args		5	x g  optional-args		5	x g  keyword-args		5	x g  rest-arg		5	x  g  filenamef  texinfo/reflection.scm
	\
		^				]			`			`	-		`			a		!	a	-	#	a		$	b		*	b	-	,	b		-	c		3	c	(	5	c		5	`			@	e		C	g		L	j		U	q		c	x		e	y		f	y		o	y		t	z		v	e		x	d	 		z  g  nameg  get-proc-args CsRetuvwxy  hh   n  ]$  !45$  "  "  7$  "  )$  45$  "  "  6 f      g  name
		g g  type		g g  transformer			g g  patterns			* g  t		N	`  g  filenamef  texinfo/reflection.scm
	|
		~		 		 	6	 		 		 		 		" 		' 		7	~		8 		E	~		F 	
	L 	*	N 	
	N 		] 	
	e 		g	}	 		g	  g  nameg  macro-arguments CzRtuv`{|V}e        h    u   ]L  4 5  C  m       g  x
		  g  filenamef  texinfo/reflection.scm
 		 		 	-	 	 		   C        h0   #  ]$  "45$   O 6CC       g  name
		/ g  type		/ g  transformer			/ g  patterns			-  g  filenamef  texinfo/reflection.scm
 
	 		 		 	5	 		 		 		 		) 		+ 		, 		. 	 		/	  g  nameg  macro-additional-stexi C~R4i5R4i5R     h   S   ] L 6K       g  filenamef  texinfo/reflection.scm
 		 	 		
   C   h   _   -  1  3 C     W       g  args
			  g  filenamef  texinfo/reflection.scm
 	 			


   C  h   4  ]	 $  4 5"  $  "  $  C4 @5$  "  4 5$  "  
4 5$  4 O 	5"  $  C
   C ,      g  str
	  g  t	  g  t	3	_ g  t	w   g  filenamef  texinfo/reflection.scm
 
	 			 		 		 		 		 		+ 		3 		A 		M 		S 		\ 		c 		d 		w 	  	 	   g  nameg  string->stexi CR4i5$  i"  Rlmc        h  ^  ])$  "  (  6$  S4445 44	55 
55"4545 44	55 
 64 54 5"J4 5$  "  (  6$  D4445 45 
55"4545 45 
 64 5"a4 >  "  G  C    V      g  method
	 g  formals	  g  specializers		  g  out		  g  formal		1	b g  specializer		1	b g  bindings ^ g  out	 ^ g  arg	   	g  filenamef  texinfo/reflection.scm
 
	 		 		 		 		 		 		" 		% 		& 		) 		. 	*	1 	8	1 		7 		: 		C 		H 		K 	!	S 		V 		d 		h 		r 		u 		} 	  	  	  	  	!  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	*  	  	  	  	%  	 	 	 	! 	 	 	! 	) 	, 	4 	7 	< 	%> 	A 	F 	K 	!N 	Q 	Y 	;\ 	5^ 	^ 	_ 	f 	h 	;p 	q 		 	 V	  g  nameg  method-stexi-arguments CRmaV@|uP}z~sQM`3  h   h   ] ML 6  `       g  method
		  g  filenamef  texinfo/reflection.scm
 		 	 		   CJT (    h0  -  - /   0   3 H#  K#  J$  4J5K"   44 5$  4 5"   545$  4	5"  7"  $  
"  '"  "$  &  "  ""  "$ u" A4 5$  J C4 5$  Q4 5$  45"  J 4J5 44J55C4 5$  #J 4 5 C4 5$  %J 4 5 C4  5$  5J !4"#O 4$ 55CJ  %C$  $$  4&'5$  C"""C %      g  object
	/ g  name	/ g  force		/ g  x		^  g  stexi	 / g  args	   g  proc	 @ g  type	@ g  args	ap g  args	 g  args	 g  args	  g  filenamef  texinfo/reflection.scm
 
	  	=	. 		2 		3 		; 		@ 		C 		O 		P 		^ 		^ 		a 		k 		l 	%  	  	  	  	  	  	-  	5  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	 	6 	 	 	 	"' 	. 	; 	= 	A 	M 	O 	W 	&^ 	a 	e 	g 	m 	n 	q 	} 	 	 	& 	 	 	 	 	 	 	 	 	 	 		 	 	 	 	 	
 	 	
 	 	 	 	 	 	 	 	  	 	 	 	&
 	 	 	 	 	 	 c	/g  forceS	   g  nameg  object-stexi-documentation C3R`mc    h      ]4 56              g  sym-name
		  g  filenamef  texinfo/reflection.scm
 
	 		 	-	 	 		  g  nameg  module-name->node-name CR`m      h   n   ] 6      f       g  elt
		
  g  filenamef  texinfo/reflection.scm
			4	
	! 		
   C   hH   }  ])4 54545445?456      u      g  name
		B g  name		B g  reverse-name			B g  leaf			B g  dir-hint-module-name		#	B g  dir-hint		3	B  g  filenamef  texinfo/reflection.scm

															!	(	#		#		&		)		3		3		8
		B
	 		B  g  nameg  module-filename CR  hX   W  ]!4 5$  B45"  %45$  645"45"C   O      g  name
		U g  filename			U g  port			S g  out			C g  form			C  g  filenamef  texinfo/reflection.scm

													
			)		/		4		5	$	C		C	
	D		E	#	S	
	T	 		U  g  nameg  read-module CR    hx     ]"  c(  C$  4&  & $  4455"  "  "  $  6"4 5"        g  sym-name
		v g  forms		i g  form			R g  t		R	i  g  filenamef  texinfo/reflection.scm

								$												#		&		*			.		/			2		9		<		@			R		c		i		i		j		v	 		v  g  nameg  module-export-list CR      h   n   ]C   f       g  name
		 g  def		  g  filenamef  texinfo/reflection.scm
%	0 			   C    h   c   ] 
6      [       g  x
		
  g  filenamef  texinfo/reflection.scm
-		
-	( 		
   C h   S   ] L 6K       g  filenamef  texinfo/reflection.scm
1		1	  		
   C|V|Vcm3J     h   l  ]
4L4 55   $  4L  4 55"  +4	
 >  "  G  4 5  &  "   C d      g  sym
	  g  var	  g  x		k   g  filenamef  texinfo/reflection.scm
9		:	
		5		5		5	#	5		:	
	$?		(?		)@		.B		3B	0	:B		<@		AE		EE		LE		VF		[F	(	dF		k;		p<		r<	"	v<		y=	 >	 :	
 	 	   C]      h   r   ]L  6    j       g  a
		 g  b		  g  filenamef  texinfo/reflection.scm
I		I	 			   C   h     - /   0   3 	#  #  $  "  $  4>  "  G  "   44 55454	 54
 O 54 54 5     4444O 5O 5?5C            g  sym-name
	  g  %docs-resolver	  g  docs-resolver		  g  
commentary		\  g  stexi		e  g  	node-name		n  g  name-str		|  g  module	   g  export-list	    	g  filenamef  texinfo/reflection.scm
!
	($	,	8)		9*		=+		B*		O,		R,		\,		\,		_.		e,		h/		n,		q0		|,		2	 ,	 3	 ,	 K	 N	 K	 P	 7	 8	 7	 P	 K	 	 g  docs-resolverS	   g  nameg  module-stexi-documentationg  documentationf  Return documentation for the module named @var{sym-name}. The
documentation will be formatted as @code{stexi}
 (@pxref{texinfo,texinfo}). C1R|V 
      hX     ]	4 54 5  4 5   $  44	
55"  C            g  
scriptpath
		R g  
commentary			R  g  filenamef  texinfo/reflection.scm
R
	V			V		W		W		W		%X		.W		:Y		;[		>\		H[		IZ		N]		OW	 		R  g  nameg  script-stexi-documentationg  documentationf  Return documentation for given script. The documentation will be
taken from the script's commentary, and will be returned in the
@code{stexi} format (@pxref{texinfo,texinfo}). C2R4i5$ 4i3      h      ]4 56      z       g  name
		 g  value		  g  filenamef  texinfo/reflection.scm
b		d		c	 			   C>  "  G  4i1        h(      ] $  4 5$  4 56CC          g  name
		%  g  filenamef  texinfo/reflection.scm
f		g				g		
h			g		i		!i		 		%   C>  "  G  "   R`c hH     ] 44	
55    C        g  name
		F g  version		F g  updated			F g  years			F g  copyright-holder			F g  permissions			F  g  filenamef  texinfo/reflection.scm
o
	u		 x		#x	%	-x	@	/x		1u	 		F	  g  nameg  package-stexi-standard-copyingg  documentationf  Create a standard texinfo @code{copying} section.

@var{years} is a list of years (as integers) in which the modules
being documented were released. All other arguments are strings. C4R`      h      ]   C       g  pair
		  g  filenamef  texinfo/reflection.scm
										$		 		   C 
       h0     ]   445	5 C       g  name
		/ g  version		/ g  updated			/ g  authors			/  g  filenamef  texinfo/reflection.scm
}
					&	 		/	  g  nameg   package-stexi-standard-titlepageg  documentationf Create a standard GNU title page.

@var{authors} is a list of @code{(@var{name} . @var{email})}
pairs. All other arguments are strings.

Here is an example of the usage of this procedure:

@smallexample
 (package-stexi-standard-titlepage
  "Foolib"
  "3.2"
  "26 September 2006"
  '(("Alyssa P Hacker" . "alyssa@@example.com"))
  '(2004 2005 2006)
  "Free Software Foundation, Inc."
  "Standard GPL permissions blurb goes here")
@end smallexample
 C5R|	l`
     hH      ] $  6  44	45	5 545CC              g  entry
		A g  node		> g  description			>  g  filenamef  texinfo/reflection.scm
	
						(									!		(		,		0		1		@	 		A   C     h8     ]    44	
5? C             g  name
		1 g  entries		1  g  filenamef  texinfo/reflection.scm

								)		*	 		1	  g  nameg  package-stexi-generic-menug  documentationf  Create a menu from a generic alist of entries, the car of which
should be the node name, and the cdr the description. As an exception,
an entry of @code{#f} will produce a separator. C6R6`     h8     ] 44554(  "  56        g  name
		6 g  modules		6 g  module-descriptions			6 g  extra-entries			6 g  module-entries			4  g  filenamef  texinfo/reflection.scm

											%	(	/	8	1		6	 		6	  g  nameg  package-stexi-standard-menug  documentationf  ICreate a standard top node and menu, suitable for processing
by makeinfo. C7R6` 	    h   &  ] 444554554445545544(  "  (  "  556        g  name
		~ g  module-pairs		~ g  script-pairs			~ g  extra-entries			~ g  module-entries		F	| g  script-entries		F	|  g  filenamef  texinfo/reflection.scm

						#					&		'		,		1	,	;		<		F		F		K		X	(	b	8	h	(	r	8	t		~	 		~	  g  nameg  package-stexi-extended-menug  documentationf  QCreate an "extended" menu, like the standard menu but with a
section for scripts. C8R|
 
  h@   B  ]    4	5C       :      g  name
		9 g  filename		9 g  category			9 g  description			9 g  copying			9 g  	titlepage			9 g  menu			9  g  filenamef  texinfo/reflection.scm

		 		9	  g  nameg  package-stexi-standard-prologueg  documentationf Create a standard prologue, suitable for later serialization
to texinfo and .info creation with makeinfo.

Returns a list of stexinfo forms suitable for passing to
@code{package-stexi-documentation} as the prologue. @xref{texinfo
reflection package-stexi-documentation}, @ref{texinfo reflection
package-stexi-standard-titlepage,package-stexi-standard-titlepage},
@ref{texinfo reflection
package-stexi-standard-copying,package-stexi-standard-copying},
and @ref{texinfo reflection
package-stexi-standard-menu,package-stexi-standard-menu}. C9R,g   h       - 1 3 45C          g  tag
			 g  attrs			 g  node				 g  body				  g  filenamef  texinfo/reflection.scm
					 		*		6		 		 				
	   C       h   n   ]C   f       g  tag
		 g  text		  g  filenamef  texinfo/reflection.scm
	 			   C      h   _   -  1  3  C    W       g  args
			  g  filenamef  texinfo/reflection.scm
	 			


   C      h       ]  6             g  stexi
		  g  filenamef  texinfo/reflection.scm

				 		  g  nameg  stexi->chapter C!R&   h0      ]
4 5$  $  C  "C           g  pred
		, g  l		, g  t			*  g  filenamef  texinfo/reflection.scm
						
										"	)	*	 		,	  g  nameg  all C   h   c   ]L  6      [       g  x
		
  g  filenamef  texinfo/reflection.scm
	
	
	 		
   C  h   S   ] LLO L 6 K       g  filenamef  texinfo/reflection.scm
			 		
   C   h   _   -  1  3 C     W       g  args
			  g  filenamef  texinfo/reflection.scm
	 			


   C      h       ]	O Q L O 6        g  l
		 g  all	
	  g  filenamef  texinfo/reflection.scm

			 		  g  nameg  verify-modules-list C'(|)!1 h   n   ]4 L ?6 f       g  mod
		  g  filenamef  texinfo/reflection.scm
					 		   C!2 h   q   ]4 56   i       g  script
		  g  filenamef  texinfo/reflection.scm
					 		   C    h   @  - /   0   3 #  #  O  Q 4 5$  "  4 >  "  G     4	4	4
O  54	4
5555C 8      g  modules
	  g  name	  g  filename		  g  prologue		  g  epilogue		  g  module-stexi-documentation-args		  g  scripts		  g  verify-modules-list		-   g  filenamef  texinfo/reflection.scm

		'	#	/	3		=		B		F		M		W		s	 	 	 	 	 	
g  module-stexi-documentation-argsS	g  scriptsS	   g  nameg  package-stexi-documentationg  documentationf 8Create stexi documentation for a @dfn{package}, where a
package is a set of modules that is released together.

@var{modules} is expected to be a list of module names, where a
module name is a list of symbols. The stexi that is returned will
be titled @var{name} and a texinfo filename of @var{filename}.

@var{prologue} and @var{epilogue} are lists of stexi forms that
will be spliced into the output document before and after the
generated modules documentation, respectively.
@xref{texinfo reflection package-stexi-standard-prologue}, to
create a conventional GNU texinfo prologue.

@var{module-stexi-documentation-args} is an optional argument that, if
given, will be added to the argument list when
@code{module-texi-documentation} is called. For example, it might be
useful to define a @code{#:docs-resolver} argument. C:R+	
 	       h8      ]
4 544	45	5 545C        g  modname
		7 g  desc		7 g  node				7  g  filenamef  texinfo/reflection.scm
<		=	!		=		7		8		8		8		!8		%8		)8		*7	 		7	   C!1 h   r   ]4 L ?6 j       g  modname
		  g  filenamef  texinfo/reflection.scm
A		C		B	 		   C   h@   _  - /   0   3 #  4 54O  5C   W      g  modules
		= g  module-descriptions		= g  module-stexi-documentation-args			=  g  filenamef  texinfo/reflection.scm
#
	%	S	:		!<		,:		-A		;:	 		=	
g  module-stexi-documentation-argsS	   g  nameg  'package-stexi-documentation-for-includeg  documentationf Create stexi documentation for a @dfn{package}, where a
package is a set of modules that is released together.

@var{modules} is expected to be a list of module names, where a
module name is a list of symbols. Returns an stexinfo fragment.

Unlike @code{package-stexi-documentation}, this function simply produces
a menu and the module documentations instead of producing a full texinfo
document. This can be useful if you write part of your manual by hand,
and just use @code{@@include} to pull in the automatically generated
parts.

@var{module-stexi-documentation-args} is an optional argument that, if
given, will be added to the argument list when
@code{module-texi-documentation} is called. For example, it might be
useful to define a @code{#:docs-resolver} argument. C;RC          g  m
		,  g  filenamef  texinfo/reflection.scm		
	.	6		1	5
	:
	O

7	W
,	\
!	|
F 
G 	M 	!O 	R 
S 	Y 	$[ 	^ 
/ 
0 	6 	8 	< 	H 
a 
# 
$y 
&
(
*
3;!
5R
5`	5`	5`	5_
5a	6pe	7am
9o
=}
@
B
E
Im
L>
V
]B#
 0	]D
   C6                                                                                                                                                                                ccache/texinfo/indexing.go                                                                          0000644                 00000005520 15154557173 0011601 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.08      ] = 4 h      ] g  guile	 	g  define-module*	 	 	g  texinfo	g  indexing	 		g  filenameS	
f  texinfo/indexing.scm	g  importsS	g  sxml	g  simple	 	 	g  srfi	g  srfi-13	 	 	 	g  exportsS	g  stexi-extract-index	 	g  set-current-module	 	 	g  deftp	g  defcv	g  defivar	g  deftypeivar	g  defop	 g  	deftypeop	!g  	defmethod	"g  deftypemethod	#g  defopt	$g  defvr	%g  defvar	&g  	deftypevr	'g  
deftypevar	(g  deffn	)g  	deftypefn	*g  defspec	+g  defmac	,g  defun	-g  
deftypefun	. !"#$%&'()*+,- 	/g  defines	0g  cindex	1g  findex	2g  vindex	3g  kindex	4g  pindex	5g  tindex	6012345 	7g  indices	8g  anchor	9g  memq	:g  assq	;g  name	<g  sxml->stringC 5h  ~   ]4	
5 4 >  "  G   ./R67R89/:;7<       h   C  ] (  C $  "   4L  5 " $   $   &  {4 5$  / 4 54 5 "|4 5$  ( 4 54 5 "D"U"Q"M"I  "'     ;      g  in
	  g  entries	   g  filenamef  texinfo/indexing.scm
	5			6			9			9			6			F			F		 	F		$	F		,	F		,	:		/	;		0	;		4	:		7	;	%	9	;		=	;		@	<		C	<		G	;		H	<	%	M	<	+	S	<	%	W	;		Z	=		\	=	%	`	=	+	c	=	6	g	=	1	i	=	%	j	=		l	>	%	p	>	+	s	>	1	x	>	%	y	>		{	=	 	=	 	A	% 	A	+ 	A	% 	@	 	B	 	B	 	B	- 	B	 	C	% 	C	+ 	C	1 	C	% 	C	 	B	 	B	 	H	 	H	 8	 	  g  nameg  loop C  h     ]O Q  6        g  tree
		 g  manual-name		 g  kind			 g  loop		
	  g  filenamef  texinfo/indexing.scm
	*
	
	5			5	 		5	 			  g  nameg  stexi-extract-indexg  documentationf 6Given an stexi tree @var{tree}, index all of the entries of type
@var{kind}. @var{kind} can be one of the predefined texinfo indices
(@code{concept}, @code{variable}, @code{function}, @code{key},
@code{program}, @code{type}) or one of the special symbols @code{auto} 
or @code{all}. @code{auto} will scan the stext for a @code{(printindex)}
statement, and @code{all} will generate an index from all entries,
regardless of type.

The returned index is a list of pairs, the @sc{car} of which is the
entry (a string) and the @sc{cdr} of which is a node name (a string). CRC v       g  m
		,  g  filenamef  texinfo/indexing.scm		
	.	#		1	"
	3	(		6	'
	*
 	
   C6                                                                                                                                                                                 ccache/texinfo/plain-text.go                                                                        0000644                 00000041042 15154557173 0012060 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0
B      ]  4     hC      ] g  guile	 	g  define-module*	 	 	g  texinfo	g  
plain-text	 		g  filenameS	
f  texinfo/plain-text.scm	g  importsS	 	 	g  string-utils	 	 	g  sxml	g  	transform	 	 	g  srfi	g  srfi-1	 	 	g  srfi-13	 	 	g  ice-9	g  match	 	 	  	!g  exportsS	"g  stexi->plain-text	#" 	$g  set-current-module	%$ 	&$ 	'g  and=>	(g  assq	)g  cdr	*g  arg-ref	+g  error	,f  Missing argument:	-g  arg-req	.g  make-ticker	/g  format	0f  ~A. 	1g  make-enumerator	2g  
make-fluid	3f   	4g  *indent*	5f  * 	6g  
*itemizer*	7g  make-syntax-transformer	87 	97 	:g  with-indent	;g  macro	<g  $sc-dispatch	=< 	>< 	?g  _	@g  any	A?@	Bg  syntax->datum	CB 	DB 	Eg  datum->syntax	FE 	GE 	Hg  with-fluids	Ig  string-append	Jg  	fluid-ref	KJ4 	Lg  make-string	M  	Ng  syntax-violation	ON 	PN 	Qf  -source expression failed to match any pattern	Rg  apply	Sg  make-indenter	Tf  
	Ug  string-indent	Vg  with-itemizer	Wg  fill-string	Xg  string-concatenate	Yg  
line-widthS	Zg  initial-indentS	[g  subsequent-indentS	\g  wrap*	]f  

	^g  wrap	_g  wrap-heading	`g  node	ag  name	bg  manual	cg  xref	df  See 	ecd 	fg  pxref	gf  see 	hfg 	ieh 	jg  cadr	kf   in manual 	lg  ref	mg  url	ng  title	of   (	pf  )	qf  `	rf  '	sg  uref	tg  defun	uf  Function	vg  defspec	wf  Special Form	xg  defvar	yf  Variable	zg  category	{f   - 	|f  : 	}g  string-join	~g  filter	g  identity g  map g  	data-type g  class g  	arguments a  f    g  def g  % g  start g  
string-ref g  number? g  string->number g  char->integer g  char-upper-case? g  	enumerate g  itemize g  string-length g  string-null? g  string-copy! g  item g  table g  heading g  entry g  make-underliner g  chapter g  section g  
subsection g  subsubsection g  string-split g  example g  verbatim g  map-in-order g  fragment g  para g  make-surrounder g  code f  < f  > g  key g  string-upcase g  var g  passthrough g  foo g  page g  setfilename g  setchapternewpage g  iftex g  ifinfo g  ifplaintext g  ifxml g  sp g  vskip g  menu g  ignore g  syncodeindex g  comment g  c g  anchor `  g  ignore-list g  memq g  ignored? g  appendix g  appendixsec g  appendixsubsec g  appendixsubsubsec g  
unnumbered g  unnumberedsec g  unnumberedsubsec g  unnumberedsubsubsec g  majorheading g  chapheading g  
subheading g  subsubheading g  strong f  * g  sample g  samp g  math g  kbd g  env g  file g  command g  option g  dfn f  " g  cite g  acro g  email g  emph f  _ g  sc g  	copyright f  (C) g  result f  ==> g  dots f  ... g  	quotation g  lisp g  smallexample g  	smalllisp g  
*fragment* g  deftp g  defcv g  defivar g  deftypeivar g  defop g  	deftypeop g  	defmethod g  deftypemethod g  defopt g  defvr g  	deftypevr g  
deftypevar g  deffn g  	deftypefn g  defmac g  
deftypefun g  tag-handlers g  string?C 5h.    ]4	
 !#5 4& >  "  G   '()"        h       ]44 556              g  key
		 g  %-args		  g  filenamef  texinfo/plain-text.scm
	%
		&				&			&			&			&				&	 			  g  nameg  arg-ref C*R*+, h       ]
4 5$  C 6       g  key
		  g  %-args		  g  t			   g  filenamef  texinfo/plain-text.scm
	(
		)			)			*		 	*	 		 	  g  nameg  arg-req C-R h   I   ] L C   A       g  filenamef  texinfo/plain-text.scm
	-	 		
   C    h   r   ] O C      j       g  str
		
  g  filenamef  texinfo/plain-text.scm
	,
 		
  g  nameg  make-ticker C.R/0  h      ]M  M N  6    |       g  last
		  g  filenamef  texinfo/plain-text.scm
	/			0				1			1			2			2	 		
   C h   t   ] H  O C  l       g  n
		  g  filenamef  texinfo/plain-text.scm
	.
 		  g  nameg  make-enumerator C1R42i354R42i4.i5556R49:;>ADGH4IKLM h(   s   - 1 3     C k       g  n
			' g  body			'  g  filenamef  texinfo/plain-text.scm
	7
		8	 			'
   C  h   j   ]	4 5L 4?6b       g  args
		 g  v			  g  filenamef  texinfo/plain-text.scm		7
 		   CPQ       h(   h   ]	4 5$   O @ 6 `       g  y
		' g  tmp		'  g  filenamef  texinfo/plain-text.scm
	7
 		'   C5:R4ILR      h0   f   -  1  3 4[4L  55Y4L >  ZCZF  ^       g  args
			.  g  filenamef  texinfo/plain-text.scm
	=			=	 			.


   C       h      ] O C    |       g  n
		 g  proc		  g  filenamef  texinfo/plain-text.scm
	<
 			  g  nameg  make-indenter CSRI4T       h      ][ 6   |       g  str
		  g  filenamef  texinfo/plain-text.scm
	?
		@	*		@	 		  g  nameg  string-indent CUR49V;>ADGH6        h    z   - 1 3    C      r       g  itemizer
			 g  body			  g  filenamef  texinfo/plain-text.scm
	B
		C	 			
   C   h   j   ]	4 5L 4?6b       g  args
		 g  v			  g  filenamef  texinfo/plain-text.scm		B
 		   CPQ       h(   h   ]	4 5$   O @ 6 `       g  y
		' g  tmp		'  g  filenamef  texinfo/plain-text.scm
	B
 		'   C5VR4WXYZ[   h(      -  1  3 [4 5	H6          g  strings
			% g  indent		%  g  filenamef  texinfo/plain-text.scm
	F
		G			H		%	H	 			%


  g  nameg  wrap* C\RI\]      h      -  1  3 4 ?6         g  strings
			  g  filenamef  texinfo/plain-text.scm
	K
		L			L	'		L	 			


  g  nameg  wrap C^RI\T  h      -  1  3 4 ?6         g  strings
			  g  filenamef  texinfo/plain-text.scm
	M
		N			N	'		N	 			


  g  nameg  wrap-heading C_R-`*abX'(ij3k        hx     ]"4545$  "  4544 	5
5$  "  $   "  6           g  tag
		s g  args		s g  node			s g  t			) g  name		)	s g  manual		4	s g  t		H	[  g  filenamef  texinfo/plain-text.scm
	P
		Q			Q			Q			Q			R			R			R			R		)	Q		,	S		0	S		4	S		4	Q		9	V	
	<	V		B	V		D	V		H	V	
	H	V		X	V	B	c	X		e	X		o	X	*	p	U		s	T	 		s	  g  nameg  ref ClR-m*nIopqr 
    h8     ]4545$  6	6    	      g  tag
		4 g  args		4 g  url			4 g  title			4  g  filenamef  texinfo/plain-text.scm
	Z
		[			[			[			\			\			\			[			]		$	^		(	^	&	*	^		.	_		2	_		4	_	 		4	  g  nameg  uref CsRtuvwxy-zI_{|}~*     h   a   ] L 6      Y       g  x
		
  g  filenamef  texinfo/plain-text.scm
	e		
	e	 		
   C4L"  h   ~  - 1 3  $  "  ' $  "   $  "  	45	4
4	444O 555554	[4	 55Y45Z6  v      g  tag
		  g  args		  g  body			  g  category		?   g  filenamef  texinfo/plain-text.scm
	a
		i			j		!	i		#	k	 	0	i		2	l		7	m		;	m	$	?	m		?	i		D	o		G	o		K	o	"	O	o	1	P	c		S	d		X	e		c	f		e	e		g	d		i	g		k	c		m	o		o	o	 	p	 	n	 		 	
	  g  nameg  def CR*614IL"       h     - 1 3 $  $  "  "  $  45"  4$  H4
545$  45"  !4	54	4
5$  A"  a5"  5Y4[4	 55Y4$  "  >  Z"  ZCZF      g  tag
		  g  elts		  g  args?		)  g  start		@  g  c		U   g  filenamef  texinfo/plain-text.scm
	r
		x			x			x	)		x	"		x			y			y	&		y		)	x		1	z		2	z		6	z	$	9	z	+	;	z		@	x		E	{		M	{	$	N	t		U	t		X	u		b	u		c	u		n	v		u	w		x	w	, 	w	( 	w	 	v	 	v	 	{	 	}	 	}	 	}	% 	}	 $		 
  g  nameg  	enumerate CR6.54IL"    h@      - 1 3 45Y4[4	 55Y4>  Z"  ZCZF          g  tag
			= g  args			= g  elts				=  g  filenamef  texinfo/plain-text.scm
	
	 		 		 		* 	 			=	
	  g  nameg  itemize CR"64    hh   6  - 1 3 454[5 4[54545$  "  
$  4>  "  G  "   C      .      g  tag
			b g  elts			b g  ret			b g  tick			b g  tick-pos		*	b  g  filenamef  texinfo/plain-text.scm
 
	
 		 		 		 		 		# 		* 		* 		- 		7 		? 	+	A 	&	E 		F 	 			b
  g  nameg  item CR" h      - 1 3 6        g  tag
			 g  args			 g  body				  g  filenamef  texinfo/plain-text.scm
 
	 	 				
	  g  nameg  table CR_"-I4L      hH     - 1 3 4445554[4	 55Y45Z6              g  tag
			A g  args			A g  body				A g  heading			A  g  filenamef  texinfo/plain-text.scm
 
	
 		 		 	%	 	.	 	%	 		 		 		8 	"	A 	 			A	
	  g  nameg  entry CR"ITUL h8      - 1 3 45454445L 556           g  tag
			4 g  body			4 g  str			4  g  filenamef  texinfo/plain-text.scm
 		
 		 		 		 		 		! 		$ 	#	. 		0 		2 		4 	 			4
   C  h   x   ] O C      p       g  char
		
  g  filenamef  texinfo/plain-text.scm
 
 		
  g  nameg  make-underliner CR4i*5R4i=5R4i-5R4i.5R"IX4LUT 
      hH      - 1 3 4544[4	 55Y44
55Z5	6            g  tag
			C g  body			C g  ret			C  g  filenamef  texinfo/plain-text.scm
 
	
 		 		 		- 		2 	(	< 		? 		A 		C 	 			C
  g  nameg  example CR"IXUT       h0      - 1 3 45444
5556          g  tag
			- g  body			- g  ret			-  g  filenamef  texinfo/plain-text.scm
 
	
 		 		 		 		 		' 		) 		+ 		- 	 			-
  g  nameg  verbatim CRX"      h      - 1 3 456         g  tag
			 g  body			  g  filenamef  texinfo/plain-text.scm
 
	 		 	 			
  g  nameg  fragment CR^"        h      - 1 3 456           g  tag
			 g  body			  g  filenamef  texinfo/plain-text.scm
 
	 		 	 			
  g  nameg  para CRI"   h      - 1 3 L 45L 6y       g  tag
			 g  body			  g  filenamef  texinfo/plain-text.scm
 		 		 	 			
   C    h   w   ] O C      o       g  str
		
  g  filenamef  texinfo/plain-text.scm
 
 		
  g  nameg  make-surrounder CRIq"r  h      - 1 3 456       g  tag
			 g  body			  g  filenamef  texinfo/plain-text.scm
 
	 		 		 	.	 	 			
  g  nameg  code CRI"      h      - 1 3 456       g  tag
			 g  body			  g  filenamef  texinfo/plain-text.scm
 
	 		 		 	.	 	 			
  g  nameg  key CR"   h      - 1 3 456           g  tag
			 g  body			  g  filenamef  texinfo/plain-text.scm
 
	 		 	 			
  g  nameg  var CR"       h      - 1 3 6        g  tag
			 g  body			  g  filenamef  texinfo/plain-text.scm
 
	 	 			
  g  nameg  passthrough CR-nI"      h(      - 1 3 4455456       g  tag
			( g  args			( g  body				( g  title			(  g  filenamef  texinfo/plain-text.scm
 
	
 		 		 		 	&	 		 		 		  		( 	 			(	
	  g  nameg  texinfo CRR      h   y   ] 6      q       g  tag
		
  g  filenamef  texinfo/plain-text.scm
 
	
 	 		
  g  nameg  ignored? CRni i i i i i i i i i i i i i i i i i 4i5 i i i i i i i i i i i mi 4i5 4i5 i i 4i5 i    h   h   -  1  3 C    `       g  args
			  g  filenamef  texinfo/plain-text.scm
 		 	  			


   C      h   h   -  1  3 C    `       g  args
			  g  filenamef  texinfo/plain-text.scm
 		 	  			


   C      h   h   -  1  3 C    `       g  args
			  g  filenamef  texinfo/plain-text.scm
 		 	  			


   C cli lli fli ssi i 4Si	i5 i i i i i i i i i i i i i i i i i i i i i xi i i i i i vi ti i  LR3'(jX"        h     ] (  C4 5$   C $    $  b$  D45$  "  #4455$  "  $   @C $  	4
 56C $  	4
 56C $  	4
 56C             g  tree
	  g  w	&  g  x		&  g  t		X	k g  handler		k	|  g  filenamef  texinfo/plain-text.scm
#
	%		
&		%		9)		C)		I*		L*	$	X*		X*		k)		s,		y-		{.		%	 0	 0	 1	 %	 0	 0	 1	 %	 0	 0	 1	 	   g  nameg  stexi->plain-textg  documentationf  7Transform @var{tree} into plain text. Returns a string. C"RC         g  m
		,  g  filenamef  texinfo/plain-text.scm		
	%
	(
	,
7	.
8	4	>	4	@	4	C	4
D	5	I	5	O	5	,Q	5	S	5	V	5
	<
_	?
@	F
	K
	M
	P
l	Z
9	a
	r
,	
 
 
 
 
 	 
 	 
 	 
 	 
g 
 
 h 
!, 
"r 
#F 
$ 
$ 
% 
& 
& 	& 
'| 
'~ 	(! 	(' 	$() 	(, 	( 	( 	$( 	( 	( 	( 	$( 	( 	( 	( 	$( 	( 	*	* 	+ 
.#
 H	.
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                               ccache/texinfo/docbook.go                                                                           0000644                 00000023123 15154557173 0011413 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0;&      ]  4 h      ] g  guile	 	g  define-module*	 	 	g  texinfo	g  docbook	 		g  filenameS	
f  texinfo/docbook.scm	g  importsS	g  sxml	g  fold	 	 	g  srfi	g  srfi-1	 	g  selectS	 	 	 	g  exportsS	g  *sdocbook->stexi-rules*	g  *sdocbook-block-commands*	g  sdocbook-flatten	g  filter-empty-elements	g  replace-titles	 	g  set-current-module	 	  	!g  identity	"g  @	#g  identity-deattr	$g  	detag-one	%g  	parameter	&g  var	'%& 	(g  replaceable	)(& 	*g  type	+g  code	,*+ 	-g  function	.-+ 	/g  literal	0g  samp	1/0 	2g  emphasis	3g  emph	423 	5g  simpara	6g  para	756 	8g  programlisting	9g  example	:89 	;g  	firstterm	<g  dfn	=;< 	>g  filename	?g  file	@>? 	Ag  quote	Bg  cite	CAB 	Dg  application	EDB 	Fg  symbol	GF+ 	Hg  note	Ig  	cartouche	JHI 	Kg  envar	Lg  env	MKL 	N'),.147:=@CEGJM 	Og  tag-replacements	Pg  ignore-list	Qg  with-output-to-string	Rg  write	Sg  	stringify	Tg  
*preorder*	Ug  %	Vg  orderedlist	Wg  listitem	Xg  item	Yg  	enumerate	Zg  itemizedlist	[g  itemize	\g  acronym	]g  term	^g  informalexample	_g  section	`g  
subsection	ag  subsubsection	bg  ulink	cg  assq	dg  url	eg  uref	fg  title	gg  *text*	hg  	*default*	ig  append	jg  warn	kf  Ignoring	lf  
attributes	mg  memq	nf  Don't know how to convert	of  to stexi	pg  c	qg  all	rg  	indexterm	sg  variablelist	tg  refsect1	ug  refsect2	vg  refsect3	wg  refsect4	xg  informaltable	y68^rsVtuvwf9HZx 	zg  inline-command?	{i 	|i 	}g  reverse	~g  foldts*-values	g  chapter t u_ v` wa  C 5h     ]4	
5 4  >  "  G     h   o   -  1  3  C    g       g  args
			  g  filenamef  texinfo/docbook.scm
	(
 			


  g  nameg  identity C!R"        h@      - 1 3  $  %$  &  "  "  "  C            g  tag
			; g  body			;  g  filenamef  texinfo/docbook.scm
	+
		,			,			,	(		,	!		,			-		 	-	%	$	,		'	.		:	,	 			;
  g  nameg  identity-deattr C#R     h      ]C   w       g  tag
		 g  body		  g  filenamef  texinfo/docbook.scm
	1
 			  g  nameg  	detag-one C$RNORPRQR    h   N   ] L 6F       g  filenamef  texinfo/docbook.scm
	H			H	$ 		
   C       h   u   ] O 6   m       g  exp
		  g  filenamef  texinfo/docbook.scm
	G
		H	 		  g  nameg  	stringify CSR"T!iUT!i6#iVWX   h   s   - 1 3 C k       g  tag
			 g  body			  g  filenamef  texinfo/docbook.scm
	R			S	 			
   C Y   h   s   - 1 3 C k       g  tag
			 g  body			  g  filenamef  texinfo/docbook.scm
	T			U	 			
   CZWX h   s   - 1 3 C k       g  tag
			 g  body			  g  filenamef  texinfo/docbook.scm
	W			X	 			
   C [   h   s   - 1 3 C k       g  tag
			 g  body			  g  filenamef  texinfo/docbook.scm
	Y			Z	 			
   C\\U h    s   - 1 3   C       k       g  tag
			 g  body			  g  filenamef  texinfo/docbook.scm
	[			\	 			
   C]$i^$i_!i`!ia!ibcdeUf h8      - 1 3 45$    CC              g  tag
			1 g  attrs			1 g  body				1 g  t			1  g  filenamef  texinfo/docbook.scm
	b		
	d			d			d			d			c			f		0	h	 				1	
	   Cg$ihcOi"jklmPnopUqS     h     - 1 3 4 5$  U"  	6$  =$  1&  #4 >  "  G  6"""4 	5$  C4
 >  "  G  4 5   C        g  tag
		  g  body		  g  subst		   g  filenamef  texinfo/docbook.scm
	j		
	k	!		k			l		#	r	$	'	r		'	n		*	n	!	.	n		1	n	5	2	n	.	6	n		9	n	F	<	n	R	@	n		A	p		E	p	$	I	p	3	L	p	@	Q	p		^	q	&	a	q	2	c	q		p	s		|	l			u	 	u	 	u	> 	u	 	v	 	v	% 	v	0 	v	% 	v	 #		 
   C RyRm  h      ]4 5C          g  command
		  g  filenamef  texinfo/docbook.scm
 
	 		 	 		  g  nameg  inline-command? CzRU|}       h(      ]L4L $  	L  "  4 55D          g  accum
		% g  block		%  g  filenamef  texinfo/docbook.scm
 		 		 		 	(	 	5	 		  		% 	 			%	   C        hX   n  ]  $  & $   &   "  "  "  $   "   O D  f      g  node
		V g  accum		V g  block			V g  cont			V g  command		4	V g  attrs		4	V  g  filenamef  texinfo/docbook.scm
 		 		 			 		 		 	0	 	)	 		 		 	(	! 		$ 		4 		> 		A 		I 	$	J 		K 		V 	 		V	  g  nameg  fdown C~zi        hH   y  ]4>  G 45$  45D45D  q      g  node
		F g  paccum		F g  pblock			F g  pcont			F g  kaccum			F g  kblock			F g  kcont			F g  ret			F g  block			F  	g  filenamef  texinfo/docbook.scm
 		 	!	 		 		 		 		" 		' 		( 	&	4 		7 		@ 	*	B 		F 	 		F	  g  nameg  fup C     h      ] D          g  str
		 g  accum		 g  block			 g  cont			  g  filenamef  texinfo/docbook.scm
 		 		 	 			  g  nameg  fhere C}      h0   "  ]!4 >  G 6             g  sdocbook
		) g  fdown		) g  accum			) g  block			) g  cont			)  g  filenamef  texinfo/docbook.scm
 
	 		 	:	 	>	 		 		) 	 		)  g  nameg  sdocbook-flatteng  documentationf "Flatten" a fragment of sdocbook so that block elements do not nest
inside each other.

Docbook is a nested format, where e.g. a @code{refsect2} normally
appears inside a @code{refsect1}. Logical divisions in the document are
represented via the tree topology; a @code{refsect2} element
@emph{contains} all of the elements in its section.

On the contrary, texinfo is a flat format, in which sections are marked
off by standalone section headers like @code{@@chapter}, and block
elements do not nest inside each other.

This function takes a nested sdocbook fragment @var{sdocbook} and
flattens all of the sections, such that e.g.
@example
 (refsect1 (refsect2 (para "Hello")))
@end example
becomes
@example
 ((refsect1) (refsect2) (para "Hello"))
@end example

Oftentimes (always?) sectioning elements have @code{<title>} as their
first element child; users interested in processing the @code{refsect*}
elements into proper sectioning elements like @code{chapter} might be
interested in @code{replace-titles} and @code{filter-empty-elements}.
@xref{texinfo docbook replace-titles,,replace-titles}, and @ref{texinfo
docbook filter-empty-elements,,filter-empty-elements}.

Returns a nodeset, as described in @ref{sxml xpath}. That is to say,
this function returns an untagged list of stexi elements. CR}    h(      ]"   C $   (  C""          g  x
		% g  rest		%  g  filenamef  texinfo/docbook.scm
 		 	
	 		 		 		 	 	 	
 		%	   C      h      ]4 56      g  sdocbook
		  g  filenamef  texinfo/docbook.scm
 
	 		
 		 		 	 		  g  nameg  filter-empty-elementsg  documentationf  gFilters out empty elements in an sdocbook nodeset. Mostly useful
after running @code{sdocbook-flatten}. CR}c   hh     ]"  U(  6$  45"  $  "" "        g  sdocbook-fragment
		f g  in		[ g  out			[ g  t		*	[  g  filenamef  texinfo/docbook.scm
 
	 		 		 		 		 		 		 		  	"	# 		% 		* 		5 		9 	"	< 	/	? 		B 		J 		M 	
	P 		S 		[ 		[ 		^ 	'	f 	 		f  g  nameg  replace-titlesg  documentationf rIterate over the sdocbook nodeset @var{sdocbook-fragment},
transforming contiguous @code{refsect} and @code{title} elements into
the appropriate texinfo sectioning command. Most useful after having run
@code{sdocbook-flatten}.

For example:
@example
 (replace-titles '((refsect1) (title "Foo") (para "Bar.")))
    @result{} '((chapter "Foo") (para "Bar."))
@end example
 CRC          g  m
		,  g  filenamef  texinfo/docbook.scm		
 	(
	+
	1
	5		4
	E		E
	G
	N	
q	J

s 	
v 
% 
 
# 
 
 	
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                              ccache/texinfo/string-utils.go                                                                      0000644                 00000040617 15154557173 0012446 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0wA      ] S 4   h      ] g  guile	 	g  define-module*	 	 	g  texinfo	g  string-utils	 		g  filenameS	
f  texinfo/string-utils.scm	g  importsS	g  srfi	g  srfi-13	 	 	g  srfi-14	 	 	 	g  exportsS	g  escape-special-chars	g  transform-string	g  expand-tabs	g  center-string	g  left-justify-string	g  right-justify-string	g  collapse-repeated-chars	g  make-text-wrapper	g  fill-string	g  string->wrapped-lines	 
	 g  set-current-module	!  	"  	#g  open-output-string	$g  char?	%g  char=?	&g  
procedure?	'g  string?	(g  string-index	)g  boolean?	*g  throw	+g  bad-type	,f  'expected #t, char, string, or procedure	-g  display	.g  string-length	/g  	substring	0g  string-for-each	1g  
write-char	2g  get-output-string	3g  make-string	4g  string	5g  max	6g  string-append	7g  odd?	8f   	9g  char-set-complement	:g  char-set:whitespace	;g  reverse	<g  split-by-single-words	=g  
string-ref	>g  end-of-sentence?	?g  
line-widthS	@?
	Ag  expand-tabs?S	BA	Cg  	tab-widthS	DC		Eg  collapse-whitespace?S	FE		Gg  subsequent-indentS	HG		Ig  initial-indentS	JI		Kg  break-long-words?S	LK		M@BDFHJL 	Ng  string-trim	Of   	Pg  string-join	Qf  
	Rg  infixC 5hx:     ]4	
5 4" >  "  G   #$% h   c   ]L  6      [       g  c
		
  g  filenamef  texinfo/string-utils.scm
	O		
	O	% 		
   C&'(   h   c   ]L  6      [       g  c
		
  g  filenamef  texinfo/string-utils.scm
	S		
	S	% 		
   C) h   [   ]L C   S       g  c
		  g  filenamef  texinfo/string-utils.scm
	U	 		   C*+,- h   k   ]4L 5L 6 c       g  c
		  g  filenamef  texinfo/string-utils.scm
	X			X	,		X	# 		   C-       h   c   ]LL 6      [       g  c
		
  g  filenamef  texinfo/string-utils.scm
	Y		
	Y	# 		
   C.-/01       h    {   ]4L 5$  L 6 L 6     s       g  c
		  g  filenamef  texinfo/string-utils.scm
	a			b			b			d			g	 		   C2        hX  -	  - . , 3 #  #  45 45$  O "  F45$  "  545$  O "  45$  O "  	4	
545$  O "  	O $  24 5$   44 
5>  "  G  "   "   4O  $  "  
$  "  4 5>  "  G  $  14 5$  44 5>  "  G  "   "   6%	      g  str
	X g  match?	X g  replace		X g  start		X g  end		X g  os		#X g  matcher	 X g  replacer	 X  g  filenamef  texinfo/string-utils.scm
	'
		M		#	M		&	N		0	N		<	P		F	N		M	R		W	N		c	T		m	N		y	V		}	V	%		V	/ 	V	 	M	 	W	 	W	 	M	 	\	 	\	 	\	 	\	 	]	 	]	 	]	 	`	 	i		j		j		`	!	m	$	m	+	m	/	m	0	n	3	n	B	n	X	p	 (	X		  g  nameg  transform-stringg  documentationf Uses @var{match?} against each character in @var{str}, and performs a
replacement on each character for which matches are found.

@var{match?} may either be a function, a character, a string, or
@code{#t}.  If @var{match?}  is a function, then it takes a single
character as input, and should return @samp{#t} for matches.
@var{match?} is a character, it is compared to each string character
using @code{char=?}.  If @var{match?} is a string, then any character
in that string will be considered a match.  @code{#t} will cause 
every character to be a match.

If @var{replace} is a function, it is called with the matched
character as an argument, and the returned value is sent to the output
string via @samp{display}.  If @var{replace} is anything else, it is
sent through the output string via @samp{display}.

Note that te replacement for the matched characters does not need to
be a single character.  That is what differentiates this function from
@samp{string-map}, and what makes it useful for applications such as
converting @samp{#\&} to @samp{"&amp;"} in web page text.  Some other
functions in this module are just wrappers around common uses of
@samp{transform-string}.  Transformations not possible with this
function should probably be done with regular expressions.

If @var{start} and @var{end} are given, they control which portion
of the string undergoes transformation.  The entire input string
is still output, though.  So, if @var{start} is @samp{5}, then the
first five characters of @var{str} will still appear in the returned
string.

@lisp
; these two are equivalent...
 (transform-string str #\space #\-) ; change all spaces to -'s
 (transform-string str (lambda (c) (char=? #\space c)) #\-)
@end lisp CR3        h(   u  - . , 3 #  	 	4 56 m      g  str
		' g  tab-size		'  g  filenamef  texinfo/string-utils.scm
	r
		z		'	x	 		'  g  nameg  expand-tabsg  documentationf  Returns a copy of @var{str} with all tabs expanded to spaces.  @var{tab-size} defaults to 8.

Assuming tab size of 8, this is equivalent to: @lisp
 (transform-string str #\tab "        ")
@end lisp CR$%     h   e   ] L 6      ]       g  c
		
  g  filenamef  texinfo/string-utils.scm
 		
 	$ 		
   C(     h   e   ]L  6      ]       g  c
		
  g  filenamef  texinfo/string-utils.scm
 		
 	$ 		
   C4     h   e   ]L  6      ]       g  c
		
  g  filenamef  texinfo/string-utils.scm
 		
 	  		
   C        h0   )  ] 45$  O "  O O 6    !      g  str
		, g  special-chars		, g  escape-char			,  g  filenamef  texinfo/string-utils.scm
	|
	 		 		, 	 		,	  g  nameg  escape-special-charsg  documentationf GReturns a copy of @var{str} with all given special characters preceded
by the given @var{escape-char}.

@var{special-chars} can either be a single character, or a string consisting
of all the special characters.

@lisp
;; make a string regexp-safe...
 (escape-special-chars "***(Example String)***"  
                      "[]()/*." 
                      #\\)
=> "\\*\\*\\*\\(Example String\\)\\*\\*\\*"

;; also can escape a singe char...
 (escape-special-chars "richardt@@vzavenue.net"
                      #\@@
                      #\@@)
=> "richardt@@@@vzavenue.net"
@end lisp CR.35%6748 	       h     - . , 3 #  	P#   #  4 544	
554$  "  5$  "  !44	
5$  "  5$   C 45$  4$  "  5"  6      g  str
	  g  width	  g  chr		  g  rchr		  g  len		0  g  lpad		G  g  rpad	    g  filenamef  texinfo/string-utils.scm
 
	* 		0 		3 		6 		= 	+	@ 	!	C 		G 		G 		J 		R 		^ 		b 		i 		l 	 	s 	/	v 	%	y 	 	 	  	  	  	  	  	)  	/  	)  	%  	>  	  	>  	Q  	 "	 	  g  nameg  center-stringg  documentationf Returns a copy of @var{str} centered in a field of @var{width}
characters.  Any needed padding is done by character @var{chr}, which
defaults to @samp{#\space}.  If @var{rchr} is provided, then the
padding to the right will use it instead.  See the examples below.
left and @var{rchr} on the right.  The default @var{width} is 80.  The
default @var{chr} and @var{rchr} is @samp{#\space}.  The string is
never truncated.
@lisp
 (center-string "Richard Todd" 24)
=> "      Richard Todd      "

 (center-string " Richard Todd " 24 #\=)
=> "===== Richard Todd ====="

 (center-string " Richard Todd " 24 #\< #\>)
=> "<<<<< Richard Todd >>>>>"
@end lisp CR.356  hX   H  - . , 3 #  	P#   4 544
55$   C 6       @      g  str
		Q g  width		Q g  chr			Q g  len		'	Q g  pad		;	Q  g  filenamef  texinfo/string-utils.scm
 
	! 		' 		* 		- 		4 	 	7 		; 		; 		B 		F 		Q 	 		Q	  g  nameg  left-justify-stringg  documentationf @code{left-justify-string str [width chr]}.  
Returns a copy of @var{str} padded with @var{chr} such that it is left
justified in a field of @var{width} characters.  The default
@var{width} is 80.  Unlike @samp{string-pad} from srfi-13, the string
is never truncated. CR.356 hX   F  - . , 3 #  	P#   4 544
55$   C 6       >      g  str
		Q g  width		Q g  chr			Q g  len		'	Q g  pad		;	Q  g  filenamef  texinfo/string-utils.scm
 
	! 		' 		* 		- 		4 	 	7 		; 		; 		B 		F 		Q 	 		Q	  g  nameg  right-justify-stringg  documentationf Returns a copy of @var{str} padded with @var{chr} such that it is
right justified in a field of @var{width} characters.  The default
@var{width} is 80.  The default @var{chr} is @samp{#\space}.  Unlike
@samp{string-pad} from srfi-13, the string is never truncated. CR%%      h@      ]"  	
N NC4 M5$  4ML 5$  MNMLC""           g  c
		<  g  filenamef  texinfo/string-utils.scm
 			 		 		 		 		 		 		) 		, 	&	. 		3 	 		<   C8   hX     - . , 3 #   #  4 5$  A"   
HHO  6      g  str
		X g  chr		X g  num			X g  prev-chr		5	L g  match-count		5	L g  repeat-locator		L	X  g  filenamef  texinfo/string-utils.scm
 	  		, 		5 	
	L 		V 	*	X 	 		X	  g  nameg  collapse-repeated-charsg  documentationf Returns a copy of @var{str} with all repeated instances of 
@var{chr} collapsed down to at most @var{num} instances.
The default value for @var{chr} is @samp{#\space}, and 
the default value for @var{num} is 1.

@lisp
 (collapse-repeated-chars "H  e  l  l  o")
=> "H e l l o"
 (collapse-repeated-chars "H--e--l--l--o" #\-)
=> "H-e-l-l-o"
 (collapse-repeated-chars "H-e--l---l----o" #\- 2)
=> "H-e--l--l--o"
@end lisp CR9:(/;    hp     ])45"  T4 5$  ;4 5$  4 5"4 566
"         g  str
		m g  non-wschars			m g  ans			c g  index			c g  next-non-ws			c g  next-ws		-	]  g  filenamef  texinfo/string-utils.scm
 
	 			 		 		 		 		" 		# 		- 	
	5 		6 		C 		M 		P		[		]		c	
	c 		d 		m 	 		m  g  nameg  split-by-single-words C<R.= h@   T  ]	4 5$  $.4 5$  .4 	5CCC       L      g  str
		9 g  len			9  g  filenamef  texinfo/string-utils.scm

								
			
					#			 			$
		'		0	(	2		3		4		 		9  g  nameg  end-of-sentence?g  documentationf  6Return #t when STR likely denotes the end of sentence. C>RM8%   h   e   ] 
6      ]       g  c
		
  g  filenamef  texinfo/string-utils.scm
D	$	
D	0 		
   CN;.6>O/<    hx    ]1 H 4J  5K L$  4J L5K "   L$  4J 5K "   4J 5K " (  
$  	"  6L45
$  45"  45$  Q"  45"  ,L$  "4	5$  4
5"  ""  ""_
$  L
"AL$  044
5545L
"45L
"4J 5L 
"            g  str
	r g  ans	H[ g  words		H[ g  line		H[ g  count		H[ g  length-left	 [ g  	next-word	 [  g  filenamef  texinfo/string-utils.scm
B		D		D		G		H		$H		.K		/L		7L		<O		DO		HR		NV		TX		XX		]Y		eX	
	h^	 	o]		s_		w_		x`		}`	,	`	 a	 ]	
 d	 d	 b	 g	 l	 h	 i	 h	 k	 k	, k	 m	 f	 p	 b	 r	r	b	{	{	.{	!{	"}	-~	.}	={	>	I	L	[	[R	\R	]S	rR	 =	r   C      hp   |  -  /     0   3  #  	P #  #  	#  #  #  #   O C      t      g  
line-width
		j g  expand-tabs?		j g  	tab-width			j g  collapse-whitespace?			j g  subsequent-indent			j g  initial-indent			j g  break-long-words?			j  g  filenamef  texinfo/string-utils.scm

	A	/	K	, 		j

g  
line-widthS
g  expand-tabs?Sg  	tab-widthS	g  collapse-whitespace?S	g  subsequent-indentS	g  initial-indentS	g  break-long-words?S	   g  nameg  make-text-wrapperg  documentationf Returns a procedure that will split a string into lines according to the
given parameters.

@table @code
@item #:line-width
This is the target length used when deciding where to wrap lines.
Default is 80.

@item #:expand-tabs?
Boolean describing whether tabs in the input should be expanded. Default
is #t.

@item #:tab-width
If tabs are expanded, this will be the number of spaces to which they
expand. Default is 8.

@item #:collapse-whitespace?
Boolean describing whether the whitespace inside the existing text
should be removed or not.  Default is #t.

If text is already well-formatted, and is just being wrapped to fit in a
different width, then set this to @samp{#f}. This way, many common text
conventions (such as two spaces between sentences) can be preserved if
in the original text. If the input text spacing cannot be trusted, then
leave this setting at the default, and all repeated whitespace will be
collapsed down to a single space.

@item #:initial-indent
Defines a string that will be put in front of the first line of wrapped
text. Default is the empty string, ``''.

@item #:subsequent-indent
Defines a string that will be put in front of all lines of wrapped
text, except the first one.  Default is the empty string, ``''.

@item #:break-long-words?
If a single word is too big to fit on a line, this setting tells the
wrapper what to do.  Defaults to #t, which will break up long words.
When set to #f, the line will be allowed, even though it is longer
than the defined @code{#:line-width}.
@end table

The return value is a procedure of one argument, the input string, which
returns a list of strings, where each element of the list is one line. CR   h     - 1 3 4? 6          g  str
			 g  kwargs			  g  filenamef  texinfo/string-utils.scm

	
			 			
  g  nameg  string->wrapped-linesg  documentationf 8@code{string->wrapped-lines str keywds ...}. Wraps the text given in
string @var{str} according to the parameters provided in @var{keywds},
or the default setting if they are not given. Returns a list of strings
representing the formatted lines. Valid keyword arguments are discussed
in @code{make-text-wrapper}. CRPQR     h      - 1 3 4 ?6            g  str
			 g  kwargs			  g  filenamef  texinfo/string-utils.scm

								 			
  g  nameg  fill-stringg  documentationf  Wraps the text given in string @var{str} according to the parameters
provided in @var{kwargs}, or the default setting if they are not
given.  Returns a single string with the wrapped text.  Valid keyword
arguments are discussed in @code{make-text-wrapper}. CRC              g  m
		,  g  filenamef  texinfo/string-utils.scm		
	'
	r
	|
 
; 
 
$F &g 
(
6O
8o
:o
 	:q
   C6                                                                                                                  ccache/scripts/read-text-outline.go                                                                 0000644                 00000015737 15154557173 0013374 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] L 4  h      ] g  guile	 	g  define-module*	 	 	g  scripts	g  read-text-outline	 		g  filenameS	
f  scripts/read-text-outline.scm	g  importsS	g  ice-9	g  regex	 	 	 	g  exportsS	g  read-text-outline-silently	g  make-text-outline-reader	 	g  	autoloadsS	g  rdelim	 	g  	read-line	 	g  getopt-long	 	 	 	g  set-current-module	 	  	!g  %include-in-guild-list	"f  *Convert textual outlines to s-expressions.	#g  %summary	$g  symbol->string	%g  string=?	&f  ?	'g  	substring	(g  string-length	)g  ??	*g  match:substring	+g  msub	,f   	-g  ??-predicates	.g  make-regexp	/f  ^	0g  string-append	1g  assq-ref	2g  level-submatch-number	3g  compute-level	4g  level-substring-divisor	5g  body-submatch-number	6g  match:suffix	7g  extra-fields	8g  map	9g  for-each	:g  set-object-property!	;g  regexp-exec	<g  level	=g  make-line-parser	>g  start	?> 	@g  eof-object?	Ag  object-property	Bg  error	Cf  unhandled diff not 1:	Df  (([ ][ ])*)- *	E4		FE 	Gg  write	Hg  	open-file	If  r	Jg  newline	Kg  mainC 5       hP     ]4	
5	 4  >  "  G   !R"#R$%&'( h       ]	4 544556       g  symbol
		  g  name			   g  filenamef  scripts/read-text-outline.scm
	{
		|				|			}			}			}	&		}	"		}		 	}	 
		   g  nameg  ?? C)R*  h   j   ] L 6      b       g  m
		
  g  filenamef  scripts/read-text-outline.scm
 		
 	 		
   C   h   p   ] O C      h       g  n
		
  g  filenamef  scripts/read-text-outline.scm
	
 		
  g  nameg  msub C+R)%,*        h      ]44 L 55C          g  m
		  g  filenamef  scripts/read-text-outline.scm
 		 		 		 	 	 	3	 	 	 		 	 			   C+   h(      ] 4 5$   O "  4 5C         g  pair
		&  g  filenamef  scripts/read-text-outline.scm
 
	 		 		 		 		 		 		" 		$ 		% 	 		&  g  nameg  ??-predicates C-R'.%/0+123  h   j   ]L  6b       g  m
		  g  filenamef  scripts/read-text-outline.scm
 	$	 	& 		   C4(      h      ]44L 55L C      }       g  m
		  g  filenamef  scripts/read-text-outline.scm
 	$	 	)	 	8	 	)	 	& 		   C(     h   s   ]4L  56   k       g  m
		  g  filenamef  scripts/read-text-outline.scm
 		 	0	 	! 		   C56     h   j   ] 6b       g  m
		  g  filenamef  scripts/read-text-outline.scm
 		 	* 		   C78-9:       h      ]L 4 L 56            g  pair
		  g  filenamef  scripts/read-text-outline.scm
 	'		 	.	
 	*	 	+	 	*	 	) 		   C    h   {   ] O L 6       s       g  obj
		 g  m		  g  filenamef  scripts/read-text-outline.scm
 	$	 	& 			   C   h   r   ]C    j       g  obj
		 g  m		  g  filenamef  scripts/read-text-outline.scm
 	 			   C;:<    hX      ]4L  5$  ?4L54L54>  "  G  4L>  "  G  CC           g  line
		T g  t		T g  level		!	R g  body		!	R  g  filenamef  scripts/read-text-outline.scm
 		 		 		 		 		! 		& 		, 	/	3 		< 	 		T   C     h      ]24 
5445$   "  	4 55445$  "  54	5$  
O "  (45$  O "  O 45$  45"  45$  45O "  O C      g  re
	  g  specs	  g  fc			1 g  rx		1  g  t		?	Q g  level-substring		S  g  t		^  g  t		z  g  extract-level	   g  t	   g  extract-body	   g  t	   g  new	   g  misc-props!	    g  filenamef  scripts/read-text-outline.scm
 
	 		 		 		 	 	 	*	 	 	 		$ 	 	( 	/	, 	 	. 		1 		4 		7 		= 	+	? 		? 	 	S 		S 		V 		\ 	&	^ 		^ 		r 		x 	&	z 		z 	  	  	  	%  	  	  	  	  	$  	  	  	-  	"  	 *	 	  g  nameg  make-line-parser C=R=?@A<BC:> 
   h`    ]QH  H" %45$  " '4L 5$   45		
$  	"  	
$  S	

$  "  4	>  "  G  
4>  "  G  JK"  E	
$  ="  "4
5$  
K"  

"J
"JJK"   4 5"	4 5"4 5	J"JK	J&  CJC          g  port
	\ g  all	\ g  pchain			\ g  line		4 g  
prev-level		4 g  tp		4 g  t		4 g  t		)1 g  words		6 g  level		A g  diff			H g  t	
	g  g  p	
    g  filenamef  scripts/read-text-outline.scm
 		 		 			 			 		 		 		 	
	# 		) 		6 	(	6 		9 	(	? 	;	A 	(	A 		H 	'	H 		M 		R 		W 		^ 		c 		g 	"	g 		t 	"	x 	)  	"  	  	7  	  	+  	  	1  	+  	  	  	  	  	,  	=  	E  	,  	#  	  	#  	-  	  	(  	  	+  	  	" 	 	 . 	4 	5 	I 	L 	N 	P 	V 	W 	[ 	 B	\   C  h      ]
4 5O C          g  re
		 g  specs		 g  
parse-line			  g  filenamef  scripts/read-text-outline.scm
 
	 		 	 			  g  nameg  make-text-outline-reader CR4iDF5RGHIJ      h@      -  1  3 444 55>  "  G  4>   "  G  C             g  args
			:  g  filenamef  scripts/read-text-outline.scm
 
	
 		 			 	%	 	0	 	;	 	%	 			  		) 	 			:


  g  nameg  read-text-outline CRiKRC       g  m
		0  g  filenamef  scripts/read-text-outline.scm		p
	4	x
	6	y		9	y
7	{
S	
1 
 
 
 	 	 	 	 
G 
N 
 	P
   C6                                  ccache/scripts/use2dot.go                                                                           0000644                 00000007717 15154557173 0011406 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] [ 4   h"      ] g  guile	 	g  define-module*	 	 	g  scripts	g  use2dot	 		g  filenameS	
f  scripts/use2dot.scm	g  importsS	g  srfi	g  srfi-13	 	g  selectS	g  string-join	 	 	g  frisk	 	g  make-frisker	g  	edge-type	g  edge-up	g  	edge-down	 	 	 	g  exportsS	 	g  	autoloadsS	g  ice-9	 g  getopt-long	!  	"  	#!" 	$g  set-current-module	%$ 	&$ 	'f  1Print a module's dependencies in graphviz format.	(g  %summary	)g  
guile-user	*) 	+g  *default-module*	,g  format	-f  ~S	.g  q	/g  map	0f  ~A=~A	1g  vv	2f  digraph use2dot {
	3g  for-each	4f    ~A;
	5g  label	6f  Guile Module Dependencies	7g  ratio	8g  fill	978	:9 	;g  >>header	<f    "~A" -> "~A"	=g  autoload	>g  style	?g  dotted	@>?	Ag  fontsize	BA		C@B 	Dg  computed	Eg  bold	F>E	GF 	Hf   [~A]	If  ,	Jf  ;
	Kg  >>body	Lf  }	Mg  >>footer	Ng  >>	Of  use2dot	Pg  default-module	Qg  single-char	RQm 	Sg  value	TS 	UPRT 	VU 	Wg  
option-ref	Xg  reverse	Yg  edges	Zg  mainC 5 h`	     ]4	
#5	 4& >  "  G   '(R*+R,-      h   s   ] 6     k       g  s
		  g  filenamef  scripts/use2dot.scm
	;
		<			<	 		  g  nameg  q C.R/,0       h   y   ]  6 q       g  pair
		  g  filenamef  scripts/use2dot.scm
	?			@		
	@			@	'		@		 		   C    h   p   ] 6      h       g  pairs
		
  g  filenamef  scripts/use2dot.scm
	>
	
	?	 		
  g  nameg  vv C1R,23,4      h   f   ] 6     ^       g  s
		  g  filenamef  scripts/use2dot.scm
	E			E	#		E	 		   C15.6: 
    h0      ] 4>  "  G  445	56          g  filenamef  scripts/use2dot.scm
	C
		D			D			D			F			F			F		#	F		%	F		&	F		+	F		-	E	 		-
  g  nameg  >>header C;R3,<=CDGH1IJ        h     ]	44 54 5>  "  G  4 5$  "  $  	"  $  %4
4455>  "  G  "   6         g  edge
	  g  key	*	N g  t	N	~  g  filenamef  scripts/use2dot.scm
	O			P			P				P	%		P	6		P		$	Q		*	Q		7	R		D	Q		F	S		N	Q		W	V		\	V		]	V	$	`	V	1	h	V	:	j	V	$	o	V	 	W	 	W	 	    C  h   t   ] 6      l       g  edges
		
  g  filenamef  scripts/use2dot.scm
	M
	
	N	 		
  g  nameg  >>body CKR,L h   j   ] 6       b       g  filenamef  scripts/use2dot.scm
	Z
		[				[	 			
  g  nameg  >>footer CMR;KM h(      ]4>   "  G  4 >  "  G  6 x       g  edges
		(  g  filenamef  scripts/use2dot.scm
	]
		^			_		(	`	 		(  g  nameg  >> CNR OVWP+NXY     hP     -  1  3 4 54545454	445
556      g  args
			P g  parsed-args		P g  =m		"	P g  scan		.	P g  files		9	P  g  filenamef  scripts/use2dot.scm
	b
	
	c			c	)		c	#		d	#		c			c			f			f	%	"	f		"	c		%	g		)	g		.	g		.	c		1	h		6	h	(	7	h	,	9	h		9	c		>	i		A	i		B	i		J	i		L	i		N	i		P	i	 			P


  g  nameg  use2dot CRiZRC        g  m
		0  g  filenamef  scripts/use2dot.scm		0
	2	7		5	7
	7	9		:	9
 	;
	>
	C
	M
	Z
S	]
	V	b
	]	k
 		_
   C6                                                  ccache/scripts/display-commentary.go                                                                0000644                 00000004633 15154557173 0013634 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0	      ] * 4    h      ] g  guile	 	g  define-module*	 	 	g  scripts	g  display-commentary	 		g  filenameS	
f  scripts/display-commentary.scm	g  importsS	g  ice-9	g  documentation	 	 	 	g  exportsS	 	g  set-current-module	 	 	f  5Display the Commentary section from a file or module.	g  %summary	g  format	f  ~A commentary:
~A	g  file-commentary	g  display-commentary-one	g  map	g  symbol->string	g  string-append	f  /	 g  module-name->filename-frag	!g  %search-load-path	"f  
module ~A
	#g  display-module-commentary	$g  for-each	%g  string?	&g  string-index	'g  with-input-from-string	(g  read	)g  mainC 5       h     ]4	
5 4 >  "  G   R     h      ] 4 56             g  file
		  g  filenamef  scripts/display-commentary.scm
	%
		&		
	&	'		&	 		  g  nameg  display-commentary-one CR   h@   (  ]4 5"   (  C45""        g  ls
		? g  ls		? g  ls			1 g  acc			1  g  filenamef  scripts/display-commentary.scm
	(
		)			)			*			+			-			-		$	-	,	'	-	0	)	-		1	-	
	1	*		4	*		7	*	"	?	*	 		?  g  nameg  module-name->filename-frag C R! "       h8      ]	44 55$  4 >  "  G  6C            g  module-name
		3 g  t		3  g  filenamef  scripts/display-commentary.scm
	/
		0				0			0				0			2			2		#	2		1	3	 
		3  g  nameg  display-module-commentary C#R$%&#'(    h@      ]4 5$  !
4 (5&  4 56 6 $   6C          g  ref
		=  g  filenamef  scripts/display-commentary.scm
	6			7			7			8	#		8			:		(	9		.	;		1	<		5	7		;	=	 		=   C  h      -  1  3  6              g  refs
			  g  filenamef  scripts/display-commentary.scm
	5
		6	 			


  g  nameg  display-commentary CRi)RC       g  m
		,  g  filenamef  scripts/display-commentary.scm		
	.	#		1	#
	%
	(
	/
	5
	@
 		
   C6                                                                                                      ccache/scripts/generate-autoload.go                                                                 0000644                 00000007662 15154557173 0013420 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] 2 4    h      ] g  guile	 	g  define-module*	 	 	g  scripts	g  generate-autoload	 		g  filenameS	
f  scripts/generate-autoload.scm	g  exportsS	 	g  set-current-module	 	 	g  %include-in-guild-list	f  )Generate #:autoload clauses for a module.	g  %summary	g  open-input-file	g  eof-object?	g  read	g  length	g  defmacro-public	g  define-public	g  define-module	g  member	g  :export	g  append	g  export	g  export-syntax	g  autoload-info	 f  --target	!g  display	"f  ;;; do not edit --- generated 	#g  strftime	$f  %Y-%m-%d %H:%M:%S	%g  	localtime	&g  current-time	'g  newline	(f  (define-module 	)f  (guile-user)	*g  for-each	+f  
  :autoload 	,f   	-f  )	.f    ;;; 	/f   symbols in 	0f  	 modules
	1g  mainC 5     h(     ]4	
5 4 >  "  G   RR   h    ])4 5" 45$  $  (  C CC"  45"$ a"  F	45$  4&  '$  45"""""  	45$  n&  a"  '$  45"1"t$  )$  45"""":"645$  &  :454	5$  4
5"  "&  "  $  454
5"d"""45"E            g  file
	 g  p		 g  form		 g  module-name		 g  exports		 g  t	Jf g  t	s  g  filenamef  scripts/generate-autoload.scm
	@
		A				A			B			C	
		C		 	D	
	/	F		7	l		K	l		K	G	
	N	G		R	G	
	Y	f		`	f		d	e		f	g		i	g	,	m	e		p	h		r	h		v	e		w	i	 	k	 	k	 	i	 	G	
 	W	 	W	 	V	 	X	 	X	* 	V	 	a	 	a	 	^	 	b	 	d	 	d	 	b	 	G	
 	Y	 	Y	 	V	 	Z	 	Z	 	V	 	[		]		]		[	 	G	
"	H	)	H	-	G	/	I	2	I	*6	G	7	J	@	K	B	L	F	L	&J	L	J	L	S	N	#X	N	+]	N	#p	J	s	R	s	R		P		S		U		U		U		S		B		B		B	9	B	 Q	  g  nameg  autoload-info CR !"#$%&'()**!+,        h(      ]MN45M N   6           g  module-name
		$ g  exports		$  g  filenamef  scripts/generate-autoload.scm
	}	(		~	=		~	*			>			;			*	 	:	 	F	" 	4	$ 	* 		$	   C  h       ]	4 5$  LL O @C       g  file
		  g  t			   g  filenamef  scripts/generate-autoload.scm
	y			z				z			}	! 		    C-./0    h  J  -  1  3 
H
H4 5$  "  $   "   4>  "  G  44445 55>  "  G  4	>   "  G  4
>  "  G  4$  "  >  "  G  4O >  "  G  4>  "  G  4	>   "  G  JJ 6    B      g  args
		 g  module-count	
 g  
syms-count		 g  t			, g  target-override		, g  files		?  g  filenamef  scripts/generate-autoload.scm
	n
	
	o			q	!		q	)		q	!		q		,	o		4	s		7	s	$	?	s	0	?	o		B	t		F	t		K	t		T	u		W	u		[	u		\	u	+	_	u	6	e	u	+	g	u		l	u		u	v	 	w	 	w	 	w	 	x	 	x	 	x	! 	x	 	y	  	  	  	  	  	  	'  	) 	 	 )		


  g  nameg  generate-autoload CRi1RC         g  m
		(  g  filenamef  scripts/generate-autoload.scm		:
	,	=
	.	>		1	>
	@
	n
$ 
 	&
   C6                                                                               ccache/scripts/read-scheme-source.go                                                                0000644                 00000021410 15154557173 0013456 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0"      ] N 4        hA      ] g  guile	 	g  define-module*	 	 	g  scripts	g  read-scheme-source	 		g  filenameS	
f  scripts/read-scheme-source.scm	g  importsS	g  ice-9	g  rdelim	 	 	 	g  exportsS	g  read-scheme-source-silently	g  quoted?	g  clump	 	g  set-current-module	 	 	g  %include-in-guild-list	f  /Print a parsed representation of a Scheme file.	g  %summary	g  :type	g  variable	g  define-module	g  length	 g  define	!g  alias	"g  lambda	#g  string?	$g  	procedure	%g  
:signature	&g  :std-int-doc	'g  	annotate!	(g  quote	)g  filename	*g  make-regexp	+f  ^#!	,f  ^!#	-f  
^[ 	]*(;+)	.f  ^[ 	]*$	/g  open-input-file	0g  eof-object?	1g  regexp-exec	2g  hash-bang-comment	3g  :line	4g  :line-count	5g  
:text-list	6g  reverse	7g  	read-line	8g  
whitespace	9g  :text	:g  comment	;g  :leading-semicolons	<g  unread-string	=g  read	>g  	port-line	?g  append	@g  following-form-properties	Ag  process	Bg  for-each	Cg  write	Dg  newline	Eg  error	Ff  	bad list!	Gg  string->symbol	Hg  	substring	Ig  symbol->string	Jg  assq-ref	Kg  leading-semicolons	Lg  text	Mg  mainC 5  h     ]4	
5 4 >  "  G   RR !"#$%& h    ]"  6 $ "   &  6""  B	4 5$  0 &  # $   $  6""""	4 5$  & 	"   $   $  z	4 5$  e &  U4 5$  @4	>  "  G  4
  >  "  G   6""""" $  c $  U4	>  "  G  4
 >  "  G  	4 5$  4 5$   6CC"""""f      g  form
	 g  note!	  g  filenamef  scripts/read-scheme-source.scm
	c
	
 		 		 			d			d			d		 		 	"	"				& 		( 		* 			.	d		5	z		<	z		@	y			B	{		E	{		I	y			L	|		N	|		R	y			U	}		X	}		\	y			`	~		b	~		d	~			t	d		w	e		~	e	 	d		 	f	 	f	 	d		 	q	 	q	 	n		 	r	 	r	 	n		 	s	 	s	 	s	 	s	 	n		 	t	 	t	  	t	 	n		 	u	 	u	 	u	 	u	 	n		 	v		 	v	 	v	 	v		 	w		 	w	 	w	" 	w	4 	w	. 	w	 	w			x			x	%	x		x		$	d	'	g	)	g	-	d		0	h	3	h	7	d		8	i		<	i	>	i	C	i		L	j		P	j	S	j	Y	j		d	k	k	k	o	k		p	l	u	l	y	l	}	k			m		m	#	m	 a		  g  nameg  	annotate! C'R()*+,-./0123456789:;<=>'?     h      -  1  3 4M  5N C         g  args
			  g  filenamef  scripts/read-scheme-source.scm
 	/	
 	7	 	1 			


  g  nameg  prop+ C@        h`  i  ]b4   >  "  G  454545454 5" $ 4	5		$  	C4
5$  "  p4		5$  "  	4
	5$  844
54	
5  >  "  /G  "  (45	

	"45 
	"|" .4
5$  "4  >  "  G  "  4
5		$  44	



  >  "  G  "  4>  "  G  45
45HH4
O >  "  G  JJ$  "  4>  "  G  JK4J >  "  G  4
>  "  G  
	4545"
C4545"  a      g  file
	^ g  nb!	^ g  hash-bang-rx		A^ g  bang-hash-rx		A^ g  all-comment-rx		A^ g  all-whitespace-rx		A^ g  p		A^ g  n		OG g  line		OG g  t			\E g  line			x  g  text	
	x  g  t		  g  t		8. g  m1	
MY g  form	
+ g  count	( g  props	 g  props	% g  t	  g  filenamef  scripts/read-scheme-source.scm
 
	 		 		 		 		# 	#	% 		& 		* 	#	, 		- 		1 	%	3 		4 		8 	(	: 		; 		A 		O 		U 		V 	
	\ 		h 		t 		x 		y 		 	  	  	  	  	  	2  	.  	  	-  	.  	-  	  	  	  	  	  	  	$  	$  	 	 	 	 	# 	0 	8 	A 	E 	M 	+M 	!R 	&U 	/V 	#[ 	h 	u 	 	  	 	$ 	! 	 	/ 	! 	# 	 	 	 	 	' 	 	 	 	 	/ 	6 	7 	%E 	F 	
G 	H 	O 	P 	,^ 	 \	^	  g  nameg  process CARBA    h   t   ] M N C     l       g  e
		  g  filenamef  scripts/read-scheme-source.scm
 		 	4		 	* 		   C h   n   ] L O 6 f       g  file
		  g  filenamef  scripts/read-scheme-source.scm
 		 	 		   C6     h0     -  1  3 H4O  >  "  G  J6           g  files
			+ g  res	
	+  g  filenamef  scripts/read-scheme-source.scm
 
	
 		
 		 		+ 	 			+


  g  nameg  read-scheme-source-silentlyg  documentationf  6See commentary in module (scripts read-scheme-source). CRBACD        h   t   ]4 >  "  G  6 l       g  e
		  g  filenamef  scripts/read-scheme-source.scm
 		 	(	 	2 		   C h   n   ] 6      f       g  file
		
  g  filenamef  scripts/read-scheme-source.scm
 		
 	 		
   C       h      -  1  3  6              g  files
			  g  filenamef  scripts/read-scheme-source.scm
 
	 	 			


  g  nameg  read-scheme-sourceg  documentationf  6See commentary in module (scripts read-scheme-source). CR(EFGHI        h   B  ]"$  	45$  &  $  {
45$  l &  a"  Q(  C$  "  4>  "  G  444555""CCCCCC:      g  sym
	  g  form	  g  inside		$  g  ls		G  g  alist		G  g  first		S   g  filenamef  scripts/read-scheme-source.scm
 
	 			 		 		 		 		 		 		  		# 		$ 		) 		- 			/ 		6 		: 			? 		C 			G 		M 		S 	!	S 		X 		\ 		a 		e 	!	j 		u 		w 	#	z 	$	} 	/  	$  	#  	#  	  	  	  	  	2  	 )	 	  g  nameg  quoted? CR6@82:JKL 
    h  t  ]Y" g(  6$  "45$  "45$  "45$  "|45$  "  (  45"G	4	5

$  I4
5$  4
	5"45"45"454	5 "E" "     l      g  forms
	{ g  forms	m g  acc		m g  pass-this-one-through?		m g  form		m g  t	 m g  inner-forms	 8 g  level	 8 g  text	 8 g  
inner-form		 8 g  t	
 8 g  	new-level	   g  filenamef  scripts/read-scheme-source.scm
 
	 		 		 		 		 		 	
	  		% 	#	0 		1 		5 		9 		= 	
	@ 		E 	#	P 		Q 		U 		Y 		] 	
	` 		m 		n 		r 		v 		z 	
	} 	  	  	  	  	  	
  	 	  	<  	0  	*  	$ 	0 	 	' 	0 	' 	  	3 		4 	3 	, 
	2 
	. 	9 	? 	@ 	? 	9	2	 	< 	0 	* 	$# 	<* 	0- 	*8 	$8 	; 	/< 	)B 	9D 	)E 	.K 	>M 	.P 	(Z 	]	b	(m	m 	p 	 { 	 R	{  g  nameg  clump CRiMRC       g  m
		,  g  filenamef  scripts/read-scheme-source.scm		V
	0	]
	2	^		5	^
	c
 

 
F 
] 
w 
~
 	
   C6                                                                                                                                                                                                                                                         ccache/scripts/help.go                                                                              0000644                 00000020701 15154557173 0010735 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0!      ] p 4      h	      ] g  guile	 	g  define-module*	 	 	g  scripts	g  help	 		g  filenameS	
f  scripts/help.scm	g  importsS	g  ice-9	g  format	 	 	g  documentation	 	 	g  srfi	g  srfi-1	 	g  selectS	g  fold	g  
append-map	 	 	 	g  exportsS	g  	show-help	g  show-summary	g  
show-usage	 g  main	!  	"g  set-current-module	#" 	$" 	%f  Show a brief help message.	&g  %summary	'f  help
help --all
help COMMAND	(g  	%synopsis	)f  
Show help on guild commands.  With --all, show arcane incantations as
well.  With COMMAND, show more detailed help for a particular command.
	*g  %help	+g  file-exists?	,g  file-is-directory?	-g  opendir	.g  eof-object?	/g  closedir	0g  readdir	1g  string=?	2f  .	3f  ..	4g  directory-files	5g  or-map	6g  string-suffix?	7g  string-null?	8g  	substring	9g  string-length	:g  append	;g  %load-compiled-extensions	<g  %load-extensions	=g  strip-extensions	>g  unique	?g  map	@g  symbol->string	Ag  sort	Bg  in-vicinity	Cg  
%load-path	Dg  string<?	Eg  find-submodules	Fg  display	Gf  lUsage: guild COMMAND [ARGS]
Run command-line scripts provided by GNU Guile and related programs.

Commands:
	Hg  for-each	Ig  string->symbol	Jg  resolve-module	Kg  ensureS	Lg  and=>	Mg  module-variable	Ng  variable-ref	Og  %include-in-guild-list	Pf    ~A ~23t~a
	Qf    ~A
	R 	Sf 
For help on a specific command, try "guild help COMMAND".

Report guild bugs to ~a
GNU Guile home page: <http://www.gnu.org/software/guile/>
General help using GNU software: <http://www.gnu.org/gethelp/>
For complete documentation, run: info guile 'Using Guile Tools'
	Tg  %guile-bug-report-address	Ug  list-commands	Vg  file-commentary	Wg  %search-load-path	Xg  module-filename	Yg  module-commentary	Zg  	last-pair	[g  module-name	\g  module-command-name	]g  current-output-port	^g  string-split	_g  string-append	`f  
 OPTION...	af  Usage: guild 	bg  newline	cf         guild 	df  )No documentation found for command "~a".
	eg  current-module	fg  %mod	gf  --all	hg 	if  -a	ji 	kg  current-error-port	lg  exit	mg  string-prefix?	nf  -	of  No command named "~a".
C 5   hx     ]4	
!5 4$ >  "  G   %&R'(R)*R+,-./0123 
      h     ]!4 5$  4 5$  }4 5"  `45$  4>  "  G  C4545$  "  	4	5$  "  "45"CC             g  dir
	  g  
dir-stream	  g  new		%  g  acc		%  g  t		U	n  g  filenamef  scripts/help.scm
	)
		*			*			*			*			+			+		%	,		&	.		0	.	
	1	0		F	2		M	3		Q	3	&	U	3		U	3		c	4		g	4	&	k	4		r	3		}	6	 	2	 	,	 	,	 	-	 	,	 	7	 	   g  nameg  directory-files C4R56789   h8      ]4 L 5$  #4 5$  CL 
4L 54 56C           g  ext
		4  g  filenamef  scripts/help.scm
	:	
		<			;			@			;		"	B		)	B	0	0	B		2	A	 
		4   C:;<  h      ] O 456  z       g  path
		  g  filenamef  scripts/help.scm
	9
		C	
		:	 		  g  nameg  strip-extensions C=R>     h8      ] (   C (   C  $   6 4 5C          g  l
		5  g  filenamef  scripts/help.scm
	E
		F			G			F			H			H			H			!	F		&	H	+	(	H	#	+	I		,	I		1	I	$	3	I		4	I	 		5  g  nameg  unique C>R?@>A=    h       ]
4 5$  CC             g  x
		 g  rest		 g  stripped				  g  filenamef  scripts/help.scm
	P			Q	,			Q			R			R	+ 			   C4B     h   j   ] 6      b       g  x
		
 g  y		
  g  filenamef  scripts/help.scm
	U	!	
	U	/ 		
	   C   h    ~   ]44 L 556       v       g  path
		  g  filenamef  scripts/help.scm
	O			S			T			U			T			P	 		   CCD 	  h(      ]	4 544O 556         g  head
		& g  shead		&  g  filenamef  scripts/help.scm
	K
		L			L			N			O		$	N		&	M	 		&  g  nameg  find-submodules CERFGHIJKLM&NOPQ       h   ~  ]!4 5 45$  4455"  $  GL $  "  4	5$  "  $  $  
 6
 6CCv      g  name
	  g  modname	  g  mod		  g  summary		7  g  v		S	f  g  filenamef  scripts/help.scm
	b			c			c	 		c			c			d			c		"	e		#	e		&	e	%	,	e	:	.	e	%	2	e		7	c		?	g		E	h		K	i		Q	i	2	S	i		S	i		[	j		^	j		j	g		p	k		u	l		{	l	 	m	 	m	 	    CERST 
    h@      ]4>  "  G  4 O 45>  "  G  	6            g  all?
		;  g  filenamef  scripts/help.scm
	Y
		Z			Z			Z			a			n		#	n		%	n		*	a		7	o		;	o	 		;  g  nameg  list-commands CURVWX    h      ]44 556             g  mod
		  g  filenamef  scripts/help.scm
	x
		z			z			z			y	 		  g  nameg  module-commentary CYR@Z[ h      ]44 556            g  mod
		  g  filenamef  scripts/help.scm
	|
		}			}	"		}			}			}	 		  g  nameg  module-command-name C\R]^M(_\`FabHFcb        h0      ]4L >  "  G  4 L >  "  G  L 6y       g  u
		0  g  filenamef  scripts/help.scm
 		 		 		 		 		0 	 		0   C    h   v  - . , 3 #  45 44 5$  "  44 55
54	>  "  G  4>  "  G  4
>  "  G  O 6      n      g  mod
	  g  port	  g  var		%	E g  usages		I   g  filenamef  scripts/help.scm
	
			*	 		 		# 	1	% 		% 		- 		0 		5 		8 	&	@ 	&	B 		I 		I 		L 		P 		W 		` 		e 		j 		s 	  	  	 	   g  nameg  
show-usage CR]M&Fb hH      - . , 3 #  45 4 5$  4>  "  G  6C        g  mod
		G g  port		G g  var		"	G  g  filenamef  scripts/help.scm
 
	 	,	 		  	"	" 		" 		* 		+ 	
	0 		7 	
	E 	
 		G  g  nameg  show-summary CR]M*FbYd\        h   F  - . , 3 #  45 4 >  "  G  4 >  "  G  4 5$  4>  "  G  64 5$  4>  "  G  6	
4 56    >      g  mod
	  g  port	  g  t		J  g  t		t   g  filenamef  scripts/help.scm
 
	 	)	 		. 		B 		H 		J 		J 		S 			X 		_ 			m 			n 		t 		} 		  		  	  	  	 	   g  nameg  	show-help CR4ei5 fRUhjfklmnJIKo   h     -  1  3  (  6 $  "   $  6"  445 >  "  G  6 (  d4	 5$  " 4
45 5$  4>  "  G  
64>  "  G  6"u       g  args
		  g  name	l  g  t	    g  filenamef  scripts/help.scm
 
	 		 		 		 		 		 		& 	.	' 	!	+ 		0 		5 		: 		C 		P 		P 		S 		W 		X 	!	\ 	1	_ 	5	a 	!	e 		l 		l 		o 		s 		t 	#	} 	  	  	  	  	  	  	  	  	 &		 


  g  nameg  main C RC        g  m
		,  g  filenamef  scripts/help.scm		
	.	!		1	!
	3	"		6	"
	8	#		;	#
	)
-	9
P	E
V	K
	Y
m	x
7	|
9	
 
 
 	 
u 
 	w
   C6                                                                ccache/scripts/snarf-check-and-output-texi.go                                                       0000644                 00000043443 15154557173 0015246 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0G      ]  4   h      ] g  guile	 	g  define-module*	 	 	g  scripts	g  snarf-check-and-output-texi	 		g  filenameS	
f  'scripts/snarf-check-and-output-texi.scm	g  importsS	g  ice-9	g  streams	 	 	g  match	 	 	 	g  exportsS	 	g  set-current-module	 	 	g  %include-in-guild-list	f  8Transform snarfed .doc files into texinfo documentation.	g  %summary	g  make-syntax-transformer	 	 	g  when	 g  macro	!g  $sc-dispatch	"! 	#! 	$g  _	%g  any	&$%	'g  syntax->datum	(' 	)' 	*g  datum->syntax	+* 	,* 	-g  if	.g  begin	/g  syntax-violation	0/ 	1/ 	2f  -source expression failed to match any pattern	3g  unless	4g  not	5g  *manual-flag*	6g  member	7f  --manual	8g  process-stream	9g  current-input-port	:g  stream-null?	;g  
stream-car	<g  snarf_cookie	=g  dispatch-top-cookie	>g  
stream-cdr	?g  
stream-map	@g  string?	Ag  string	Bg  int_hex	Cg  int	Dg  string->number	Eg  int_oct	Fg  int_dec	Gg  id	Hg  string->symbol	Ig  make-stream	Jg  eol	Kg  hash	Lg  port->stream	Mg  read	Ng  error	Og  syntax	Pf  premature end of file	Qg  
brace_open	Rg  consume-multiline	Sg  consume-upto-cookie	Tg  process-singleline	Uf  *premature end of file in directive context	Vg  reverse!	Wg  begin-multiline	Xf  *premature end of file in multiline context	Yg  brace_close	Zg  end-multiline	[g  process-multiline-directive	\g  *file*	]g  *line*	^g  *c-function-name*	_g  *function-name*	`g  *snarf-type*	ag  *args*	bg  *sig*	cg  *docstring*	df  @deffnx {Scheme Procedure} 	eg  *primitive-deffnx-signature*	fg  string-length	gg  *primitive-deffnx-sig-length*	hg  register	ig  length	jg  format	kf  ;~A:~A: ~A's C implementation takes ~A args (should take ~A)	lg  with-output-to-string	mf  ~A	nf   ~A	of   [~A	pf   . ~A	qg  	primitive	rf  @deffnx {C Function} ~A (	sf  , ~A	tf  )
	uf  
~A
	vf  @c snarfed from ~A:~A
	wf  @deffn {Scheme Procedure} ~A
	xg  string=?	yg  	substring	zg  display	{f  
	|f  @end deffn
	}f   	~g  string-append	f  @ f  @@ g  
texi-quote g  SCM G f  invalid argument syntax: ~A g  map g  cdr g  comma  g  paren_close  g  argsig f  unknown doc attribute: ~A g  arglist g  
paren_open  f  invalid arglist syntax: ~A g  void G g  location g  type g  fname g  reverse     g  cname g  symbol->string f   unknown doc attribute syntax: ~A g  argpos G g  
list-index f  9~A:~A: wrong position for argument ~A: ~A (should be ~A)
 g  current-error-port f  unknown check: ~A g  mainC 5     h8  Q  ]4	
5 4 >  "  G   RR4 #&),-.  h      - 1 3   C         g  cond
			 g  body			  g  filenamef  'scripts/snarf-check-and-output-texi.scm
	!
		"	 			
   C      h   {   ]	4 5L 4?6s       g  args
		 g  v			  g  filenamef  'scripts/snarf-check-and-output-texi.scm		!
 		   C12      h(   y   ]	4 5$   O @ 6 q       g  y
		' g  tmp		'  g  filenamef  'scripts/snarf-check-and-output-texi.scm
	!
 		'   C5R43 #&),-4.       h       - 1 3    C            g  cond
			 g  body			  g  filenamef  'scripts/snarf-check-and-output-texi.scm
	$
		%	 			
   C      h   {   ]	4 5L 4?6s       g  args
		 g  v			  g  filenamef  'scripts/snarf-check-and-output-texi.scm		$
 		   C12      h(   y   ]	4 5$   O @ 6 q       g  y
		' g  tmp		'  g  filenamef  'scripts/snarf-check-and-output-texi.scm
	$
 		'   C53R5R67589        h(      -  1  3 4 5$   "   45 6         g  flags
			&  g  filenamef  'scripts/snarf-check-and-output-texi.scm
	)
	
	*			*			*			*			+		 	,		&	,	 				&


  g  nameg  snarf-check-and-output-texi CR:;<=>       h@      ]	4 5$  C4 5&  4 5L 64 5 "            g  input
		; g  token		;  g  filenamef  'scripts/snarf-check-and-output-texi.scm
	/			F			F			G			G			H			H		!	H		$	I		.	I	
	/	K		;	K	
 		;  g  nameg  loop C?@ABCDEFGH 
      h     ]"  "  "  S"  ! $    C4 5$   C C $  #  &  4	5C"" $  #  &  4	5C"" $  !  &  45C"S"O $  !  &  4	5C"#"       g  expr
	  g  w	@	] g  x		@	] g  w	n  g  x		n  g  w   g  x	   g  w   g  x	    	g  filenamef  'scripts/snarf-check-and-output-texi.scm
	/	 		9	"	 	/	 	,	;	(	/	;	"	3	/	 	N	7	(	O	7	-	X	7	"	]	/	 	|	5	(	}	5	- 	5	" 	/	  	3	( 	3	- 	3	" 	/	  	1	( 	1	, 	1	" 	/	  	    CI:;JK> h`      ]"  L45$  C45&  "  $  45"4545C "             g  s
		Z g  s		R g  t			1  g  filenamef  'scripts/snarf-check-and-output-texi.scm
	=	-		>	/		@	4		?	1		A	:		A	4	5	?	1	6	B	:	B	B	4	C	C	?	J	C	N	Q	C	9	R	>	/ 		Z   CLM  h0      ]	O Q 444 5556             g  port
		* g  loop	
	*  g  filenamef  'scripts/snarf-check-and-output-texi.scm
	.
	
	/			/			=	 		D	-	&	=	 	(	/		*	/	 			*  g  nameg  process-stream C8R:NOP;QR>ST     hP   "  ]
4 5$  4>  "  G  "   4 5&  4 56	
 6        g  input
		N g  cont		N g  token		,	N  g  filenamef  'scripts/snarf-check-and-output-texi.scm
	M
		O			O			P			P			P			P		&	R		,	R		1	T		3	T		7	S		:	U		D	U		N	X	 		N	  g  nameg  dispatch-top-cookie C=R:NOU;<V> 	      h     ]"  k45$  4>  "  G  "   45&  "4 45>  "  G  45645""          g  process
		| g  input		| g  cont			| g  acc			q g  input			q g  token		0	q  g  filenamef  'scripts/snarf-check-and-output-texi.scm
	\
		]			_	
		_			`			`			`			`		*	b		0	b		5	d		7	d		;	c		<	e			?	e		J	e			U	f		]	f			b	h		c	h	%	q	h		q	]		r	]		|	]	 		|	  g  nameg  consume-upto-cookie CSRW:NOX;YZ>S[       h`   	  ]	4 5$  4>  "  G  "   4 5&  4>   "  G  L 4 56	
 L6          g  input
		\ g  token	,	\  g  filenamef  'scripts/snarf-check-and-output-texi.scm
	m			o	
		o			p			p			p			p		&	r		,	r		1	t		3	t		7	s		8	u			J	v		R	v			\	x	 		\  g  nameg  loop C:NOX;YZ>S[        h   J  ]4>   "  G  O Q 4 5$  4>  "  G  "   4 5&  4	>   "  G  4
 56 6    B      g  input
		| g  cont		| g  loop			| g  token		L	|  g  filenamef  'scripts/snarf-check-and-output-texi.scm
	j
		k			m		#	o	
	-	o		.	p		2	p		4	p		9	p		F	r		L	r		Q	t		S	t		W	s		X	u			j	v		r	v			|	x	 		|	  g  nameg  consume-multiline CRR\R]R^R_R`RaRbRcR\]^_`abc 	      h       ]         C           g  filenamef  'scripts/snarf-check-and-output-texi.scm
 
	 		 		 		 		 		 		 		 	 
		
  g  nameg  begin-multiline CWRdeR4fiei5gRbh`iaNjk\]_ljm_nopa h   `  ]04>  "  G  "  L $  $4 >  "  G    ""  L$  +4>  "  G  ]"L
$  4>  "  G  "   "  '(  C4>  "  G  ""
 "i
 "-  X      g  args
	  g  r	  g  o		L  g  args		L  g  tail		L  g  tail	    g  filenamef  'scripts/snarf-check-and-output-texi.scm
 		 		 		 		 		  		$ 		% 		* 	"	- 	(	2 		= 	!	@ 	,	H 		L 		Q 		U 		V 		[ 	%	^ 	,	c 		n 	$	q 	,	v 	7  	  	  	  	  	'  	$  	  	  	  	"  	-  	2  	"  	-  	"  	  	  	=  	  	 -	 
   C5qjr^amst  hx   +  ]4>  "  G  (  "  L4>  "  G  "  ) (  "  (4 >  "  G    " "6    #      g  args
	;	d  g  filenamef  'scripts/snarf-check-and-output-texi.scm
 		 		 		 		 		" 		' 	!	* 	&	/ 		; 		A 		F 		K 	%	N 	,	S 		^ 	 	d 		d 		g 	'	m 		r 		t 	 		t
   Cuvwfgxyezc{|  h    ]@  &  "  45$  +44	
455>  "  G  "   &  "  4 O 5$  &  45"  "  4>  "  G  4	
>  "  G  4>  "  G  "  |(  "  ~$  *45$  44
55"  "  $   4>  "  G  "4>  "  G  ""x4>  "  G  6           g  req
	 g  opt	 g  var		 g  all		 g  nice-sig	  g  
scm-deffnx	  g  strings	 g g  
scm-deffnx	 g  g  filenamef  'scripts/snarf-check-and-output-texi.scm
 
	 		 		
 		 		 		 		 		 		  	%	& 		, 		5 		6 		: 		; 		> 		C 		J 	+	T 		Y 		i 	"	m 		t 	  	  	5  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	 	+ 	 	
 	 	 	" 	- 	" 	& 	* 	+ 	0 	5 	@ 	J 	K 	g 	g 	t 	x 	} 	 	 	 C	
  g  nameg  end-multiline CZRf}~yx       hH   #  ]	 4L5$  C4L  545$  "  4L  56         g  i
		E g  ss	!	;  g  filenamef  'scripts/snarf-check-and-output-texi.scm
 		 		 		 		 		 		 	.	! 		! 		$ 		* 	(	, 		0 		2 		< 		A 		C 		E 	 		E  g  nameg  rec C  h      ]	O  Q 
6        g  s
		 g  rec		  g  filenamef  'scripts/snarf-check-and-output-texi.scm
 
	 	 		  g  nameg  
texi-quote CRGNj 
   h@  |  ]1" "   $    $  $  t$  N&  '$  4L 5C44 55644 55644 55644 55644 55644 556 $  *  $  $   """" $   (   	$  C"""   t      g  expr
	= g  w	  g  x		  g  w		1  g  x		1  g  w		B  g  x		B  g  w  g  x	  g  w$5  
g  filenamef  'scripts/snarf-check-and-output-texi.scm
 		X 		_ 		c 		h 		i 	8	s 		u 		x 		} 		~ 	8  	  	  	  	  	8  	  	  	  	  	8  	  	  	  	  	8  	  	  	  	  	8  	  	  	 	 	0 	5 	 '	=  g  nameg  do-args CCNjbaA\]`G~_^c !  h  Z	  ]yO " " " " " =" " L$ 7& $ $  &  $  
		$  		&  o"  456
$  R
(  G
$  -&    C456456""456456456456456456456456$ A& +$  "  $  _	$  ,$  45"  44
4555"  44
4555"  44
4555"  $  	$  l$  ]$  <$  -(  		$  "  "'	"  ""  ""  ""  ""  ""  " C"p"l"h$  &  |$  q$  \&  F$  ;(  0		$   		

&  
  C"""""""""$  X&  B$  7(  ,$  &   C"t"p"l"h"d"`$  X&  B$  7(  ,$  &   C""	""""$  &  o"  `(  4544?5 C$  6$  &	&  	"""|"x""i"e$  b&  L$  A(  6$  &&  4455 C""" """"  "  "  t(  45 C$  J$  0&  "4 564 564 56"$  A$  ,&  $  ")"="9"5"1Q  "       R	      g  l
	 g  expr		 g  w		3d g  x		3d g  w		LH g  x		LH g  w		]: g  x		]: g  w			v g  x	
	v g  w	  g  x	  g  w	   g  w	   g  x	   g  w	 g  x	 g  w	 g  x	 g  w	# g  x	# g  w	= g  x	= g  w		[r g  w	W g  x	W g  w	O g  x	O g  w	K g  x	K g  w		? g  w	
!; g  x	!; g  w	h g  x	h g  w	 g  w	 g  x	 g  w	 g  x	 g  w	 g  w	 g  x	 g  w	. g  x	. g  ls	> g  p-ls	> g  name	K] g  w	g g  w	v g  x		v g  w	 g  x	 g  w	 g  w	
 g  x	
 g  expr	" g  ls	* g  p-ls	* g  string	7? g  w	I g  w	X g  x	X g  w	 g  x	 g  w	 g  x	 g  do-args  Dg  filenamef  'scripts/snarf-check-and-output-texi.scm
 
	 	 	 	 	 	  	 	 	 	 	 	 	 	 	 	 		
							!	&	*	,	/	4	8	:	=	B	F	H	K	P	T	V	Y	^	b	d	g	l	p	r	r 	 	 	 	 	 	 	7 	 	 	 	 	7 	 	  	 	 	7 	 	 	g 	o 		 	1	5		; 		 		 	N 	Q 	(Y 	[ 	` 	 	 	* 	 	
 	"	=	B	w	|																 o	  g  nameg  process-multiline-directive C[R_GCazj\N     h(  {  ]q$  $   $  $  $  $  &  $  $  
		&  o$  f(  ]$  O&  ;45$  (
$  C4	

545 6CCCCCCCCCCC4 564 564 56C    s      g  l
	$ g  w	 g  x		 g  w		6  g  x		6  g  w		G  g  x		G  g  w		`  g  x		`  g  w			q  g  x	
	q  g  w	   g  w	   g  x	   g  idx	    g  filenamef  'scripts/snarf-check-and-output-texi.scm
 
	3		.		,#	 %	 %	 &	 '	 '	 '	
 (	 (	  )	2 (	 *	 (	 1	 1	1	1		1	1	1	1	1	1	 1	"1	 	$  g  nameg  process-singleline CTRiRC I      g  m
		,  g  filenamef  'scripts/snarf-check-and-output-texi.scm		
	0	
	2			5	
	'
	)
	.
	M
	\
u	j
y	|
}	}
	~
	
 
 
 
 
 
 	% 
 	& 
> 
! 
5 
8 
86
 	8
   C6                                                                                                                                                                                                                              ccache/scripts/read-rfc822.go                                                                       0000644                 00000011640 15154557173 0011726 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       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  mainC 5      h8    ]4	
5	 4  >  "  G   !R"#R4$i%5&R4$i'5(R4$i)5*R+R,-.+/&01  h   b   ] L 6      Z       g  c
		
  g  filenamef  scripts/read-rfc822.scm
	A		
	B	 		
   C2 
h   C  ]"  p45$  6"  4 5"$  =45$  ,4 O 
44	55>  "  G  6""4 5"  ;      g  port
	  g  line		v g  acc			v  g  filenamef  scripts/read-rfc822.scm
	<
		=			>			>			?			G		'	G	"	/	G		/	>		6	@		B	@		C	A		O	D		R	D	$	Z	D		[	C		`	A		n	E		v	=		w	=		~	=	* 	=	 	   g  nameg  drain-message C3R+4/&.-/(56789 
hX     ])4 545445544455	5M N C       y      g  reversed-hlines
		Q g  hlines			Q g  first			Q g  m			Q g  name		(	Q g  data		C	Q  g  filenamef  scripts/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  g  nameg  add-header! C:3*-;<=>?@AB 
hX      ]	 $  LC $  M C $  MC $  M$  C4M 5NMC	 6           g  	component
		T g  t	1	L  g  filenamef  scripts/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$  444 555"  HHHO Q "  45$  )$  4>  "  G  "   4 5K"  m4	5$  4 545"$  4>  "  G  "   4 5 "r4 5"_4
J5KO C    ,      g  port
	  g  from	   g  
body-lines		#  g  body		&  g  headers		)  g  add-header!		3  g  line		<  g  current-header		<  g  t		y   	g  filenamef  scripts/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	 "	   g  nameg  parse-message CCRC   h      ] 6}       g  port
		  g  filenamef  scripts/read-rfc822.scm
	q
		r	 		  g  nameg  read-rfc822-silently CR;DE0DF       h      ]  6 w       g  header
		  g  filenamef  scripts/read-rfc822.scm
	v			w		
	w	$		w	1		w	 		   C=G> 	       hX     ]	4 5$  4>  "  G  "   44 5>  "  G  4 56          g  parse
		T g  t			-  g  filenamef  scripts/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  g  nameg  display-rfc822 CHRIJH   h8      -  1  3 44 554>  "  G  C              g  args
			1 g  parse		/  g  filenamef  scripts/read-rfc822.scm
	{
	
	|			|	%		|	0		|	%		|			|			}	 				1


  g  nameg  read-rfc822 CRiKRC           g  m
		0  g  filenamef  scripts/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                                                                                                 ccache/scripts/disassemble.go                                                                       0000644                 00000002174 15154557173 0012304 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0d      ] # 4   h      ] g  guile	 	g  define-module*	 	 	g  scripts	g  disassemble	 		g  filenameS	
f  scripts/disassemble.scm	g  importsS	g  system	g  vm	g  objcode	 	 	g  language	g  assembly	 	g  prefixS	g  asm:	 	 	g  exportsS	 	g  set-current-module	 	 	f   Disassemble a compiled .go file.	g  %summary	g  for-each	 g  asm:disassemble	!g  load-objcode	"g  mainC 5       h  z   ]4	
5 4 >  "  G   R !    h   m   ]4 56   e       g  file
		  g  filenamef  scripts/disassemble.scm
	$			%			%	 		   C        h      -  1  3  6       w       g  files
			  g  filenamef  scripts/disassemble.scm
	#
		$	 			


  g  nameg  disassemble CRi"RC     r       g  m
		,  g  filenamef  scripts/disassemble.scm		
	.	!		1	!
r	#
y	(
 	{
   C6                                                                                                                                                                                                                                                                                                                                                                                                     ccache/scripts/frisk.go                                                                             0000644                 00000024671 15154557173 0011135 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0)      ]  4       h      ] g  guile	 	g  define-module*	 	 	g  scripts	g  frisk	 		g  filenameS	
f  scripts/frisk.scm	g  importsS	g  srfi	g  srfi-1	 	g  selectS	g  filter	g  remove	 	 	 	g  exportsS	g  make-frisker	g  	mod-up-ls	g  mod-down-ls	g  mod-int?	g  	edge-type	g  edge-up	g  	edge-down	 	g  	autoloadsS	g  ice-9	 g  getopt-long	!  	"  	#!" 	$g  set-current-module	%$ 	&$ 	'g  %include-in-guild-list	(f  )Show dependency information for a module.	)g  %summary	*g  
guile-user	+* 	,g  *default-module*	-g  	open-file	.f  r	/g  eof-object?	0g  define-module	1g  def	2g  
use-moduleS	3g  :use-module	4g  regular	5g  autoloadS	6g  	:autoload	7g  autoload	8g  use-modules	9g  for-each	:g  load	;g  primitive-load	<g  computed	=g  string?	>g  format	?f  [computed in ~A]	@g  read	Ag  	grok-proc	Bg  make-object-property	Cg  up-ls	Dg  dn-ls	Eg  int?	Fg  i	Gg  x	Hg  i-or-x	Ig  setter	JI 	KI 	Lg  	make-edge	Mg  car	Ng  cdr	Og  up-ls+!	Pg  dn-ls+!	Qg  assq-ref	Rg  	make-body	Sg  member	Tg  modules	Ug  internal	Vg  external	Wg  i-up	Xg  map	Yg  x-up	Zg  i-down	[g  x-down	\g  edges	]g  scan	^g  default-module	_f  ~A ~A --- ~A --- ~A
	`g  dump-updown	af  ~A ~A
	bf  
			 ~A	~A
	cg  dump-up	dg  	dump-down	ef  frisk	fg  upstream	gg  single-char	hgu 	ifh 	jg  
downstream	kgd 	ljk 	mgi 	nUm 	ogx 	pVo 	qgm 	rg  value	sr 	t^qs 	uilnpt 	vg  
option-ref	wf  $~A ~A, ~A ~A (~A ~A, ~A ~A), ~A ~A

	xg  length	yf  files	zf  modules	{f  internal	|f  external	}f  edges	~g  mainC 5      h  g  ]4	
#5	 4& >  "  G   'R()R+,R-./01234567894        h8      ]	LM$  "  L  $  "   6           g  use
		4 g  t		 g  maybe		2  g  filenamef  scripts/frisk.scm
 	!	 	.	 	.		s	"		s		#	t		'	t		4 	# 			4   C:;<=>?@     h    ]I4 5H" 45$  C$ $  K4L >  "  G  "  (  "  $  "  $  >4L 		$  	"  	>  "  G  "	$  "  
$  #4L >  "  G  "b"Y"N"  $  "4LL O >  "  G  "  f$  "  $  O4L J$  "  L45$  "  
4 5>  "  G  "   45"\45"O45"B            g  filename
	 g  p	 g  curmod		 g  form		 g  t		 g  key		0 g  module		? g  ls		^ g  key		k g  use	   g  maybe		   g  t	`s g  file	w  g  filenamef  scripts/frisk.scm
	o			p				p	"		p			p			x			y			y		)	z		-	y		0	{		0	{		>	}	%	?	}		E	~		F			J		$	R			^ 		d 		k 	%	k 	  	"  	-  	E  	= 	s	" 	s	 	t	 	t	  	"  	(  	"  	  	"  	-  	>  	"  	(  	"  	- 	' 	 	{	! 	1 	!6 	K	{	Z 	^ 	"` 	"v 	.w 	"z 	( 	$ 	( 	3 	( 		q	 		q		z	"	x		q		x	 C	   C  h      ] O C           g  default-module
		 g  	note-use!		  g  filenamef  scripts/frisk.scm
	n
 			  g  nameg  	grok-proc CAR4Bi5 CR4Bi5 DR4Bi5 ERCiRDiREiREFG   h      ]4 5$  CC            g  module
		  g  filenamef  scripts/frisk.scm
 
	 		 		 		 	 		  g  nameg  i-or-x CHR4Bi5 RK   h(      ]445 >  "  G  C          g  type
		% g  up		% g  down			% g  new			%  g  filenamef  scripts/frisk.scm
 
	 		 		
 	 		%	  g  nameg  	make-edge CLRMiRNiRKC    h      ]45 4 56        g  m
		 g  new		  g  filenamef  scripts/frisk.scm
 
	 	2	 	(	 	 			  g  nameg  up-ls+! CORKD h      ]45 4 56        g  m
		 g  new		  g  filenamef  scripts/frisk.scm
 
	 	2	 	(	 	 			  g  nameg  dn-ls+! CPRQ  h   `   ]L  6      X       g  key
		
  g  filenamef  scripts/frisk.scm
 		
 	 		
   C     h   n   ] O C      f       g  alist
		
  g  filenamef  scripts/frisk.scm
 
 		
  g  nameg  	make-body CRRASKCD1ELOP 
     h     ]4M5$  "  =445  >  "  G  445  >  "  G  MN &  4564M5$  "  =445  >  "  G  445  >  "  G  MN4 5M N 4>  "  G  	6            g  type
	  g  d	  g  u		  g  t			Z g  d		Z  g  t		y  g  u	   g  edge	    g  filenamef  scripts/frisk.scm
 		 		 		 		' 	4	, 		5 		A 	4	F 		S 	-	U 		Z 		` 	,	d 		p 	"	q 		y 	  	  	4  	  	  	4  	  	-  	  	"  	/  	"  	0  	$  	$  	$ !	 	   C9RTUEVWXYZ[\ h     ]  H  H4 O 54>  "  G  J4J5	4
J544J554
4J5544J554
4J55J 6       g  default-module
	  g  files	  g  modules		  g  edges		
  g  grok		   g  filenamef  scripts/frisk.scm
 
	 		 		
 		
 		 		 		 		6 		< 		E 		H 		Q 		T 		Y 	!	c 		d 		g 		l 	!	v 		w 		z 		 	!  	  	  	  	!  	  	  	 	 	  g  nameg  scan C]RQ^,]       h   b   ]L  6      Z       g  files
		
  g  filenamef  scripts/frisk.scm
 		
 	 		
   C   h0      -  1  3 4 5$  "  O C        g  options
			/ g  t		% g  default-module	%	/  g  filenamef  scripts/frisk.scm
 
	
 		 	.	 		 		% 	 			/


  g  nameg  make-frisker CR9>_HX      h   s   ]4 54 5C      k       g  edge
		  g  filenamef  scripts/frisk.scm
 		 	#	
 	#	 	 		   CC   h   s   ]4 54 5C      k       g  edge
		  g  filenamef  scripts/frisk.scm
 		 	#	
 	#	 	 		   CD 	       h0      ]4 5 44 5544 556         g  m
		.  g  filenamef  scripts/frisk.scm
 		 		 		 		 		 		 		$ 		, 		. 	 		.   C       h   {   ] 6      s       g  modules
		
  g  filenamef  scripts/frisk.scm
 
	
 	 		
  g  nameg  dump-updown C`R9>aH9>b  h   |   ]4 54 56 t       g  edge
		  g  filenamef  scripts/frisk.scm
 		 	%	 	"	 	3	 	 		   CC       h0      ]44 5 >  "  G  4 56            g  m
		+  g  filenamef  scripts/frisk.scm
 		 		 			 	#	 		# 		+ 	 		+   C  h   w   ] 6      o       g  modules
		
  g  filenamef  scripts/frisk.scm
 
	
 	 		
  g  nameg  dump-up CcR9>aH9>b      h   |   ]4 54 56 t       g  edge
		  g  filenamef  scripts/frisk.scm
 		 	%	 	"	 	3	 	 		   CD       h0      ]44 5 >  "  G  4 56            g  m
		+  g  filenamef  scripts/frisk.scm
 		 		 			 	#	 		# 		+ 	 		+   C  h   y   ] 6      q       g  modules
		
  g  filenamef  scripts/frisk.scm
 
	
 	 		
  g  nameg  	dump-down CdR euvfjUV^,T\>wxyz{|}`cd        h    -  1  3 4 5454545454  544	
4
5554545	45
45445454	54
545>  "  G  $  $  "  "  $  $  "  	"  
6      g  args
		 g  parsed-opts	 g  =u		! g  =d		- g  =i		9 g  =x		E g  files		R g  report		l g  modules		u g  internal			~ g  external	
  g  edges	   g  filenamef  scripts/frisk.scm
 
	
 		 		 		 		 		 					%	!		! 		$		*	%	-		- 		0		6	%	9		9 		<		B	%	E		E 		H		M	+	P	/	R		R 		U			V			Z
		[		a	3	e		f
		h			l			l 		o		s		u		u 		x		|		~		~ 	 	 	 	  	 	 	 	  	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 		 I		


  g  nameg  frisk CRi~RC      _      g  m
		0  g  filenamef  scripts/frisk.scm		a
	4	i
	6	j		9	j
	;	l		>	l
	n
 	 
 	 
 	 
 
 
 
 
 	 
	 
	 
	 

W 
 
) 
 
 
^ 
z 
 
 

 !	
   C6                                                                        ccache/scripts/scan-api.go                                                                          0000644                 00000024553 15154557173 0011511 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0S)      ]  4        hT	      ] g  guile	 	g  define-module*	 	 	g  scripts	g  scan-api	 		g  filenameS	
f  scripts/scan-api.scm	g  importsS	g  ice-9	g  popen	 	 	g  rdelim	 	 	g  regex	 	 	 	g  exportsS	 	g  set-current-module	 	 	g  %include-in-guild-list	f  2Generate an API description for a Guile extension.	g  %summary	g  set-object-property!	 g  put	!g  object-property	"g  get	#g  	add-props	$g  make-regexp	%g  	open-pipe	&g  	OPEN_READ	'g  eof-object?	(g  regexp-exec	)g  	read-line	*g  scan	+f   ^.guile.+: ([^ 	]+)([ 	]+(.+))*$	,g  format	-f  ~A -c '~S ~S'	.g  use-modules	/g  session	0/ 	1.0 	2g  apropos	3f  .	423 	5g  string->symbol	6g  match:substring	7g  Scheme	8f   	9g  
hashq-set!	:g  scan-Scheme!	;f  ^[0-9a-fA-F]+ ([B-TV-Z]) (.+)$	<f  nm ~A	=g  C	>g  hashq-get-handle	?g  error	@f  both Scheme and C:	Ag  scan-C!	Bg  current-module	Cg  THIS-MODULE	Dg  memq	Eg  groups	Fg  	in-group?	Gg  string-match	Hg  string-append	If  ^	Jg  symbol->string	Kg  name-prefix?	Lg  add-group-name!	Mg  eval	Ng  name	Og  make-grok-proc	Pg  make-members-proc	Qg  	make-hook	Rg  for-each	Sg  assq-ref	Tg  members	Ug  grok	Vf  +bad grouping, must have `members' or `grok'	Wg  	add-hook!	Xg  description	Yg  read	Zg  	open-file	[g  make-grouper	\g  list-ref	]g  catch	^] 	_] 	`g  make-hash-table	ag  sort	bg  	hash-fold	cg  string	dg  	scan-data	e7 	f= 	gg  run-hook	hg  string<?	if  +;;; generated by scan-api -- do not edit!

	jf  (
	kf  (meta
	lf    (GUILE_LOAD_PATH . ~S)
	mg  getenv	nf  GUILE_LOAD_PATH	of    (LTDL_LIBRARY_PATH . ~S)
	pf  LTDL_LIBRARY_PATH	qf    (guile . ~S)
	rf    (libguileinterface . ~S)
	sf  (.+)	tf  ~A -c '(display ~A)'	ug  %guile-build-info	vg  quote	wg  libguileinterface	xvw 	ySux 	zf    (sofile . ~S)
	{f    ~A
	|g  append	}g  map	~g  
hook->list	7=  f  ) ;; end of meta
 f  (interface
 f  (~A ~A (scan-data ~S))
 f  ) ;; end of interface
 f  	) ;; eof
 g  mainC 5       hX     ]4	
5 4 >  "  G   RRi R!i"R        hP     - 1 3 "  4(   C4 >  "  G  ""              g  object
			I g  args			I g  args			A g  key			A g  value			A  g  filenamef  scripts/scan-api.scm
	I
		J			K			M			N			M		"	O	
	:	P		A	P	
	A	J	 			I
  g  nameg  	add-props C#R$%&'()   hp   J  ]#4 545"  I45$  C45$  4>  "  G  "   45"45"B      g  re
		p g  command		p g  match			p g  rx			p g  port			p g  line			c g  t		!	c g  t		5	V  g  filenamef  scripts/scan-api.scm
	R
		S		
	T			S			U			V	
	!	V		-	X		5	X		W	Y		c	Y		c	U		d	U		p	U	 		p	  g  nameg  scan C*R*+,-1456 789      hP      ]44 5544 	5$  "  >  "  G  L 6             g  m
		J g  x		J g  t		!	4  g  filenamef  scripts/scan-api.scm
	a			b			b	#		b			b	
		c			c			c		!	c		1	d		9	c		J	e	 		J   C h       ]45 O 6          g  ht
		 g  guile		  g  filenamef  scripts/scan-api.scm
	[
		\			]			]			_			`			]			\	 				  g  nameg  scan-Scheme! C:R*;,<56 =>?@9 	    hh      ]	44 	55444 55>  "  G  4L 5$  4>  "  G  "   L 6              g  m
		a g  x		a  g  filenamef  scripts/scan-api.scm
	j			k			k	#		k			k	
		l			l			l			l	&	&	l		+	l		4	m		@	m		A	n		E	n		L	n		a	o	 		a   C        h       ]45 O 6              g  ht
		 g  sofile		  g  filenamef  scripts/scan-api.scm
	g
		h			i			i			i			h	 			  g  nameg  scan-C! CAR4Bi5 CRD"E  h      ]4 56              g  x
		 g  group		  g  filenamef  scripts/scan-api.scm
	s
		t			t			t			t	 			  g  nameg  	in-group? CFRGHIJ  h      ]454 56         g  x
		 g  prefix		  g  filenamef  scripts/scan-api.scm
	v
		w				w			w			w	+		w	 			  g  nameg  name-prefix? CKR E"        h      ] 4 56         g  x
		 g  name		  g  filenamef  scripts/scan-api.scm
	y
		z				z			z	#		z			z			z	 			  g  nameg  add-group-name! CLRMCL      h   ~   ]4L 5$   L 6C v       g  x
		  g  filenamef  scripts/scan-api.scm
	~								 	 		  g  nameg  p C N   h8      ]45O  Q 4 >  "  G  C         g  name
		6 g  form		6 g  
predicate?			6 g  p			6  g  filenamef  scripts/scan-api.scm
	|
		}			}		 		$ 		+ 	 		6	  g  nameg  make-grok-proc CORDL    h       ]4 L5$   L 6C       y       g  x
		  g  filenamef  scripts/scan-api.scm
 		 		 		 	 		  g  nameg  p C N        h0      ]
O  Q 4 >  "  G  C            g  name
		+ g  members		+ g  p			+  g  filenamef  scripts/scan-api.scm
 
	 		 		 		  	 		+	  g  nameg  make-members-proc CPRQRRSTU?VW#OXP     hx   k  ] 4 54 5$  "  $  "  4>  "  G  L $  445	4 	55"  	4
56c      g  gdef
		x g  name		x g  members			x g  grok			x  g  filenamef  scripts/scan-api.scm
 		 		 		 	(	 		 		 	%	 		 	
	# 		2 		6 		; 		M 		N 		Q 	&	X 	;	[ 	&	] 	&	^ 	&	d 	5	f 	&	h 		m 		x 	 		x   CYZ&    h       ]L O 44 556     w       g  file
		  g  filenamef  scripts/scan-api.scm
 		 		 		 		 	 		   C      h(      ]	454O  >  "  G  C         g  files
		& g  hook		&  g  filenamef  scripts/scan-api.scm
 
	 		 		 	 		&  g  nameg  make-grouper C[R\_[  h   Z   ] L 6      R       g  filenamef  scripts/scan-api.scm
 		 	3	
 	% 		

   C    h   ]   -  1  3 C     U       g  args
			  g  filenamef  scripts/scan-api.scm
 	 			


   C`:Aab#cJd"7=Eefg       h   \  ]4 4 54 5$  "  	4 54 5$  	"  
>  "  G  L $  4L  >  "  G  "    C   T      g  key
		} g  value		} g  prior-result			} g  t			5  g  filenamef  scripts/scan-api.scm
 	 	 	"		 	#	
 	+	 	#	 	2	 	;	 	2	 	.	* 	2	0 	;	2 	2	7 	#	8 	/	> 	8	@ 	/	D 	+	F 	/	L 	/	Q 	"	_ 	"	` 	/	| 	" 		}	   Ch"c  h      ]4 5456       g  a
		 g  b		  g  filenamef  scripts/scan-api.scm
 		 	!	 	(	 	!	 	!	 	(	 	!	 	 				   C,ijklmn8opqr*sty6    h   j   ]4 5N C  b       g  m
		  g  filenamef  scripts/scan-api.scm
 		 	*	 	" 		   Cz{E|}"N    h   j   ] 6      b       g  p
		
  g  filenamef  scripts/scan-api.scm
 	-	 	@	
 	9 		
   C~R,E"d      h       ] 4 54 56       g  x
		   g  filenamef  scripts/scan-api.scm
 		 		 	 	 	(	 	/	 	(	 		 		 	!	 		  	 		    C +      h   "  -  1  3 4 
54 54 O 5454>  "  G  4>  "  G  44	
O 554>  "  G  4>  "  G  4>  "  G  445$  "  >  "  G  445$  "  >  "  G  4>  "  G  4H445O >  "  G  J>  "  G  4>  "  G  44 $  4!"4#55"  $5>  "  G  4%>  "  G  4&>  "  G  4'(>  "  G  4)>  "  G  4*>  "  G  C          g  args
		 g  guile	0 g  sofile		0 g  grouper		0 g  ht		0 g  all		v g  t	   g  t	   g  i	'S  	g  filenamef  scripts/scan-api.scm
 
	
 		 		 		) 		0 		9 		M 		a 		d 		n 	 	r 		v 		v 		y 		~ 	  	  	  	  	  	  	  	  	  	  	  	  	  	  	-  	  	  	  	  	  	  	  	/ 	 	 	 	! 	& 	' 	* 	. 	/ 	4 	!8 	: 	F 	X 	a 	f 	m 	v 	{ 	} 	~ 	 	$ 	( 	- 	( 	( 	$ 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 S		


  g  nameg  scan-api CRiRC         g  m
		,  g  filenamef  scripts/scan-api.scm		=
	0	C
	2	D		5	D
	<	F
	C	G
	I
	R
	[

	g
	q		q
	s
		v

	y
{	|
; 
 
M 
T 
 	V
   C6                                                                                                                                                      ccache/scripts/summarize-guile-TODO.go                                                              0000644                 00000021024 15154557173 0013666 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0!      ] } 4 h      ] g  debug-enable	g  	backtrace	g  guile	 	g  define-module*	 	 	g  scripts		g  summarize-guile-TODO	
	 	g  filenameS	f   scripts/summarize-guile-TODO.scm	g  importsS	g  read-text-outline	 	 	g  ice-9	g  getopt-long	 	 	 	g  exportsS		 	g  	autoloadsS	g  srfi	g  srfi-13	 	g  string-tokenize	 	g  srfi-14	 	 g  char-set	!  	"g  common-list	#" 	$g  remove-if-not	%$ 	&!#% 	'g  set-current-module	(' 	)' 	*g  %include-in-guild-list	+f  A quaint relic of the past.	,g  %summary	-g  set-object-property!	.g  put	/g  object-property	0g  get	1g  who	2g  map	3g  string->symbol	4g  pct-done	5g  string->number	6g  as-leaf	7g  parent	8g  for-each	9g  hang-by-the-leaves	:g  make-text-outline-reader	;f  =(([ ][ ])*)([-+])(D*)(R*)(X*)(([0-9]+)%)* *([^[]*)(\[(.*)\])*	<g  level-substring-divisor	=<		>g  body-submatch-number	?>			@g  extra-fields	Ag  status	BA		Cg  design?	DC		Eg  review?	FE		Gg  	extblock?	HG		I4		J1		K@BDFHIJ 	L=?K 	Mg  	open-file	Nf  r	Og  	read-TODO	Pg  
option-ref	Qg  involved	Rg  memq	Sg  personal	Tg  reverse	Ug  todo	Vg  string=?	Wf  -	Xg  done	Yf  +	Zg  review	[g  select-items	\g  format	]f   ~A	^f   	_f  under : ~A~A
	`g  make-string	af   status: ~A~A~A~A~A~A
item  : ~A
	bf  D	cf  R	df  X	ef   ~A%	fg  make-display-item	gg  	no-parent	hg  display-items	if  summarize-guile-TODO	jg  single-char	kjw 	l1k 	mjn 	ngm 	oji 	pg  value	qp 	rQoq 	sjp 	tSsq 	ujt 	vUu 	wjd 	xXw 	yjr 	zZy 	{lnrtvxz 	|g  mainC 5h     ]4i>  "  G  4
&5	 4) >  "  G   *R+,R-i.R/i0R01.23 45 
      h   2  ]	4 5$  -4 444:555>  "  G  "   4 5$  4 4	5>  "  G  "    C       *      g  x
		y g  t		C g  t	L	v  g  filenamef   scripts/summarize-guile-TODO.scm
	Q
		R					R			R				R			T			T			U		 	V		%	V	-	-	V		/	U		4	T		D	W			J	W		L	W			L	W		U	Y		[	Y		\	Y		g	Y	 		y  g  nameg  as-leaf C6R.78 h   w   ]L L 6     o       g  child
		  g  filenamef   scripts/summarize-guile-TODO.scm
	b	%			c	3		c	' 		   C6    hX      ] $  '4 >  "  G   LO  64 >  "  G  4 5M N C           g  tree
		T g  parent		T  g  filenamef   scripts/summarize-guile-TODO.scm
	^			_				_		
	a			a	 		a	+		a		.	d	%	0	b		1	f		7	f	%	>	f		G	g	.	P	g	(	R	g	 		T	  g  nameg  hang C8 h   n   ]L  6       f       g  tree
			  g  filenamef   scripts/summarize-guile-TODO.scm
	h				i	 			   C       h8      ]HO Q 4O  >  "  G  JC           g  trees
		4 g  leaves		4 g  hang			1  g  filenamef   scripts/summarize-guile-TODO.scm
	\
		]			]			^			h	 		4  g  nameg  hang-by-the-leaves C9R9:;LMN   h       ]4454 556            g  file
		  g  filenamef   scripts/summarize-guile-TODO.scm
	m
		o			o		
	p			q			o			y			y			y			o			n	 		  g  nameg  	read-TODO CORPQ301R h       ]4 5$  L 4 56C       g  x
		   g  filenamef   scripts/summarize-guile-TODO.scm
 		 	$		 	+	 	$	 		 	,	 	3	 	,	 	$ 
		    CS01T        h(      ]	4 5$  45L CC              g  x
		! g  t		!  g  filenamef   scripts/summarize-guile-TODO.scm
 		 	&		 	-	 	&	 		 	5	 	0	 	+ 			!   C8P       h       ]4L 5$  
 M N CC          g  pair
		  g  filenamef   scripts/summarize-guile-TODO.scm
 		 		
 	%	 		 		 	'	 	!	 	 			   CUV0AW    h      ]4 56              g  x
		  g  filenamef   scripts/summarize-guile-TODO.scm
 		 	/	 	6	 	/	 	?	 	% 		   CXV0AY h      ]4 56              g  x
		  g  filenamef   scripts/summarize-guile-TODO.scm
 		 	/	 	6	 	/	 	?	 	% 		   CZ0E     h   v   ] 6      n       g  x
		
  g  filenamef   scripts/summarize-guile-TODO.scm
 		 	.	
 	' 		
   CT$   h   +  ]H4 5$  45O JK"   4 5$  45O JK"   4 O 	
 >  "  G  "  !(  645"4J5"#      g  p
	  g  items	  g  sub		  g  t			6 g  u			/ g  t		@	g g  u		O	` g  sub	   g  items	    	g  filenamef   scripts/summarize-guile-TODO.scm
	{
		|			|			}			}			}			}								* 		, 		7 		= 		@ 		@ 		I 		O 		[ 		] 		h 		u 	  	  	  	  	
  	  	  	)  	  	
  	  	  	 "	 	  g  nameg  select-items C[R01\]^   h       ]	4 5$  	6C        g  item
		 g  t		  g  filenamef   scripts/summarize-guile-TODO.scm
 		 			 	 	 		 		 	2	 	'	 	 			   C^      h   p   ]C   h       g  item
		  g  filenamef   scripts/summarize-guile-TODO.scm
 		 	 		   C\_`07  hX     ]"  <$  444 5>  "  G  45	"C4 5	"         g  item
		U g  parent		B g  indent			B  g  filenamef   scripts/summarize-guile-TODO.scm
 		 		 		 		 	#	 	 	" 		+ 		1 	*	3 		8 	3	@ 		B 		C 	"	I 	,	K 	"	U 	 		U   Ch   g   ]C    _       g  item
		  g  filenamef   scripts/summarize-guile-TODO.scm
 	 		   C\a0ACb^EcGd4e   h     ]	44 54 5$  "  4 5$  	"  4 
5$  "  4 5$  45"  4L 5 >	  "  G  L  6      g  item
	  g  t	Y	t  g  filenamef   scripts/summarize-guile-TODO.scm
 		 		 			 		 		 		 		 		 		 		  	&	& 	*	' 		- 		/ 		3 		5 	&	; 	*	< 		B 		D 		H 		J 	(	P 	,	Q 		W 		Y 		Y 		b 		g 	%	k 		q 		u 	  	  	 $	    C  h0      ] $  "  $  "  O C           g  	show-who?
		, g  show-parent?		, g  show-who			, g  show-parents			,  g  filenamef   scripts/summarize-guile-TODO.scm
 
	 			 			 	 		,	  g  nameg  make-display-item CfRfP1g8 h(     ]
44 54 556        g  p
		& g  items		& g  display-item			&  g  filenamef   scripts/summarize-guile-TODO.scm
 
	 		 	)	 	7	 	)	 	.	 	<	 	.	 	)	 		 		& 	 		&	  g  nameg  display-items ChRi{h[OP      hH   '  -  1  3 4 54444555>  "  G  C          g  args
			D g  p		B  g  filenamef   scripts/summarize-guile-TODO.scm
 
	
 		 		 		 		 		 		 		 		" 	%	% 	5	* 	C	- 	5	. 	0	0 	%	2 		7 	 			D


  g  nameg  summarize-guile-TODO C	R	i|RC            g  m
	-	D  g  filenamef   scripts/summarize-guile-TODO.scm		A
			A			A
		C
	H	K
	J	L		M	L
	T	N
	[	O
5	Q
	\
	m
	{
 
  
 
 
 	
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                             ccache/scripts/doc-snarf.go                                                                         0000644                 00000040700 15154557173 0011662 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0A      ]  4        h!      ] g  foo	g  bar	g  foo/bar	f  0.0.2	g  doc-snarf-version	g  guile	 	g  define-module*		 	
 	g  scripts	g  	doc-snarf	 	g  filenameS	f  scripts/doc-snarf.scm	g  importsS	g  ice-9	g  getopt-long	 	 	g  regex	 	 	g  
string-fun	 	 	g  rdelim	 	 	 	g  exportsS	  	!g  set-current-module	"! 	#! 	$f  $Snarf out documentation from a file.	%g  %summary	&g  version	'g  single-char	('v 	)g  value	*) 	+&(* 	,g  help	-'h 	.,-* 	/g  output	0'o 	1) 	2/01 	3g  texinfo	4't 	534* 	6g  lang	7'l 	8671 	9+.258 	:g  command-synopsis	;g  display	<f  
doc-snarf 	=g  newline	>g  display-version	?f  (Usage: doc-snarf [options...] inputfile
	@f  6  --help, -h              Show this usage information
	Af  3  --version, -v           Show version information
	Bf  ?  --output=FILE, -o       Specify output file [default=stdout]
	Cf  3  --texinfo, -t           Format output as texinfo
	Df  5  --lang=[c,scheme], -l   Specify the input language
	Eg  display-help	Ff  	doc-snarf	Gg  
option-ref	Hg  string->symbol	Ig  string-downcase	Jf  scheme	Kg  
snarf-file	Lg  main	Mg  c	Nf  ^/\*(.*)	Of  ^ \*/	Pf  	^ \* (.*)	Qf  	^ \*-(.*)	Rf  NOTHING AT THIS TIME!!!	SMNOPQR 	Tg  scheme	Uf  ^;; (.*)	Vf  ^;;\.	Wf  ^;;-(.*)	Xf  	^\(define	YTUVUWX 	ZSY 	[g  supported-languages	\g  list-ref	]g  assq-ref	^g  docstring-start	_g  docstring-end	`g  docstring-prefix	ag  option-prefix	bg  signature-start	cg  std-int-doc?	dg  	lang-parm	eg  memq	fg  map	gg  car	hg  error	if  .doc-snarf: input language must be c or scheme.	jg  write-output	kg  snarf	lg  format-texinfo	mg  format-plain	ng  unread-string	og  read	pg  length	qg  define	rg  lambda	sg  string?	tg  find-std-int-doc	ug  separate-fields-discarding-char	vg  string-append	wg  split-prefixed	xg  open-input-file	yg  make-regexp	zg  eof-object?	{g  close-input-port	|g  reverse	}g  neutral	~g  regexp-exec	g  	read-line g  
doc-string g  match:substring g  options f  
internal:  g  append g  parse-entry g  entry g  
make-entry g  entry-symbol g  entry-signature g  entry-docstrings g  entry-options g  entry-filename g  
entry-line g  
get-symbol g  make-prototype f    g  call-with-input-string g  	read-char g  join-symbols g  symbol->string f  .  f    g  with-output-to-port g  open-output-file g  current-output-port g  for-each f  
 f  @c snarfed from  f  : f  @deffn procedure  g  
write-line f  @c  f  
@end deffn f  Procedure:  f  ;;  f  Snarfed from  f  C 5  h@3  v  ]      h      ] $  CC  ~       g  braz
		  g  filenamef  scripts/doc-snarf.scm
	1
		2		
	2			2	 		  g  nameg  foo/bar CRR4
 5 4# >  "  G   $%R9:R;<=  h0      ] 4>  "  G  4>  "  G  6              g  filenamef  scripts/doc-snarf.scm
	`
		a			a			a			a		*	a	5 		*
  g  nameg  display-version C>R;?@ABCD        hh      ] 4>  "  G  4>  "  G  4>  "  G  4>  "  G  4>  "  G  6             g  filenamef  scripts/doc-snarf.scm
	e
		f			f			f			g			g			g		'	h		+	h		0	h		9	i		=	j		B	i		K	k		O	k		T	k		`	l		b	l	 		b
  g  nameg  display-help CERF:G,&3HI6J>E/K   h   Z  -  1  3 4 545454544	4
555$  6 $  6 4545$  66    R      g  args
		  g  options	  g  help-wanted		J  g  version-wanted		J  g  texinfo-wanted		J  g  lang		J  g  input		y  g  output		y   g  filenamef  scripts/doc-snarf.scm
	p
	
	q			q	$		q			q			q			r			r	+	!	r		"	s		(	s	.	+	s		,	t		2	t	.	5	t		6	u		9	v		<	v	"	B	v	6	D	v	<	F	v	"	H	v		J	u		J	r		X	w		\	x		b	w		f	y		g	{		l	{	)	o	{		p	|		v	|	*	y	|		y	{	  	 	}	
  	  	  	 )		 


  g  nameg  	doc-snarf CRiLRZ[R\][^_`abc 
hh      ]4 5$  
"  K$  "  =$  	"  .$  	"  $  	"  	$  	"  6       g  lang
		h g  parm		h  g  filenamef  scripts/doc-snarf.scm
 
	 		 		h 	 		h	  g  nameg  	lang-parm CdRefg[hijklm       hP     ]4455$  "  4>  "  G  4 5$  	"  
6      g  input
		P g  output		P g  texinfo?			P g  lang			P g  t			3  g  filenamef  scripts/doc-snarf.scm
 
	 		 		 		 		 		# 		( 		6 		F 		P 	 		P	  g  nameg  
snarf-file CKRnopqrs     h   )  ]
4 >  "  G  45$  "  o	45$  _&  T$  I$  =	45$  *&  45$  	CCCCCCCC	45$  @&  3$  &$  45$  C"O"K"G"C"?C   !      g  line
	  g  
input-port	  g  form		   g  filenamef  scripts/doc-snarf.scm
 
	 		 		 		" 		& 		- 		4 		8 		: 		= 		A 		D 		F 		J 		M 		P 		T 		W 		\ 		` 		a 		e 		g 		j 	"	m 		q 		r 		w 	 	z 		~ 	  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	 5	 	  g  nameg  find-std-int-docg  documentationf  Unread @var{line} from @var{input-port}, then read in the entire form and
return the standard internal docstring if found.  Return #f if not. CtRufv        h   e   ]L  6      ]       g  line
		
  g  filenamef  scripts/doc-snarf.scm
 	
	
 	 		
   C        h   h   -  1  3 L O  6  `       g  lines
			  g  filenamef  scripts/doc-snarf.scm
 		 	 			


   C     h      ]
 O 6              g  string
		 g  prefix		  g  filenamef  scripts/doc-snarf.scm
 
	 	 			  g  nameg  split-prefixed CwRxyd^_`abz{|}~ctw      h  u	  ]4 544554455445544554455" 74	5$  4
>  "  G  6	&  [45$  *4545 
	"45	
	"z	& m45454545$  *4545

	"$  +45
45
	"$  45$  &45$  45"  "  $  4455"  454
 5
	"Z$  /454
 5
	"%45
	"	& 2454545$  +45
45
	"$  45$  &45$  45"  "  $  4455"  454
 5
	" $  /454
 5
	"45
	"C45

	"     m	      g  
input-file
	 g  lang	 g  i-p			 g  docstring-start		 g  docstring-end		) g  docstring-prefix		9 g  option-prefix		I g  signature-start		Y g  line		_ g  state			_ g  doc-strings	
	_ g  options		_ g  entries		_ g  lno		_ g  m	   g  m0	Z g  m1	Z g  m2	Z g  m3	Z g  d	 g  int-doc	 g  options	 g  m1	} g  m2	} g  m3	} g  d	 g  int-doc	 g  options	?  g  filenamef  scripts/doc-snarf.scm
 
	 			 		 	%	 	2	 	(	 	2	 	%	 		 	%	 	2	% 	(	' 	2	) 	%	) 		, 	%	/ 	2	5 	(	7 	2	9 	%	9 		< 	%	? 	2	E 	(	G 	2	I 	%	I 		L 	%	O 	2	U 	(	W 	2	Y 	%	Y 		_ 		` 		j 		k 	  	  	  	  	  	  	
  	  	   	  	  	-  	9  	  	  	&  	*  	6  	 	  	 	 	 					
 	(	 )		3		4		:9
	I	O	
P	X	 [	"e	j	z		
 	  	0 	  	 	) 	  	" 	) 	; 	) 	 	 	 	 				"	+	/					
		 	)	-	'	*	:	;	C	 D	)E	-J	9Z	^	b 	c 	l!	u"	} 	#	
%	%	 &	"&	'	%	#	
 	  	0 	  	 	) 	  	" 	) 	; 	) 	 	 	 	 	)	*	*	"*	+*	/+	,+	/-	?*	E#	
F/	N/	 O/	)P/	-Q0	a0	d2	t/	u4	}4	 ~4	)4	-4	94	 	 	 	+ 	B 	 	$ 	 		  g  nameg  snarf CkR  h      ]  C           g  symbol
		 g  	signature		 g  
docstrings			 g  options			 g  filename			 g  line			  g  filenamef  scripts/doc-snarf.scm
6
	7	
	7	 			  g  nameg  
make-entry CR h   z   ] C r       g  e
		  g  filenamef  scripts/doc-snarf.scm
8
	9	 		  g  nameg  entry-symbol CR h   }   ] 	Cu       g  e
		  g  filenamef  scripts/doc-snarf.scm
:
	;	 		  g  nameg  entry-signature CR      h   ~   ] 	Cv       g  e
		  g  filenamef  scripts/doc-snarf.scm
<
	=	 		  g  nameg  entry-docstrings CR     h   {   ] 	Cs       g  e
		  g  filenamef  scripts/doc-snarf.scm
>
	?	 		  g  nameg  entry-options CRh   |   ] 	Ct       g  e
		  g  filenamef  scripts/doc-snarf.scm
@
	A	 		  g  nameg  entry-filename CR       h      ] 	C       g  e
		  g  filenamef  scripts/doc-snarf.scm
B
	D	 		  g  nameg  
entry-lineg  documentationf  4This docstring will not be snarfed, unfortunately... CR|pH 	      h   A  ]$  545454 5454 54564 5
$  =44 554 54 5454 54564 5454 5456      9      g  
docstrings
	  g  options	  g  def-line		  g  filename		  g  line-no		   g  filenamef  scripts/doc-snarf.scm
I
	K		M		N		N	+	 O		+P		2P		3P	3	:P		;P		=M		>Q		FQ		JK		MR		PR	%	WR	 	YR		ZS		aS		bT		iT		jU		uV		|V		}V	2 V	 V	 R	 X	 X	 X	 X	- Y	 Y	 Y	2 Y	 Y	 X	 )	 	  g  nameg  parse-entry CRo   hP      ]	4 >  "  G  4 >  "  G  4 5$  6$  6C           g  s-p
		L g  tmp	-	L  g  filenamef  scripts/doc-snarf.scm
a		b		c		'd		-b		2f			6e		<g			?h			Ce		Ii			Kk		 		L   C       h      ] 6      {       g  def-line
		
  g  filenamef  scripts/doc-snarf.scm
^
	
_	 		
  g  nameg  make-prototype CRo     hH      ]	4 >  "  G  4 >  "  G  4 5$  C$  CC        g  s-p
		G g  tmp	-	G  g  filenamef  scripts/doc-snarf.scm
p		q		r		's		-q		2u			6t		9v			=w			At		Fz		 		G   C        h      ] 6      w       g  def-line
		
  g  filenamef  scripts/doc-snarf.scm
m
	
n	 		
  g  nameg  
get-symbol CRv      hH     ] (  C $  4 56 (   64 54 56           g  s
		C  g  filenamef  scripts/doc-snarf.scm
~
			
															"		&		+		-			0		5	(	7		9	1	:	5	?	C	A	5	C		 		C  g  nameg  join-symbols CR    h   R   ] LL 6      J       g  filenamef  scripts/doc-snarf.scm
		
	 		

   C   h(      ]$  45"  45  O 6          g  entries
		% g  output-file		% g  writer			%  g  filenamef  scripts/doc-snarf.scm

	
			*		#	%	 		%	  g  nameg  write-output CjR;=        h   b   ] 6Z       g  s
		  g  filenamef  scripts/doc-snarf.scm
			 		   C;  h    }   ]4>  "  G   6      u       g  s
		  g  filenamef  scripts/doc-snarf.scm
					!				( 		   C  h    ]4>  "  G  44 5>  "  G  4>   "  G  4>  "  G  44 5>  "  G  4>  "  G  44 5>  "  G  4>   "  G  4	>  "  G  44
 5>  "  G  4>   "  G  44 5>  "  G  44 5>  "  G  6        g  entry
	  g  filenamef  scripts/doc-snarf.scm

											#		,		<		@		E		N		Q		\		e		i		n		w		z	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 			 %	  g  nameg  format-texinfo ClR;=       h   b   ] 6Z       g  s
		  g  filenamef  scripts/doc-snarf.scm
			 		   C;  h    }   ]4>  "  G   6      u       g  s
		  g  filenamef  scripts/doc-snarf.scm
					!				( 		   C  h     ]4>  "  G  44 5>  "  G  4>   "  G  44 5>  "  G  44	 5>  "  G  4
>  "  G  44 5>  "  G  4>  "  G  44 5>  "  G  4>   "  G  6   w      g  entry
	   g  filenamef  scripts/doc-snarf.scm

											#		,		<		A		L		U		Z		e		n		r		w	 	 	 	 	 	 	 	 	 	 	 	 	 	   g  nameg  format-plain CmRC    n      g  m
    g  filenamef  scripts/doc-snarf.scm 	1
 	J	 	J
 	N
 	U	 	U
 	X	 	W
	`
3	e
U	p
\ 
^ 	a 
 
	 
T 
8 
 
6
U8
:
<
 >
 @
!B
$I
&^
(Rm
)~
+S
/
3:
 "	3<
   C6                                                                 ccache/scripts/snarf-guile-m4-docs.go                                                               0000644                 00000007053 15154557173 0013472 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] 3 4   hS      ] g  guile	 	g  define-module*	 	 	g  scripts	g  snarf-guile-m4-docs	 		g  filenameS	
f  scripts/snarf-guile-m4-docs.scm	g  importsS	g  ice-9	g  rdelim	 	 	 	g  exportsS	 	g  set-current-module	 	 	g  %include-in-guild-list	f  /Snarf out texinfo documentation from .m4 files.	g  %summary	g  display	f  @deffn {Autoconf Macro}	g  for-each	g  string=?	f  #	g  	substring	g  string-length	 f  # 	!g  newline	"f  
@end deffn	#g  display-texi	$g  catch	%$ 	&$ 	'g  prefix?	(g  list->string	)g  reverse	*g  string->list	+g  massage-usage	,g  	open-file	-f  r	.g  eof-object?	/f  # Usage:	0g  	read-line	1f  AC_DEFUN	2g  mainC 5h	     ]4	
5 4 >  "  G   RR !  h      ]4"  &44 
55$  4 5"  B "  <4 5	$  *44 
	55$  4 	5"  ""  ">  "  G  6            g  line
		|  g  filenamef  scripts/snarf-guile-m4-docs.scm
	*			+		
	.			.	(		.	,		.			+			/		/	+		0	+	'	9	+	#	=	+		>	,	#	B	,	-	C	,	2	N	,	#	R	+		S	-		p	+		|	1	 		|   C"!    hP      ]4>  "  G  4 >  "  G  4>  "  G  4>   "  G  6          g  lines
		N  g  filenamef  scripts/snarf-guile-m4-docs.scm
	(
		)			)			)			*		)	3		-	3		2	3		;	4		N	4	 		N  g  nameg  display-texi C#R&  h   r   ] L4L 
4L556 j       g  filenamef  scripts/snarf-guile-m4-docs.scm
	7			8			8	#		8			8	 		
   C    h   g   -  1  3 C     _       g  args
			  g  filenamef  scripts/snarf-guile-m4-docs.scm
	7	 			


   C      h      ] O 6             g  line
		 g  sub		  g  filenamef  scripts/snarf-guile-m4-docs.scm
	6
		7	 			  g  nameg  prefix? C'R()*  hp   1  ]"  Y(  4455 C($  "  )$  "  ,$   "  "4 5" )      g  line
		o g  line		_ g  acc			_ g  key		"	T  g  filenamef  scripts/snarf-guile-m4-docs.scm
	:
		;			<			=			=			=			=			>		"	?		"	?		Q	A		W	?		_	>		_	;		`	;		g	;	-	o	;	 		o  g  nameg  massage-usage C+R,-.'/0+1#)        h     -  1  3 4 5"  45$  C45$  4544	55"4	5$  '4
45>  "  G  45""  45"|$  %45$  45"U""45"=    
      g  args
		  g  p	  g  line		  g  acc		  g  t		    g  filenamef  scripts/snarf-guile-m4-docs.scm
	D
	
	E			E			E	"		E			E			G			H	
	 	H		,	I		2	I		4	I		8	I	
	9	F		@	J		C	J	-	M	J		U	J		V	K		\	K		^	K		b	I	
	c	L		f	L		q	L		z	F	 	M	 	F	 	Q	 	I	
 	N	 	N	( 	N	 	N	 	F	 	O	 	O	 	G	 	F	 	G	 )		 


  g  nameg  snarf-guile-m4-docs CRi2RC         g  m
		,  g  filenamef  scripts/snarf-guile-m4-docs.scm		!
	0	%
	2	&		5	&
	(
	6
	:
		D
		S
 
		
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                      ccache/scripts/punify.go                                                                            0000644                 00000004756 15154557173 0011333 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0	      ] % 4 hs      ] g  guile	 	g  define-module*	 	 	g  scripts	g  punify	 		g  filenameS	
f  scripts/punify.scm	g  exportsS	 	g  set-current-module	 	 	g  %include-in-guild-list	f  1Strip comments and whitespace from a Scheme file.	g  %summary	g  string->list	g  symbol->string	g  char=?	g  memq	g  list->string	g  display	g  write	f  (	g  write-punily	f  )	f   	g  with-input-from-file	g  eof-object?	 g  read	!g  current-input-port	"g  
punify-one	#g  for-each	$g  mainC 5h     ]4	
5 4 >  "  G   RR     h     ]!"  p $  B44 554:5$  4 5$  "  45"  "  $  4:>  "  G  6 6 $   (  " 4>  "  G  4	>  "  G  "  X(  
6$  "  $  "  4>  "  G  4	>  "  G  " ""        g  form
	 g  ls		K g  t	P	v g  first  g  ls	  g  last-was-list?	  g  	new-first	   g  filenamef  scripts/punify.scm
	.
			=			=				>			>	&		>			>			?		!	?		%	?		)	?		*	@		6	?		<	A		A	A	#	C	A		P	/		Y	C		p	D		v	E		v	/		y	/		}	/	 	/		 	0	 	0		 	1	 	1	 	1	 	2	 	3	 	4	 	5	 	5	 	6	# 	6	 	8	 	7	' 	8	 	:	 	:	! 	:	 	;		<		7	'	<		3		3		3	6	3	 3	  g  nameg  write-punily CR !       hP      ]"  44 5$  C4 >  "  G  445 5 "445 5 "             g  form
		: g  t		:  g  filenamef  scripts/punify.scm
	I			K			L			L	
		N		+	J		.	J	#	4	J		:	O		:	K		;	J		>	J	#	D	J		J	K	 		J
   C       h   v   ] 6      n       g  file
		
  g  filenamef  scripts/punify.scm
	G
	
	H	 		
  g  nameg  
punify-one C"R#"       h   t   -  1  3  6       l       g  args
			  g  filenamef  scripts/punify.scm
	Q
		R	 			


  g  nameg  punify CRi$RC       g  m
		(  g  filenamef  scripts/punify.scm		(
	,	+
	.	,		1	,

	.
	G
	Q
	T
 		
   C6                   ccache/scripts/list.go                                                                              0000644                 00000007524 15154557173 0010770 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0<      ] @ 4      h      ] g  guile	 	g  define-module*	 	 	g  scripts	g  list	 		g  filenameS	
f  scripts/list.scm	g  importsS	g  srfi	g  srfi-1	 	 	 	g  exportsS	g  list-scripts	 	g  set-current-module	 	 	g  %include-in-guild-list	f  An alias for "help".	g  %summary	g  file-exists?	g  file-is-directory?	g  opendir	g  eof-object?	g  closedir	g  readdir	 g  string=?	!f  .	"f  ..	#g  directory-files	$g  or-map	%g  string-suffix?	&g  string-null?	'g  	substring	(g  string-length	)g  append	*g  %load-compiled-extensions	+g  %load-extensions	,g  strip-extensions	-g  unique	.g  map	/g  symbol->string	0g  sort	1g  
append-map	2g  fold	3g  in-vicinity	4g  
%load-path	5g  string<?	6g  find-submodules	7g  for-each	8g  format	9f  ~A
	: 	;g  help	<; 	=g  main	><= 	?<= C 5    h8
     ]4	
5 4 >  "  G   RR !" 
    h     ]!4 5$  4 5$  }4 5"  `45$  4>  "  G  C4545$  "  	4	5$  "  "45"CC             g  dir
	  g  
dir-stream	  g  new		%  g  acc		%  g  t		U	n  g  filenamef  scripts/list.scm
	#
		$			$			$			$			%			%		%	&		&	(		0	(	
	1	*		F	,		M	-		Q	-	&	U	-		U	-		c	.		g	.	&	k	.		r	-		}	0	 	,	 	&	 	&	 	'	 	&	 	1	 	   g  nameg  directory-files C#R$%&'(   h8      ]4 L 5$  #4 5$  CL 
4L 54 56C           g  ext
		4  g  filenamef  scripts/list.scm
	4	
		6			5			:			5		"	<		)	<	0	0	<		2	;	 
		4   C)*+  h      ] O 456  z       g  path
		  g  filenamef  scripts/list.scm
	3
		=	
		4	 		  g  nameg  strip-extensions C,R-     h8      ] (   C (   C  $   6 4 5C          g  l
		5  g  filenamef  scripts/list.scm
	?
		@			A			@			B			B			B			!	@		&	B	+	(	B	#	+	C		,	C		1	C	$	3	C		4	C	 		5  g  nameg  unique C-R./-012,    h       ]
4 5$  CC             g  x
		 g  rest		 g  stripped				  g  filenamef  scripts/list.scm
	J			K	,			K			L			L	+ 			   C#3     h   j   ] 6      b       g  x
		
 g  y		
  g  filenamef  scripts/list.scm
	O	!	
	O	/ 		
	   C   h    ~   ]44 L 556       v       g  path
		  g  filenamef  scripts/list.scm
	I			M			N			O			N			J	 		   C45 	  h(      ]	4 544O 556         g  head
		& g  shead		&  g  filenamef  scripts/list.scm
	E
		F			F			H			I		$	H		&	G	 		&  g  nameg  find-submodules C6R789       h   c   ] 6     [       g  x
		  g  filenamef  scripts/list.scm
	T			V			V	 		   C6:      h      -  1  3 456         g  args
			  g  filenamef  scripts/list.scm
	S
		W			W			W			T	 			


  g  nameg  list-scripts CR?       h   p   -  1  3  @ h       g  args
			  g  filenamef  scripts/list.scm
	Y
		Z	 			


  g  nameg  main C=RC          g  m
		,  g  filenamef  scripts/list.scm		
	0	
	2	 		5	 
	#
%	3
H	?
N	E
		S

3	Y
 	
5
   C6                                                                                                                                                                             ccache/scripts/compile.go                                                                           0000644                 00000023525 15154557173 0011444 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0='      ]  4       h"      ] g  guile	 	g  define-module*	 	 	g  scripts	g  compile	 		g  filenameS	
f  scripts/compile.scm	g  importsS	g  system	g  base	 	g  selectS	g  compile-file	 	 	g  target	 	 	g  message	 	 	g  srfi	g  srfi-1	 	 	g  srfi-13	 	 	 g  srfi-37	!  	"! 	#g  ice-9	$g  format	%#$ 	&% 	'"& 	(g  exportsS	) 	*g  set-current-module	+* 	,* 	-f  Compile a file.	.g  %summary	/g  current-error-port	0f  error: ~{~a~}~%	1g  exit	2g  fail	3g  srfi-37:option	4!3 	5!3 	6f  help	7h6 	8g  
alist-cons	9g  help?	:f  version	;: 	<g  show-version	=f  	load-path	>L= 	?g  	assoc-ref	@g  	load-path	Af  output	BoA 	Cg  output-file	Df  .`-o' option cannot be specified more than once	Ef  warn	FWE 	Gg  string=?	Hg  show-warning-help	Ig  warnings	Jg  string->symbol	Kg  alist-delete	Lf  optimize	MOL 	Ng  	optimize?	Of  from	PfO 	Qg  from	Rf  2`--from' option cannot be specified more than once	Sf  to	TtS 	Ug  to	Vf  0`--to' option cannot be specified more than once	Wf  target	XTW 	Yf  4`--target' option cannot be specified more than once	Zg  %options	[g  	args-fold	\f  ~A: unrecognized option	]g  input-files	^] 	_@ 	`g  unsupported-warning	aI` 	b^_a 	cg  
parse-args	df  compile (GNU Guile) ~A~%	eg  version	ff Copyright (C) 2009, 2011 Free Software Foundation, Inc.
License LGPLv3+: GNU LGPL version 3 or later <http://gnu.org/licenses/lgpl.html>.
This is free software: you are free to change and redistribute it.
There is NO WARRANTY, to the extent permitted by law.~%	gf  $The available warning types are:~%~%	hg  for-each	if    ~22A ~A~%	jf  `~A'	kg  <warning-type>	lk 	mk 	ng  srfi-9	on 	pg  throw-bad-struct	qop 	rop 	sg  warning-type-name	tg  warning-type-description	ug  %warning-types	vf  ~%	wg  warningsS	xg  OS	yg  scheme	zg  objcode	{g  
%host-type	|f Usage: compile [OPTION] FILE...
Compile each Guile source file FILE into a Guile object.

  -h, --help           print this help message

  -L, --load-path=DIR  add DIR to the front of the module load path
  -o, --output=OFILE   write output to OFILE

  -W, --warn=WARNING   emit warnings of type WARNING; use `--warn=help'
                       for a list of available warnings

  -f, --from=LANG      specify a source language other than `scheme'
  -t, --to=LANG        specify a target language other than `objcode'
  -T, --target=TRIPLET produce bytecode for host TRIPLET

Note that auto-compilation will be turned off.

Report bugs to <~A>.~%	}g  %guile-bug-report-address	~g  append	g  
%load-path g  %load-should-auto-compile f  "`-o' option can only be specified  f  when compiling a single file g  	sigaction g  SIGINT f  interrupted by the user f  wrote `~A'
 g  *current-warning-prefix* f    g  with-target g  output-fileS g  fromS g  toS g  optsS g  mainC 5 h  K  ]4	
'()5 4, >  "  G   -.R$/01   h(      -  1  3 445  >  "  G  6        g  messages
			'  g  filenamef  scripts/compile.scm
	+
	
	,			,	
		,			,		'	-	 			'


  g  nameg  fail C2R5789        h      ]6            g  opt
		 g  name		 g  arg			 g  result			  g  filenamef  scripts/compile.scm
	2			3			3	 			   C 5;<1        h      ]4>   "  G  
6        g  opt
		 g  name		 g  arg			 g  result			  g  filenamef  scripts/compile.scm
	5			6			7	 			   C 5>?@8      h       ]456             g  opt
		 g  name		 g  arg			 g  result			 g  	load-path			  g  filenamef  scripts/compile.scm
	:			;	#			;	5		;	#		;			<	 		<	+		<	 				   C 5B?C2D8   h       ]45$  66        g  opt
		 g  name		 g  arg			 g  result			  g  filenamef  scripts/compile.scm
	?			@				@	(		@			@			A			A			B	"		B	 
			   C 5FG6H1?I8JK 
 hH   -  ]45$  4>   "  G  
645454	56%      g  opt
		H g  name		H g  arg			H g  result			H g  warnings		-	H  g  filenamef  scripts/compile.scm
	E			F				F	$		F			F			H		$	I		%	J	&	+	J	8	-	J	&	-	J		3	K	$	4	L	*	=	L	$	>	M	$	B	M	2	F	M	$	H	K	 		H	   C 5M8N  h      ]6            g  opt
		 g  name		 g  arg			 g  result			  g  filenamef  scripts/compile.scm
	P			Q			Q	 			   C 5P?Q2R8J        h(      ]45$  6456           g  opt
		$ g  name		$ g  arg			$ g  result			$  g  filenamef  scripts/compile.scm
	S			T				T	(		T			T			U			U			V	"		V	(	$	V	 		$	   C 5T?U2V8J        h(      ]45$  6456           g  opt
		$ g  name		$ g  arg			$ g  result			$  g  filenamef  scripts/compile.scm
	X			Y				Y	(		Y			Y			Z			Z			[	"		[	&	$	[	 		$	   C 5X?2Y8  h       ]45$  66        g  opt
		 g  name		 g  arg			 g  result			  g  filenamef  scripts/compile.scm
	]			^				^	(		^			^			_			_			`	"		`	 
			   C  	ZR[Z$/\1       h       ]445 >  "  G  6       g  opt
		  g  name		  g  arg			  g  result			   g  filenamef  scripts/compile.scm
	f			g			g			g	,		g		 	h	 		 	   C?]8       h       ]
45 6             g  file
		 g  result		 g  input-files			  g  filenamef  scripts/compile.scm
	i			j	"			j	4		j	"		j			k			k	*		k	 				   Cb     h      ] 6       g  args
		  g  filenamef  scripts/compile.scm
	b
		o			e	 		  g  nameg  
parse-argsg  documentationf  QParse argument list @var{args} and return an alist with all the relevant
options. CcR$def   h(      ] 445 >  "  G  6              g  filenamef  scripts/compile.scm
	s
		t			t				t	(		t			u		!	u	 		!
  g  nameg  show-version C<R$gh$ijmrst      hH      ]4 &   
"  	4 55 &   "  	4 56          g  wt
		E  g  filenamef  scripts/compile.scm
	|			}			~			~	!		~	(	)	~		,			E	}	 			E   Cuv  h0      ] 4>  "  G  4>  "  G  6       g  filenamef  scripts/compile.scm
	z
		{			{			{			|		. 		0 	 		0
  g  nameg  show-warning-help CHRc?9wINxQyUz{]C@$|}1~22       h   n   -  1  3 6 f       g  args
			  g  filenamef  scripts/compile.scm
 		 		 	 			


   Ch$       h   P   ] LLLLL 6	H       g  filenamef  scripts/compile.scm
 		 	 		
   C     h(   ~   ]Y4LLLLL  O 5Z6  v       g  file
		&  g  filenamef  scripts/compile.scm
 		 		 	@	 		& 	 		&   C        hp    -  1  3 
4 54545 45$  	"  45$  "  	4
5$  "  45$  "  454545	$  "  $  *4>  "  G  4
>  "  G  "   4	5  $  0(  "  $  4>  "  G  "   "   4>  "  G  O 6        g  args
		n g  options	n g  help?		n g  o		+	H g  compile-opts		Hn g  t		S	f g  from		fn g  t		q  g  to	 n g  t	   g  target	 n g  input-files	 n g  output-file	 n g  	load-path		 n  g  filenamef  scripts/compile.scm
 
	
 		 		 		 	-	 		 		 	#	  	&	& 	9	( 	&	+ 	#	+ 		. 	 	4 	3	6 	 	: 		? 	 	H 		K 		Q 	1	S 		S 		c 	8	f 		i 		o 	1	q 		q 	  	6  	  	  	1  	  	  	  	  	-  	  	  	  	-  	  	  	  	-  	  	  	  	  	  	
  	  	
  	
 	 	 	 	 	 	# 	$ 	% 	) 	* 	. 	0 	5 	F 	n 	 H		n


  g  nameg  compile CRiRC      C      g  m
		,  g  filenamef  scripts/compile.scm		
	.	(		1	(

	+
	1		1		4		4		9		9		>		>		D		D		O	J	O	N	R	r	R	v	W			W			\	
	\	
	1	
	/
	b
y	s
P	z
	 
 
 	
   C6                                                                                                                                                                            ccache/scripts/lint.go                                                                              0000644                 00000020131 15154557173 0010750 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0A       ] I 4     h      ] g  guile	 	g  define-module*	 	 	g  scripts	g  lint	 		g  filenameS	
f  scripts/lint.scm	g  importsS	g  ice-9	g  common-list	 	 	g  format	 	 	 	g  exportsS	 	g  set-current-module	 	 	g  %include-in-guild-list	f  1Check for bugs and style errors in a Scheme file.	g  %summary	g  scan-file-for-module-name	g  uniq	g  scan-file-for-free-variables	g  resolve-module	 f  Resolved module: ~S
	!g  catch	"g  eval	#f  !Unresolved free variables in ~A:
	$g  
write-char	%g  write	&g  newline	'f  #No unresolved free variables in ~A
	(g  with-input-from-file	)g  eof-object?	*g  read	+g  define-module	,g  append	-g  detect-free-variables	.g  memq	/g  define-generic	0g  quote	1g  
quasiquote	2g  let	3g  letrec	4g  map	5g  car	6g  let*	7g  and-let*	8g  define	9g  define-public	:g  define-macro	;g  lambda	<g  lambda*	=g  receive	>g  define-method	?g  define*	@g  define-class	Ag  detect-free-variables-noncar	Bg  case	Cg  unquote	Dg  unquote-splicing	Eg  else	Fg  =>	Gg  for-each	Hg  mainC 5h0     ]4	
5 4 >  "  G   RR !"      h   S   ] LL 6     K       g  filenamef  scripts/lint.scm
	x			y			y	 		
   C#$%&       hh      -  1  3 M$  4L>  "  G  "   4	>  "  G  4L >  "  G  4>   "  G  NC             g  args
			b  g  filenamef  scripts/lint.scm
	z			{			|			}			|		)			; 		@ 		E 		N 		` 	 			b


   C'      h     ])4 544 5545H4>  "  G  "  8(  "  64O 	 O >  "  G  ""J$  	
 6C }      g  filename
	  g  module-name	  g  	free-vars		  g  module		!  g  all-resolved?		!  g  	free-vars		>	v  g  filenamef  scripts/lint.scm
	n
		o		
	p			p			p			o			q		!	q		&	s		+	s		2	s		>	t		D	u		I	w		p 		v 		v	t	  	  	  	
 	   g  nameg  lint CR()*+   hP      ]"  94 5$  C"  45  " $   &   C""45  "             g  x
		?  g  filenamef  scripts/lint.scm
 		 		 		 		 		" 		" 		% 		) 		, 		. 	!	2 		5 		? 		@ 		J 	 		J
   C  h      ] 6             g  filename
		
  g  filenamef  scripts/lint.scm
 
	
 	 		
  g  nameg  scan-file-for-module-name CR(),*-     h@      ]"  )4 5$  @45 4 5 "45  "          g  x
		/ g  fvlists		/  g  filenamef  scripts/lint.scm
 		 		 		 		 		 		 		" 	8	$ 		' 		/ 		/ 		0 		5 	%	= 	 		=
   C       h      ] 6             g  filename
		
  g  filenamef  scripts/lint.scm
 
	
 	 		
  g  nameg  scan-file-for-free-variables CR.+/0123,45-      h   u   ] L $  L"  M6m       g  binding
		  g  filenamef  scripts/lint.scm
 	"	 	;	 	;	 	$ 		   C-     h   d   ] L 6      \       g  bodyform
		
  g  filenamef  scripts/lint.scm
 	"	
 	$ 		
   C67-  h   d   ] M 6      \       g  bodyform
		
  g  filenamef  scripts/lint.scm
 		
 	 		
   C-89:;<-  h   d   ] L 6      \       g  bodyform
		
  g  filenamef  scripts/lint.scm
 		
 	 		
   C=-    h   d   ] L 6      \       g  bodyform
		
  g  filenamef  scripts/lint.scm
 		
 	 		
   C>?-  h   d   ] L 6      \       g  bodyform
		
  g  filenamef  scripts/lint.scm

		
	 		
   C@A    h      ] $   "   M 6z       g  slot/option
		  g  filenamef  scripts/lint.scm
			<		8		<		 		   CB-      h   i   ] M 6     a       g  case
		  g  filenamef  scripts/lint.scm
			1		 		   CCDEFA % hh    ]H $  4 J5$  C  C $ ; $  "  !$  "  $  "  $  C$  "  $  r $       "    4J4	
 5544	O  5?44	O  5?6$  "  $  I (  4	O  5@4 J54   J56$  "  $  "  $  : $   JK  J6 JK J6$  "  $  U"  -(  "  /$  ""  J "4	O  5@$  .4J 54 J54	O  5@$  "  $  f"  =(  "  @$  !$  "  ""  J "4	O  5@$  4	O  5@$  4 J54	O  5@ $  "  !!$  "  "$  "  #$  	$ J64J54$ J56C        g  x
	f g  locals	f g  key		,d g  letrec?	   g  locals-for-let-body	   g  locals	 g  args	 g  locals-for-lambda-body	 g  locals-for-receive-body	+N g  locals	i g  args	i g  locals-for-method-body	  g  filenamef  scripts/lint.scm
 
		 			 		 		 			 		! 	!	% 			) 		, 		, 			b 		l 			} 		 	  	  	.  	(  	;  	"  	"  	  	  	   	(  	  	'  	6  	?  	6  	'  	  	  	  	"  	  	  	  	  	"  	  	  	  		 	 	 	 	 	 	" 	' 	5* 	// 	0 	4 	/7 	7< 	C> 	/B 	5H 	/J 	L 	U 		t 	v 	z 	} 	% 	 	 	) 	3 	? 	) 	 	% 	 	 	) 	 		 	* 	, 	3 	, 	? 	9 	9 	3 	3 	* 	; 	* 	 	 	 	 	  		! 	+( 	:+ 	++ 	0 	5 	,; 	< 	H 	L 	N 	W 		i 	*o 	,x	3| 	,	J	C	?	C	C	9	9	3	3 	* 	; 	* 	
		
			 						 				*	 				 		I"	*M"	P$	T$	0X$	Y%	^%	7b%	d$	e'	 	f	  g  nameg  detect-free-variables C-R.FA,-        hX   U  ]
 $  4 5$  C  C $  . $  	 6454 56C   M      g  x
		U g  locals		U g  key		(	S  g  filenamef  scripts/lint.scm
)
	-				-		
.		.			.		.	!	!0			%-		(1		(1			83	*	<3		?5		C5	0	G5		H6		M6	7	Q6		S5		T8	 		U	  g  nameg  detect-free-variables-noncar CARG        h   s   -  1  3  6       k       g  files
			  g  filenamef  scripts/lint.scm
:
	;	 			


  g  nameg  main CHRC       g  m
		,  g  filenamef  scripts/lint.scm		f
	0	k
	2	l		5	l
	n
 
 
 
)
.:
 	0
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                        ccache/scripts/autofrisk.go                                                                         0000644                 00000023350 15154557173 0012017 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0&      ] | 4  h#
      ] g  guile	 	g  define-module*	 	 	g  scripts	g  	autofrisk	 		g  filenameS	
f  scripts/autofrisk.scm	g  importsS	g  srfi	g  srfi-1	 	 	g  srfi-8	 	 	g  srfi-13	 	 	g  srfi-14	 	 	g  read-scheme-source	 	 	g  frisk	 	 	 	 g  exportsS	! 	"g  	autoloadsS	#g  ice-9	$g  popen	%#$ 	&g  open-input-pipe	'& 	(%' 	)g  set-current-module	*) 	+) 	,g  %include-in-guild-list	-f  0Generate snippets for use in configure.ac files.	.g  %summary	/g  
files-glob	0g  non-critical-external	1g  non-critical-internal	2g  programs	3g  pww-varname	4/0123 	5g  *recognized-keys*	6g  error	7f  syntax error:	8f  input not a list	9g  every	:g  list?	;f  non-list element	<g  length	=f  list too short	>g  quote	?g  memq	@f  unrecognized key:	Ag  apply	Bg  map	Cg  fold	Dg  append	Eg  assq-ref	Fg  canonical-configuration	Gg  for-each	Hg  format	If  GUILE_MODULE_REQUIRED~A
	Jg  >>strong	Kg  object->string	Lg  string-map!	Mg  char-set-contains?	Ng  char-set:letter+digit	Og  	safe-name	Pf  probably_wont_work	Qg  *pww*	Rg  edge-up	Sg  	edge-down	Tf  have_guile_module~A	Uf  GUILE_MODULE_AVAILABLE(~A, ~A)
	Vf  "test "$~A" = no &&
  ~A="~A $~A"~A	Wf  

	Xg  >>weak	Yf  guile_module~Asupport_~A	Zf  AC_PATH_PROG(~A, ~A)
	[f  test \
	\f   "$~A" = "" -o \
	]f  ~A &&
~A="~A $~A"

	^g  list-ref	_f  war = peace	`f  freedom = slavery	af  ignorance = strength	bg  random	cg  	>>program	dg  
>>programs	ef  echo '(' ~A ')'	fg  symbol->string	gg  read	hg  unglob	ig  make-frisker	jg  external	kg  	partition	lg  member	mg  mod-down-ls	nf  AC_DEFUN([AUTOFRISK_CHECKS],[

	of  
~A=~S

	pf   	qf  AC_SUBST(~A)
])

	rg  >>checks	sg [
AC_DEFUN([AUTOFRISK_SUMMARY],[
if test ! "$~A" = "" ; then
    p="         ***"
    echo "$p"
    echo "$p NOTE:"
    echo "$p The following modules probably won't work:"
    echo "$p   $~A"
    echo "$p They can be installed anyway, and will work if their"
    echo "$p dependencies are installed later.  Please see README."
    echo "$p"
fi
])
	tg  	>>summary	uf  
modules.af	vg  file-exists?	wf  could not find input file:	xg  with-output-to-file	yf  ~A.m4	zg  read-scheme-source-silently	{g  mainC 5h      ]4	
 !"(5	 4+ >  "  G   ,R-.R45R6789:;<       h   k   ]4 5C    c       g  form
		  g  filenamef  scripts/autofrisk.scm
	N			N	$		N	 		   C=>?5 h8      ] $  $&  C45$  CN CC           g  form
		4 g  key		4 g  t		!	2  g  filenamef  scripts/autofrisk.scm
	P			Q			Q		
	R			R			S	$		S			S			T		!	S		0	V	! 		4   C@ABCD       h8      ]
 L &   $  4 5"  "  $  CC           g  form
		4 g  so-far		4 g  t		&	4  g  filenamef  scripts/autofrisk.scm
	[	 		\	0		\	&		]	+		\	&		^	+		^	:		^	+	&	\	" 
		4	   C       h   j   ] O   L 6    b       g  key
		  g  filenamef  scripts/autofrisk.scm
	Z			`	 		[	 		   C5E      h   b   ]L  6      Z       g  key
		
  g  filenamef  scripts/autofrisk.scm
	c		
	d	 		
   C   h     ] $  "  4>  "  G  4 5$  "  4>  "  G  4 5$  "  4>  "  G  H4	O  5
J $  "  4>  "  G  4 O 5O C        g  forms
	  g  	condition	*	M g  	condition	V	y g  un	z  g  	condition	   g  x	   g  bunched    g  filenamef  scripts/autofrisk.scm
	I
		L					K			K			K	*		L			K		"	M			*	M		2	K		7	K		;	K	*	=	M		B	K		N	N			V	N		^	K		c	K		g	K	*	i	N	;	n	K		z	O		}	P	 	Y	 	P	 	K	 	K	 	K	* 	K	 	Z	 	Z	  	   g  nameg  canonical-configuration CFRGHI     h   m   ] 6     e       g  module
		  g  filenamef  scripts/autofrisk.scm
	g			h			h	 		   C        h   z   ] 6      r       g  modules
		
  g  filenamef  scripts/autofrisk.scm
	f
	
	g	 		
  g  nameg  >>strong CJRKLMN      h   h   ]4 5$   C_C   `       g  c
		  g  filenamef  scripts/autofrisk.scm
	m			n			n	 		   C     h(      ]	4 54>  "  G  C             g  module
		" g  var			"  g  filenamef  scripts/autofrisk.scm
	k
		l				l			m	 		"  g  nameg  	safe-name CORPQRGRSHTOUVQW 
    hP     ]4 54 544554>  "  G  	6          g  edge
		M g  up			M g  down			M g  var		#	M  g  filenamef  scripts/autofrisk.scm
	w			x				x			y			x			z			z	%		z	;	#	z		#	x		&	{		+	{		4	{		A	|		K	}	-	M	|	 		M   C        h   {   ] 6      s       g  
weak-edges
		
  g  filenamef  scripts/autofrisk.scm
	v
	
	w	 		
  g  nameg  >>weak CXRBHYO     h   w   ]4L 5 6      o       g  prog
		  g  filenamef  scripts/autofrisk.scm
 		 	 	 		 	 		   CGHZ       h      ] 6   w       g  var
		 g  prog		  g  filenamef  scripts/autofrisk.scm
 		 		 	 			   CH[H\     h   m   ] 6     e       g  var
		  g  filenamef  scripts/autofrisk.scm
 		 		 	 		   C]^_`abQ  hx   (  ]
4 O 54>  "  G  4>  "  G  4>  "  G  4	
 4	55 6              g  module
		q g  progs		q g  vars			q  g  filenamef  scripts/autofrisk.scm
 
	 		 		 		) 		. 		3 		< 		T 		U 		Y 		[ 		] 		` 		a 		i 		q 	 		q	  g  nameg  	>>program CcRGc    h   w   ]  6    o       g  form
		  g  filenamef  scripts/autofrisk.scm
 		 		
 	$	 	 		   C      h      ] 6      w       g  programs
		
  g  filenamef  scripts/autofrisk.scm
 
	
 	 		
  g  nameg  
>>programs CdR&HeBfg      h       ]	44 55456       g  pattern
		  g  p		   g  filenamef  scripts/autofrisk.scm
 
	 		 		 	'	 		 		 		 		  	 
		   g  nameg  unglob ChRFDBh/01ij3Qkl9l  h   b   ] L 6      Z       g  i
		
  g  filenamef  scripts/autofrisk.scm
 	 	
 	" 		
   CBSm     h0      ]	4 L 5$  CLO 44 556        g  module
		/ g  t		/  g  filenamef  scripts/autofrisk.scm
 		 		 		  	 	% 	/	- 	 	/ 	 		/   CHnJopXCDm        h      ]4 56 |       g  module
		 g  so-far		  g  filenamef  scripts/autofrisk.scm
 		 	%	 	 			   Cd2q   h   +  ]A4 544455?4545445 54	54
5(  "   4O >  G 4>  "  G  4>  "  G  4>  "  G  44  5>  "  G  445>  "  G  6   #      g  forms
	  g  cfg		  g  files		  g  ncx		'  g  nci		0  g  report		<  g  external		E  g  pww-varname		N	b g  weak		v  g  strong		v   
g  filenamef  scripts/autofrisk.scm
 
	 			 		 		 		 	*	 	/	 	*	 		 		 		! 		% 		' 		' 		* 		. 		0 		0 		3 		4 		< 		< 		? 		C 		E 		E 		H 		L 		N 		N 		V 		] 	*	_ 		c 		y 		~ 	  	  	  	  	  	  	%  	  	  	  	  	  	  	  	  	  	  	  	  	 9	   g  nameg  >>checks CrRHfsQ      h      ] 456      z       g  filenamef  scripts/autofrisk.scm
 
	 	
	
 		 	
	 	 		
  g  nameg  	>>summary CtRuv6wxHyrzt  h    m   ] 44L 5>  "  G  6    e       g  filenamef  scripts/autofrisk.scm
 		 		 		 		 	 		
   C 	       h`     -  1  3  (  "   45$  "  4>  "  G  45O 6              g  args
			Y g  file		Y g  t		!	D  g  filenamef  scripts/autofrisk.scm
 
	 		 		 	,	 		 		! 		. 		2 		9 		G 		L 	$	P 		Y 	 			Y


  g  nameg  	autofrisk CRi{RC           g  m
		0  g  filenamef  scripts/autofrisk.scm		6
	4	@
	6	A		9	A
	;	C		>	C
 	I
5	f
		k
		t			t
	v
k 
 
 
. 
 
 
 
 	
   C6                                                                                                                                                                                                                                                                                         ccache/scripts/api-diff.go                                                                          0000644                 00000021022 15154557173 0011461 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0!      ] ^ 4        h      ] g  guile	 	g  define-module*	 	 	g  scripts	g  api-diff	 		g  filenameS	
f  scripts/api-diff.scm	g  importsS	g  ice-9	g  common-list	 	 	g  format	 	 	g  getopt-long	 	 	 	g  exportsS	 	g  	autoloadsS	g  srfi	g  srfi-13	 	g  string-tokenize	 	 	 g  set-current-module	!  	"  	#g  %include-in-guild-list	$f  ,Show differences between two scan-api files.	%g  %summary	&g  with-input-from-file	'g  read	(g  read-alist-file	)g  set-object-property!	*g  put	+g  object-property	,g  get	-g  assq-ref	.g  meta	/g  	interface	0g  groups	1g  make-hash-table	2g  for-each	3g  
hashq-set!	4g  read-api-alist-file	5g  	hashq-ref	6g  hang-by-the-roots	7g  set-difference	8g  diff?	9g  
diff+note!	:g  	hash-fold	;g  acons	<g  map	=g  car	>f  groups-removed: ~A
	?f  groups-added: ~A
	@g  length	Af   ~5@A  ~5@A  :  	Bf  -	Cf  ~5@A ~5@A : ~5@A	Df  ~5@D ~5@D : ~5@D	Ef       ~A
	Fg  sort	Gg  union	Hg  string<?	Ig  symbol->string	Jg  details	Kf  ~A ~A:
	Lg  removals	Mf   ~A
	Ng  	additions	Of  ~A: no changes
	Pg  error	Qf  !api-diff: group-diff: bad options	Rg  
group-diff	Sg  single-char	TSd 	Ug  value	VU 	WJTV 	XW 	Yg  
option-ref	Zf  	/dev/null	[ZZ 	\g  string->symbol	]g  mainC 5 h     ]4	
5	 4" >  "  G   #R$%R&'      h   O   ] 6   G       g  filenamef  scripts/api-diff.scm
	5			5	 		
   C      h   }   ] 6      u       g  file
		
  g  filenamef  scripts/api-diff.scm
	3
	
	4	 		
  g  nameg  read-alist-file C(R)i*R+i,R(-./*0123   h   k   ]L  6     c       g  group
		  g  filenamef  scripts/api-diff.scm
	@	'			A	>		A	) 		   C 
 h   |  ]!4 545454>  "  G  44	54	O 45>  "  G  >  "  G  C    t      g  file
		| g  alist			| g  meta			| g  	interface			| g  ht		E	l  g  filenamef  scripts/api-diff.scm
	:
		;				;			<			<			<			;			=			=	$		=			;		"	>		(	>		/	>		8	?		>	?		?	?	%	E	?		H	@		R	B	'	X	B	6	Z	B	'	_	@		q	?	 		|  g  nameg  read-api-alist-file C4R,02235       h   {   ]L L 4L 56 s       g  group
		  g  filenamef  scripts/api-diff.scm
	I			K	.		L	.		K	(		J	 		   C-0      h   w   ] L O 4 56o       g  x
		  g  filenamef  scripts/api-diff.scm
	H			M			M	&		M			I	 		   C      h0      ]	4 54O  >  "  G   C           g  	interface
		, g  ht		)  g  filenamef  scripts/api-diff.scm
	F
		G				G			G			G			H	 		,  g  nameg  hang-by-the-roots C6R7    h      ]
4 5(  CC       g  a
		 g  b		 g  result			  g  filenamef  scripts/api-diff.scm
	Q
		R			R			S	 			  g  nameg  diff? C8R8    hp   S  ]H4 5$  4>  "  G  K"   4 5$  4>  "  G  K"   J$  6 C     K      g  a
		k g  b		k g  note-removals			k g  note-additions			k g  	note-same			k g  same?			k g  t			2 g  t		;	_  g  filenamef  scripts/api-diff.scm
	W
		X			Y			Y			Y	&	+	Y	8	3	Z		;	Z		D	Z	&	X	Z	9	e	[		i	[	 		k	  g  nameg  
diff+note! C9R6:;,0<=9> h   n   ] 6     f       g  removals
		  g  filenamef  scripts/api-diff.scm
	f			g	$		g	 		   C?  h   o   ] 6     g       g  	additions
		  g  filenamef  scripts/api-diff.scm
	h			i	$		i	 		   C       h   G   ] C    ?       g  filenamef  scripts/api-diff.scm
	j	 		
   C2-@ABC9@  h   j   ]4 5N C   b       g  subs
		  g  filenamef  scripts/api-diff.scm
	x	#		y	5		y	% 		   C@        h   j   ]4 5N C   b       g  adds
		  g  filenamef  scripts/api-diff.scm
	z	#		{	5		{	% 		   C    h   G   ] C    ?       g  filenamef  scripts/api-diff.scm
	|	# 		
   CDE  h   /  ]94L  54L 5$  45"  $  45"  $  $  	"  "  4$  "  $  "  >  "  G  "  4>  "  nG  "  g$  ]$  O

HH4O 	O 
>  "  G  4J
J>  "  G  "  ""  "| 6   '      g  group
	 g  old	 g  new		 g  	old-count		* g  	new-count		> g  delta		[ g  	add-count	  g  	sub-count	   g  filenamef  scripts/api-diff.scm
	k			l	#		l			m	#		l			n	)		n	2	*	l		2	o	)	3	o	2	>	l		F	p	%	Q	p	2	[	l		^	q		c	q	$	i	r	!	q	r	/	w	s	!		s	/ 	q	  	   	+  	>  	B  	F  	  	t	 	t	  	u	  	v	" 	}	" 	}	- 	~	4 	}	" 	$ 	 &	   CFGHI     h      ]4 5456    z       g  a
		 g  b		  g  filenamef  scripts/api-diff.scm
 		 	'	 	'	 	 			   C-J-9KL2M    h   j   ] 6     b       g  x
		  g  filenamef  scripts/api-diff.scm
 	4	 	A	 	6 		   C   h(      ]4L >  "  G   6              g  removals
		!  g  filenamef  scripts/api-diff.scm
 	*	 	*	 	5	 	1	 	*	! 	* 		!   CKN2M   h   j   ] 6     b       g  x
		  g  filenamef  scripts/api-diff.scm
 	4	 	A	 	6 		   C   h(      ]4L >  "  G   6              g  	additions
		!  g  filenamef  scripts/api-diff.scm
 	*	 	*	 	5	 	1	 	*	! 	* 		!   CO   h   Z   ] L 6     R       g  filenamef  scripts/api-diff.scm
 	*	 	7	 	, 		
   C   h`      ]4L  5$  "  4L 5$  "   O  O  O 6              g  group
		Y g  t		 g  old		Y g  t		(	: g  new		:	Y  g  filenamef  scripts/api-diff.scm
 		 	,	 	(	 	C	 		  	,	( 	(	7 	C	: 		Y 	 		Y   CPQ      h   a  - 1 3 
4 544554545445545(  74	
>  "  G  O 4455645		$  O 	66      Y      g  i-old
		  g  i-new		  g  options			  g  i-old		  g  g-old		#  g  g-old-names		.  g  i-new		7  g  g-new		J  g  g-new-names		U  g  t		    
g  filenamef  scripts/api-diff.scm
	]
	
	^			^			_			_	!		_	%		_	0	!	_	%	#	_		#	^		&	`		.	^		1	a		7	^		:	b		?	b	!	@	b	%	F	b	0	H	b	%	J	b		J	^		M	c		U	^		]	d		^	e	  	  	  	 	k	  	  	  	 	d	  	  	  	 %		 	
	  g  nameg  
group-diff CRRXY[4J<\R  hx     -  1  3 4 5454545H45$  4	4
,55JK"   J@        g  args
			v g  p		v g  rest		!	v g  i-old		+	v g  i-new		6	v g  options		9	v g  t		E	l  g  filenamef  scripts/api-diff.scm
 
	
 		 		 		 		 		 		 		 		 	!	! 		! 		$ 		) 	%	+ 		+ 		. 		3 	%	6 		6 		9 		9 		< 		B 		E 		E 		O 	*	P 	*	U 	/	_ 	*	` 	$	c 		e 		v 	 #			v


  g  nameg  api-diff CRi]RC       g  m
		0  g  filenamef  scripts/api-diff.scm		)
	4	0
	6	1		9	1
H	3
O	7
V	8
	:
N	F
	Q
	W
	]
 
 
 	
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                               ccache/ice-9/command-line.go                                                                        0000644                 00000044270 15154557173 0011576 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0H      ]  4   hg      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  command-line	 		g  filenameS	
f  ice-9/command-line.scm	g  exportsS	g  compile-shell-switches	g  version-etc	g  *GPLv3+*	g  	*LGPLv3+*	g  emit-bug-reporting-address	 	g  	autoloadsS	g  system	g  vm	 	g  set-default-vm-engine!	g  set-vm-engine!	g  the-vm	 	 	g  set-current-module	 	 	g  gettext	g  _	 f  License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>.
This is free software: you are free to change and redistribute it.
There is NO WARRANTY, to the extent permitted by law.	!f  License LGPLv3+: GNU LGPL 3 or later <http://gnu.org/licenses/lgpl.html>.
This is free software: you are free to change and redistribute it.
There is NO WARRANTY, to the extent permitted by law.	"g  portS	#"		$g  copyright-yearS	%$		&g  copyright-holderS	'&		(g  	copyrightS	)(		*g  licenseS	+*		,g  command-nameS	-,		.g  packagerS	/.		0g  packager-versionS	10			2#%')+-/1 	3g  current-output-port	4f  Free Software Foundation, Inc.	5g  format	6f  Copyright (C) ~a ~a	7f  ~a (~a) ~a
	8f  ~a ~a
	9f  Packaged by ~a (~a)
	:f  Packaged by ~a
	;g  display	<g  newline	=g  urlS	>=		?.		@g  packager-bug-addressS	A@		B#>?A 	Cg  string-append	Df  http://www.gnu.org/software/	Ef  /	Ff  
Report bugs to: ~a
	Gf  Report ~a bugs to: ~a
	Hf  ~a home page: <~a>
	If  ?General help using GNU software: <http://www.gnu.org/gethelp/>
	Jf Evaluate code with Guile, interactively or from a script.

  [-s] FILE      load source code from FILE, and exit
  -c EXPR        evalute expression EXPR, and exit
  --             stop scanning arguments; run interactively

The above switches stop argument processing, and pass all
remaining arguments as the value of (command-line).
If FILE begins with `-' the -s switch is mandatory.

  -L DIRECTORY   add DIRECTORY to the front of the module load path
  -C DIRECTORY   like -L, but for compiled files
  -x EXTENSION   add EXTENSION to the front of the load extensions
  -l FILE        load source code from FILE
  -e FUNCTION    after reading script, apply FUNCTION to
                 command line arguments
  --language=LANG  change language; default: scheme
  -ds            do -s script at this point
  --debug        start with the "debugging" VM engine
  --no-debug     start with the normal VM engine (backtraces but
                 no breakpoints); default is --debug for interactive
                 use, but not for `-s' and `-c'.
  --auto-compile compile source files automatically
  --fresh-auto-compile  invalidate auto-compilation cache
  --no-auto-compile  disable automatic source file compilation;
                 default is to enable auto-compilation of source
                 files.
  --listen[=P]   listen on a local port or a path for REPL clients;
                 if P is not given, the default is local port 37146
  -q             inhibit loading of user init file
  --use-srfi=LS  load SRFI modules for the SRFIs in LS,
                 which is a list of numbers like "2,13,14"
  -h, --help     display this help and exit
  -v, --version  display version information and exit
  \              read arguments from following script lines	Kg  *usage*	Lg  current-error-port	Mg  apply	Nf   Usage: ~a [OPTION]... [FILE]...
	Of  	GNU Guile	Pf  bug-guile@gnu.org	Qf  "http://www.gnu.org/software/guile/	Rg  assq-ref	Sg  %guile-build-info	Tg  packager	Ug  packager-bug-address	Vg  exit	Wg  shell-usage	Xg  current-language	Yg  scheme	Zg  call-with-input-string	[g  read	\g  eof-object?	]g  eval	^g  current-module	_g  
module-ref	`g  resolve-module	ag  eval-string	ba 	cg  eval-string/lang	dg  load-in-vicinity	eg  getcwd	fg  base	gg  compile	hfg 	ig  compile-file	jg  toS	kg  value	lg  	load/lang	mf  guile	ng  string-prefix?	of  -	pg  string=?	qf  -s	rf  error: 	sf  missing argument to `-s' switch	tf  ~%	ug  @@	vul 	wf  -c	xf  missing argument to `-c' switch	yuc 	zf  --	{f  -l	|f  missing argument to `-l' switch	}f  -L	~f  missing argument to `-L' switch	f  -C f  missing argument to `-C' switch f  -x f  missing argument to `-x' switch f  -e f  missing argument to `-e' switch g  open-input-string g  memq g  @ u  g  and-map g  symbol? g  main   f  --language= g  quote g  string->symbol g  	substring f  
--language f  'missing argument to `--language' option f  -ds f  )the -ds switch may only be specified once f  --debug f  
--no-debug f  --auto-compile g  %load-should-auto-compile f  --fresh-auto-compile g  %fresh-auto-compile f  --no-auto-compile f  -q f  --use-srfi= g  map g  string->number f  invalid SRFI specification g  exact? g  integer? g  string-split g  	use-srfis f  --listen g  repl g  server   g  spawn-server u    f  	--listen= f  invalid port for --listen g  make-tcp-server-socket u  g  make-unix-domain-server-socket u  g  pathS f  unknown argument to --listen f  -h f  --help f  -v f  	--version g  version g  packager-version f  unrecognized switch ~a f  1the `-ds' switch requires the use of `-s' as well g  set-program-arguments g  debug g  control   g  %   g  begin g  append     g  load-user-init     g  set! g  %load-extensions g  cons   g  
%load-path   g  %load-compiled-path   g  reverse!     g  top-repl       g  quit   g  string-rindexC 5    h@.     ]4	
5 4 >  "  G   iR4i 5R4i!5R23456789:;<       hH    - /   
0  
 3 
#  45 #  #  #  45#  #  #  	#  	$  4 >  "  G  "  4 >  "  G  $  F	$  !44	
5	>  "  G  "  44	5>  "  G  "   4>  "  G  4>  "  G  4>  "  G  4>  "  G  6      g  package
	H g  version	H g  port		H g  copyright-year		H g  copyright-holder		H g  	copyright		H g  license		H g  command-name		H g  packager		H g  packager-version			H  
g  filenamef  ice-9/command-line.scm
	A
		B		3	E	(	<	F	!	A	F	,	G	F	!	t	K		u	L		{	L	 	L	 	M	 	M	 	M	 	O	 	P	 	Q	
 	Q	 	Q	 	Q	 	Q	
 	R	
 	R	 	R	 	R	 	R	
 	T		U		V	/	W	H	X	 	H	
g  portS	g  copyright-yearS	g  copyright-holderS	g  	copyrightS	g  licenseS	g  command-nameS	g  packagerS	g  packager-versionS		 	  g  nameg  version-etc CRB3CDE5FGHI      h   #  - /   0   3 #  45 #  4 5#  #  445>  "  G  $  +$  !44	5>  "  G  "   "   44
5 >  "  G  456           g  package
	  g  bug-address	  g  port		  g  url		  g  packager		  g  packager-bug-address		   g  filenamef  ice-9/command-line.scm
	]
		^	+	'	_	*	+	`	+	/	b	+	1	_	*	F	d		K	d		O	d		Q	d		X	d		f	e		l	e		m	f		r	f		v	f		x	f	 	f	 	g	 	g	 	g	 	g	 	g	 	i	
 	i	 	i	
 	h	 	 	
g  portS	g  urlS	g  packagerS	g  packager-bug-addressS	   g  nameg  emit-bug-reporting-address CR4iJ5KRL3M5<N;KOP"=Q.RST@UV      h     - . 1 3 #  $  	45 "  45 $  .4>  "  G  4>  "  G  "   445 >  "  G  4	>  "  G  4>  "  G  4
4545>
  "  G  $  6C       g  name
	  g  fatal?	  g  fmt		  g  args		  g  port		)   g  filenamef  ice-9/command-line.scm
 
	 		 		% 		) 		1 		2 		J 		` 		e 		i 		k 		r 		{ 	  	  	  	  	  	  	  	,  	  	  	!  	  	  	  	 	 		  g  nameg  shell-usage CWRXYZ[\]^   h@      ]	"  14 545$  C445 >  "  G  ""            g  port
		; g  exp		7  g  filenamef  ice-9/command-line.scm
 		 		 		 	
	 		 		 		" 		+ 		7 		7 	 		;   C_`ba 	     h0      ]	45 $   64455 6           g  str
		, g  key		,  g  filenamef  ice-9/command-line.scm
 
	 		 		 		 		 		" 	"	$ 		& 	8	( 		, 	 		,  g  nameg  eval-string/lang CcRXYde_`hijk   h8      ]	45 $  45  64455 	
6            g  f
		3 g  key		3  g  filenamef  ice-9/command-line.scm
 
	 		 		 		 		 		! 		% 	"	' 		) 	:	+ 		1 		3 	 		3  g  nameg  	load/lang ClRmnopqWCrstvwxyz{|}~[\XWCrt 	  hX      ]	4 5"  M 456$  -45$  45$  
$  C""""       g  x
		X g  n			X  g  filenamef  ice-9/command-line.scm
i		j	)		j	 	 		 		m	-	 	*	 		! 		!k	"	(k	-	2k	&	3k	8	=k	&	Ak	E	Ek	& 		X   C"EVO*,.RST0   h   e   ]  C      ]       g  ext
		  g  filenamef  ice-9/command-line.scm
			 		   C       h   f   ]  C      ^       g  path
		  g  filenamef  ice-9/command-line.scm
			 		   C      h   f   ]  C      ^       g  path
		  g  filenamef  ice-9/command-line.scm
			 		   C l    hH    - . , 3 H#  KHH
H	HHHHHHH" (  " 45$ D45$  ](  "4J4	
5>  "  G  "   KKJ$  JJ" %J " 45$  A(  "4J4
5>  "  G  "   K " 45$  " 45$  >(  "4J4
5>  "  G  "    "45$  =(  "4J4
5>  "  G  "   JK"q45$  =(  "4J4
5>  "  G  "   JK"'45$  =(  "4J4
5>  "  G  "   JK"45$  (  "4J4
5>  "  G  "   45454545$  ?$  245$  "  	4 5$  !""  "  "  	! K"!4#5$  %$%4&4'	55  "4(5$  H(  "4J4)
5>  "  G  "   $%4&5  "4*5$  @J$  "4J4+
5>  "  G  "    KJ"M4,5$  K
K".4-5$  KK
"4.5$   /"405$   / 1"425$   /"435$  K	"445$  _456O 474'	5,55(  "4J48
5>  "  G  "   9%  "04:5$  ;"4<5$  4'		54=5$  c"  4J4>
55"  D4?5$  54@5$  "
$  ABC  "  ""  ""  ""  24D5$  AEF  "  4J4G
55"E4H5$  "  	4I5$  4J>  "  G  J
64K5$  "  	4L5$  :4MN4O5 PQRS4TUV5W4TUX5>
  "  G  J
6J4Y
56KKJ$  JJ"  J "  " J$  -J$  "  4J4Z
5>  "  G  "   4[J>  "  G  J
$  "  J$  J"  $  -4\]>  "  G  4^4_5 ]>  "  G  "   `a4bJ$  J	$  "  c"  4b45dJ54b45eJ54b45fJ54b4g54bJ$  Jh "  J$  i"  j 555555 C $  7 K4kJ/5$  4'J5"  JK " "      g  args
	H g  
usage-name	H g  arg0		&H g  script-cell		&H g  entry-point		&H g  user-load-path		&H g  user-load-compiled-path		&H g  user-extensions		&H g  interactive?		&H g  inhibit-user-init?			&H g  turn-on-debugging?	
	&H g  turn-off-debugging?		&H g  args		> g  out		> g  arg		V g  args		V g  port	 g  arg1	 g  arg2	
 g  srfis	 g  where	B g  t	K g  t	 g  t	@Y g  args	 g  out	 g  t	+I g  slash	1  g  filenamef  ice-9/command-line.scm
 
	 	=	 		  		! 	!	" 		& 		> 		D 		P 		S 		V 		V 		[ 		_ 	!	c 		g 	
	h 		n 		p 		t 	
	z 		{ 	  	  	  	  	*  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	
  	  	  	  	  	  	*  	  		 	 	 	 	 	 	 	  	& 	( 	, 	
8 	9 	? 	A 	E 	
K	L 	R 	V 	X	Z 	*\ 	a 	p	r	u	@x	{					 	
	 	 	 			 	* 	 	
	'
	!
						 	
	 	 	 		 	* 	 			
					 	$ 	
*	+ 	1 	5 	7	9 	*; 	@ 	O	(R	"T	W	a	b	h	j	n 	
t	u 	{ 	 		 	* 	 	 	 	, 	 	!	 	"	 	'	&	)	&	*	 *	&*	 )	+	)	,	(	%	/	/	2	"2	&2	* 	
.4	15	46	:6	-<6	>5	A4	G4	O3	P9	T9	X9	\ 	
b:	c 	i 	m 	o;	q 	*s 	x 	<	=	=	.=	>=	.=	=	<	@	@	@	 	
C	 	 	 	D	 	* 	 	E	E	G	G	F	K	K	K	 	
L	M	N	P	P	P	 	
 Q	#R	/S	0W	6W	8W	< 	
?X	KY	L[	R[	T[	X 	
[\	^]	j^	k`	q`	s`	w 	
za	b	d	d	d	 	
e	f	h	h	h	 	
i	n	n	,n	i	i	o	 	 	 	p	 	* 	 	r	r	q	t	t	t	 	
v	"v	*u	+x	/x	3x	7 	
:|	B|	E~	K}	X 	^ 	b 	d	"f 	*h 	j 	n	o	 y	z	0		>				"	}		 	 	 		 	* 	 	{	y		 				$	2	$ 	
 	7	8	>	@	@	N	$T	2V	$] 	
^	b	c	%o	(r	$x	@z	$}		5			 	 		 	* 	 	 	 	 	 	 	 	 	 				"	 	 	 		 	* 	 			!	+	
>	A	 M	N	R	$W	`	c	i	%n	|																							
								$	.&	.	4	5	=	@	H	
	H  g  nameg  compile-shell-switches CRC       g  m
		,  g  filenamef  ice-9/command-line.scm		!
	3	*
	4	-		:	-		<	-		?	,
	@	2		F	2		H	2		K	1
	A
	]
	l		l		l		k

 
 
V 
.> 
 	.@
   C6                                                                                                                                                                                                                                                                                                                                         ccache/ice-9/channel.go                                                                             0000644                 00000012230 15154557173 0010632 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] H 4      h       ] g  guile	 	g  define-module*	 	 	g  ice-9	g  channel	 		g  filenameS	
f  ice-9/channel.scm	g  exportsS	g  make-object-channel	g  channel-open	g  channel-print-value	g  channel-print-token	 	g  set-current-module	 	 	g  make-record-type	g  stdin	g  stdout	g  printer	g  token-module	 	g  channel-type	g  record-constructor	g  make-channel	g  current-input-port	g  current-output-port	g  make-module	 g  record-accessor	!g  channel-stdin	"g  channel-stdout	#g  channel-printer	$g  channel-token-module	%g  catch	&g  channel:prompt	'g  read	(g  eof-object?	)g  throw	*g  quit	+g  eval	,g  module-use!	-g  current-module	.g  destroy	/g  module-defined?	0g  module-remove!	1g  channel:error	2f  Invalid token: ~S	3f  Unknown command: ~S	4g  format	5f  exception = ~S
	6f  value = ~S
	7g  symbol-append	8g  gensym	9f  %%	:g  %%	;g  object->string	<f  token = ~S
	=g  module-define!	>g  display	?f  	channel> 	@g  force-output	Af  ERROR: 	Bg  apply	Cg  newline	Dg  
guile:eval	Eg  procedure-minimum-arity	Fg  defined?	Gf  ~SC 5   h8    ]4	
5 4 >  "  G   4i5R4ii5R        h      ]45 45  45 6        g  printer
		  g  filenamef  ice-9/channel.scm
	W
		X		
	Y			[			X	 		  g  nameg  make-object-channel CR4 ii5!R4 ii5"R4 ii5#R4 ii5$R!"#$%&'()*+,-+./0123      h    ]4L>  "  G  4L5 4 5$  4>  "  G  "   $  >445 L>  "  G  4LL4	4L545 5>  "  G  "   
$  K4L54L5$  4L>  "  G  "  4L>  "  G  "  5 $  4>  "  G  "  4L >  "  G   L 6          g  cmd
	 g  token    g  filenamef  ice-9/channel.scm
	m			n	
		o			o	
		p		(	p		)	q		-	q		2	q		G	r		H	t		K	t		V	t		_	u		d	u		g	u	#	n	u	0	t	u		y	u	 	r	 	w	 	w	 	x	 	x	 	y	 	z	 	z	+ 	z	 	r	 	|	 	|	 	|	 	~	 	~	'	~			
 %	
   C*)45       hH      - 1 3  $  64L  4? >  "  G  L6            g  key
			D g  args			D  g  filenamef  ice-9/channel.scm
 		 	
	 		 		 		 		" 		( 	0	, 	<	0 		3 		8 		D 	 			D
   C       h(   ]   ] L LLLLLO LL O 6       U       g  filenamef  ice-9/channel.scm
	k		!	l	 		!
  g  nameg  loop C        hH     ])4 54 54 54 5O  Q 6          g  ch
		F g  stdin		F g  stdout			F g  printer			F g  token-module			F g  loop		3	F  g  filenamef  ice-9/channel.scm
	f
		g		
	h			i			j			g		3	k	 		F  g  nameg  channel-open CR4"6       h      ]4 56              g  ch
		 g  val		  g  filenamef  ice-9/channel.scm
 
	 	
	 		 	 			  g  nameg  channel-print-value CR789:;4"<=$    hH   ;  ]44554544 5>  "  G  	4
 563      g  ch
		H g  val		H g  token			H g  pair			H  g  filenamef  ice-9/channel.scm
 
	 		 		
 	'	 		 	-	 		 		 		 		 		 		" 		* 	 	1 		< 		H 	 		H	  g  nameg  channel-print-token CR>?@        h       ]4 >  "  G   6           g  port
		  g  filenamef  ice-9/channel.scm
 
	 		 		 		 	 		  g  nameg  channel:prompt C&R>AB4C h@      - 1 3 4 >  "  G  4 >  "  G   6            g  port
			; g  msg			; g  args				;  g  filenamef  ice-9/channel.scm
 
	
 		 		 		 		; 	 			;	
	  g  nameg  channel:error C1R+iDR4EiDi5$  D  h   m   ] 6      e       g  x
		
 g  e		
  g  filenamef  ice-9/channel.scm
 		
 	 		
	   C"  Di+R4Fi;5$  ;i"  4G   h   g   ] 6     _       g  x
		  g  filenamef  ice-9/channel.scm
 		 		 	 		   C;RC          g  m
		(  g  filenamef  ice-9/channel.scm		H
	)	S		/	S		1	S		3	S		6	R
	7	U		D	U
	W
	]		]	4!	]	$	]
%	^	/	^	51	^	4	^
5	_	?	_	6A	_	D	_
E	`	O	`	;Q	`	T	`
o	f
D 
	 

 
 
 
 	 		 	 	 
 	 	 	 	2 
 *	4
   C6                                                                                                                                                                                                                                                                                                                                                                         ccache/ice-9/format.go                                                                              0000644                 00000232050 15154557173 0010516 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.04     ]% 4 hx      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  format	 		g  filenameS	
f  ice-9/format.scm	g  replacementsS	 	g  	autoloadsS	g  pretty-print	 	g  truncated-print	 	g  i18n	 	g  %global-locale	g  number->locale-string	 	 	g  set-current-module	 	 	f  3.0	g  format:version	g  string?	g  error	f  +format: expected a string for format string	 g  boolean?	!g  current-output-port	"g  output-port?	#g  number?	$g  issue-deprecation-warning	%f  5Passing a number to format as the port is deprecated.	&f  "Pass (current-error-port) instead.	'g  current-error-port	(f  format: bad destination `~a'	)g  %default-port-encoding	*f  UTF-8	+g  open-output-string	,g  port-column	-g  
write-char	.g  
string-ref	/g  string-length	0g  char=?	1g  display	2g  string	3f  ~	4g  memv	5g  append	6[];:@^ 	70123456789-+v#' 	8f  illegal format string	9{}:@^ 	:g  char-upcase	;g  memq	<g  colon	=g  colon-at	><= 	?g  at	@?= 	Af  missing argument(s)	Bg  list-ref	Cg  length	Df  '~s parameter must be a positive integer	Ef  width	Ff  decimals	Gg  integer->char	Hf  padchar	Ig  
string-pad	Jg  complex?	Kf  argument not a complex number	Lg  	real-part	Mg  	imag-part	Nf  'one positive integer parameter expected	Og  integer?	Pg  char?	Qf  ~~c expects a character	Rg  object->string	Sg  char->integer	Tf  #\	Ug  number->string	Vf  missing backward argument(s)	Wf  ~~p expects a number argument	Xf  ies	Yg  call-with-output-string	Zg  widthS	[g  max	\f  illegal modifier in ~~?	]g  char-whitespace?	^f  &illegal modifier `:@' in ~~* directive	_g  string-copy	`g  char-alphabetic?	ag  string-set!	bg  char-downcase	cg  string-capitalize	dg  string-upcase	eg  string-downcase	ff  missing ~~(	gg  if-then	hg  if-else-then	if  illegal modifier in ~~[	jg  num-case	kf  ~~; not in ~~[~~] conditional	lf  no parameter allowed in ~~;	mg  	substring	nf  illegal modifier in ~~;	of  missing ~~[	pf  no modifier allowed in ~~]	qf  no parameter allowed in ~~]	rf  argument not a positive integer	sg  	rest-args	tg  sublists	ug  rest-sublists	vg  list	wf  missing ~~{	xf  illegal modifier	yf  no parameters allowed in ~~}	zg  string=?	{f   	|f  expected a list argument	}g  	list-tail	~f  !expected a list of lists argument	f  expected list arguments f  internal error in ~~} f  too much parameters f  double `@' modifier f  double `:' modifier f  misplaced modifier g  char-numeric? g  string->number f  misplaced '#'   g  string-append f   SLIB Common LISP format version  f  ,  (C) copyright 1992-1994 by Dirk Lutzebaeck f  5  please send bug reports to `lutzeb@cs.tu-berlin.de' f  unknown control character `~c' g  string-prefix? f  #< f  mincol f  colinc f  minpad f  argument not an integer f  
commawidth f  colnum f  unsupported modifier for ~~t f  'only positive integers can be romanized g  list->string g  reverse M  D  	dC  	2L  	
X  	V  I    g  assv 	d	d	
	
  f  zero f  minus  f  	 thousand f   million f   billion f  	 trillion f   quadrillion f   quintillion f   sextillion f   septillion f  
 octillion f  
 nonillion f  
 decillion f   undecillion f   duodecillion f   tredecillion f   quattuordecillion f   quindecillion f   sexdecillion f   septendecillion f   octodecillion f   novemdecillion f   vigintillion {  g  string->list f  ,  f  one f  two f  three f  four f  five f  six f  seven f  eight f  nine f  ten f  eleven f  twelve f  thirteen f  fourteen f  fifteen f  sixteen f  	seventeen f  eighteen f  nineteen   f   hundred    f  twenty f  thirty f  forty f  fifty f  sixty f  seventy f  eighty f  ninety  
 f   times ten to the  f   power f  3only integers can be converted to English cardinals f  zeroth f  th f    f  first f  second f  third f  fourth f  fifth f  sixth f  seventh f  eighth f  ninth f  tenth f  eleventh f  twelfth f  
thirteenth f  
fourteenth f  	fifteenth f  	sixteenth f  seventeenth f  
eighteenth f  
nineteenth   f  	twentieth f  	thirtieth f  fortieth f  fiftieth f  sixtieth f  
seventieth f  	eightieth f  	ninetieth  
 f  -f  2only integers can be converted to English ordinalsg  string-indexf  +argument is not a number or a number stringf  digitsg  inf?g  nan?f  argument is not a numberf  exponent digits	g  min
f  mindigg  exact->inexactf  (illegal character `~c' in number->stringf  4number is too long to format (enlarge format:fn-max)f  -internal error in format:fn-shiftleft (~d,~d)f  'FORMAT: INTERNAL ERROR IN FORMAT:ERROR!g  newlinef          destination: g  writef          format string: f          format args: f          error args:  f  error in formatf  r~%FORMAT: error with call: (format ~a "~a<===~a" ~
                                  ~{~a ~}===>~{~a ~})~%        g  	list-headg  applyg  make-stringf  ~a missing argument~:pg  force-outputg  get-output-stringg  
close-portf  ;Omitting the destination on a call to format is deprecated. f  5Pass #f as the destination, before the format string.!f  @Omitting the destination port on a call to format is deprecated."f  :Pass #f as the destination port, before the format string.#g  module-set!$g  the-root-moduleC 5   hx    ]4	
5 4 >  "  G   R !"#$%&'()*+,-.      hP      ]"  1$  "  ,44 5L>  "  G  ""M N C            g  str
		K g  i		K g  n			K g  k			7  g  filenamef  ice-9/format.scm
	Z			[			\			[			]			]		&	]		1	[		7	[		F	^	%	G	^		I	^	 		K	  g  nameg  format:out-substr C-  h@      ]
"  * $  "  $4L>  "  G  "
"M  N C       g  n
		@ g  ch		@ g  i			0  g  filenamef  ice-9/format.scm
	c			d			e			d			f		*	d		0	d		<	g		>	g	 
		@	  g  nameg  format:out-fill C/.012- h     ]ML$  MC4L
M5 MN   4 ~5$  NNNL 6 M	
$  cM
$  WM$  "44M4 55L>  "  G  "  4 L>  "  G  4 
5$  
"  MN"   "   "T        g  ch
		# g  char
	#   g  filenamef  ice-9/format.scm
 		 		 		 		 		 	!	 		# 		& 		2 		5 		6 	#	8 		; 		? 		B 		G 		J 		O 		U	M		V	N	
	Y	N		\	N	+	d	N		k	N	
	x	P	
 	R	 	R	 	T	 	Q	  	  	 
  g  nameg  anychar-dispatch C134.56789:;>@AB<CDEFGH/I?=JKLM2-0NOPQRSTUV#WXYABZ      hH      ]MM$  MN4M>  "  G  "   MNMN4LM5 L 6           g  p
		D  g  filenamef  ice-9/format.scm
			 		 		 	)	 		 		 	"	 		, 		. 		2 		3 		: 	 	< 		D	 		D   CABZ[        hP      ]MM$  MN4M>  "  G  "   MNMN4LM5 4L M56          g  p
		M  g  filenamef  ice-9/format.scm
			 		 		 	)	 		 		 	"	 		, 		. 		2 		3 		: 	 	< 		A	.	H	3	K	.	M	 		M   C\Z]^_/.`ab:       h     ])4 54 5H"  u$  C4 545$  GJ$  445>  "  G  "  K445>  "  G  "   "
"       g  str
	  g  cap-str	  g  non-first-alpha		  g  str-len		  g  i		  g  c		0   g  filenamef  ice-9/format.scm
%		&		(		&		)		 *		$)		(+		0+	
	3,		=,		C-		D.		K.	+	V.		e0		f1		m1	-	x1	 )	 )	 	   g  nameg  string-capitalize-first Ccdefghijklmnopqrstuvwxyz{|}~_ f       h0)  QI  ]HM*L)$  @M%$  44M%5L&>  "  G  "  4L&>  "  G  M'N'M(CM
  $  "  44L M*5455 $ (M#
  $  "  +4M*L)$  4M$5"  	4L M*54	55 $ (h4
M*L)$  4M$5"  	4L M*5 M*N*  5  A$  c4M	5N4L4M	5M(M$  MN4M$>  "  G  "   M(N(M(N4LM(5M>  "  G  L6  S$  c4M	5N4L4M	5M(M$  MN4M$>  "  G  "   M(N(M(N4LM(5M>  "  G  L6  D$  R4L
M	M(M$  MN4M$>  "  G  "   M(N(M(N4LM(5M	
>  "  G  L6  H$ M(M$  MN4M$>  "  G  "   M(N(M(N4LM(5M	$  <M(M$  MN4M$>  "  G  "   M(N(M(N4LM(5"  4M5M
$  34
5$  
$  4M$5"  "  "  M$  345$  
$  4M$5"  "  "  4M	$  54	5$  
$  4M$5"  "  	 "  	 545$  #45$  45"  "  M%$  44M%5L&>  "  G  "  4L&>  "  G  M'45N'L6  X$  R4L
M	M(M$  MN4M$>  "  G  "   M(N(M(N4LM(5M	>  "  G  L6  O$  R4L
M	M(M$  MN4M$>  "  G  "   M(N(M(N4LM(5M	>  "  G  L6  B$  R4L
M	M(M$  MN4M$>  "  G  "   M(N(M(N4LM(5M	>  "  G  L6  R$  M(  4L4M	$  L"   $  L""  $  L "  L!M(M$  MN4M$>  "  G  "   M(N(M(N4LM(55M>  "  G  "  P4L
M	M(M$  MN4M$>  "  G  "   M(N(M(N4LM(5MM>  "  G  L6  F$  P4LM	M(M$  MN4M$>  "  G  "   M(N(M(N4LM(5M>  "  G  L6  E$  P4LM	M(M$  MN4M$>  "  G  "   M(N(M(N4LM(5M>  "  G  L6  G$  P4LM	M(M$  MN4M$>  "  G  "   M(N(M(N4LM(5M>  "  G  L6  $$  P4LM	M(M$  MN4M$>  "  G  "   M(N(M(N4LM(5M>  "  G  L6  I$  M(M$  MN4M$>  "  G  "   M(N(M(N4LM(545$  "  4M$>  "  G  4LM	45M>  "  G  4L4 5M>  "  G  M%$  "44M%4!i55L&>  "  G  "  4"iL&>  "  G  4#i
5$  
"  M'N'L6  C$ bM(  "  J"  4M$$5"  ;4%5$  +
$  45$  "  ""  ""  "$  4M5"  8M(M$  MN4M$>  "  G  "   M(N(M(N4LM(54&5$  "  4M$'>  "  G  M	$  S4(5M%$  44M%5L&>  "  G  "  4L&>  "  G  M'45N'" 1$ 4)5HJ
$  J K"   J	 $  M%$  "44M%4!^55L&>  "  G  "  4"^L&>  "  G  4#^
5$  
"  M'N'4J	@5M%$  "44M%4!55L&>  "  G  "  4"L&>  "  G  4#
5$  
"  M'N'"  J	$  M%$  44M%*5L&>  "  G  "  4*L&>  "  G  M'	N'4+J	5M%$  44M%5L&>  "  G  "  4L&>  "  G  M'45N'"  SM%$  "44M%4!55L&>  "  G  "  4"L&>  "  G  4#
5$  
"  M'N'"  SM%$  "44M%4!55L&>  "  G  "  4"L&>  "  G  4#
5$  
"  M'N'L6  P$ M	&  "  $  A	M(N(M(NM(
$  4M$,>  "  G  "   4LM(>  "  G  "   M(M$  MN4M$>  "  G  "   M(N(M(N4LM(54-5$  "  4M$.>  "  G  $  xM	&  "  $  WM%$  "44M%4!y55L&>  "  G  "  4"yL&>  "  G  4#y
5$  
"  M'N'"   "  M	&  "  $  BM%$  44M%/5L&>  "  G  "  4/L&>  "  G  M'	N'"  SM%$  "44M%4!s55L&>  "  G  "  4"sL&>  "  G  4#s
5$  
"  M'N'L6  ~$  M(  "  J"  4M$$5"  ;4%5$  +
$  45$  "  ""  ""  "$  4LM~>  "  G  "  SM%$  "44M%4!~55L&>  "  G  "  4"~L&>  "  G  4#~
5$  
"  M'N'L6  %$  M(  "  J"  4M$$5"  ;4%5$  +
$  45$  "  ""  ""  "$  4LM
>  "  G  "  SM%$  "44M%4!
55L&>  "  G  "  4"
L&>  "  G  4#

5$  
"  M'N'
N'L6  &$  M(  "  J"  4M$$5"  ;4%5$  +
$  45$  "  ""  ""  "$  8M
$  (4LMM'
$  
"  
>  "  G  "   
N'"  _M'
$  WM%$  "44M%4!
55L&>  "  G  "  4"
L&>  "  G  4#

5$  
"  M'N'"   L6  _$  M(  "  J"  4M$$5"  ;4%5$  +
$  45$  "  ""  ""  "$  4LM >  "  G  "  SM%$  "44M%4! 55L&>  "  G  "  4" L&>  "  G  4# 
5$  
"  M'N'L6  /$  M(  "  J"  4M$$5"  ;4%5$  +
$  45$  "  ""  ""  "$  4LM	>  "  G  "  SM%$  "44M%4!	55L&>  "  G  "  4"	L&>  "  G  4#	
5$  
"  M'N'L6  |$  M(  "  J"  4M$$5"  ;4%5$  +
$  45$  "  ""  ""  "$  4LM>  "  G  "  SM%$  "44M%4!55L&>  "  G  "  4"L&>  "  G  4#
5$  
"  M'N'
N'L6  T$  4LM	M>  "  G  L6  Y$ M(  "  J"  4M$$5"  ;4%5$  +
$  45$  "  ""  ""  "$  M"  	OM	$  b401LLL$LL(O 5M%$  44M%5L&>  "  G  "  4L&>  "  G  M'45N'"  $  d402L'LLL$LL(O 5M%$  44M%5L&>  "  G  "  4L&>  "  G  M'45N'"  p$  4M$3>  "  G  "  Q44M(M$  MN4M$>  "  G  "   M(N(M(N4LM(5L&5>  "  G  
N'L6  ?$  "   K$ 1M	&  "  $  4M$3>  "  G  "  M	&  dM(M$  MN4M$>  "  G  "   M(N(M(N4LM(54L5 4L4L5>  "  G  "  M(M$  MN4M$>  "  G  "   M(N(M(N4LM(5M(M$  MN4M$>  "  G  "   M(N(M(N4LM(54L>  "  G  L6  !$  NL6  
$ M	&  WM%$  "44M%4!
55L&>  "  G  "  4"
L&>  "  G  4#

5$  
"  M'N'"   M*L)$ 9" 465$  "  M*L)$  " M	&  M*L)$  4M$5"  	4L M*5M*N*M%$  "44M%4!55L&>  "  G  "  4"L&>  "  G  4#
5$  
"  M'N'"  8M*L)$  4M$>  "  G  "  4L M*>  "  G  M*N*M*L)$  4M$5"  	4L M*5"M*L)$  4M$5"  	4L M*5""   L6  *$ M	$ M(  "  J"  4M$$5"  ;4%5$  +
$  45$  "  ""  ""  "$  c"  TM$  "  M	M(N(M(NM(
$  4M$,>  "  G  "   4LM(>  "  G  "
""  =	M(N(M(NM(
$  4M$,>  "  G  "   4LM(>  "  G  " $  nM(  "  J"  4M$$5"  ;4%5$  +
$  45$  "  ""  ""  "$  M"  
N(" +$  4M$7>  "  G  " M(  "  J"  4M$$5"  ;4%5$  +
$  45$  "  ""  ""  "$  i"  ZM$  "  SM(M$  MN4M$>  "  G  "   M(N(M(N4LM(>  "  G  "
""  CM(M$  MN4M$>  "  G  "   M(N(M(N4LM(>  "  G  L6  ($  <M	$  8"   $  9"  $  :"  ;N%L6  )$  #M%$  "  4M$<>  "  G  N%L6  [$  MNM$  M*NNNM	$  ="  %$  >"  $  4M$?5"  @NM(  "  J"  4M$$5"  ;4%5$  +
$  45$  "  ""  ""  "$  M"  8M(M$  MN4M$>  "  G  "   M(N(M(N4LM(5N"   L6  ;$  M
$  4M$A>  "  G  "   M(  "  4M$B>  "  G  M$  nM	&  N4CL MM*	5"  6M	&  "  $  4M$D5"  4CL MM*	54M 5NM*N"   L6  ]$ M
$  4M$E>  "  G  "   MNM	$  4M$F>  "  G  "   M(  "  4M$G>  "  G  M
$ G4CL MM*	5M$  N"  4M 5NM=$  &M$  4LMM >  "  G  "   "  >$  /4L4LM$  M"  M4L5 5>  "  G  "  @$  4%M5$  "  M
$  4M$H>  "  G  "   "  ;4L4LM4M5$  M"  	4MM54L5 5>  "  +G  "  $M4M5$  M$  ""   "  ""   "   L6  {$  M#N#M#$  M*NM	$  I"   $  J"  $  K"  LNM(  "  J"  4M$$5"  ;4%5$  +
$  45$  "  ""  ""  "$  M"  N"   L6  }$ 6M#
$  4M$M>  "  G  "   M#N#M	$  M$  "  N"  -$  "  $  4M$N>  "  G  "   M(  "  4M$O>  "  G  M#
$ 4CL MM*M	$  	"  	5H4PJQ5$  >M(M$  MN4M$>  "  G  "   M(N(M(N4LM(5K"   ML$  M(M$  MN4M$>  "  G  "   M(N(M(N4LM(5
H$  "  4M$R>  "  G  45K"  KJ$  "  M$  	M"  $  "  (4LJ4S55"

"" YJ$  M(M$  MN4M$>  "  G  "   M(N(M(N4LM(5
H$  "  4M$R>  "  G  45K"  uJ$  "  M$  	M"  $  "  O45$  "  4M$T>  "  G  4LJ>  "  G  "
"" cI$  4L5 45"  M$  "  M$  	M"  $  "  (4LJ4S55"

"4L>  "  G  "  K$  4L5 45"  w$  "  M$  	M"  $  "  O45$  "  4M$U>  "  G  4LJ>  "  G  "
"4L>  "  G  "  4M$V>  "  G  "   L6  ^$  M(  @M%$  	WN%"  -M#$  "   M$  "  M(M$  	L)N*"  "  }4M5$  	M
"  _	$  4M
54M5"  A	$  14M54M
5$  4M	5"  "  4M$X5$  L6 C @$  IM	&  "  $  4M$Y>  "  G  "   M	&  "  N	" :$  IM	&  "  $  4M$Z>  "  G  "   M	&  "  N	"ڳ '$  ]M	$  4M$[>  "  G  "   4M4)M*L)$  4M$5"  	4L M*5M*N*5 5NN"M 0$  "   1$  "   2$  "  u 3$  "  g 4$  "  Y 5$  "  K 6$  "  = 7$  "  / 8$  "  ! 9$  "   -$  "   +$  M	$  4M$[>  "  G  "   M*M*H"  o4\5$  `M*L)$  4M$>  "  G  "  4L M*>  "  G  M*N*JKM*L)$  4M$5"  	4L M*5""  #M*L)$  4M$5"  	4L M*5"n4M4]4CL J55 5NN" V$  gM	$  4M$[>  "  G  "   4MM(M$  MN4M$>  "  G  "   M(N(M(N4LM(5 5NN"V #$  UM$  4M$^>  "  G  "   M	$  4M$[>  "  G  "   4M44L5 5 5NN" ,$  8M	$  4M$[>  "  G  "   M$  "  4M_5NN"׷ Q$  M	&  N`M%$  44M%5L&>  "  G  "  4L&>  "  G  M'45N'"  g4!
54ab`cd5M%$  44M%5L&>  "  G  "  4L&>  "  G  M'45N'L6 M$e4L M*56L6 L6    II      g  t
	O	v g  t
	~  g  ch
   g  key
 )% g  numa) g  key	e g  locale	& g  argc	# g  pars	 g  par	 g  width	  g  pars	D g  par	< g  decimals	D g  pars	K g  par	_ g  padchar	 g  str	 g  str	 g  keyT g  z~ g  params g  ch	/ g  key		T g  str		f	 g  c		 g  ch	
>
 g  str	
2 g  t g  arg g  t	 g  t	1H g  paramsM g  params& g  params g  params g  params g  params^ g  params[ g  width g  key	 g  str	/ g  str	T g  t3J g  frmt g  args	 g  frmt^ g  args	B[ g  ch g  t	 g  ch	2> g  ch	> g  key+ g  params	8 g  i	 g  params	E g  params	, g  i	4 g  key" g  keyv g  params g  t g  
clause-str g  
clause-str g  key g  t	.B g  key g  params"| g  key  g  iteration-str J# g  key	 # g  args	 !f g  args-len	 !f g  arg-pos	!!V g  i	!!V g  t	!!0 g  args	!"\ g  args-len	!"\ g  arg-pos	!"O g  t	!! g  sublist	""F g  args	"n" g  args-len	"w" g  arg-pos	"}" g  i	"}" g  t	"" g  usedup-args	"" g  args	## g  args-len	## g  arg-pos	## g  t	##7 g  sublist	#J# g  usedup-args	## g  key$'$ g  b	$i$ g  continue$$ g  t$$ g  t%% g  ch%% g  num-str-beg&y'5 g  num-str-end	&y'5 g  ch	&& g  str(^( g  nl() g  str	()  ig  filenamef  ice-9/format.scm
 		 		 			F			G	
		G		 	 		G		"	G	
	/	H	
	3 	 	:	H	
	E	J		F	J		H	I		N 		O 		] 		` 		i 		m 	'	o 		q 		s 		z 		} 		~ 	  	  	  	  	  	   	  	  	  	'  	  	  	  	  	  	  	  	  	   	  	  	  	!  	  	  	 				* 	 	 	) 	 	  	"% 	5 	7 	; 	< 	C 	 E 	M	Y		b 	c	m	n	q	*~ 	 	 	) 	 	 	" 	 	 	 	 	 	  			 		 	 	 	) 	 	 	" 	 	 	 	 		 	  		 	) 	. 	2 	5 	)7 	8 	< 	"A 	Q 	S 	W 	X 	_ 	 a 	a	e	$u 	y 	| 	)~ 	 	 	" 	 	 	 	 	 	  			$		$	
			
						A			$		
			
	!	%	&	*	,	A.	D	G	$K	%R	
V	W	_	
g	k	o	p	t	v	1x			$		$	 	%!	1!	. 	)"	) 		F		G	
	G		G	
	H	
	J		J		I	-$	6 	7&	@ 	D 	G 	)I 	J 	N 	"S 	c 	e 	i 	j 	q 	 s 	|&	'	 	)	 	 	 	) 	 	 	" 	 	 	 	 	 	  	)	*	 	,	 	 	 	) 	  	 	"	 	 	 	 	  	' 	 ) 	2,	>-	G 	M/	N0	R3	 	 	 	) 	 	 	" 	 	 	 	 	 	  	3	0	:	 	 	 	) 	 	 	" 	 	 		 	
 	 	  	;	,;	9:	*<	3 	4>	= 	A 	D 	)F 	G 	K 	"P 	` 	b 	f 	g 	n 	 p 	w>	?	 	A	 	 	 	) 	 	 	" 	 	 	 	 	 	  	A	B	 	D	 	 	 	) 	 	 	" 	 	 	 	 	  	 " 	)D	5E	> 	?G	H 	L 	O 	)Q 	R 	V 	"[ 	k 	m 	q 	r 	y 	 { 	G	H	 	 	 	 	) 	 	 	" 	 	 	 	 	 	  	J	K	K	L	L	'L	M	M	0M	N	N	'N	+ N	.	M	/	N	
2	N	5	N	+=	N	D	N	
Q	P	
e	R	q	R	y	T	{	Q	P	 	R	! 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	R	S	!S	0S	! 		  		 	)	 		 		
 	"	 		 		! 		% 		& 		- 	 	/ 		/R		2U		<U		AV		EV	'	JV		TW		`Y	(	fY		n	F		o	G	
	r	G			G	
		H	
		J			J			I		W		[	!	[		\		\		]	&	]		a		`			M			N	
		N			N	+		N			N	


	P	

	R	
*	R	
2	T	
4	Q	
5e	
<e	,
>e	
>d	
F	M	
G	N	

J	N	
M	N	+
U	N	
\	N	

i	P	

}	R	
	R	
	T	
	Q	
f	
`	
	F	
	G	

	G	
g	,
	G	
	G	

	H	

g	,
	H	

	J	
	J	
	I	
i	
h	
	F	
	G	

	G		G	
	H	
&	J	-	J	/	I	<	M	=	N	
@	N	C	N	+K	N	R	N	
_	P	
s	R		R		T		Q		M		N	
	N		N	+	N		N	
	P	
	R		R		T		Q	m	 	o	o	 	 	 	! 	& 	' 	+ 	 0 	= 	Y 	] 	` 	)b 	c 	g 	"l 	| 	~ 	 	 	 	  	q	r	r	s	s	's	t	t	u	u		M		N	
	N		N	+	N		N	
	P	
	R		R	%	T	'	Q	1w	Lw	R	F	S	G	
V	G	Zx	-\	G	c	G	
p	H	
tx	-{	H	
	J		J		I		M		N	
	N		N	+	N		N	
	P	
	R		R		T		Q	z	 	|	 	 		 	 	 	 	 	 	 	 	  	$ 	% 	- 	1 	Q|	R}	W}	(^}	p	M	q	N	
t	N	w	N	+	N		N	
	P	
	R		R		T		Q		 		 	 	 	 	 	 	 	 	 	 	 	 	 	 	
 	*	+	0	(7	I	M	J	N	
M	N	P	N	+X	N	_	N	
l	P	
	R		R		T		Q			 		 	 	 	 	 	 	 	 	 	 	 	 	 	 	 				 				1	5	1$	.+	:	B	F	L	M	M	N	
P	N	S	N	+[	N	b	N	
o	P	
	R		R		T		Q		 		 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	
			(	)	M	*	N	
-	N	0	N	+8	N	?	N	
L	P	
`	R	l	R	t	T	v	Q	z	 		 	 	 	 	 	 	 	 	 	 	 	 	 	 	 				(		M		N	
	N			N	+	N		N	
%	P	
9	R	E	R	M	T	O	Q	S	\ 	^	f 	p 	t 	v 	z 	{ 	 	 	 	 	 	 	 	 	 				(		M		N	
	N		N	+	N		N	
	P	
	R		R	&	T	(	Q	+	/	8 	9	P	Y 	[	$c 	m 	q 	s 	w 	x 	} 	 	 	 	 	 	 	 	 		 	$					F		G	
	G	 	G	
	H	
#	J	*	J	,	I	<	=	T	\	F	]	G	
`	G	m	G	
z	H	
	J		J		I				&		 	 	 	) 	 	 	" 	 	 	 	 	 	  				# 	3	N	O	S	#X	h	#l	q 	u 	x 	)z 	{ 	 	" 	 	 	 	 	 	  			"			$	 	 	 	) 	 	 	" 	 	 	 	 	 	  		 	 	 	) 	 	 	"" 	2 	4 	8 	9 	@ 	 B 	B	E	b	k 	n	r	{ 		%		M		N	
	N		N	+	N		N	
	P	
	R		R		T		Q					%	 		.	 			+	 	 	 	# 	 % 	* 	2 	7 	!9 	>	F	M	G	N	
J	N	M	N	+U	N	\	N	
i	P	
}	R		R		T		Q	 	 	 	 	  	 	 	! 	 	 	 	 	  	 		 	 	 	 	  	
 		 	) 	+	8	@ 	J 	N 	P 	T 	U 	Z 	\ 	` 	c 	e 	i 	j 	r 	v 				$		 	 	 	 	 	 	 	  	 		$	 	  	 	 	 	 	 	  	# 	C	E	(M 	W 	[ 	] 	a 	b 	g 	i 	m 	p 	r 	v 	w 	 	 		$	(				$		 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	0	4	9	$:	>	G 	K 	N 	)P 	Q 	U 	"Z 	j 	l 	p 	q 	x 	 } 		$	 	 	 	) 	 	 	" 	 	 	 	 	 	  		 		$	(	1 	7	<	@	%E	P	T	] 	`	*b	f 	j	n	q	r	#t	v		#		&		)	7	)		#		 	 	 	 	 	 	 	 	 	 	 	 	 	 	 			 	! 	$ 	)& 	' 	+ 	"0 	@ 	B 	F 	G 	N 	 P 	R
	Z	c 	f	k	l	p	%u				%				.		 	 	+	 	 		 	.	 	 	+	 	 	' 	7 	' 	!	"	  	#$	($	)$	0-$	>2$	0A%	*C%	I&	J'	N'	%S'	e(	j)	n)	%s)	~+	*	,	'-	2,	',	.	/	0	)0	90	)0	1	3	4	4	05	04	1	7	8	8	-9	1:	1;	-8	7	&1	'=	%.=	 .=	?>	 F=	G?	K?	*P?	aB	dC	iD	6pD	"tD	{F	"G	C	B	@	@	:@	&@	@	!H	 	J	(J	L	K	M	O	P	#O	Q	&O	R	)S	# N	"T	.* 	4 	8 	: 	> 	? 	D 	F 	J 	M 	O 	S 	T 	\ 	` 	T	*U	.T	V	 	X	X	X	.X	<X	.Y	(Y	Z	\	\	/Z	]	$]	2]	$ ^	 _	 _	%  _	 +`	 0`	 1b	 ?c	7 Hc	) Jb	 Ja	 Md	 Sd	5 Ud	 Yd	 ^ 	 b 	 e 	) g 	 h 	 l 	" q 	  	  	  	  	  	   	 e	 f	  	  	  	)  	  	  	"  	  	  	  	  	  	   	 h	 j	' j	 k	" k	0 k	" l	-!l	!m	!r	'!r	#!#s	'!(t	,!4m	!;n	1!@p	2!Jn	1!Km	.!Nq	(!Vm	!sf	!x 	!| 	! 	)! 	! 	! 	"! 	! 	! 	! 	! 	! 	 ! 	!v	!x	'!x	!y	"!y	0!y	"!z	-!z	!{	!|	'!|	#!}	'!~	,"{	"	/"	 "	+"	""	&""	'"'	&"0	""I{	."O{	"if	"j	)"n	"q	-"w	"}	$"	-"	)"	-"	2"	$"	7"	8"	7"	4"	."	$"	"	"f	"	)#	#	-#	#	$#	-#	)#*	-#/	2#;	$#B	5#J	&#O	1#S	(#X	,#\	:#a	,#j	(#	4#	$#	#	#	!#	/#	!#	# 	#	#	#	#	$ 	$	$	$	$	$!	$$'	$4	,$5	%$C	$D	($L	<$T	%$a	$b	)$i	%$l	)$v	%$}	)$	%$	&$	4$	&$	$	$	$	$ 	$	$	$	$	%$	$	4$	"$	<$	F$	$	% 	%	%#	%$	%(	%%-	%=	4%A	"%C	9%I	C%K	%O	%X 	%^	%_	 %c	.%h	 %u	 %z	5% 	% 	% 	% 	 % 	% 	% 	% 	!% 	%	5%	/%	 %	%	%	% 	&^	&_	 &c	.&h	 &w	&&y	&	&	&	& 	& 	& 	& 	 & 	& 	& 	!& 	&	)&	& 	& 	& 	& 	 & 	& 	&	& 	& 	& 	& 	 '  	' 	'	'	'	)'	*'(	)'+	#'-	'/	'8	'<	'E 	'K	'L	 'P	.'U	 'b	 'k 	'o 	'r 	)'t 	'u 	'y 	"'~ 	' 	' 	' 	' 	' 	 ' 	'	/'	 '	'	'	' 	'	'	)'	7'	)'	'	 '	.'	 '	 '	5'	='	5'	/(	 (	(	(
	( 	(	(	 (	.(#	 (5	(:	$(@	3(B	$(D	(G	(K	(T 	(X	%(\	(^	(f	F	(g	G	
(j	G	(w	G	
(	H	
(	J	(	J	(	I	(	!(	(	(	(	(	(	(	(	F	(	G	
(	G	(	G	
(	H	
)	J	)		J	)	I	)	)	!)	!)!	;)#	!)%	))		)-
  g  nameg  tilde-dispatch C     h0      ]"  
$   C  "LM  "            g  l
		 g  k		  g  filenamef  ice-9/format.scm
 		 		
 		 		 	$	 	,	 		 	 			+
  g  nameg  	rest-args C       h      ] MNMN C        g  n
		  g  filenamef  ice-9/format.scm
 		 			 		 	 		  g  nameg  add-arg-pos CC    h    , 3 &M4 5HHHHHHHHH
H	HHHHHO O +O O LLL	 LQ  	LLLLLLL

L	LLLLLLLLL LLLLQ Q LQ 
45



%$#"! KKKKKK	K
KK K!K"K#K$K%K !"#$%
N
N4>   "  G  NJC      g  format-string
	 g  arglist	 g  recursive-pos-save		 g  format-string-len		 g  arg-pos		 g  arg-len		 g  modifier		 g  params		 g  param-value-found		 g  conditional-nest			 g  
clause-pos	
	 g  clause-default		 g  clauses		 g  conditional-type		 g  conditional-arg		 g  iteration-nest		 g  iteration-pos		 g  iteration-type		 g  max-iterations		 g  anychar-dispatch	  g  tilde-dispatch	  g  	rest-args	  g  add-arg-pos	  g  arg-pos	4 g  arg-len	4 g  modifier	4 g  params	4 g  param-value-found	4 g  conditional-nest	4 g  
clause-pos	4 g  clause-default	4 g  clauses	4 g  conditional-type	 4 g  conditional-arg	!4 g  iteration-nest	"4 g  iteration-pos	#4 g  iteration-type	$4 g  max-iterations	%4  &g  filenamef  ice-9/format.scm
 			 		 	! 	) 	. 					 		  g  nameg  format:format-work CRY1      h   ]   ]L  6      U       g  p
		
  g  filenamef  ice-9/format.scm
	.	
	: 		
   C1/CBDG1       h   ]   ]L  6      U       g  p
		
  g  filenamef  ice-9/format.scm
	.	
	: 		
   C        h    ]D(  $  45"  4O 5M$  45$  45"  "  M$  44M5L>  "  G  "  4L>  "  G  M45NC45
$  34	
5$  
$  4M
5"  "  
"  
$  34	5$  
$  4M
5"  "  "  	$  44		5$  
$  4M
5"  "  
"  
4	$   4		5$  "  	 "  	 5$  45"  4O 5M$  45$  45"  "  	 $  "  CM$  44M	5L>  "  G  "  4	L>  "  G  M4	5N"  3
$  4L >  "  'G  "   

"4	5
" $  EM$  44M	5L>  "  G  "  4	L>  "  G  M4	5NCC            g  pad-left
	 g  obj	 g  slashify		 g  pars		 g  res		%	P g  str		P  g  l	  g  par	   g  par	  g  par	*Q g  par	k~ g  res	 g  mincol	 g  colinc	 g  minpad	 g  padchar	 g  objstr		 g  
objstr-len	
)\ g  i	)\  g  filenamef  ice-9/format.scm
"		#								%		-		.	#	2	3	6	#	:		;		P$	
	X	F		Y	G	
	\	G		i	G	
	v	H	
 	J	 	J	 	I	 %	 %	
 	
 	 	 	
 	 	 	 	 	 &	1 	 	
 	 	 	
 	 	 	 		'	1		
!	"	*	
2	6	:	;	?	A(	1C	W)	^	
b	c	k	
s	{	)							#	3	#		&	,		F		G	
	G		G	
	H	
	J	#	J	%	I	).	.0	10	5.	61	T/	\.	].	m.	s2	y	F	z	G	
}	G		G	
	H	
	J		J		I	 g		  g  nameg  format:out-obj-padded COUC/BDG?=<12-0 h    ]T45$  "  4M>  "  G  45" #4545
$  34
5$  
$  4M5"  "  "  4	$  45$  "  	 "  	 54		$   4	5$  "  	,"  	,5	$  54	5$  
$  4M
5"  "  	"  	
	$  H &  "   $  
$  	JK"   "    &  "   $  
$  	"  
JK"   J$  4LJ>  "  G  "   "    &  "   $  c
$  WM $  "44M 4+55L>  "  G  "  4+L>  "  G  4+
5$  
"  MN"   "    &  "   $  

$  "  
4L
>  "  G  "  $  C$  WM $  "44M 4	55L>  "  G  "  4	L>  "  G  4	
5$  
"  MN"   4L
>  "  G  
"q"iM $  44M 5L>  "  G  "  4L>  "  G  M45NC(  O $  "M $  44M 5L>  "  G  "  4L>  "  G  M45NC"        g  modifier
	 g  number	 g  pars		 g  radix		 g  numstr		, g  l		@U g  
numstr-len		@U g  par		T	{ g  par	   g  par	   g  par	  g  mincol	U g  padchar	U g  	commachar		U g  
commawidth	
U g  numlen	. g  start	\ g  ns	\ g  i	y  g  filenamef  ice-9/format.scm
5		6		6		6	"	6	0	6	"	$7		,7		3:		:;		@:		H	
	L		M		T	
	\		`		d		e		i		k<	4	m	 =	 	
 	 	 	
 	 	 =	 ?	 	
 	 	 	
 	 @	5 ?	 	
 	 	 	
 	 	 			A	7		<	,B	.C	8D	FD	JD	>ND	QE	'SE	cF	qF	wH	;{H	7G	4G	*G	'G	K	K	L	L	+L	M	M	N	M		M		N	
	N		N	+	N		N	
	P	
	R	!	R	)	T	+	Q	;P	IP	NQ	!RR	"VR	\Q	aS	yT	~U	T	V	V		M		N	
	N		N	+	N		N	
	P	
	R		R		T		Q	X	X	4X	T	$T		F		G	
	G	'	G	
4	H	
J	J	Q	J	S	I	U8	a8	k	F	l	G	
o	G	|	G	
	H	
	J		J		I	 		  g  nameg  format:out-num-padded CCBDG<=?    hx    ]245
$  34
5$  
$  4M5"  "  "  $  345$  
$  4M5"  "  "  4	$   4	5$  "  	 "  	 5 $  "   $  M	6 
$  GL
$  "  3"  !$  	M "  "
M "6LM $  	M "  6
$  
"  )"  M $  	M "  ""6          g  modifier
	t g  pars	t g  l			t g  par			B g  par		W	~ g  par	   g  colnum	 t g  colinc	 t g  padch	 t g  c	  g  col	  g  c	Kh  g  filenamef  ice-9/format.scm
[		\			\			
						
	#		'		+		,		0		2]	-	4		K	
	O		P		W	
	_		c		g		h		l		n^	-	p	 _	 	
 	 	 	
 	 	 _	 ]	 `	
 b	 b	 `	
 e	 e	 g	 i	 g	j	
g	g	h	"g	&d	-o	1n	6p	>q	Bn	Kt	Pu	Tt	Yv	bt	ht	tm	 >	t	  g  nameg  format:tabulate CO   h     ]9"  M 64 5$  | $  p"  ](  456"  ,
$  """ ""s"o       g  n
	  g  n	#  g  romans		#  g  s		#  g  	roman-val		=  g  	roman-dgt		=  g  q		E	q g  s		E	q  g  filenamef  ice-9/format.scm
		
			
										
	#	
	)		,	-	4		7	!	;	!	=		E		I		M		R		U		a		d	1	i		q		v	 	 	
 }	 	 	
 	   g  nameg  format:num->old-roman CO5 	       h     ]Q"  M 64 5$   
$  "  (  456"  {
$  _"  	
"$  ;	$  +	445
5"z""	

	"
	"o "5""        g  n
	  g  n	#  g  romans		#  g  
boundaries		#  g  s		#  g  	roman-val		@  g  	roman-dgt		@  g  bdry		@  g  q		J  g  r			J  g  s	
	J   g  filenamef  ice-9/format.scm
		
			
										
	#	
	)		,		4		7	!	;	!	@		@		J		N		R		[	$	^	1	l		l		y	,	z	&	~	 	" 	5 	" 	( 	. 	) 	( 	" 	 	 	) 	 	 	! 	! 	 	
 }	 	 	 	
 0	   g  nameg  format:num->roman COC5B h    ]Q4 5$  
$  C 
$  4L
 5645" O
$  6
$ 4
$  4	
5"  	d	d	
		

4
$  -44	4554	5
$  "  5"  	$  
$  4	455"  "  144	4	55

$  -4	4
55"  55
	$  4	455"  "44	54	4L	554	555"  " 
"M 6       g  n
	 g  power3-word-limit	6 g  n		< g  power3		< g  s		< g  n-before-block		V g  n-after-block		V g  hundreds	 : g  	tens+ones	 7 g  tens		 4 g  ones	
 1  g  filenamef  ice-9/format.scm
														 		$	$	%	-	(	C	-	-	/		0		4		6		6		<		@		D		J		P	+	V	*	V		_		c	!	g		h	!	n	&	r	"	s	&	w	4	y	&	~	: 	 	 	 	 	 	 	 	 	 	 		 	 	 	 	 	 	 	 	 	 	 	 	" 	- 	 	 	 		 	 	 	 	 	 	 	 	 	 			
							"	$	%	*	,	.	?	&C	"D	&G	'K	O	'Q	&V	&Y	']	5_	'`	'c	(j	)l	(n	'o	's	5u	'w	&{	!						 s	  g  nameg  format:num->cardinal CO{B   h     ]!4 5$   
$  C 
$  4L
 56 	d 	d
$  #44L	d5
$  "  5"  
$  "  X	$  4	5"  B	
	

$  4
5"  4454	556M 6            g  n
	  g  hundreds	9  g  	tens+ones		9  g  tens	   g  ones	    g  filenamef  ice-9/format.scm
														 		$	$	%	-	(	B	-	-	/		4		9		9		C		G		H		K		R	+	T		X		\		^	)	d	.	f		l		p		t		v	$		 	 	 	 	 	$  	$ 	 !	 !	 "	 
	 "	 #	 $	 	 $	 %	 &	 	 &	 #	 	 	 	 9	   g  nameg  format:num->ordinal CU/[G1    h(    ]>4 5454.5$  "  
$  		"  
	"  $  44	5
5"  

$  4

5"  
4$  "  	 54L
>  "  G  M$  44M5L >  "  G  "  4L >  "  G  M45NL6$  $$  $  L456"("$"      	      g  number
	# g  width	# g  digits		# g  edigits		# g  overch		# g  padch		# g  str			# g  len		# g  dot		# g  digits			=# g  leftpad	
	d  g  rightpad		  g  padch	    g  filenamef  ice-9/format.scm
+		/			/		0		/		1		/		%2		23		73	$	=2		=/		I6		J7	 	O7	.	V7	7	[7	.	\7	%	_7	 	d6		l9		m:	!	t:	&	z:	!	6	 <	 <	) 	 <	 6	 =	 	F	 	G	
 	G	 	G	
 	H	
 	J	 	J	 	I	 ?	 4	4	4	
4	5	#5	 /	#	  g  nameg  format:out-inf-nan C#CBDE?G       h  @  ]C45$  "  45$  "  4M
>  "  G  45
$  34
5$  
$  4M
5"  "  "  $  345$  
$  4M
5"  "  "  	$  4	5$  "  
"  
	$  4	5$  "  "  	$   4	5$  "  	 "  	 " $ 4L>  "  G  MM$  4LMM>  "  G  "  4L>  "  G  $  MH	M

$  "   	
$  	J	K	"   M
$  $  	J	K	"   "   J	$   4LJ	4
5>  "  G  "   "  L	 6$  J	$  L4
56""L	 64L>  "  G  4L>   "  G  $  MH	M

$  "   	
$  	J	K	"   M
$  	J	K	"   J	$   4LJ	4
5>  "  G  "   J	$  IJ	MM

$  $  L4
56L	 64L
>  "  G  L	 6L	 6L	 645$  545		$  "  45	$  L 6""     8      g  modifier
	{ g  number	{ g  pars		{ g  l		:{ g  par		L	s g  par	   g  par	   g  par	  g  par	+ g  width	1{ g  digits	1{ g  scale	1{ g  overch	1{ g  padch	1{ g  numlen		A g  t	
 g  numlen		v0 g  t	
{ g  	dot-index	
) g  t		I`  g  filenamef  ice-9/format.scm
C		D		D		D		D	$	D		"E	
	&E		+E	
	4G		:G		@	
	D		E		L	
	T		X		\		]		a		cH	-	e		|	
 	 	 	
 	 	 	 	 	 I	. 	 	
 	 	 	
 	 	
 	 	 	
 		
			
 	(	1H	EN	
FT	_U	bU	fU	gV	qV	.rV	$wV	W	X	Y	Y	Z	Z	Z	=Z	/Z	[	#[	\	\	\	8\	/\	]	#]	^	^	_	_	'_	8_	b	7b	.b	`	(`	",`	1a	-9a	Hc	If	^g	sh	vi	vi	{j	{j	j	=j	/j	k	#k	l	l	m	#m	n	n	o	o	'o	8o	p	p	r	*q	'q	s	s	t	u	7u	 v	 x	x	/x	)y	0z	7{	7N	
8O	BN	
CP	IP	WP	#dO	sQ	 	{	  g  nameg  format:out-fixed C#CBDE?G     h8  	  ][45$  "  45$  "  4M>  "  G  45
$  34
5$  
$  4M5"  "  "  $  345$  
$  4M5"  "  "  	$  44	5$  
$  4M	5"  "  "  	$  4	5$  "  "  	$  4	5$  "  "  	$   4	5$  "  	 "  	 	$  4	5$  "  "  
	" F$ 
$  	$  
"  
"  4L>  "  G  MM$  4LMM>  "  G  "  4L>  "  G  $ "  M	HM$  "   
$  	JK"   M
$  $  	JK"   "   J$  M$  "  M"  MKJ$   4LJ4	5>  "  G  "   "   4L
 J>  "  G  L	
6$  J$  L456""$  $$  M$  L456"""4L
 >  "  G  L	
64L>  "  G  4L>   "  G  $ R"  M	HM$  "   
$  	JK"   M
$  	JK"   J$  M$  "  M"  MKJ$   4LJ4	5>  "  G  "   J$  tMMJ$  .$  L4564L
 >  "  G  L	
64LJ>  "  G  4L
 >  "  G  L	
64L
 >  "  G  L	
6$  $$  M$  L456"""4L
 >  "  G  L	
645$  645$  "  45$  L 	6"y"u   	      g  modifier
	5 g  number	5 g  pars		5 g  l		:5 g  par		L	s g  par	   g  par	   g  par	 g  par	-? g  par	Vi g  par	 g  width	5 g  digits	5 g  edigits	5 g  scale	5 g  overch	5 g  padch		5 g  expch	
5 g  digits	X g  numlen	6 g  t	;P g  numlen	 g  t	 g  f	 g  t	  g  filenamef  ice-9/format.scm
									$			"	
	&		+	
	4		:		@	
	D		E		L	
	T		X		\		]		a		c	-	e		|	
 	 	 	
 	 	 	 	 	 	. 	 	
 	 	 	
 	 	 	 	 	 	/ 	 	
 	 		
	 	
$	%	-	
5	I	
M	N	V	
^	f	t	
x	y		
			
			+	"		%	"							0	&			-	6	$6	;	 ;	L	CM	5T	W	)Y	a	!e	j	>k	5o	r	)t		!	2	%						-	-			?	6				(		3			 	*$	)	-1	>	X	Y	n			"				A	3		'				'			0	#						+	+				#	$	#'	 +	1	 6	5>	$?	&Y	&Z	"a	6d	3i	"r	"	"					(		+				
		
			#	-	 	5	  g  nameg  format:out-expon C#CB[	 
 h    ][45$  "  45$  "  4M	>  "  G  45
$  4
5"  $  45"  	$  4	5"  	$  4	5"  	$  4	5"  "  4L
>  "  G  4L>   "  G  $  		"  		$  		"  
M
$  
4L5 "  M$  "  4M4	55"  
L 6
$  5$  (4L 
 >  "  G  L	 6""45$  645		$  "  4	5	$  L 6""            g  modifier
	 g  number	 g  pars		 g  l		: g  width	  g  digits	  g  edigits	  g  overch	  g  padch	  g  ee		  g  ww	
  g  n	 g  d	5 g  dd	< g  t		  g  filenamef  ice-9/format.scm
									$			"	
	&		+	
	4		:		@		D		E	!	U		Y		Z	"	k		o		p	# 	 	 	" 	 	 	! 	 	 	 	 	# 	 	 	! 		
						&	+	-5	5	<	<	L	L	P	T	Y	^	p	6u			
		
			#		 B		  g  nameg  format:out-general C#CBD
E?=<12-0G  h0  	  ];45$  "  45$  "  4M>  "  G  45
$  44
5$  
$  4M5"  "  	"  	$  345$  
$  4M5"  "  "  	$  44	5$  
$  4M	5"  "  
"  
	$   4	5$  "  	 "  	 " 4L
>  "  G  MM	$  4L
MM	>  "  G  "  4L>  "  G  MHM		$  "   
&  "   	$  	JK"   $  M	$  JM	K"   "   M	
$  $  "  JK"   J$ ! $  }M$  "  SM$  "44M4-55L>  "  G  "  4-L>  "  G  4-
5$  
"  MN4LJ45>  "  G  "  
$  4LJ45>  "  G  M$  +"  -	M$  "44M4	55L>  "  G  "  4	L>  "  G  4	
5$  
"  MN	"  $  M$  +"  -	M$  "44M4	55L>  "  G  "  4	L>  "  G  4	
5$  
"  MN	4LJ45>  "  G  "  y4LJ45>  "  G  M$  "  SM$  "44M4-55L>  "  G  "  4-L>  "  G  4-
5$  
"  MN"  M$  q 
&  "   $  WM$  "44M4+55L>  "  G  "  4+L>  "  G  4+
5$  
"  MN"   "  SM$  "44M4-55L>  "  G  "  4-L>  "  G  4-
5$  
"  MN$  (M	$  4LM	0>  "  G  "   "   M	
$  a$  "  SM$  "44M4055L>  "  G  "  40L>  "  G  40
5$  
"  MN"   4LM
M	>  "  G  M$  "44M4.55L>  "  G  "  4.L>  "  G  4.
5$  
"  MNLMM	M645$  445$  "  45$  L 6""	      g  modifier
	0 g  number	0 g  pars		0 g  l		:0 g  par		L	t g  par	   g  par	   g  par	 g  digits	0 g  mindig	0 g  width	0 g  padch	0 g  numlen	} g  t		 g  ch		 g  ch		"z g  t	  g  filenamef  ice-9/format.scm
									$			"	
	&		+	
	4		:		@	
	D		E		L	
	T		X		\		]		a		c	-	e		~	
 	 	 	
 	 	 	 	 	 	- 	 	
 	 	 	
 	 	 	 	 	 	, 	 	
 	 		
			,	D	G	K	L	V	.W	$\	i	}	}				+							)												M		N	
	N		N	+	N	%	N	
2	P	
F	R	R	R	Z	T	\	Q	]!	d!	&e!	7p!		#	#	&#	7#	$	&$		M		N	
	N		N	+	N		N	
	P	
	R		R		T		Q		&	&"&	*	M	+	N	
.	N	1	N	+9	N	@	N	
M	P	
a	R	m	R	u	T	w	Q	{'	'	&'	7'	)	)	&)	7)	*		M		N	
	N		N	+	N		N	
	P	
	R			R		T		Q	,	%-	3-	9	M	:	N	
=	N	@	N	+H	N	O	N	
\	P	
p	R	|	R		T		Q		M		N	
	N		N	+	N		N	
	P	
	R		R		T		Q	/	/	/	0	0	!0	1	1	 1	*	M	+	N	
.	N	1	N	+9	N	@	N	
M	P	
a	R	m	R	u	T	w	Q	|3		M		N	
	N		N	+	N		N	
	P	
	R		R		T		Q	5		
		
			#	(	 	0	  g  nameg  format:out-dollar CU.0a]/       h  a  ]C4 5$   "  44 55N
N
N	N
N" $ FM	$  "  M
N	J$  
K
N	N
"   $ ;J
$  UM	
$  IM	J$   4LJ>  "  G  M	JN	
K"  4LM	>  "  G  JM	K
N	"   "   


$  "  M

$  4L5 
J$  "  M	
M
$  !4L
M
M	>  "  G  M
N	"  uM	

$  4L

M	>  "  G  
N	"  KJ
$  <J
$  4L
>  "  G  "  4LJ>  "  G  
JN	"  M	
N	
"   "  J
$  JM		"  M	
$  "  

J
$  4LJ>  "  G  N	"  M	
$  N	"   4LM	4L5 
>  "  G  J$  4L
>  "  G  N	"  O
$  4L
>  "  G  
N	"  +M	$  4LM	>  "  G  N	"  N	
C45K	4J	5$  gJ$  B4J	05$  J$  	JK"   "  K4MM
J	>  "  G  M
N
"  4MMJ	>  "  G  MN"  4J	-5

$  "  	4J	+5
$  $J$  4J	+5N"  4J	+5N"  4J	.5$  M
N	"  m4J	e5$  K"  Y4J	E5$  K"  E4J	5$  "  64J	d5$  "  %4J	#5$  "  4M 	J	>  "  G  JJJJ	H	HHH"K

4
5H	HHH"/   Y      g  num
	 g  fixed?	 g  scale		 g  num-str		 g  i		4 g  
left-zeros		4 g  	mantissa?		4 g  
all-zeros?		4 g  num-len		4 g  c			4 g  t	
   g  shift	
  g  negexp	
 g  t	
	"  g  filenamef  ice-9/format.scm
C		D		D		F		F	)	F		D		$G		'H		*I		-J		0K		4L		9R		=L		CS		KT		QV		TX		WY		ZZ		d^		ha		la		pa	-	ta		yb		}b		~d	 e	1 e	 f	 h	 i	. i	 j	 k	  k	 k	 k	- k	 l	- l	$ l	 m	 o	 o	 m	 p		q	(
q	p	r	$s	&s	*m	+t	/t	25t	/:t	Eu	Mw	Qw	Vx	#Zx	[y	#q{	%|	9|	%}	3}					 											(	@	%	"				+	3	7	8	<	)D	O	X	\	]	e	)j	v	~			
		
					+				&			&					&	
,	-	%7	<	%F	K	W	
[	`	l	
o	t		
			
		
		
			L	L	P	L	 		  g  nameg  format:parse-float CS.       hX     ]M
$  
C"  = M$  M$  JC
JCJ	
44M  55	0K JH "

H "       g  i
		M g  n		M  g  filenamef  ice-9/format.scm
			
	
			
				
			#		,		-	#	0	2	:	#	<		=	 	>		@		C		M	
 		W
  g  nameg  format:en-int CU.a/     h   _  ]!
N 
N4 5"  Q$  C45K4J5$  4M MJ>  "  G  MN"   JH"
45H"    W      g  en
		| g  en-str		| g  i			i g  en-len			i g  c			i  g  filenamef  ice-9/format.scm
																	!		$		.	
	/		9	
	:		R	$	T		[		i		k		|	 		|  g  nameg  format:en-set Ca.      h     ]
M$  4M>  "  G  "   MN $  N"  B
$  C4M $  0"  4M 5>  "  G  "M""  *M$  C4M 0>  "  G  "M"             g  left?
	  g  n	  g  i		6	x g  i	    g  filenamef  ice-9/format.scm
					
				
				
	*		,		2		6	
	:		>	
	A		L		P		W		`	7	b		g		r	 	x	
 	
 	 	
 	 	& 	
 	 	
 	 	  g  nameg  format:fn-zfill Ca.  hp     ]	 M$  4M M>  "  G  "   "  ;M$  	M NC4M  4M 5>  "  G  " "    
      g  n
		l g  i	)	d  g  filenamef  ice-9/format.scm
			
				
				
	)		.		2		7		9		<		E	#	F	+	S		^		d	 		l  g  nameg  format:fn-shiftleft CaS.G  h     ] H J MK "  J
$  "  
$  @J$  2J N4L>  "  G  4M 
1>  "  G  MNCJ NC44M 55	0JK4M 4J	
$  	J	0"  J	
	05>  "  G  J	
$  
"  KJH"=J 	H"1      g  digits
	  g  i	  g  c		  g  t			)  g  filenamef  ice-9/format.scm
												&		-		1		5		9		:		L		c	%	e		k		n		q	%	{		}		~	 	 	 	 	% 	* 	& 	 	* 	- 	 	* 	% 	 	 	 	 	 	 (	   g  nameg  format:fn-round C?12-0     h  a  ]M$  c &  WM$  "44M4+55L>  "  G  "  4+L>  "  G  4+
5$  
"  MN"   "  SM$  "44M4-55L>  "  G  "  4-L>  "  G  4-
5$  
"  MNM
$  a$  WM$  "44M4055L>  "  G  "  40L>  "  G  40
5$  
"  MN"   "  4LM
M>  "  G  M$  "44M4.55L>  "  G  "  4.L>  "  G  4.
5$  
"  MNLMMM 6       Y      g  modifier
	 g  add-leading-zero?	  g  filenamef  ice-9/format.scm
		 					
		M			N	
		N			N	+	%	N		,	N	
	9	P	
	M	R		Y	R		a	T		c	Q		q	M		r	N	
	u	N		x	N	+ 	N	 	N	
 	P	
 	R	 	R	 	T	 	Q	 	
 	 	
 	M	 	N	
 	N	 	N	+ 	N	 	N	
 	P	
		R		R		T		Q	(	
B	M	C	N	
F	N	I	N	+Q	N	X	N	
e	P	
y	R		R		T		Q			 6		  g  nameg  format:fn-out CG12-0 h    ]
$  45"  EM$  "44M455L>  "  G  "  4L>  "  G  4
5$  
"  MNM$  +"  -M$  "44M455L>  "  G  "  4L>  "  G  4
5$  
"  MN $  (M $  4L M0>  "  G  "   "   L M
M6            g  edigits
	
 g  expch	
 g  ch			m g  ch		{   g  filenamef  ice-9/format.scm
						!				M			N	
	!	N		$	N	+	,	N		3	N	
	@	P	
	T	R		`	R		h	T		j	Q		s		{	 	M	 	N	
 	N	 	N	+ 	N	 	N	
 	P	
 	R	 	R	 	T	 	Q	 	 	 	
 	 	 	
	 $	
	  g  nameg  format:en-out Ca0.     h`      ]4MM0>  "  G  "  :44M 505$  "   M $   NC  "M "         g  i
		V g  t	-	B  g  filenamef  ice-9/format.scm
								 		,		-		-		?		F		I		K		P		V	 		^
  g  nameg  format:fn-strip C0.     hP      ]"  A M$  "  44M  505$   M$  
C C  "
 "         g  i
		G g  t		,  g  filenamef  ice-9/format.scm
												(		)		0		5		9		A		G	 		N
  g  nameg  format:fn-zlead C'1   h  {  -  1  3 4>  "  G  4>   "  G  4>  "  G  4L>  "  G  4>   "  G  4>  "  G  4L>  "  G  4>   "  G  4>  "  G  4L>  "  G  4>   "  G  4>  "  G  4 >  "  G  4>   "  G  M N	
6   s      g  args
		  g  filenamef  ice-9/format.scm
	~		
 		 		 		 	:	, 		0 		5 		> 	(	P 	<	` 		d 		i 		r 	*  	@  	  	  	  	(  	<  	  	  	  	(  	5  	6	"6	 		


  g  nameg  format:intern-error Cm/} h   3  -  1  3 45 LLLLLO NM
$  "  MN4L4L
M 54LM 4L554LM54LM5>  "  G  4	 >  "  G  4
>  "  G  MN6  +      g  args
		  g  port	   g  filenamef  ice-9/format.scm
	k		
	l			l		!	m		$	n		)	n		0	o	!	2	o		3	p		9	q		<	t		F	u		M	v		U	u		V	w		_	x		l	p		u	y	 	z	 	{	 6	" 6	 		 


  g  nameg  format:error CC1 2      h`    - 1 3 /45$  "  4>  "  G   $  Z4 5$  	45 "  B4 5$   "  14 5$  4	
>  "  G  45 "  	4 5"  Y45 Z45$  "  
HHHHHHHHHHH
H	HHHO O O O O O O O O O O O O O 
 O ! O "!O #"O $#O %$O &%O '&O ('O )(O *)O +Q Q 	! Q 	Q 	Q 	Q 	Q 	Q 	Q 	Q Q *"'%(	Q *"'%)(	Q +*"	Q  %'"	Q !	$&%#Q "Q #Q $	Q %	Q &%Q 'Q (Q )Q *Q +K
K
K*
	 O K	J	K
K4+5K
KKK4+	
5K
KK454,5-,,-$  "-K4-J>  "  G  J	.,-6J$  4/>  "  G  "    $  C405.41>  "  G  .C      g  destination
		` g  format-string		` g  format-args			` g  port	 ` g  t	   g  
output-col	 ` g  flush-output?	 ` g  format:case-conversion	 ` g  
format:pos	 ` g  format:arg-pos	 ` g  format:error		 ` g  format:error-save	
 ` g  format:read-proof	 ` g  format:fn-str	 ` g  format:fn-len	 ` g  format:fn-dot	 ` g  format:fn-pos?	 ` g  format:en-str	 ` g  format:en-len	 ` g  format:en-pos?	 ` g  format:out-substr	#` g  format:out-fill	#` g  format:format-work	#` g  format:out-obj-padded	#` g  format:out-num-padded	#` g  format:tabulate	#` g  format:num->old-roman	#` g  format:num->roman	#` g  format:num->cardinal	#` g  format:num->ordinal	#` g  format:out-inf-nan	#` g  format:out-fixed	#` g  format:out-expon	#` g  format:out-general	 #` g  format:out-dollar	!#` g  format:parse-float	"#` g  format:en-int	##` g  format:en-set	$#` g  format:fn-zfill	%#` g  format:fn-shiftleft	&#` g  format:fn-round	'#` g  format:fn-out	(#` g  format:en-out	)#` g  format:fn-strip	*#` g  format:fn-zlead	+#` g  arg-pos	,` g  arg-len	-` g  str	.I`  0g  filenamef  ice-9/format.scm
	&
	
	'			'			(			(		$	(		2	+	
	3	0		=	+	
	>	0	#	G	1		Q	+	
	X	2		b	+	
	c	3		g	4		i	5		n	3		w	6	 	8	 	8	 	8	 	.	2 	/	 	*	 	:	 	:	 	*	:	?	8	9	8	;	:	<	<	=	>	>	/>	$@	%A	@B	CD	ID	LE	 0		`	
	  g  nameg  format CRi $ !"  h`   >  *   :1 3 4 5$  4>  "  G  L  @L  @]4>  "  G  L  6   6      g  destination
		@ g  format-string		@ g  args			@ g  deprecated-format-string-only
	B	]  g  filenamef  ice-9/format.scm
K			M		M		O		P		Q		#O		6R		@S		BK			CU		GV		IW		NU		]X	 		@	
	 	B	]   C O  i#i$ii6           g  m
		, g  format
          ^  g  filenamef  ice-9/format.scm		
	.	$		1	$
     	&
     J	     bI     n\	     t\
 		     t
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                         ccache/ice-9/ls.go                                                                                  0000644                 00000005462 15154557173 0007651 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] % 4 hU      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  ls	 		g  filenameS	
f  ice-9/ls.scm	g  importsS	g  common-list	 	 	 	g  exportsS	g  local-definitions-in	g  definitions-in	g  lls	g  recursive-local-define	 	g  set-current-module	 	 	g  nested-ref-module	g  
module-map	g  
nested-ref	g  reduce	g  union	g  map	g  module-uses	 g  current-module	!g  reverse!	"g  reverse	#g  module-define!	$g  make-modules-inC 5      h   x   ]4	
5 4 >  "  G        h   ^   ] C   V       g  k
		 g  v		  g  filenamef  ice-9/ls.scm
	:	 			   C     h(      ]
4 5$  6 6            g  root
		# g  names		# g  m			#  g  filenamef  ice-9/ls.scm
	7
		8			8			9			:		#	;	 		#	  g  nameg  local-definitions-in CR        h   `   ] 6       X       g  m2
			  g  filenamef  ice-9/ls.scm
	B			B	;			B	( 			   C 	h8      ]
4 5$  4544556 6       g  root
		8 g  names		8 g  m			8  g  filenamef  ice-9/ls.scm
	=
		>			>			?			A			A	.		A		 	B		%	C		-	B		.	A		0	@		8	D	 		8	  g  nameg  definitions-in CR     h   q   ] 445  5C      i       g  ref
		  g  filenamef  ice-9/ls.scm
	I			J			J	,		J			J	 		   C         h8      -  1  3  $   $   645  645 6          g  various-refs
			5  g  filenamef  ice-9/ls.scm
	F
		G			G			H			H			I		"	L		)	L	+	+	L	
	.	M		3	M	'	5	M	 			5


  g  nameg  ls CR         h   q   ] 445  5C      i       g  ref
		  g  filenamef  ice-9/ls.scm
	R			S			S	2		S			S	 		   C         h8      -  1  3  $   $   645  645 6          g  various-refs
			5  g  filenamef  ice-9/ls.scm
	O
		P			P			Q			Q			R		"	U	 	)	U	1	+	U	
	.	V		3	V	-	5	V	 			5


  g  nameg  lls CR!"#$     h(      ]
44 55445 5 6          g  name
		% g  value		% g  parent			%  g  filenamef  ice-9/ls.scm
	X
		Y			Y			Y			Y			Y			Z			Z	%		Z		%	Z	 		%	  g  nameg  recursive-local-define CRCp       g  m
		,  g  filenamef  ice-9/ls.scm		
	7
i	=
	F
	O
	X
 	 
   C6                                                                                                                                                                                                               ccache/ice-9/getopt-long.go                                                                         0000644                 00000135440 15154557173 0011472 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] 4        hY      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  getopt-long	 		g  filenameS	
f  ice-9/getopt-long.scm	g  importsS	g  common-list	 	g  selectS	g  remove-if-not	 	 	g  srfi	g  srfi-9	 	 	g  match	 	 	g  regex	 	 	g  optargs	 	 	 	 g  exportsS	!g  
option-ref	"! 	#g  set-current-module	$# 	%# 	&g  
make-fluid	'f  guile	(g  %program-name	)g  program-name	*g  format	+g  current-error-port	,f  ~a: 	-g  apply	.g  newline	/g  exit	0g  fatal-error	1g  option-spec	2g  %%make-option-spec-procedure	3g  make-syntax-transformer	43 	53 	6g  %make-option-spec	7g  macro	8g  $sc-dispatch	98 	:8 	;g  _	<g  any	=;<<<<< 	>g  syntax-object	?g  lambda	@g  m-70fb8ec09b0a817-48c	Ag  top	B@A 	Cg  ribcage	Dg  t-70fb8ec09b0a817-487	Eg  t-70fb8ec09b0a817-488	Fg  t-70fb8ec09b0a817-489	Gg  t-70fb8ec09b0a817-48a	Hg  t-70fb8ec09b0a817-48b	IDEFGH 	JBBBBB 	Kf  l-70fb8ec09b0a817-491	Lf  l-70fb8ec09b0a817-492	Mf  l-70fb8ec09b0a817-493	Nf  l-70fb8ec09b0a817-494	Of  l-70fb8ec09b0a817-495	PKLMNO 	QCIJP 	RC 	Sg  x	TS 	UB 	Vf  l-70fb8ec09b0a817-48e	WV 	XCTUW 	Yg  shift	Zg  	proc-name	[g  args	\Z[ 	]A 	^]] 	_f  l-1e8ba8b5a-60	`f  l-1e8ba8b5a-61	a_` 	bC\^a 	cg  key	dg  value	eg  name	fg  formals	gg  body	hcdefg 	i]]]]] 	jf  l-1e8ba8b5a-53	kf  l-1e8ba8b5a-54	lf  l-1e8ba8b5a-55	mf  l-1e8ba8b5a-56	nf  l-1e8ba8b5a-57	ojklmn 	pChio 	qg  make-procedure-name	rq 	s] 	tf  l-1e8ba8b5a-43	ut 	vCrsu 	w] 	xf  l-1e8ba8b5a-42	yx 	zCTwy 	{BQRXYRRRRbpvz 	|g  hygiene	}| 	~>?{} 	]QRX  |  >e  g  	required? >  g  option-spec->single-char >  g  	predicate >  g  value-policy >    g  make-struct g  m-70fb8ec09b0a817-485 A  g  t-1e8ba8b5a-133 g  t-1e8ba8b5a-132 g  t-1e8ba8b5a-131   g  m-1e8ba8b5a-134 A    f  l-1e8ba8b5a-138 f  l-1e8ba8b5a-139 f  l-1e8ba8b5a-13a   C  g  	ctor-args   f  l-1e8ba8b5a-120   Cw  g  ctor g  field   f  l-1e8ba8b5a-11c f  l-1e8ba8b5a-11d   C^  g  form g  	type-name g  constructor-spec g  field-names   ]]]]  f  l-1e8ba8b5a-111 f  l-1e8ba8b5a-112 f  l-1e8ba8b5a-113 f  l-1e8ba8b5a-114   C  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers   ]]]]]]]]  f  l-1e8ba8b5a-e9 f  l-1e8ba8b5a-e7 f  l-1e8ba8b5a-e5 f  l-1e8ba8b5a-e3 f  l-1e8ba8b5a-e1 f  l-1e8ba8b5a-df f  l-1e8ba8b5a-dd f  l-1e8ba8b5a-db   C  f  l-1e8ba8b5a-da   CTw  QRXYRRRRR  >}  >1  >
}    ~  g  each-any ;ό g  syntax-violation     f  Wrong number of arguments g  identifier?     ]RX  >2      f  -source expression failed to match any pattern g  record-type-vtable     g  
pwpwpwpwpw g  default-record-printer     e  g  set-struct-vtable-name!     g  vtable-offset-user     g  %option-spec?-procedure g  option-spec? ;<  g  m-70fb8ec09b0a817-4a1 A  g  t-70fb8ec09b0a817-4a0     f  l-70fb8ec09b0a817-4a6   C  f  l-70fb8ec09b0a817-4a3   CT  RYRRRRbpvz  >?}  g  obj g  t-1e8ba8b5a-224 g  t-1e8ba8b5a-21e g  t-1e8ba8b5a-21f g  t-1e8ba8b5a-220 g  t-1e8ba8b5a-223g  t-1e8ba8b5a-222g  t-1e8ba8b5a-221  g  m-1e8ba8b5a-225A  f  l-1e8ba8b5a-229f  l-1e8ba8b5a-22a	f  l-1e8ba8b5a-22b
f  l-1e8ba8b5a-22cf  l-1e8ba8b5a-22df  l-1e8ba8b5a-22ef  l-1e8ba8b5a-22f	
 C g  	copier-id f  l-1e8ba8b5a-21c Cw g  	ctor-name f  l-1e8ba8b5a-214 Cw  f  l-1e8ba8b5a-212 Cw g  layout  f  l-1e8ba8b5a-210!  "Cw! #g  
immutable?$# %f  l-1e8ba8b5a-20e&% 'C$w& (g  field-count)( *f  l-1e8ba8b5a-20c+* ,C)w+ -g  
getter-ids.- /f  l-1e8ba8b5a-2090/ 1C.w0 2g  	field-ids32 4f  l-1e8ba8b5a-20654 6C3w5 7g  predicate-name8g  
field-spec9#78 :]]]]]] ;f  l-1e8ba8b5a-1f9<f  l-1e8ba8b5a-1fa=f  l-1e8ba8b5a-1fb>f  l-1e8ba8b5a-1fc?f  l-1e8ba8b5a-1fd@f  l-1e8ba8b5a-1feA;<=>?@ BC9:A CRYRRRRRRRR"R'R,R1R6B D>C} ED Fg  andG>FC} Hg  struct?I>HC} JID Kg  eq?L>KC} Mg  struct-vtableN>MC} OND P]R Q>1P RLOQ SGJR TES U]R V>U Wg  throw-bad-structXW YW Zg  option-spec->name[g  %option-spec->name-procedure\g  free-id]g  
%%on-error^g  m-70fb8ec09b0a817-4ad_^A `_ af  l-70fb8ec09b0a817-4afba cCT`b d_RcYRRRRbpvz e>]d} f\e gf< hg  %%typeig  t-1e8ba8b5a-14bjg  t-1e8ba8b5a-14ckg  t-1e8ba8b5a-14dlg  t-1e8ba8b5a-14emg  t-1e8ba8b5a-14fng  t-1e8ba8b5a-150og  t-1e8ba8b5a-151pijklmno qg  m-1e8ba8b5a-152rqA srrrrrrr tf  l-1e8ba8b5a-156uf  l-1e8ba8b5a-157vf  l-1e8ba8b5a-158wf  l-1e8ba8b5a-159xf  l-1e8ba8b5a-15ayf  l-1e8ba8b5a-15bzf  l-1e8ba8b5a-15c{tuvwxyz |Cps{ }g  getter~g  index}~ f  l-1e8ba8b5a-149f  l-1e8ba8b5a-14a C^ - ]]] f  l-1e8ba8b5a-144f  l-1e8ba8b5a-145f  l-1e8ba8b5a-146 C RcYR|RRRR >h} \ ;g< g  ckg  errg  s __ f  l-70fb8ec09b0a817-4b2f  l-70fb8ec09b0a817-4b3 C _RcYRRRRbpvz >} g  quote>} ]Rc >1   g  %%index>} \ ;g< f  l-70fb8ec09b0a817-4b7f  l-70fb8ec09b0a817-4b8 C _RcYRRRRbpvz >} >} Rc >
   g  %%copier>} \ ;g< f  l-70fb8ec09b0a817-4bcf  l-70fb8ec09b0a817-4bd C _RcYRRRRbpvz >} >} g  %%option-spec-set-fields]Rc >   g  t-70fb8ec09b0a817-4ac f  l-70fb8ec09b0a817-4c1 C` _RcYRRRRbpvz >?} RcYR|RRRR >}  g  if>} >K} >M}  ]Rc >1  g  
struct-ref>} Rc >
  >W} >} >Z     ]Rc >[ g  option-spec->required?g  !%option-spec->required?-procedureg  m-70fb8ec09b0a817-4c8A  f  l-70fb8ec09b0a817-4ca CT RYRRRRbpvz >]} \ < RYR|RRRR >h} \ ;<  f  l-70fb8ec09b0a817-4cdf  l-70fb8ec09b0a817-4ce C RYRRRRbpvz >} >} ]R >1   >} \ ;< f  l-70fb8ec09b0a817-4d2f  l-70fb8ec09b0a817-4d3  C  RYRRRRbpvz >} >} R >   	>} 
\	 ;
< f  l-70fb8ec09b0a817-4d7f  l-70fb8ec09b0a817-4d8 C RYRRRRbpvz >} >} ]R >   g  t-70fb8ec09b0a817-4c7 f  l-70fb8ec09b0a817-4dc C RYRRRRbpvz >?} RYR|RRRR >}   !>} ">K} #>M} $# %]R &>1% '"$& (>} )R *>) +(* ,>W} ->} .>% /-. 0,/ 1!'+0 2 1 3]R 4>3 5g  #%option-spec->single-char-procedure6g  m-70fb8ec09b0a817-4e376A 87 9f  l-70fb8ec09b0a817-4e5:9 ;CT8: <7R;YRRRRbpvz =>]<} >\= ?>< @R;YR|RRRR A>h@} B\A C;?B< D77 Ef  l-70fb8ec09b0a817-4e8Ff  l-70fb8ec09b0a817-4e9GEF HCDG I7HR;YRRRRbpvz J>I} K>I} L]HR; M>1L NKM ON P>@} Q\P R;?Q< Sf  l-70fb8ec09b0a817-4edTf  l-70fb8ec09b0a817-4eeUST VCDU W7VR;YRRRRbpvz X>W} Y>W} ZVR; [>	Z \Y[ ]\ ^>@} _\^ `;?_< af  l-70fb8ec09b0a817-4f2bf  l-70fb8ec09b0a817-4f3cab dCDc e7dR;YRRRRbpvz f>e} g>e} h]dR; i>h jgi kj lg  t-70fb8ec09b0a817-4e2ml nf  l-70fb8ec09b0a817-4f7on pCm8o q7pR;YRRRRbpvz r>?q} spR;YR|RRRR t>s} ut v>s} w>Ks} x>Ms} yxt z]pR; {>1z |wy{ }>s} ~pR; >	~ }t >Ws} >s} >z  t v| ru ]R; >5 g  option-spec->predicateg  !%option-spec->predicate-procedureg  m-70fb8ec09b0a817-4feA  f  l-70fb8ec09b0a817-500 CT RYRRRRbpvz >]} \ < RYR|RRRR >h} \ ;<  f  l-70fb8ec09b0a817-503f  l-70fb8ec09b0a817-504 C RYRRRRbpvz >} >} ]R >1   >} \ ;< f  l-70fb8ec09b0a817-508f  l-70fb8ec09b0a817-509 C RYRRRRbpvz >} >} R >	   >} \ ;< f  l-70fb8ec09b0a817-50df  l-70fb8ec09b0a817-50e C RYRRRRbpvz >} >} ]R >   g  t-70fb8ec09b0a817-4fd f  l-70fb8ec09b0a817-512 C RYRRRRbpvz >?} RYR|RRRR >}  >} >K} >M}  ]R >1  >} R >	  >W} >} >     ]R > g  option-spec->value-policyg  $%option-spec->value-policy-procedureg  m-70fb8ec09b0a817-519A  f  l-70fb8ec09b0a817-51b CT RYRRRRbpvz >]} \ < RYR|RRRR >h} \ ;<  f  l-70fb8ec09b0a817-51ef  l-70fb8ec09b0a817-51f C RYRRRRbpvz >} >} ]R >1   >} \ ;< f  l-70fb8ec09b0a817-523 f  l-70fb8ec09b0a817-524  C RYRRRRbpvz >} >} R >	  	 
>} \
 ;< f  l-70fb8ec09b0a817-528f  l-70fb8ec09b0a817-529 C RYRRRRbpvz >} >} ]R >   g  t-70fb8ec09b0a817-518 f  l-70fb8ec09b0a817-52d C RYRRRRbpvz >?} RYR|RRRR  >} !  ">} #>K} $>M} %$  &]R '>1& (#%' )>} *R +>	* ,) + ->W} .>} />& 0./ 1- 0 2"(,1 3!2 4]R 5>4 6g  each7<< 867 9<8:<9;<:<g  %%set-fields=g  dummy>g  check??g  expr@=>}? Ag  m-70fb8ec09b0a817-534BAA CB Df  l-70fb8ec09b0a817-539Ef  l-70fb8ec09b0a817-53aFf  l-70fb8ec09b0a817-53bGf  l-70fb8ec09b0a817-53cHf  l-70fb8ec09b0a817-53dIDEFGH JC@CI KB Lf  l-70fb8ec09b0a817-536ML NCTKM Og  t-1e8ba8b5a-16aPg  t-1e8ba8b5a-16cQg  t-1e8ba8b5a-16bROPQ Sg  m-1e8ba8b5a-16dTSA UTTT Vf  l-1e8ba8b5a-171Wf  l-1e8ba8b5a-172Xf  l-1e8ba8b5a-173YVWX ZCRUY [f  l-1e8ba8b5a-167\f  l-1e8ba8b5a-168]f  l-1e8ba8b5a-169^[\] _C^ `JRNYRZRRR_ a><`} b]JRN c>1b d>Zb e>b f>b g>b h>b idefgh jg  mapkj lj mg  listng  set-option-spec-name!og   %set-option-spec-name!-procedurep;<< qg  m-70fb8ec09b0a817-548rqA sg  t-70fb8ec09b0a817-546tg  t-70fb8ec09b0a817-547ust vrr wf  l-70fb8ec09b0a817-54dxf  l-70fb8ec09b0a817-54eywx zCuvy {r |f  l-70fb8ec09b0a817-54a}| ~CT{} rzR~YRRRRbpvz >?} g  t-1e8ba8b5a-18cg  t-1e8ba8b5a-18d g  m-1e8ba8b5a-18eA  f  l-1e8ba8b5a-192f  l-1e8ba8b5a-193 C g  settere} f  l-1e8ba8b5a-186f  l-1e8ba8b5a-187f  l-1e8ba8b5a-188 C 8~ f  l-1e8ba8b5a-17df  l-1e8ba8b5a-17e C^ g  field-specs f  l-1e8ba8b5a-179f  l-1e8ba8b5a-17a C^ zR~YRRR >} g  val>}  >} >K} >M}  ]zR~ >1  g  struct-set!>} zR~ >
  >W} >} >n     ]R~ >o g  set-option-spec-required?!g  %%set-option-spec-required?!-procedureg  m-70fb8ec09b0a817-558A g  t-70fb8ec09b0a817-556g  t-70fb8ec09b0a817-557  f  l-70fb8ec09b0a817-55df  l-70fb8ec09b0a817-55e C  f  l-70fb8ec09b0a817-55a CT RYRRRRbpvz >?} RYRRR >} >}  >} >K} >M}  ]R >1  >} R >  >W} >} >     ]R > g  set-option-spec-single-char!g  '%set-option-spec-single-char!-procedureg  m-70fb8ec09b0a817-568A g  t-70fb8ec09b0a817-566g  t-70fb8ec09b0a817-567  f  l-70fb8ec09b0a817-56df  l-70fb8ec09b0a817-56e C  f  l-70fb8ec09b0a817-56a CT RYRRRRbpvz >?} RYRRR >} >}  >} >K} >M}  ]R >1  >} R  >	   >W} >} >     	]R 
>	 g  set-option-spec-predicate!g  %%set-option-spec-predicate!-procedureg  m-70fb8ec09b0a817-578A g  t-70fb8ec09b0a817-576g  t-70fb8ec09b0a817-577  f  l-70fb8ec09b0a817-57df  l-70fb8ec09b0a817-57e C  f  l-70fb8ec09b0a817-57a CT RYRRRRbpvz >?} RYRRR >} >}   !>} ">K} #>M} $# %]R &>1% '"$& (>} )R *>	) +(* ,>W} ->} .>% /-. 0,/ 1!'+0 2 1 3]R 4>3 5g  set-option-spec-value-policy!6g  (%set-option-spec-value-policy!-procedure7g  m-70fb8ec09b0a817-58887A 9g  t-70fb8ec09b0a817-586:g  t-70fb8ec09b0a817-587;9: <88 =f  l-70fb8ec09b0a817-58d>f  l-70fb8ec09b0a817-58e?=> @C;<? A8 Bf  l-70fb8ec09b0a817-58aCB DCTAC E8@RDYRRRRbpvz F>?E} G@RDYRRR H>G} I>G} JHI K>G} L>KG} M>MG} NMH O]@RD P>1O QLNP R>G} S@RD T>	S URHTI V>WG} W>G} X>5O YWX ZVHY [KQUZ \FJ[ ]]RD ^>6] _g  make-option-spec`g  symbol->stringag  for-eachbg  errorcf  $invalid getopt-long option property:db eb ff  no matching patterngf  option predicate failed: --~ahg  single-charig  char?jf  #`single-char' value must be a char!kg  parse-option-speclg  reversemg  string=?nf  --og  split-arg-listpg  make-regexpqf  ^-([a-zA-Z]+)(.*)rg  short-opt-rxsf  ^--([^=]+)$tg  long-opt-no-value-rxuf  ^--([^=]+)=(.*)vg  long-opt-with-value-rxwg  regexp-execxg  looks-like-an-optionyg  make-stringzg  optional{f  ,option must be specified with argument: --~a|g  match:substring}g  	assoc-ref~f  no such option: -~ag  appendg  string-appendf  -g  string->listf   g  lengthf  no such option: --~af  &option does not support argument: --~ag  process-optionsg  stop-at-first-non-optionS	 g  assq-reff  option must be specified: --~ag  string->symbolC 5  hP[  ^  ]4	
 "5 4% >  "  G   4&i'5(R(  h   a   ] [C  Y       g  filenamef  ice-9/getopt-long.scm
 
 		
  g  nameg  program-name C)R*+,)-./  h`      - 1 3 445 45 >  "  G  445  >  "  G  445 >  "  G  6             g  fmt
			Z g  args			Z  g  filenamef  ice-9/getopt-long.scm
 
	
 		 	
	 		 	&	 		& 		+ 		8 		A 		D 		M 		Z 	 			Z
  g  nameg  fatal-error C0R1      h      ]  C             g  name
		 g  	required?		 g  option-spec->single-char			 g  	predicate			 g  value-policy			  g  filenamef  ice-9/getopt-long.scm
 
 			  g  nameg  %%make-option-spec-procedure C2R4567:= h      ]  C             g  t-70fb8ec09b0a817-487
		 g  t-70fb8ec09b0a817-488		 g  t-70fb8ec09b0a817-489			 g  t-70fb8ec09b0a817-48a			 g  t-70fb8ec09b0a817-48b			  			   C6   h   Y   ]L 6    Q       g  a
		  g  filenamef  ice-9/getopt-long.scm	 
 		   C;       h   I   ] L 6A       g  filenamef  ice-9/getopt-long.scm	 
 		
   C h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/getopt-long.scm
 
 		n   C56R1  4 1>  "  G   	2i  1R1   h   ~   ] $   CC      v       g  obj
		  g  filenamef  ice-9/getopt-long.scm
 
 		  g  nameg  %option-spec?-procedure CR457:T    h   =   ]  C      5       g  t-70fb8ec09b0a817-4a0
		
  		
   C       h   Y   ]L 6    Q       g  a
		  g  filenamef  ice-9/getopt-long.scm	 
 		   C;       h   I   ] L 6A       g  filenamef  ice-9/getopt-long.scm	 
 		
   CV        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/getopt-long.scm
 
 		n   C5R1YZ     h      ] &   
C 6y       g  s
		  g  filenamef  ice-9/getopt-long.scm
 
 		  g  nameg  %option-spec->name-procedure C[R45Z7:   h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   =   ]  C      5       g  t-70fb8ec09b0a817-4ac
		
  		
   CZ      h   Y   ]L 6    Q       g  a
		  g  filenamef  ice-9/getopt-long.scm	 
 		   C;       h   I   ] L 6A       g  filenamef  ice-9/getopt-long.scm	 
 		
   C        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/getopt-long.scm
 
 	    C5ZR1Y        h      ] &   C 6~       g  s
		  g  filenamef  ice-9/getopt-long.scm
 
 		  g  nameg  !%option-spec->required?-procedure CR457:      h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C2     h   =   ]  C      5       g  t-70fb8ec09b0a817-4c7
		
  		
   C      h   Y   ]L 6    Q       g  a
		  g  filenamef  ice-9/getopt-long.scm	 
 		   C;       h   I   ] L 6A       g  filenamef  ice-9/getopt-long.scm	 
 		
   C4        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/getopt-long.scm
 
 	    C5R1Y h       ] &   	C 6              g  s
		  g  filenamef  ice-9/getopt-long.scm
 
 		  g  nameg  #%option-spec->single-char-procedure C5R457:CJO     h   :   ]C     2       g  err
		 g  s		  			   CRX] h   :   ]C     2       g  err
		 g  s		  			   C`fk h   :   ]C     2       g  err
		 g  s		  			   C     h   =   ]  C      5       g  t-70fb8ec09b0a817-4e2
		
  		
   C       h   Y   ]L 6    Q       g  a
		  g  filenamef  ice-9/getopt-long.scm	 
 		   C;       h   I   ] L 6A       g  filenamef  ice-9/getopt-long.scm	 
 		
   C        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/getopt-long.scm
 
 	    C5R1Y h       ] &   	C 6       ~       g  s
		  g  filenamef  ice-9/getopt-long.scm
 
 		  g  nameg  !%option-spec->predicate-procedure CR457:      h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   =   ]  C      5       g  t-70fb8ec09b0a817-4fd
		
  		
   C      h   Y   ]L 6    Q       g  a
		  g  filenamef  ice-9/getopt-long.scm	 
 		   C;       h   I   ] L 6A       g  filenamef  ice-9/getopt-long.scm	 
 		
   C        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/getopt-long.scm
 
 	    C5R1Y        h       ] &   	C 6              g  s
		  g  filenamef  ice-9/getopt-long.scm
 
 		  g  nameg  $%option-spec->value-policy-procedure CR457:   h   :   ]C     2       g  err
		 g  s		  			   C	 h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C3     h   =   ]  C      5       g  t-70fb8ec09b0a817-518
		
  		
   C      h   Y   ]L 6    Q       g  a
		  g  filenamef  ice-9/getopt-long.scm	 
 		   C;       h   I   ] L 6A       g  filenamef  ice-9/getopt-long.scm	 
 		
   C5        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/getopt-long.scm
 
 	    C5R457:;acilm   h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/getopt-long.scm
 
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R1Yn  h       ] &   
C 6             g  s
		 g  val		  g  filenamef  ice-9/getopt-long.scm
 
 			  g  nameg   %set-option-spec-name!-procedure CoR45n7:p h   `   ]  C    X       g  t-70fb8ec09b0a817-546
		 g  t-70fb8ec09b0a817-547		  			   Cn   h   Y   ]L 6    Q       g  a
		  g  filenamef  ice-9/getopt-long.scm	 
 		   C;       h   I   ] L 6A       g  filenamef  ice-9/getopt-long.scm	 
 		
   C        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/getopt-long.scm
 
 		n   C5nR1Y    h       ] &   C 6             g  s
		 g  val		  g  filenamef  ice-9/getopt-long.scm
 
 			  g  nameg  %%set-option-spec-required?!-procedure CR457:p    h   `   ]  C    X       g  t-70fb8ec09b0a817-556
		 g  t-70fb8ec09b0a817-557		  			   C   h   Y   ]L 6    Q       g  a
		  g  filenamef  ice-9/getopt-long.scm	 
 		   C;       h   I   ] L 6A       g  filenamef  ice-9/getopt-long.scm	 
 		
   C        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/getopt-long.scm
 
 		n   C5R1Y    h       ] &   	C 6            g  s
		 g  val		  g  filenamef  ice-9/getopt-long.scm
 
 			  g  nameg  '%set-option-spec-single-char!-procedure CR457:p  h   `   ]  C    X       g  t-70fb8ec09b0a817-566
		 g  t-70fb8ec09b0a817-567		  			   C   h   Y   ]L 6    Q       g  a
		  g  filenamef  ice-9/getopt-long.scm	 
 		   C;       h   I   ] L 6A       g  filenamef  ice-9/getopt-long.scm	 
 		
   C
        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/getopt-long.scm
 
 		n   C5R1Y    h       ] &   	C 6            g  s
		 g  val		  g  filenamef  ice-9/getopt-long.scm
 
 			  g  nameg  %%set-option-spec-predicate!-procedure CR457:p2    h   `   ]  C    X       g  t-70fb8ec09b0a817-576
		 g  t-70fb8ec09b0a817-577		  			   C   h   Y   ]L 6    Q       g  a
		  g  filenamef  ice-9/getopt-long.scm	 
 		   C;       h   I   ] L 6A       g  filenamef  ice-9/getopt-long.scm	 
 		
   C4        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/getopt-long.scm
 
 		n   C5R1Y5    h       ] &   	C 6            g  s
		 g  val		  g  filenamef  ice-9/getopt-long.scm
 
 			  g  nameg  (%set-option-spec-value-policy!-procedure C6R4557:p\ h   `   ]  C    X       g  t-70fb8ec09b0a817-586
		 g  t-70fb8ec09b0a817-587		  			   C5   h   Y   ]L 6    Q       g  a
		  g  filenamef  ice-9/getopt-long.scm	 
 		   C;       h   I   ] L 6A       g  filenamef  ice-9/getopt-long.scm	 
 		
   C^        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/getopt-long.scm
 
 		n   C55R1  h      ]  C  y       g  name
		  g  filenamef  ice-9/getopt-long.scm
 
	 	 		  g  nameg  make-option-spec C_R_`abcef10g     h(      ]
$  4L 5$  C 6C           g  name
		$ g  val		$ g  t			"  g  filenamef  ice-9/getopt-long.scm
 		 			 		 		 	)	" 		# 	 		$	   CYhijd5       h    ]" " *"  "  R $  >  $   (  64 56 4 56 4 56  $  O  &  9$  .(  #L &  L 	O C	L 
6"`"\"X"T $  k  &  U$  J(  ?45$  "  4>  "  G  L &  L 	C	L 6"""" $  J  &  4$  )(  L &  L 	C	L 6"""" $  I  &  3$  ((  L &  L C	L 6"5"1"-")         g  expr
	 g  w		W g  x			W g  w	q  g  x		q  g  w	   g  w 0 g  x	 0 g  w	 $ g  wA g  x	A g  w	^y g  w g  x	 g  w	  g  filenamef  ice-9/getopt-long.scm
 		9 		= 		> 	  	  	  	  	  	  	 	 	( 	c 	} 	 	 	 	   C       h0      ]	44 554O  >  "  G  C         g  desc
		. g  spec		.  g  filenamef  ice-9/getopt-long.scm
 
	 		 	 	 	0	 	 	 		 		 		 		# 	 		.  g  nameg  parse-option-spec CkRlmn    hP   J  ]"  <(  45C45$  45C" "   B      g  argument-list
		M g  yes		B g  no			B  g  filenamef  ice-9/getopt-long.scm
 
	 		 		 	*	 	$	 		 		 		! 		% 		& 	*	/ 	8	0 	$	4 		7 		: 	*	B 		B 		C 		M 	 		M  g  nameg  split-arg-list CoR4piq5rR4pis5tR4piu5vRwrvt     h8      ]	4 5$  C4 5$  C 6             g  string
		2 g  t		2 g  t		2  g  filenamef  ice-9/getopt-long.scm
 
	 		 		 		 		2 	 		2  g  nameg  looks-like-an-option CxRj1YZ     h    n   ] &   
"  	4 5 Cf       g  spec
		   g  filenamef  ice-9/getopt-long.scm
 		 		 	 		    Cy1Y    h(      ]4 &  	 	"  	4 55 C x       g  spec
		'  g  filenamef  ice-9/getopt-long.scm
 		 			 	,	# 		& 	 		'   C5z1Yx0{Zlwr|}~y   h   t   ]4 56l       g  c
		  g  filenamef  ice-9/getopt-long.scm
	)		:		>		+ 		   Cmtvef !h(  <  ]k4 544 55" " 	&  			"  	4		5&  P
(  "  4

5$  
	"	
	
"	&  			"  	4		5&  V
(  "  4

5$   	&  	
"  	4	56	
	
"
	"(  45C$ 
	4	5$  
$  ;4545$  "  	45

	"4	5444455545$  "   5454
5"(4	5$  ;4545$  "  	45

	"4	5$  l4545$  "  	45&  		"  	4	5$  4	5

	"k6"  
	"C$  
$  4455C""4 56 
"  4      g  specs
	& g  argument-ls	& g  stop-at-first-non-option		& g  idx		& g  sc-idx		& g  	unclumped		# g  argument-ls		# g  found		# g  etc		# g  spec			'( g  ls	
	'( g  w		F g  x	
F g  t	S g  c	k g  t	v g  spec	 g  extra	 g  unclumped-opts	 g  t	 g  opt	G g  t	9 g  spec	9G g  t	P g  opt	` g  t	k g  spec	  g  filenamef  ice-9/getopt-long.scm
 
	 		 		 		 		 		# 		' 		) 		, 		H 		N 		O 		T 		Y 	(	[ 		_ 	
	b 		h 	'	y 		~ 	  	$  	9  	-  	  	  	  	  	  	  	(  	  	
  	 	  	 	 	$ 	9 	-			#(	
.	1	8		<	K	S
		_	c	d	k	n	%v	!	%	2	%			"			$	)	*	)	$	(	2	(	$	<	@						
		!	!	"	!"	.#	!2#	.6#	!9!	G$	H%	P
		Y'	`'	c(	!k(	z)	!~)	.)	!'	*	*	+	'+	!+	,	#,	2	2	,2	
		/	.	0	0	0	0			 	 	> 	H& 	 |	&	  g  nameg  process-options CR(jkoa1YZ0 	     h     ] &   
"  	4 54L  5 &   "  	4 5$  "$  "  4>  "  G  "    &  	 	"  	4 5$  6C        g  spec
	  g  name	%  g  val		%  g  pred	    g  filenamef  ice-9/getopt-long.scm
]		^		_		%^		,`		G`		Ma		Rb		Vb	*	]b		ld	  d	 e	 e	  	    C1YZ   h0      ]	 4 &  
"  	455C         g  spec+val
		. g  s	
	)  g  filenamef  ice-9/getopt-long.scm
g		i		
i	?	
i	,	+i		,h	 		.   C  h     - /   0   3 
#   Y454 54545	4	O >  "  G  4
>  "  G  	ZCZF      g  program-arguments
	  g  option-desc-list	  g  stop-at-first-non-option		  g  specifications		,  g  pair		6  g  split-ls		;  g  non-split-ls		@  g  	found/etc		M  g  found		R  g  rest-ls			^   
g  filenamef  ice-9/getopt-long.scm
4
	!T		$U		,U		/V		4V	!	6V		6U		;W		;U		@X		@U		CY		MU		R[		RU		U\		Z\		^\		^U		a]		zg	 k	 k	 k	 	 	
g  stop-at-first-non-optionS	   g  nameg  getopt-longg  documentationf /Process options, handling both long and short options, similar to
the glibc function 'getopt_long'.  PROGRAM-ARGUMENTS should be a value
similar to what (program-arguments) returns.  OPTION-DESC-LIST is a
list of option descriptions.  Each option description must satisfy the
following grammar:

    <option-spec>           :: (<name> . <attribute-ls>)
    <attribute-ls>          :: (<attribute> . <attribute-ls>)
                               | ()
    <attribute>             :: <required-attribute>
                               | <arg-required-attribute>
                               | <single-char-attribute>
                               | <predicate-attribute>
                               | <value-attribute>
    <required-attribute>    :: (required? <boolean>)
    <single-char-attribute> :: (single-char <char>)
    <value-attribute>       :: (value #t)
                               (value #f)
                               (value optional)
    <predicate-attribute>   :: (predicate <1-ary-function>)

    The procedure returns an alist of option names and values.  Each
option name is a symbol.  The option value will be '#t' if no value
was specified.  There is a special item in the returned alist with a
key of the empty list, (): the list of arguments that are not options
or option values.
    By default, options are not required, and option values are not
required.  By default, single character equivalents are not supported;
if you want to allow the user to use single character options, you need
to add a `single-char' clause to the option description. CR    h    C  ]4 5$  CC       ;      g  options
		 g  key		 g  default			 g  t			  g  filenamef  ice-9/getopt-long.scm
m
	p		p	 			  g  nameg  
option-refg  documentationf  qReturn value in alist OPTIONS using KEY, a symbol; or DEFAULT if not found.
The value is either a string or `#t'. C!RCV      g  m
		, g  rtd
|  g  filenamef  ice-9/getopt-long.scm	 
	- 		3 	"	5 		8 
  
$ 
E 
7 
= 
? 
? 	? 	,? 	? 
? 	? 	,? 	? 
? 	? 	,? 	? 
@ 
M 
Y4
[Nm
 	[P
   C6                                                                                                                                                                                                                                 ccache/ice-9/eval-string.go                                                                         0000644                 00000007443 15154557173 0011467 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] G 4       hm      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  eval-string	 		g  filenameS	
f  ice-9/eval-string.scm	g  importsS	g  system	g  base	g  compile	 	 	g  language	 	 	g  vm	g  program	 	 	 	g  replacementsS	 	g  set-current-module	 	 	g  	language?	g  lookup-language	 g  ensure-language	!g  langS	"!	#" 	$g  current-language	%g  
parameter?	&% 	'% 	(g  	scm-error	)g  wrong-type-arg	*f  parameterize	+f  Not a parameter: ~S	,g  language-reader	-g  current-module	.g  eof-object?	/g  language-evaluator	0g  read-and-eval	1g  moduleS	21	3g  fileS	43		5g  lineS	65		7g  columnS	87		9!		:g  compile?S	;:		<24689; 	=g  call-with-input-string	>g  set-port-filename!	?g  set-port-line!	@g  set-port-column!	Ag  make-program	Bg  read-and-compile	Cg  fromS	Dg  toS	Eg  objcode	Fg  save-module-excursionC 5      h	  q   ]4	
5 4 >  "  G       h      ]4 5$   C 6         g  x
		  g  filenamef  ice-9/eval-string.scm
	
									 		  g  nameg  ensure-language C R#$'()*+ ,-./$-,.     hP     ]4445 5 45 >  G4445 5L45 545$  E "          g  exp
		L g  vals		L g  next		3	L  g  filenamef  ice-9/eval-string.scm
	+	
		$			$			$			$			$	3		$			,		 	"		!	"		$	"		*	"		-	"	1	3	"		3	/		6	1		@	0		D	2		L	4	 		L  g  nameg  lp C h   Q  - /   0   3 #  45 45$  "  4 >  "  G  4	455Y44	45 5 4
5 545$  "  O  Q 4>  ZCZFI      g  port
	  g  lang	  g  t-6f52a6ff84e411f-7		"  g  exp		x  g  lp	    g  filenamef  ice-9/eval-string.scm
	
			)	"	 		Z	 	#	b	 		e	"		f	"		i	"		o	"		r	"	1	x	"		x	&		{	'	
 	'	 	+	
 	 
g  langS   g  nameg  read-and-eval C0R<-$ =>?@/ABCDE0!    h      ] L$  4L>  "  G  "   L$  4LL>  "  G  "   L$  4LL>  "  G  "   L$  4LL>  "  G  "   L $  "  4L5$  44LL	
556 LL6        g  filenamef  ice-9/eval-string.scm
	K			L	
			M		$	N	
	%	O		B	P	
	C	Q		`	R	
	a	S		~	U	 	U	  	U	 	U	
 	V	 	V	 	V	E 	V	 	V	 	V	 	W	 	 
   CF     h   X   ] 4L>  "  G  L 6 P       g  filenamef  ice-9/eval-string.scm
	@				A			B	 		
   C     h8      ]	O LLLLL  LQ L$  LO 66        g  port
		8 g  thunk		8  g  filenamef  ice-9/eval-string.scm
	H			I		'	>		4	?		8	C	 		8   C        hx   s  - /   0   3 #  45 #  #  #  #  45 #  45 O 6       k      g  str
		q g  module		q g  file			q g  line			q g  column			q g  lang			q g  compile?			q g  lang		X	q  g  filenamef  ice-9/eval-string.scm
	6
		7		B	;		R	E		X	E		q	F	 		q
g  moduleSg  fileS	g  lineS	g  columnS	g  langS	g  compile?S	   g  nameg  eval-string CRCi       g  m
		,  g  filenamef  ice-9/eval-string.scm		
 	
	
		6
 		
   C6                                                                                                                                                                                                                              ccache/ice-9/time.go                                                                                0000644                 00000005364 15154557173 0010172 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0
      ] : 4    h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  time	 		g  filenameS	
f  ice-9/time.scm	g  importsS	g  format	 	 	 	g  exportsS	 	g  set-current-module	 	 	g  gc-run-time	g  times	g  display	f  'clock utime stime cutime cstime gctime
	f  $~5,2F ~5,2F ~5,2F ~6,2F ~6,2F ~6,2F
	g  	tms:clock	g  exact->inexact	g  internal-time-units-per-second	g  	tms:utime	g  	tms:stime	g  
tms:cutime	 g  
tms:cstime	!g  identity	"g  	time-proc	#g  make-syntax-transformer	$# 	%# 	&g  macro	'g  $sc-dispatch	(' 	)' 	*g  _	+g  any	,*+	-g  syntax->datum	.- 	/- 	0g  datum->syntax	10 	20 	3g  @@	43" 	5g  lambda	6g  syntax-violation	76 	86 	9f  -source expression failed to match any patternC 5   hX  Z   ]4	
5 4 >  "  G    !    h  7  ]145 45 4 5 45 45 4>  "  G  444545	5
44545	544545	544545	544545	544545	5>  "  G  C       /      g  proc
	 g  gc-start	 g  	tms-start		 g  result		 g  tms-end		 g  gc-end		# g  proc		?	[ g  proc		]	y g  proc		{  g  proc	   g  proc	   g  proc	    g  filenamef  ice-9/time.scm
	"
		#			#		
	$			#			%			#			&			#			'		#	#		&	,		*	,		/	,		8	-		=	-		?	.		B	+		E	+		L	+	'	S	+		V	+		X	+		]	/		`	+		c	+		j	+	'	q	+		t	+		v	+		{	0		~	+	 	+	 	+	' 	+	 	+	 	+	 	1	 	+	 	+	 	+	' 	+	 	+	 	+	 	2	 	+	 	+	 	+	' 	+	 	+	 	+	 	3	 	+	 	+	 	+	' 	+	 	+	 	+	 	-	 <	  g  nameg  	time-proc C"R4%&),/245     h   Z   ]   CR       g  exp
		  g  filenamef  ice-9/time.scm
	6
		7	 		   C   h   b   ]	4 5L 4?6Z       g  args
		 g  v			  g  filenamef  ice-9/time.scm		6
 		   C89       h(   `   ]	4 5$   O @ 6 X       g  y
		' g  tmp		'  g  filenamef  ice-9/time.scm
	6
 		'   C5RC R       g  m
		,  g  filenamef  ice-9/time.scm		
	"
 	W
   C6                                                                                                                                                                                                                                                                             ccache/ice-9/binary-ports.go                                                                        0000644                 00000002172 15154557173 0011657 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0b      ] * 4    hA      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  binary-ports	 		g  filenameS	
f  ice-9/binary-ports.scm	g  importsS	g  rnrs	g  bytevectors	 	 	 	g  exportsS	g  
eof-object	g  open-bytevector-input-port	g  make-custom-binary-input-port	g  get-u8	g  lookahead-u8	g  get-bytevector-n	g  get-bytevector-n!	g  get-bytevector-some	g  get-bytevector-all	g  get-string-n!	g  put-u8	g  put-bytevector	g  unget-bytevector	g  open-bytevector-output-port	 g  make-custom-binary-output-port	!  	"g  set-current-module	#" 	$" 	%g  load-extension	&g  string-append	'f  	libguile-	(g  effective-version	)f  scm_init_r6rs_portsC 5  hH      ]4	
!5 4$ >  "  G   %i4&i'4(i5 5)6           g  m
		,  g  filenamef  ice-9/binary-ports.scm		
	1	1		7	1		8	1	+	@	1		B	2		D	1
 		D
   C6                                                                                                                                                                                                                                                                                                                                                                                                       ccache/ice-9/popen.go                                                                               0000644                 00000052676 15154557173 0010365 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0U      ]j 4    h,      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  popen	 		g  filenameS	
f  ice-9/popen.scm	g  importsS	g  threads	 	 	g  srfi	g  srfi-9	 	 	 	g  exportsS	g  port/pid-table	g  
open-pipe*	g  	open-pipe	g  
close-pipe	g  open-input-pipe	g  open-output-pipe	g  open-input-output-pipe	 	g  set-current-module	 	 	 g  load-extension	!g  string-append	"f  	libguile-	#g  effective-version	$f  scm_init_popen	%g  <pipe-info>	&g  %make-pipe-info-procedure	'g  make-syntax-transformer	(' 	)' 	*g  make-pipe-info	+g  macro	,g  $sc-dispatch	-, 	., 	/g  _	0g  any	1/0 	2g  syntax-object	3g  lambda	4g  m-18e47d61-4	5g  top	645 	7g  ribcage	8g  t-18e47d61-3	98 	:6 	;f  l-18e47d61-9	<; 	=79:< 	>7 	?g  x	@? 	Af  l-18e47d61-6	BA 	C7@:B 	Dg  shift	Eg  	proc-name	Fg  args	GEF 	H5 	IHH 	Jf  l-1e8ba8b5a-60	Kf  l-1e8ba8b5a-61	LJK 	M7GIL 	Ng  key	Og  value	Pg  name	Qg  formals	Rg  body	SNOPQR 	THHHHH 	Uf  l-1e8ba8b5a-53	Vf  l-1e8ba8b5a-54	Wf  l-1e8ba8b5a-55	Xf  l-1e8ba8b5a-56	Yf  l-1e8ba8b5a-57	ZUVWXY 	[7STZ 	\g  make-procedure-name	]\ 	^H 	_f  l-1e8ba8b5a-43	`_ 	a7]^` 	bH 	cf  l-1e8ba8b5a-42	dc 	e7@bd 	f6=>CD>>>>M[ae 	gg  hygiene	hg 	i23fh 	jg  pid	kH=>C 	lg 	m2jkl 	nm 	og  make-struct	pg  m-18e47d61-1	qp5 	rg  t-1e8ba8b5a-133	sg  t-1e8ba8b5a-132	tg  t-1e8ba8b5a-131	urst 	vg  m-1e8ba8b5a-134	wv5 	xwww 	yf  l-1e8ba8b5a-138	zf  l-1e8ba8b5a-139	{f  l-1e8ba8b5a-13a	|yz{ 	}7ux| 	~g  	ctor-args	~  f  l-1e8ba8b5a-120   7b  g  ctor g  field   f  l-1e8ba8b5a-11c f  l-1e8ba8b5a-11d   7I  g  form g  	type-name g  constructor-spec g  field-names   HHHH  f  l-1e8ba8b5a-111 f  l-1e8ba8b5a-112 f  l-1e8ba8b5a-113 f  l-1e8ba8b5a-114   7  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers   HHHHHHHH  f  l-1e8ba8b5a-e9 f  l-1e8ba8b5a-e7 f  l-1e8ba8b5a-e5 f  l-1e8ba8b5a-e3 f  l-1e8ba8b5a-e1 f  l-1e8ba8b5a-df f  l-1e8ba8b5a-dd f  l-1e8ba8b5a-db   7  f  l-1e8ba8b5a-da   7@b  q=>CD>}>>>>  2oh  2%kl  2
h  m  in  g  each-any / g  syntax-violation     f  Wrong number of arguments g  identifier?     H>C  2&l      f  -source expression failed to match any pattern g  record-type-vtable     g  pw g  default-record-printer     j  g  set-struct-vtable-name!     g  vtable-offset-user     g  %pipe-info?-procedure g  
pipe-info? g  m-18e47d61-11 5  g  t-18e47d61-10     f  l-18e47d61-16   7  f  l-18e47d61-13   7@  >D>>>>M[ae  23h  g  obj g  t-1e8ba8b5a-224 g  t-1e8ba8b5a-21e g  t-1e8ba8b5a-21f g  t-1e8ba8b5a-220 g  t-1e8ba8b5a-223 g  t-1e8ba8b5a-222 g  t-1e8ba8b5a-221   g  m-1e8ba8b5a-225 5    f  l-1e8ba8b5a-229 f  l-1e8ba8b5a-22a f  l-1e8ba8b5a-22b f  l-1e8ba8b5a-22c f  l-1e8ba8b5a-22d f  l-1e8ba8b5a-22e f  l-1e8ba8b5a-22f   7  g  	copier-id   f  l-1e8ba8b5a-21c   7b  g  	ctor-name   f  l-1e8ba8b5a-214   7b    f  l-1e8ba8b5a-212   7b g  layout f  l-1e8ba8b5a-210 7b g  
immutable? f  l-1e8ba8b5a-20e	 
7b	 g  field-count f  l-1e8ba8b5a-20c 7b g  
getter-ids f  l-1e8ba8b5a-209 7b g  	field-ids f  l-1e8ba8b5a-206 7b g  predicate-nameg  
field-spec HHHHHH f  l-1e8ba8b5a-1f9f  l-1e8ba8b5a-1fa f  l-1e8ba8b5a-1fb!f  l-1e8ba8b5a-1fc"f  l-1e8ba8b5a-1fd#f  l-1e8ba8b5a-1fe$ !"# %7$ &q>D>>>>>>> >>
>>>% '2&h (' )g  and*2)&h +g  struct?,2+&h -,' .g  eq?/2.&h 0g  struct-vtable120&h 21' 3H> 42%3l 5/24 6*-5 7(6 8H> 928l :g  throw-bad-struct;: <: =g  pipe-info-pid>g  %pipe-info-pid-procedure?g  free-id@g  
%%on-errorAg  m-18e47d61-1dBA5 CB Df  l-18e47d61-1fED F7@CE GB>FD>>>>M[ae H2@Gh I?H JI0 Kg  %%typeLg  t-1e8ba8b5a-14bMg  t-1e8ba8b5a-14cNg  t-1e8ba8b5a-14dOg  t-1e8ba8b5a-14ePg  t-1e8ba8b5a-14fQg  t-1e8ba8b5a-150Rg  t-1e8ba8b5a-151SLMNOPQR Tg  m-1e8ba8b5a-152UT5 VUUUUUUU Wf  l-1e8ba8b5a-156Xf  l-1e8ba8b5a-157Yf  l-1e8ba8b5a-158Zf  l-1e8ba8b5a-159[f  l-1e8ba8b5a-15a\f  l-1e8ba8b5a-15b]f  l-1e8ba8b5a-15c^WXYZ[\] _7SV^ `g  getterag  indexb`a cf  l-1e8ba8b5a-149df  l-1e8ba8b5a-14aecd f7bIe g hHHH if  l-1e8ba8b5a-144jf  l-1e8ba8b5a-145kf  l-1e8ba8b5a-146lijk m7ghl nq>FD>_>>>f>m o2Knh p?o q/Jp0 rg  cksg  errtg  sust vBB wf  l-18e47d61-22xf  l-18e47d61-23ywx z7uvy {Bz>FD>>>>M[ae |2r{h }g  quote~2}{h Hz>F 2%l ~  g  %%index2nh ? /J0 f  l-18e47d61-27f  l-18e47d61-28 7uv B>FD>>>>M[ae 2rh 2}h >F 2
l   g  %%copier2nh ? /J0 f  l-18e47d61-2cf  l-18e47d61-2d 7uv B>FD>>>>M[ae 2rh 2}h g  %%<pipe-info>-set-fieldsH>F 2l   g  t-18e47d61-1c f  l-18e47d61-31 7C B>FD>>>>M[ae 23h q>FD>_>>>f>m 2th  g  if2h 2.h 20h  H>F 2%l  g  
struct-ref2h >F 2
l  2:h 2}h 2=l     H>F 2>l g  each00  0Č0Ō0ƌg  %%set-fieldsg  dummyg  check?g  exprt` g  m-18e47d61-385 qqqq f  l-18e47d61-3df  l-18e47d61-3ef  l-18e47d61-3ff  l-18e47d61-40f  l-18e47d61-41 7  f  l-18e47d61-3a 7@ g  t-1e8ba8b5a-16ag  t-1e8ba8b5a-16cg  t-1e8ba8b5a-16b g  m-1e8ba8b5a-16d5  f  l-1e8ba8b5a-171f  l-1e8ba8b5a-172f  l-1e8ba8b5a-173 7 f  l-1e8ba8b5a-167f  l-1e8ba8b5a-168f  l-1e8ba8b5a-169 7gh q>D>>>> 2h H> 2%l 2=l  g  map  g  listg  set-pipe-info-pid!g  %set-pipe-info-pid!-procedure/00 g  m-18e47d61-4c5 g  t-18e47d61-4ag  t-18e47d61-4b  f  l-18e47d61-51 f  l-18e47d61-52  7  f  l-18e47d61-4e 7@ >D>>>>M[ae 23h 	g  t-1e8ba8b5a-18c
g  t-1e8ba8b5a-18d	
 g  m-1e8ba8b5a-18e5  f  l-1e8ba8b5a-192f  l-1e8ba8b5a-193 7 g  setterP` f  l-1e8ba8b5a-186f  l-1e8ba8b5a-187f  l-1e8ba8b5a-188 7h a f  l-1e8ba8b5a-17df  l-1e8ba8b5a-17e 7I g  field-specs  !f  l-1e8ba8b5a-179"f  l-1e8ba8b5a-17a#!" $7 I# %q>D>>>$ &2t%h 'g  val(2'%h )&( *2%h +2.%h ,20%h -,& .H> /2%.l 0+-/ 1g  struct-set!221%h 3> 42
3l 52&4( 62:%h 72}%h 82.l 978 :6&9 ;*05: <); =H> >2=l ?g  make-soft-port@g  
write-charAg  displayBg  force-outputCg  	read-charDg  
close-portEf  r+Fg  make-rw-portGg  make-guardianHg  pipe-guardianIg  make-weak-key-hash-tableJg  
make-mutexKg  port/pid-table-mutexLg  applyMg  open-processNg  %make-void-portOg  %set-port-property!Pg  popen-pipe-infoQg  
lock-mutexRQ SQ Tg  unlock-mutexUT VT Wg  
hashq-set!Xf  /bin/shYf  -cZg  %port-property[g  fetch-pipe-info\g  waitpid]g  close-process^g  error_f  -close-pipe: port not created by (ice-9 popen)`f  (close-pipe: pid has already been clearedag  catchbg  system-errorcg  WNOHANGdg  
reap-pipeseg  	add-hook!fg  after-gc-hookgg  	OPEN_READhg  
OPEN_WRITEig  	OPEN_BOTHC 5h@%  4  ]4	
5 4 >  "  G   4 i4!i"4#i5 5$>  "  G  %  h   y   ]  C      q       g  pid
		
  g  filenamef  ice-9/popen.scm
	
 		
  g  nameg  %make-pipe-info-procedure C&R4)*+.1  h   4   ]  C      ,       g  t-18e47d61-3
		
  		
   C*        h   R   ]L 6    J       g  a
		  g  filenamef  ice-9/popen.scm		
 		   C/      h   B   ] L 6:       g  filenamef  ice-9/popen.scm		
 		
   C        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  {       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/popen.scm
	
 		n   C5*R%Ȩ  4 %>  "  G   	Ζ&i  %R%  h   u   ] $   CC      m       g  obj
		  g  filenamef  ice-9/popen.scm
	
 		  g  nameg  %pipe-info?-procedure CR4)+.17     h   5   ]  C      -       g  t-18e47d61-10
		
  		
   C       h   R   ]L 6    J       g  a
		  g  filenamef  ice-9/popen.scm		
 		   C/      h   B   ] L 6:       g  filenamef  ice-9/popen.scm		
 		
   C9       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  {       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/popen.scm
	
 		n   C5R%<=    h   v   ] &   
C 6n       g  s
		  g  filenamef  ice-9/popen.scm
	
 		  g  nameg  %pipe-info-pid-procedure C>R4)=+.q|      h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C1     h   5   ]  C      -       g  t-18e47d61-1c
		
  		
   C=      h   R   ]L 6    J       g  a
		  g  filenamef  ice-9/popen.scm		
 		   C/      h   B   ] L 6:       g  filenamef  ice-9/popen.scm		
 		
   C       h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/popen.scm
	
 	    C5=R4)+.  h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/popen.scm
	
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R%< h       ] &   
C 6             g  s
		 g  val		  g  filenamef  ice-9/popen.scm
	
 			  g  nameg  %set-pipe-info-pid!-procedure CR4)+.<   h   P   ]  C    H       g  t-18e47d61-4a
		 g  t-18e47d61-4b		  			   C   h   R   ]L 6    J       g  a
		  g  filenamef  ice-9/popen.scm		
 		   C/      h   B   ] L 6:       g  filenamef  ice-9/popen.scm		
 		
   C>       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  {       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/popen.scm
	
 		n   C5R?@    h   Z   ] L 6      R       g  c
		
  g  filenamef  ice-9/popen.scm
	&		
	&	 		
   CA       h   Z   ] L 6      R       g  s
		
  g  filenamef  ice-9/popen.scm
	'		
	'	 		
   CB       h   J   ] L 6B       g  filenamef  ice-9/popen.scm
	(			(	 		
   CC       h   J   ] L 6B       g  filenamef  ice-9/popen.scm
	)			)	 		
   CD       h    R   ] 4L>  "  G  L 6      J       g  filenamef  ice-9/popen.scm
	*			*			*	& 		
   CE        h0      ]O O O  O  O  6       g  	read-port
		0 g  
write-port		0  g  filenamef  ice-9/popen.scm
	#
	,	%		.	+		0	$	 		0	  g  nameg  make-rw-port CFR4Gi5 HR4Ii	5R4Ji5 KRLMFN%HOPKS   h   B   ] L 6:       g  filenamef  ice-9/popen.scm
	O	 		
   CV       h   B   ] L 6:       g  filenamef  ice-9/popen.scm
	O	 		
   CW      h     - 1 3 	4 >  G $  $  45"  "  $  "  $  "  $  "  4 5 4>  "  G  4>  "  G  	
O O 4
O >   "  G  V4>  "  G  X4O >   "  G  C       g  mode
		  g  command		  g  args			  g  	read-port		  g  
write-port		  g  pid		  g  t		B	r g  port		y  g  	pipe-info		y  g  x	    
g  filenamef  ice-9/popen.scm
	7
	
	?			>		)	A		0	B		B	A		i	E		y	F		y	A		~	K	 	L	 	L	" 	L	 	O	 	P	
 	O	 		 	
	  g  nameg  
open-pipe*g  documentationf [Executes the program @var{command} with optional arguments
@var{args} (all strings) in a subprocess.
A port to the process (based on pipes) is created and returned.
@var{mode} specifies whether an input, an output or an input-output
port to the process is created: it should be the value of
@code{OPEN_READ}, @code{OPEN_WRITE} or @code{OPEN_BOTH}. CRXY   h     ] 6        g  command
		 g  mode		  g  filenamef  ice-9/popen.scm
	T
		Z		
	Z			Z	 			  g  nameg  	open-pipeg  documentationf ;Executes the shell command @var{command} (a string) in a subprocess.
A port to the process (based on pipes) is created and returned.
@var{mode} specifies whether an input, an output or an input-output
port to the process is created: it should be the value of
@code{OPEN_READ}, @code{OPEN_WRITE} or @code{OPEN_BOTH}. CRZP   h      ] 6      x       g  port
		
  g  filenamef  ice-9/popen.scm
	\
		]		
	]	 		
  g  nameg  fetch-pipe-info C[RD\  h       ]4 >  "  G  45C          g  port
		 g  pid		  g  filenamef  ice-9/popen.scm
	_
		`			a			a	 			  g  nameg  close-process C]R[^_%<=`] 
      h     ]4 5$  "  4>  "  G  &  
"  	45$  "  4>  "  G  &  

"  4>  "  G  	 6        g  p
	  g  	pipe-info		  g  pid		A   g  filenamef  ice-9/popen.scm
	c
		g				g			h			i			i			i		*	j		A	j		I	k		N	l		R	l		W	l		b	n	 	o	 	   g  nameg  
close-pipeg  documentationf  Closes the pipe created by @code{open-pipe}, then waits for the process
to terminate and returns its status value, @xref{Processes, waitpid}, for
information on how to interpret this value. CRH%<=ab\cH%<       h8      ]4L 5  
$  L6L&  L
CL6            g  
pid/status
		3  g  filenamef  ice-9/popen.scm
	}			~	"		~											 		 	 			3
   C h   X   -  1  3 C     P       g  args
			  g  filenamef  ice-9/popen.scm
 	 			


   C 	    hh      ]"  Y45   $  J &   
"  	4 5$  !4 O >  "  G  "   "C"            g  	pipe-info
		_ g  pid	-	Y  g  filenamef  ice-9/popen.scm
	q
		r			s			s			t			u		-	u		5	w	
	6	|		:	|		J	|		] 		_	r	 		c
  g  nameg  
reap-pipes CdR4eifidi>  "  G  g     h      ] 6             g  command
		
  g  filenamef  ice-9/popen.scm
 
	
 	 		
  g  nameg  open-input-pipeg  documentationf  9Equivalent to @code{open-pipe} with mode @code{OPEN_READ} CRh        h      ] 6             g  command
		
  g  filenamef  ice-9/popen.scm
 
	
 	 		
  g  nameg  open-output-pipeg  documentationf  :Equivalent to @code{open-pipe} with mode @code{OPEN_WRITE} CRi      h      ] 6             g  command
		
  g  filenamef  ice-9/popen.scm
 
	
 	 		
  g  nameg  open-input-output-pipeg  documentationf  9Equivalent to @code{open-pipe} with mode @code{OPEN_BOTH} CRC,      g  m
		, g  rtd
}  g  filenamef  ice-9/popen.scm		
	-			2			8		!	9		-	A			C			H		 	
	#
	/	"	/
#	4	/	4
0	5	;	5
A	7
S	T
	\
	_
b	c
"5	q
"6 
#G 
$A 
%> 
 	%@
   C6                                                                   ccache/ice-9/receive.go                                                                             0000644                 00000003301 15154557173 0010643 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] C 4   h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  receive	 		g  filenameS	
f  ice-9/receive.scm	g  exportsS	 	g  set-current-module	 	 	g  make-syntax-transformer	 	 	g  macro	g  $sc-dispatch	 	 	g  any				g  syntax-object	g  call-with-values	g  top	 	g  ribcage	 g  dummy	!g  vars	"g  vals	#g  body	$ !"# 	%g  m-45d2cb8b0a-f	&% 	'& 	(f  l-45d2cb8b0a-14	)f  l-45d2cb8b0a-15	*f  l-45d2cb8b0a-16	+f  l-45d2cb8b0a-17	,()*+ 	-$', 	. 	/g  x	0/ 	1& 	2f  l-45d2cb8b0a-11	32 	4013 	5-.4 	6g  hygiene	76 	857 	9g  lambda	:957 	;g  syntax-violation	<; 	=; 	>f  -source expression failed to match any pattern	?g  cond-expand-provide	@g  current-module	Ag  srfi-8	BA C 5     h  o   ]4	
5 4 >  "  G   48:    h   c   ]  C[       g  dummy
		 g  vars		 g  vals			 g  body			  			   C=>      h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/receive.scm
	
 		"  g  
macro-typeg  syntax-rulesg  patternsg  varsg  valsg  body  C5R?i4@i5 B6 g       g  m
		(  g  filenamef  ice-9/receive.scm		
				&	
 	
   C6                                                                                                                                                                                                                                                                                                                                ccache/ice-9/boot-9.go                                                                              0000644                 00001001345 15154557173 0010341 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0     ] 4 h
      ] g  current-module	g  error	f  're-loading ice-9/boot-9.scm not allowed	f  prompt	g  gensym	g  make-prompt-tag	g  default-prompt-tag	g  call-with-prompt		g  abort-to-prompt	
g  with-throw-handler	g  memq	g  apply	g  
make-fluid	g  quit	g  primitive-exit	g  integer?	g  format	g  current-error-port	f   guile: uncaught throw to ~a: ~a
	g  	scm-error	g  wrong-type-arg	f  catch	f  &Wrong type argument in position ~a: ~a	g  catch	f  with-throw-handler	f  throw	g  throw	g  map	g  car	g  cdr	g  for-each	 g  primitive-load-path	!f  
ice-9/r4rs	"g  newline	#g  display	$f  ;;; 	%g  write	&g  	last-pair	'g  peek	(g  pk	)g  with-output-to-port	*g  current-warning-port	+f  ;;; WARNING 	,g  warn	-g  
*features*	.g  provide	/g  	provided?	0g  make-struct	1g  make-struct/no-tail	2g  absolute-file-name?	3g  and-map	4g  or-map	5g  simple-format	6g  string-length	7g  string-any-c-code	8g  
procedure?	9g  
string-ref	:g  
string-any	;g  string-every-c-code	<g  string-every	=g  string-fill!	>g  substring-fill!	?g  guile	@? 	Ag  module-name	Bg  
hashq-set!	Cg  %get-pre-modules-obarray	Dg  module-add!	Eg  	hashq-ref	Fg  make-variable	Gg  module-define!	Hg  module-variable	If  badness!	Jg  
module-ref	Kg  module-generate-unique-id!	Lg  module-gensym	Mg  resolve-module	Ng  syntax-violation	Og  datum->syntax	Pg  syntax->datum	Qg  syntax-source	Rg  identifier?	Sg  generate-temporaries	Tg  bound-identifier=?	Ug  free-identifier=?	Vg  $sc-dispatch	Wf  ice-9/psyntax-pp	Xg  make-syntax-transformer	Yg  and	Zg  macro	[g  any	\[ 	]g  syntax-object	^g  top	_^ 	`g  ribcage	ag  dummy	ba 	cg  m-bde397a-a11	dc^ 	ed 	ff  l-bde397a-a16	gf 	h`beg 	i` 	jg  x	kj 	lf  l-bde397a-a13	ml 	n`kem 	o_hin 	pg  hygiene	qp? 	r]oq 	s[[ 	t[[	u[t	vg  if	wg  y	xajw 	yd__ 	zf  l-bde397a-a1e	{f  l-bde397a-a1f	|f  l-bde397a-a20	}z{| 	~`xy} 	_~in  ]vq  ]Yq  ]q    f  -source expression failed to match any pattern g  or g  m-bde397a-a24 ^    f  l-bde397a-a29   `b  f  l-bde397a-a26   `k  _i  ]q  g  let __  f  l-bde397a-a31 f  l-bde397a-a32 f  l-bde397a-a33   `x  _i  ]q  g  t ]q  ]vq  ]q  g  quasisyntax g  free-id g  level j  __  f  l-bde397a-a3f f  l-bde397a-a40   `  g  expand   _  f  l-bde397a-a3b   `  g  e   _  f  l-bde397a-a3a   `  _i  ]q    [  g  _ [  s  g  unsyntax ]q    [  g  each-any  [ g  unsyntax-splicing ]q     [ [    g  append g  vector   g  vector->list g  list->vector [    g  k g  r   f  l-bde397a-a8f f  l-bde397a-a90   `  _i  ]q    g  m-bde397a-a96 ^    f  l-bde397a-a97   `  _ii  ]q    g  ... g  r* g  rep   ___  f  l-bde397a-a7b f  l-bde397a-a7c f  l-bde397a-a7d   `    f  l-bde397a-a74 f  l-bde397a-a75   `  _iii 	 ]q    g  each   g  list   [  g  with-syntax g  	template* g  replacements   f  l-bde397a-acc f  l-bde397a-acd   ` g  template f  l-bde397a-ac7 ` _i  ]q g  syntax	]q 
f  Invalid expressiong  when[[[g  testg  stmtg  stmt*a g  m-bde397a-ad5^ ___ f  l-bde397a-adaf  l-bde397a-adbf  l-bde397a-adcf  l-bde397a-add `  f  l-bde397a-ad7 `k  _i !]v q "g  begin#]" q $g  unless%g  m-bde397a-ae4&%^ '&___ (f  l-bde397a-ae9)f  l-bde397a-aea*f  l-bde397a-aeb+f  l-bde397a-aec,()*+ -`', .& /f  l-bde397a-ae60/ 1`k.0 2_-i1 3]v2q 4g  not5]42q 6]"2q 7g  cond89g  else:g  
bad-clause;: <f  l-bde397a-b21=< >`;= ?g  clause@? Af  l-bde397a-b1fBA C`@B Dg  clausesE?D Ff  l-bde397a-b0eGf  l-bde397a-b0fHFG I`EH Jg  reverse-mapKg  foldLJK M__ Nf  l-bde397a-af6Of  l-bde397a-af4PNO Q`LMP Rg  
whole-exprSR Tf  l-bde397a-af3UT V`SU W_>CIQV X]9Wq YX ZY[g  tail\[ ]f  l-bde397a-b2c^] _`\^ `g  e*a` bf  l-bde397a-b27cf  l-bde397a-b28dbc e`ad f_i_e>CIQV 	g]"fq hf  else must be the last clauseiYjf  invalid clausekg  =>l]kWq ml n[m[ og  t-bde397a-b36po qg  m-bde397a-b37rq^ sr tf  l-bde397a-b3but v`psu wf  l-bde397a-b35xw y`\x zg  receiver{z |f  l-bde397a-b30}f  l-bde397a-b31~|} `{~ _iviiiy>CIQV ]q ]q ]vq  m[f  $wrong number of receiver expressions[[m[ g  call-with-valuesg  t-bde397a-b4c g  m-bde397a-b4d^  f  l-bde397a-b51 ` f  l-bde397a-b4b `\ g  	generatorg  guardz f  l-bde397a-b44f  l-bde397a-b45f  l-bde397a-b46 ` _iiii>CIQV ]q g  lambda]q g  vals]q ]vq ]q  [g  t-bde397a-b60 g  m-bde397a-b61^  f  l-bde397a-b65 ` f  l-bde397a-b5f `\  f  l-bde397a-b5c ` _iiii>CIQV ]q ]q ]vq g  t-bde397a-b71 g  m-bde397a-b72^  f  l-bde397a-b76 ` f  l-bde397a-b70 `\ ` f  l-bde397a-b69f  l-bde397a-b6af  l-bde397a-b6b ` _iiii>CIQV ]vq ]"q g  t-bde397a-b12 g  m-bde397a-b13^  f  l-bde397a-b17 ` _iIQV ]"q g  caseg  rest f  l-bde397a-bd6f  l-bde397a-bd7 ` f  l-bde397a-bd0 `; g  seen? f  l-bde397a-bcdf  l-bde397a-bce ` g  key f  l-bde397a-bbd ` g  expr?D f  l-bde397a-bb5f  l-bde397a-bb6f  l-bde397a-bb7 ` g  reverse-map-with-seedg  fold2K ___ f  l-bde397a-b81f  l-bde397a-b7ff  l-bde397a-b7d ` f  l-bde397a-b7c  `S _iii  ]kq  [ _  ]q f  l-bde397a-c09	f  l-bde397a-c0a
	 `a
 _iii  ]"q g  memvg  systemg  baseg  message g  warning  g  duplicate-case-datumg  source-propertiesg  array?g  bad-case-datumg  t-bde397a-bf5 g  m-bde397a-bf6^  f  l-bde397a-bfa  !`  "f  l-bde397a-bf4#" $`\# % &f  l-bde397a-be2'& (`%' )g  datums*) +f  l-bde397a-be0,+ -`*, .g  clause-expr/. 0f  l-bde397a-bdc10 2`/1 3_i!iii$i(-i2iii  4]v3q 5]3q 6g  quote7]63q 8_i2iii  9]98q :9 ;g  t-bde397a-bbf<; =g  m-bde397a-bc0>=^ ?> @f  l-bde397a-bc4A@ B`<?A C_iBiii  
D]Cq Eg  doF GHFGI[HJg  letrecKg  varLg  initMg  stepNg  commandOaKLMN Pg  m-bde397a-c0fQP^ RQ______ Sf  l-bde397a-c14Tf  l-bde397a-c15Uf  l-bde397a-c16Vf  l-bde397a-c17Wf  l-bde397a-c18Xf  l-bde397a-c19Yf  l-bde397a-c1aZSTUVWXY [`ORZ \Q ]f  l-bde397a-c11^] _`k\^ `_[i_ a]J`q bg  loopc]b`q d]`q e]v`q f]"`q g]`q hegg i]E`q jf  stepk]j`q lg  atommlj n[m[ o[m[[ pg  wrong-number-of-argsqf  Cdefine-values: wrong number of return values returned by expressionrg  %define-values-arity-errorsg  define-valuest[ ua vg  definewf  l-bde397a-c3exw y`bx z {f  l-bde397a-c39|{ }`z| ~g  	orig-form~ f  l-bde397a-c36 ` _iiiiy}i 	]vq ]q ]q g  case-lambda]q ]q  ]q ]rq     \[ g  each+[\ [ [[ [[ [ f  l-bde397a-c7f `b g  var0g  varn f  l-bde397a-c76f  l-bde397a-c77f  l-bde397a-c78 ` _iiiii 	]"q ]vq ]q ]q ]q ]q ]q ]rq    ]q g  v]q ]q g  set!]q ]q  ]q  K f  l-bde397a-c6af  l-bde397a-c6b ` _i ]vq ]q ]q ]q  f  l-bde397a-c5e `b f  l-bde397a-c55f  l-bde397a-c56f  l-bde397a-c57 ` _iiiii 	]"q ]vq ]q ]q ]q ]q ]q ]rq    ]q ]q ]q ]q ]q  ]q  f  l-bde397a-c47f  l-bde397a-c48 ` _ii ]vq ]q ]q ]q ]q   ]q ]rq     g  delayg  make-promiseg  expa g  m-bde397a-c87^ _ f  l-bde397a-c8cf  l-bde397a-c8d `  f  l-bde397a-c89  `k _i  ]q ]q g  current-source-location g  s f  l-bde397a-c96	 
`	 f  l-bde397a-c91 `k _i
i ]6q g  current-filenameg  canonicalize-pathg  assq-refg  filenameg  define-once[[[ g  symg  vala g  m-bde397a-c9e^ __ f  l-bde397a-ca3f  l-bde397a-ca4f  l-bde397a-ca5  ` ! "f  l-bde397a-ca0#" $`k!# %_ i$ &]v%q ']v%q (g  module-locally-bound?)](%q *]%q +* ,]6%q -f  map.f  Circular list: ~S/g  reverse!0f  Not a list: ~S1f  List of wrong length: ~S2g  length3g  map-in-order4f  for-each5f  Unexpected tail: ~S6g  binaryS768g  encodingS98	:g  guess-encodingS;:	<79; =g  	open-file>f  rb?f  r@g  open-input-fileA79 Bf  wbCf  wDg  open-output-fileE6	F8	G:	HEFG Ig  close-input-portJg  call-with-input-fileKEF Lg  close-output-portMg  call-with-output-fileNg  with-input-from-portOg  with-input-from-filePg  with-output-to-fileQg  with-error-to-portRg  with-error-to-fileSg  set-exception-printer!Tg  and=>Ug  frame-sourceVf  <unnamed port>Wf  
~a:~a:~a: Xf  ERROR: Yf  !Throw to key `~a' with args `~s'.Zg  frame-procedure[f  In procedure ~a:
\g  procedure-name]f  Error while printing exception.^g  force-output_g  print-exception`f  In procedure ~a: ag  goops-errorbg  host-not-foundcg  keyword-argument-errordf  ~a: ~seg  
misc-errorfg  no-datagg  no-recoveryhg  null-pointer-errorig  out-of-rangejg  program-errorkg  
read-errorlg  regular-expression-syntaxmg  signalng  stack-overflowog  system-errorpg  	try-againqg  unbound-variablerg  syntax-errorsf  Syntax error:
tf  unknown fileug  linevg  1+wg  columnxf  unknown location: yf  ~a: zf  ~a{f   in subform ~s of ~s|f   in form ~s}g  getaddrinfo-error~f  In procedure getaddrinfo: ~ag  gai-strerrorg  define-macrottg  argsg  bodyZ f  l-bde397a-e12f  l-bde397a-e13f  l-bde397a-e14 ` f  l-bde397a-df9 `k _i ]q ]q ]q g  transformerZ f  l-bde397a-e1af  l-bde397a-e1b ` _i ]q ]q [[[ g  string?g  define-syntaxg  docZ f  l-bde397a-e29f  l-bde397a-e2af  l-bde397a-e2b ` _i ]q ]q ]wq  g  
macro-type]q g  defmacro]q g  defmacro-args]q ]q   g  syntax-case]q ]q ]q ]q ]Pq ]q     ]Oq ]q  g  body1Z _____ f  l-bde397a-e06f  l-bde397a-e07f  l-bde397a-e08f  l-bde397a-e09f  l-bde397a-e0a ` _i ]q ]q [Ҍf  l-bde397a-e49f  l-bde397a-e4af  l-bde397a-e4b ` f  l-bde397a-e30 `k _i ]q ]q ]q f  l-bde397a-e3df  l-bde397a-e3ef  l-bde397a-e3ff  l-bde397a-e40f  l-bde397a-e41 ` _i ]q ]q g  begin-deprecatedg  include-deprecated-featuresg  formg  form* f  l-bde397a-e54f  l-bde397a-e55 ` f  l-bde397a-e51 `k _i ]"q  g  identityg  composeg  negateg  constg  call-with-current-continuationg  call/ccg  false-if-exception a g  m-bde397a-e71^ _ f  l-bde397a-e76f  l-bde397a-e77 `   	f  l-bde397a-e73
	 `k
 _i ]q ]q ]q ]q ]q   g  warningSl [[g  arga ___ f  l-bde397a-e7bf  l-bde397a-e7cf  l-bde397a-e7df  l-bde397a-e7e  !`  "_!i #]"q $]"q %]"q &]"q ']"q (&')]"q *]"q +* ,]v"q -]4"q .g  string-null?/]."q 0/* 1-0 2]"q 3]*"q 43 5f  ;;; ~a
6]5"q 7246* 8,17 9%+8 :g  string-split;]:"q <g  call-with-output-string=]<"q >g  port?]>"q @? A]_"q B]"q CA?B&' DC E]
"q FE GB Hg  make-weak-key-hash-tableIg  
make-mutexJg  make-procedure-with-setterKg  
lock-mutexLg  unlock-mutexMg  make-object-propertyNg  assocOg  symbol-prefPg  symbol-propertyQg  symbol-pset!Rg  set-symbol-property!Sg  delq!Tg  symbol-property-remove!Ug  number?Vg  array-dimensionsWg  array-shapeXg  memberYg  
kw-arg-refZg  vtable-index-layout[g  struct-layout\g  get-print-state]g  port-with-print-state^g  inherit-print-state_g  make-vtable`g  string-appendag  standard-vtable-fieldsbf  prprpwcf  #<record-type dg  record-type-nameef  >fg  set-struct-vtable-name!gg  record-typehg  record-type-vtableig  record-type?jf  #<kg  record-type-descriptorlf   mf  : ng  record-type-fieldsog  make-struct-layoutpf  pwqg  	copy-treerg  vtable-offset-usersf  make-~atf  Wrong number of argumentsug  string->symbolvg  make-record-typewg  not-a-record-typexg  primitive-evalyg  record-constructorzg  record-predicate{f  %record-type-check|f  !Wrong type record (want `~S'): ~S}g  %record-type-error~g  
list-indexg  no-such-fieldg  record-accessorg  record-modifierg  record?g  not-a-recordg  recordg  ->boolg  symbol->stringg  symbol-appendg  list->stringg  list->symbolg  stringg  symbolf  ice-9/posixg  socketf  ice-9/networkingg  posixg  statg  	OPEN_READg  
close-portg  file-exists?g  	stat:typeg  	directoryf  /.g  file-is-directory?g  list-refg  system-error-errnof  ?g  string-joinf  ~Ag  	make-listf  ~Sg  tm:secg  tm:ming  tm:hourg  tm:mdayg  tm:mong  tm:yearg  tm:wdayg  tm:ydayg  tm:isdstg  	tm:gmtoffg  tm:zoneg  
set-tm:secg  
set-tm:ming  set-tm:hourg  set-tm:mdayg  
set-tm:mong  set-tm:yearg  set-tm:wdayg  set-tm:ydayg  set-tm:isdstg  set-tm:gmtoffg  set-tm:zoneg  	tms:clockg  	tms:utimeg  	tms:stimeg  
tms:cutimeg  
tms:cstimeg  ftellg  file-positiong  SEEK_SETg  seekg  file-set-positiong  	dup->fdesg  closeg  primitive-move->fdesg  set-port-revealed!g  
move->fdesg  port-revealedg  release-port-handleg  fdopeng  	dup->portg  dup->inportg  dup->outportg  	port-modeg  dupg  duplicate-portg  input-port?g  fdes->portsg  fdes->inportg  output-port?g  fdes->outportg  filenog  
port->fdesg  putenvf  =g  setenvg  unsetenvg  char=?g  file-name-separator?f  /g  file-name-separator-stringg  string-prefix?f   g  in-vicinityg  program-argumentsg  command-lineg  getenvf  HOMEg  
passwd:dirg  getpwuidg  getuidf  .guileg  primitive-loadg  load-user-initf  start-stackg  %stacksg  %start-stackg  start-stackg  taga g  m-bde397a-11e7^ __ f  l-bde397a-11ecf  l-bde397a-11edf  l-bde397a-11ee `  f  l-bde397a-11e9 `k _i ]q ]q g  
load-stackg  load-from-path g  add-to-load-pathg  	eval-wheng  elta g  m-bde397a-11f6^ _ f  l-bde397a-11fbf  l-bde397a-11fc	 
`	  f  l-bde397a-11f8 `k _
i ]q ]q g  load]q g  eval]q  ]q g  
%load-path]q g  cons]q g  delete]q  g  %load-verbosely g  assert-load-verbosity!f  loading "g  %load-announce#g  
%load-hook$g  
read-eval?%g  read-hash-extend&g  read'g  interaction-environment(f  -#. read expansion found and read-eval? is #f.)g  module-kind*f  module+g  number->string,g  object-address-g  %print-module.g  "pwpwpwpwpwpwpwpwpwpwpwpwpwpwpwpwpw/g  module0g  obarray1g  uses2g  binder3g  eval-closure4g  name5g  kind6g  duplicates-handlers7g  import-obarray8g  	observers9g  weak-observers:g  version;g  
submodules<g  submodule-binder=g  public-interface>g  next-unique-id?0123456789:;<=> @g  module-typeAg  module-constructorBg  module?Cg  module-obarrayDg  set-module-obarray!Eg  module-usesFg  set-module-uses!Gg  module-binderHg  set-module-binder!Ig  module-eval-closureJg  set-module-eval-closure!Kg  set-module-transformer!Lg  set-module-name!Mg  set-module-kind!Ng  module-duplicates-handlersOg  set-module-duplicates-handlers!Pg  module-import-obarrayQg  module-observersRg  set-module-observers!Sg  module-weak-observersTg  module-versionUg  set-module-version!Vg  module-submodulesWg  set-module-submodules!Xg  module-submodule-binderYg  set-module-submodule-binder!Zg  module-public-interface[g  set-module-public-interface!\g  module-filename]g  set-module-filename!^g  module-next-unique-id_g  set-module-next-unique-id!`f  Illegal size to make-module.af  Incorrect use list.bf  -Lazy-binder expected to be a procedure or #f.cg  make-hash-tabledg  macroexpandeg  make-modulefg  module-observegg  module-observe-weakhg  hash-remove!ig  delq1!jg  module-unobservekg  module-defer-observerslg  	recursivemg  module-defer-observers-mutexng  module-defer-observers-tableog  	hash-set!pg  module-call-observersqg  module-modifiedrg  hash-for-eachsg  hash-clear!tg  call-with-deferred-observersug  module-searchvg  module-local-variablewg  module-bound?xg  hashq-get-handleyg  hash-get-handlezg  module-obarray-get-handle{g  hash-ref|g  module-obarray-ref}g  module-obarray-set!~g  hashq-remove!g  module-obarray-remove!g  module-symbol-locally-interned?g  module-symbol-interned?f  Locally unbound variable.g  module-symbol-local-bindingf  Unbound variable.g  module-symbol-bindingg  	variable?g  make-undefined-variableg  module-make-local-var!g  module-ensure-local-variable!f  Bad variable to module-add!f  Bad symbol to module-add!g  module-remove!g  module-clear!g  module-for-eachg  hash-map->listg  
module-mapg  module-ref-submoduleg  module-define-submodule!f  not in submodules tablef  defining modulef  !: not overriding local definitiong  set-current-moduleg  save-module-excursionf  No variable namedg  ing  module-set!g  module-defined?g  module-use!g  reverseg  module-use-interfaces!g  
nested-reff  failed to resolve moduleg  nested-set!g  nested-define!g  nested-remove!g  nested-ref-modulef  can't redefine root moduleg  nested-define-module!g  	local-refg  
local-set!g  local-defineg  local-removeg  local-ref-moduleg  local-define-moduleg  the-root-moduleg  	interfaceg  the-scm-modulef  /unexpected module to resolve during module bootg  define-module*g  process-use-modulesg  module-export!g  $default-duplicate-binding-proceduresf   mgf  -g  hashg  most-positive-fixnumg  make-modules-ing  beautify-user-module!g  >=g  <=f  Invalid sub-version referenceg  version-matches?g  make-fresh-user-moduleg  ensureS	 g  try-load-modulef  *incompatible module version already loadedg  try-module-autoloadf  unknown file name for moduleg  reload-moduleg  purify-module!g  selectSg  hideS	g  prefixS	g  renamerS	g  versionS	 g  symbol-prefix-procf  no code for moduleg  custom-interfacef  no binding `~A' in module ~Af  $no binding `~A' to hide in module ~Ag  resolve-interfaceg  filenameSg  pureS		g  
duplicatesS	g  importsS	g  exportsS	g  replacementsS	g  
re-exportsS	g  	autoloadsS		g  transformerS	
 
f  #unexpected use-module specificationf  unexpected tail of imports listf  %expected list of integers for versionf  8expected exports to be a list of symbols or symbol pairsg  module-replace!f  =expected replacements to be a list of symbols or symbol pairsg  module-re-export!f  ;expected re-exports to be a list of symbols or symbol pairsg  module-autoload!g  lookup-duplicates-handlersf  (expected transformer to be a module nameg  symbol?g  run-hookg  module-defined-hookg  	make-hookf  missing interface for modulef  Failed to autoload ~a in ~a:
g  autoload g  make-weak-value-hash-tableg  make-autoload-interfacef  "invalid name+binding autoload listg  autoloads-in-progressg  autoload-done-or-in-progress?g  autoload-in-progress!g  set-autoloaded!g  current-reader??	 
g  autoloads-doneg  delete!g  autoload-done!g  define-option-interface[\ [ g  optionsg  enableg  disableg  option-set!a g  m-bde397a-1729^ _____ f  l-bde397a-172ef  l-bde397a-172ff  l-bde397a-1730f  l-bde397a-1731f  l-bde397a-1732f  l-bde397a-1733 `   !f  l-bde397a-172b"! #`k " $_i# %]"$q &]v$q ']$q (]$q )( *]v$q +g  list?,]+$q -,( .]$q /]$q 0g  option1]0$q 21 3]$q 4]4$q 5g  value6]5$q 7g  documentation8]7$q 9468 :]#$q ;:4 <]$q =g  len>]=$q ?]6$q @]$q A@4 B?A C>B DC E]$q Fg  <G]F$q H]	$q IG>H J]	$q K:J L]	$q MG>L NEMK OEIKN P<DO Q:6 R:8 S]"$q TS U/9;PKQKRT 	V3U1 W/2V X]$q YX Zg  flags[]Z$q \]$q ]g  flag^]]$q _^ `]$q a]S$q b[ cg  define-syntax-ruled]c$q eg  optf]e$q g]$q hfg i]$q j]$q k]$q l]$q mjkl n]$q o]6$q pof qnpg rq sg  debug-options-interfacetg  debug-optionsug  debug-enablevg  debug-disablewg  
debug-set!xg  m-bde397a-173ayx^ zae {g  m-bde397a-173c|{^ }|yy ~f  l-bde397a-1741f  l-bde397a-1742f  l-bde397a-1743~ `z} | f  l-bde397a-173e `k g  shiftyii# ]q ]q ]q ]q  _i ]tq ]q  ]q ]6q g  read-options-interfaceg  read-optionsg  read-enableg  read-disableg  	read-set!g  m-bde397a-175d^ g  m-bde397a-175f^  f  l-bde397a-1764f  l-bde397a-1765f  l-bde397a-1766 `z  f  l-bde397a-1761 `k ii# ]q ]q ]q ]q  _i ]q ]q  ]q ]6q g  print-options-interfaceg  print-optionsg  print-enableg  print-disableg  
print-set!g  m-bde397a-1780^ g  m-bde397a-1782^  f  l-bde397a-1787f  l-bde397a-1788f  l-bde397a-1789 `z  f  l-bde397a-1784 `k ii# ]q ]q ]q ]q  _i ]q ]q  ]q ]6q g  *unspecified*g  id g  m-bde397a-17a3^  f  l-bde397a-17aa ` f  l-bde397a-17a5 `k _i ]vq ]q  f  l-bde397a-17ad `k _i ]vq ]q  g  unspecified?g  <applicable-struct-vtable>g  pwprprg  <parameter>g  make-parameterg  fluid->parameterg  
parameter?f  parameter-fluidf  Not a parameter: ~Sg  parameter-fluidg  parameter-converterg  parameterizes g  p f  l-bde397a-17e2 ` g  paramg  body* 5 ____ f  l-bde397a-17d7f  l-bde397a-17d8f  l-bde397a-17d9f  l-bde397a-17da `  f  l-bde397a-17d4	 
`k	 _ii
 ]q ]vq ]4q ]q ]q ]6q ]q  f  parameterize]q ]q ]q ]q  g  with-fluids]q g  
struct-ref]q ]q   ]	q !  "g  %current-input-port-fluid#f  expected an input port$g  current-input-port%g  %current-output-port-fluid&f  expected an output port'g  current-output-port(g  %current-error-port-fluid)g  %current-warning-port-fluid*g  scheme+g  current-language,g  *repl-stack*-g  batch-mode?.g  ensure-batch-mode!/g  exit0g  assq1g  gc-time-taken2g  gc-stats3g  gc-run-time4g  
abort-hook5g  before-error-hook6g  after-error-hook7g  before-backtrace-hook8g  after-backtrace-hook9g  before-read-hook:g  after-read-hook;g  before-eval-hook<g  after-eval-hook=g  before-print-hook>g  after-print-hook?g  	exit-hook@g  	fluid-refAg  char-ready?Bg  set-port-column!Cg  repl-readerDg  iotaEg  whileFg  breakGg  continueHg  t-bde397a-1825Ig  t-bde397a-1826JHI Kg  m-bde397a-1827LK^ MLL Nf  l-bde397a-182bOf  l-bde397a-182cPNO Q`JMP RE7 Sf  l-bde397a-181fTf  l-bde397a-1820Uf  l-bde397a-1821VSTU W`RV Xf  l-bde397a-181cYX Z`kY [_iQWiZ \][q ]g  	break-tag^]][q _][q `f  breaka]`[q b_a c^b dg  continue-tage]d[q ff  continueg]f[q h_g ieh jci k][q l][q m][q n]j[q on p][q q][q r][q s][q tqrs u][q v]	[q wv^rs xuw ytx z][q {][q |{v^z }lz| ~u} q~ pny lo  g  lp][q q ve u  qz]N[q ]6[q ]G[q  f  too many arguments][q n  l u q pn lo  ]E[q ]4[q ][q  ][q   l  z]v[q g  null?][q z ][q g  values][q {z  l  g  symbol->keywordg  	substringg  keyword-like-symbol->keywordg  define-moduleg  t-bde397a-188a g  m-bde397a-188b^  f  l-bde397a-188e ` g  impg  rexg  aut ______ f  l-bde397a-1878f  l-bde397a-1879f  l-bde397a-187af  l-bde397a-187bf  l-bde397a-187cf  l-bde397a-187d ` g  parseg  parse-ifaceg  	->keywordg  keyword-like? ____ f  l-bde397a-183af  l-bde397a-1838f  l-bde397a-1836f  l-bde397a-1834 ` f  l-bde397a-1833 `k _ii ]q g  
quasiquote]q g  t-bde397a-1890 g  m-bde397a-1891^  f  l-bde397a-1894 ` _ii ]q ]6q g  t-bde397a-1896 g  m-bde397a-1897^  f  l-bde397a-189a ` _ii ]q ]6q g  t-bde397a-189c g  m-bde397a-189d^  f  l-bde397a-18a0 ` _ii ]q ]6q g  t-bde397a-18a2 g  m-bde397a-18a3^  f  l-bde397a-18a6  `  _ii ]q ]6q  g  no-backtraceSl [	l 
	[g  t-bde397a-18de g  m-bde397a-18df^  f  l-bde397a-18e2 `  f  l-bde397a-18dc ` _ii ]q ]q f  keyword arg without valuel [g  t-bde397a-18ec  g  m-bde397a-18ed! ^ "! #f  l-bde397a-18f0$# %`"$ & 'f  l-bde397a-18e8(f  l-bde397a-18e9)'( *`&) +_i%*i ,]+q -]6+q .l /.0g  t-bde397a-18f810 2g  m-bde397a-18f932^ 43 5f  l-bde397a-18fc65 7`146 8g  d98 :f  l-bde397a-18f4;f  l-bde397a-18f5<:; =`9< >_i7=i ?]>q @]6>q Al BAtCg  t-bde397a-1904DC Eg  m-bde397a-1905FE^ GF Hf  l-bde397a-1908IH J`DGI Kg  fLK Mf  l-bde397a-1900Nf  l-bde397a-1901OMN P`LO Q_iJPi R]Qq S]6Qq Tg  
use-moduleSUlT V[WUVXg  
use-syntaxSYlX ZYV[G[\U[]g  exportS^l] _^`g  export-syntaxSal` bacg  	re-exportSdlc edfg  re-export-syntaxSglf hgig  replaceSjli kjlg  replace-syntaxSmll nmog  autoloadSplo qpurf  unknown keyword or bad argumentsl tstug  unquotevg  renamerwv xf  l-bde397a-1867yf  l-bde397a-1868zxy {`wz |g  out}b| ~f  l-bde397a-1846f  l-bde397a-1847f  l-bde397a-1848~ `} f  l-bde397a-1845 ` _{ii ]uq g  keyword?f  expected keyword arg g  t-bde397a-1931 g  m-bde397a-1932^  f  l-bde397a-1935 ` g  name*4 f  l-bde397a-192bf  l-bde397a-192cf  l-bde397a-192d ` _ii ]q ]6q Gg  
quoted-arg f  l-bde397a-19def  l-bde397a-19df ` 4 f  l-bde397a-19d5f  l-bde397a-19d6f  l-bde397a-19d7 ` _i ]q ]q ]q ]q  ]q g  m]q ]q ]6q ]q ]q   f  no such moduleg  use-modulesg  kw f  l-bde397a-1a31f  l-bde397a-1a32f  l-bde397a-1a33 ` f  l-bde397a-1a0bf  l-bde397a-1a0cf  l-bde397a-1a0d `} f  l-bde397a-1a0a ` g  quotifyg  quotify-iface f  l-bde397a-19fff  l-bde397a-19fdf  l-bde397a-19fbf  l-bde397a-19f9 ` f  l-bde397a-19f8 `k _ii ]6q  f  l-bde397a-1a65 ` 4 f  l-bde397a-1a5af  l-bde397a-1a5bf  l-bde397a-1a5cf  l-bde397a-1a5d ` | f  l-bde397a-1a39f  l-bde397a-1a3af  l-bde397a-1a3b ` g  specs f  l-bde397a-1a38 ` _iiii ]q ]6q 4 f  l-bde397a-1a49f  l-bde397a-1a4af  l-bde397a-1a4b ` _ii ]6q g  quoted-args f  l-bde397a-1a73 ` g  spec 	 f  l-bde397a-1a6e		  	`	 	_i	 	]	q 	]	q 	]	q 	]	q 				 		]	q 	
]	q 	]	q 		 	g  
use-syntax	a 	g  m-bde397a-1a78		^ 		_ 	f  l-bde397a-1a7d	f  l-bde397a-1a7e			 	`			 		 	f  l-bde397a-1a7a		 	`k		 	_	i	 	]"	q 	]	q 	]	q 	]	q 	]	q 	 			 	!g  issue-deprecation-warning	"]	!	q 	#f  E`use-syntax' is deprecated. Please contact guile-devel for more info.	$]	#	q 	%	"	$ 	&		 	% 	']	q 	(g  library	)g  sym?	*g  make-custom-interface	+	)	* 	,f  l-bde397a-1b4a	-f  l-bde397a-1b48	.	,	- 	/`	+M	. 	0g  import-spec	1	0 	2f  l-bde397a-1b47	3	2 	4`	1	3 	5_	/	4 	6]	(	5q 	7	6 	8g  srfi	9]	8	5q 	:	9 	; 	<[	; 	=[	<	>	:	=	?	7	> 	@	7	= 	A	7 	Bg  only	C]	B	5q 	D	C 	E	D	Fg  except	G]	F	5q 	H	G 	I	H	Jg  prefix	K]	J	5q 	L	K 	M	L[[ 	Ng  rename	O]	N	5q 	P	O 	Q[	R	P	Q	Sg  resolve-r6rs-interface	T4 	Uf  l-bde397a-1c19	Vf  l-bde397a-1c1a	W	U	V 	X`	T	W 	Y_	X	/	4 	Z]	(	Yq 	[4: 	\f  l-bde397a-1c0b	]f  l-bde397a-1c0c	^f  l-bde397a-1c0d	_	\	]	^ 	``	[	_ 	a_	`	/	4 	b]	(	aq 	cf  'duplicate binding for `~A' in module ~A	df  l-bde397a-1b93	ef  l-bde397a-1b94	f	d	e 	g`	T	f 	h_	g	/	4 	i]	(	hq 	jg  colon-n	k	j: 	lf  l-bde397a-1b54	mf  l-bde397a-1b55	nf  l-bde397a-1b56	o	l	m	n 	p`	k	o 	q_	p	/	4 	r]	8	qq 	sf  srfi-	tg  t-bde397a-1b68	u	t 	vg  m-bde397a-1b69	w	v^ 	x	w 	yf  l-bde397a-1b6c	z	y 	{`	u	x	z 	|g  srfi-n	}	| 	~f  l-bde397a-1b64		~ 	`	}	 	f  l-bde397a-1b5e	f  l-bde397a-1b5f	f  l-bde397a-1b60				 	`	k	 	_i	{i			/	4 	]	(	q 	]	8	q 	g  t-bde397a-1b74		 	g  m-bde397a-1b75		^ 		 	f  l-bde397a-1b78		 	`			 	4 	f  l-bde397a-1b70	f  l-bde397a-1b71			 	`		 	_i		i			/	4 		]	(	q 	]	8	q 	g  export	g  compute-exports		 	f  l-bde397a-1a86		 	`		 	g  stx		 	f  l-bde397a-1a85		 	`		 	_		 	]		q 		 			g  import	]		q 		 													=				g  for	g  im		 	f  l-bde397a-1b0b		 	`		 	g  espec	g  ispec	4:		 	f  l-bde397a-1afe	f  l-bde397a-1aff	f  l-bde397a-1b00	f  l-bde397a-1b01	f  l-bde397a-1b02	f  l-bde397a-1b03							 	`		 	_i	i			 	]		q 		 			j 	f  l-bde397a-1a96	f  l-bde397a-1a97	f  l-bde397a-1a98	f  l-bde397a-1a99	f  l-bde397a-1a9a						 	`		 	g  replace?	g  
re-export?			 	f  l-bde397a-1a8e	f  l-bde397a-1a8c			 	`	M	 	g  ifaces		 	f  l-bde397a-1a8a	f  l-bde397a-1a8b			 	`		 	_i					 	]	N	q 		 				[	t[	 	j 	f  l-bde397a-1b1f	f  l-bde397a-1b20	f  l-bde397a-1b21				 	`		 	g  exports	g  
re-exports			 	f  l-bde397a-1b19	f  l-bde397a-1b1a	f  l-bde397a-1b1b				 	`		 	_i	ii				 		]"	q 	]	q 	]	q 	]	q 	]		q 	]		q 	g  	re-export	]		q 	g  export!	]		q 	g  @@	]		q 	4		 	f  l-bde397a-1ae2
 f  l-bde397a-1ae3
f  l-bde397a-1ae4
f  l-bde397a-1ae5
f  l-bde397a-1ae6
	
 


 
`	
 
_
		 
]	(
q 
]	
q 
	]	
q 

g  
import-set


 
f  l-bde397a-1b32

 
`

 
g  	strip-for

 
f  l-bde397a-1b2f

 
`

 
f  l-bde397a-1b2e

 
`	
 
_i


 
]	
q 

 


g  library-reference

 
f  l-bde397a-1b42

 
`

 
 f  l-bde397a-1b3d
!
  
"`

! 
#_i

"

 
$]
#q 
%]
#q 
&]
#q 
']
#q 
(
%
&
' 
)]
#q 
*g  iface
+]
*
#q 
,]	S
#q 
-]6
#q 
.]t
#q 
/]
#q 
0]
#q 
1]
#q 
2
1 
3]
#q 
4
3
+ 
5
0
2
4 
6
/
5 
7
.
6 
8
7 
9]v
#q 
:]
#q 
;
9
:
: 
<
; 
=g  define-private
>g  foo
?g  bar
@a
>
? 
Ag  m-bde397a-1c1f
B
A^ 
C
B__ 
Df  l-bde397a-1c24
Ef  l-bde397a-1c25
Ff  l-bde397a-1c26
G
D
E
F 
H`
@
C
G 
I
B 
Jf  l-bde397a-1c21
K
J 
L`k
I
K 
M_
Hi
L 
N]v
Mq 
Og  define-public
P[	ጤ
Qa4 
Rg  m-bde397a-1c2a
S
R^ 
T
S___ 
Uf  l-bde397a-1c2f
Vf  l-bde397a-1c30
Wf  l-bde397a-1c31
Xf  l-bde397a-1c32
Y
U
V
W
X 
Z`
Q
T
Y 
[
S 
\f  l-bde397a-1c2c
]
\ 
^`k
[
] 
__
Zi
^ 
`]"
_q 
a]v
_q 
b]	
_q 
ca4 
d
S__ 
ef  l-bde397a-1c38
ff  l-bde397a-1c39
gf  l-bde397a-1c3a
h
e
f
g 
i`
c
d
h 
j_
ii
^ 
k]"
jq 
l]v
jq 
m]	
jq 
ng  defmacro-public
og  m-bde397a-1c3f
p
o^ 
q
p___ 
rf  l-bde397a-1c44
sf  l-bde397a-1c45
tf  l-bde397a-1c46
uf  l-bde397a-1c47
v
r
s
t
u 
w`
Q
q
v 
x
p 
yf  l-bde397a-1c41
z
y 
{`k
x
z 
|_
wi
{ 
}]"
|q 
~]
|q 
g  export-syntax
]

|q 
   k    T
g  formals
a
 
g  m-bde397a-1c4e

^ 

__ 
f  l-bde397a-1c53
f  l-bde397a-1c54
f  l-bde397a-1c55



 
`


 

 
f  l-bde397a-1c50

 
`k

 
_
i
 
]
q 
g  set-object-property!
g  replace
g  module-export-all!
f  re-exporting local variable:
f  Undefined variable:
a4 
g  m-bde397a-1c95

^ 

_ 
f  l-bde397a-1c9a
f  l-bde397a-1c9b


 
`


 

 
f  l-bde397a-1c97

 
`k

 
_
i
 
]
q 
]
q 
]
q 
]
q 



 
]t
q 
]
q 
]
q 
]
q 

 
]6
q 
g  m-bde397a-1ca0

^ 

_ 
f  l-bde397a-1ca5
f  l-bde397a-1ca6


 
`


 

 
f  l-bde397a-1ca2

 
`k

 
_
i
 
]
q 
]
q 
]
q 
]
q 



 
]t
q 
]
q 
]
q 
]
q 

 
]6
q 
g  m-bde397a-1cab

^ 

_ 
f  l-bde397a-1cb0
f  l-bde397a-1cb1


 
`


 

 
f  l-bde397a-1cad

 
`k

 
_
i
 
]
q 
]
q 
]
q 
]
q 



 
]t
q 
]
q 
]
q 
]
q 

 
]6
q 
g  m-bde397a-1cb6

^ 

_ 
f  l-bde397a-1cbb
f  l-bde397a-1cbc


 
`


 

 
f  l-bde397a-1cb8

 
`k

 
_
i
 
]	
q 
g  re-export-syntax
g  m-bde397a-1cc1

^ 

_ 
f  l-bde397a-1cc6
f  l-bde397a-1cc7


 
`


 

 
f  l-bde397a-1cc3

 
`k

 
_
i
 
]	
q 
g  make-mutable-parameter
g  duplicate-handlers
g  check
f  %~A: `~A' imported from both ~A and ~A
f  /WARNING: ~A: `~A' imported from both ~A and ~A

g  object-property
g  warn-override-core
f  <WARNING: ~A: imported module ~A overrides core binding `~A'
 g  firstg  lastg  merge-genericsg  merge-accessorsf  invalid duplicate handler name:

, g  !default-duplicate-binding-handlerg  warningsSg  arity-mismatch	q 
	 g  %auto-compilation-optionsf  Stat of ~a failed:
g  
stat:mtimeg  stat:mtimensecg  vmg  objcode g  program g  make-programg  load-objcodef  *WARNING: failed to load compiled file ~a:
g  %load-compiled-extensionsg  %load-compiled-pathg  %compile-fallback-pathg  system-file-name-conventiong  windowsg  %fresh-auto-compilef  :;;; note: source file ~a
;;;       newer than compiled ~a
g  %load-should-auto-compileg  %warn-auto-compilation-enabled f  ;;; compiling ~a
!g  compile"! #g  compile-file$g  optsS%g  envS&f  ;;; compiled ~a
'f  #WARNING: compilation of ~a failed:
(f  !invalid %load-compiled-extensions)f  .go*g   %file-port-name-canonicalization+g  relative,g  load-in-vicinity-g  make-variable-transformer.g  dirname/g  t-bde397a-1e180/ 1g  m-bde397a-1e1921^ 32 4f  l-bde397a-1e1c54 6`035 7 8f  l-bde397a-1e1698 :`79 ;g  dir<; =f  l-bde397a-1e10>= ?`<> @g  fileA@ Bf  l-bde397a-1e0cCB D`AC Eg  srcFE Gf  l-bde397a-1e0aHG I`FH Jf  l-bde397a-1e08KJ L`kK M_i6:ii?iDiIiiL N],Mq Og  getcwdPg  m-bde397a-1e1fQP^ RQ Sf  l-bde397a-1e20TS U`RT V_iU:ii?iDiIiiL W]OVq XW Yg  t-bde397a-1e28ZY [g  m-bde397a-1e29\[^ ]\ ^f  l-bde397a-1e2c_^ ``Z]_ af  l-bde397a-1e26ba c`b d_i`cii?iDiIiiL e]dq f]dq g]dq h],dq ig  m-bde397a-1e2eji^ kj lf  l-bde397a-1e2fml n`km o_incii?iDiIiiL p]Ooq qp rf sg  guile-2tg  r5rsug  srfi-0vg  srfi-4wg  srfi-13xg  srfi-14yg  srfi-16zg  srfi-23{g  srfi-30|g  srfi-39}g  srfi-46~g  srfi-55g  srfi-61g  srfi-62g  srfi-87g  srfi-105?stuvwxyz{|}~ g  %cond-expand-featuresg  %cond-expand-tableg  cond-expand-provideg  cond-expandg  	condition f  l-bde397a-1e49 ` g  matchg  condition-matches?g  module-has-feature? f  l-bde397a-1e40f  l-bde397a-1e3ef  l-bde397a-1e3c ` f  l-bde397a-1e3b `k _i ]Yq  ]q  ]4q  [  f  l-bde397a-1e63f  l-bde397a-1e64f  l-bde397a-1e65 ` g  	alternateD f  l-bde397a-1e5ff  l-bde397a-1e60 ` _i ]"q _ ]9q   [ ? f  l-bde397a-1e6df  l-bde397a-1e6e ` _i ]"q f  unfulfilled cond-expandg  	use-srfisg  require-extensionf  l-bde397a-1e7c `k _i ]	8q    f  Not a recognized extension typeg  srfi-f  l-bde397a-1e87 `	} g  n f  l-bde397a-1e82 ` _ii ]q ]	8q g  define-inlinablef  % g  
-procedureg  	proc-name f  l-bde397a-1eaff  l-bde397a-1eb0 ` 4
 f  l-bde397a-1ea6f  l-bde397a-1ea7f  l-bde397a-1ea8 ` g  make-procedure-name	J f  l-bde397a-1e9af  l-bde397a-1e98 `M f  l-bde397a-1e97 `k _iiii 	]"q ]vq g  syntax-parameterize]q g  identifier-syntax]q g  define-syntax-parameter]q ]q ]jq  ]q ]q ]q g  a ]q ]q   ]Nq ]6q ]tq  ]Rq  	g  using-readline?
g  ice-9g  
deprecated
 	8v  f  ice-9/boot-9.scmg  syntax-local-bindingg  syntax-moduleg   syntax-locally-bound-identifiersg  syntax-session-id @ @ g  
guile-user !# " @ @ C 5 hP 3%  ]4i5 $  4i>  "  G  "      h       -  . , 3  #    6    {       g  stem
		  g  filenamef  ice-9/boot-9.scm
	7			7			8	 		
  g  nameg  make-prompt-tag CR4i5         h   C   ] L C   ;       g  filenamef  ice-9/boot-9.scm
	=	 		
   C O  R       h   D   ] L 6   <       g  filenamef  ice-9/boot-9.scm		A	 		
   C h(      ] U   4O >   XCXFG@          g  tag
		% g  thunk		% g  handler			% g  args			%  g  filenamef  ice-9/boot-9.scm
	@
			A	 		%	  g  nameg  call-with-prompt CRh      - 1 3  W F       g  tag
			 g  args			  g  filenamef  ice-9/boot-9.scm
	B
		C	 			
  g  nameg  abort-to-prompt C	R
RHH 	     h      - 1 3  L&  "  L$  aM[ML Y4L 5$  "  4L  >  "  G  L$  4L >  "  4L >  ZCZFL @        g  thrown-k
		  g  args		  g  running		!	  g  filenamef  ice-9/boot-9.scm
	c			d			d			d	'		d		!	e		*	f	9	-	g		9	g		>	h		Y	j		Z	k		n	l	 	m	 		 
   C       h      ]M [ LO C        g  
prompt-tag
		 g  catch-k		 g  pre			 g  prev			  g  filenamef  ice-9/boot-9.scm
	a			b	 			  g  nameg  custom-throw-handler CO  Q 4i5K 4i      hh     - 1 3  &  0$  $45$  "  $  
"  "  
6445  >  "  G  6             g  k
			a g  args			a  g  filenamef  ice-9/boot-9.scm
	K			M			L			O			N			P		 	P	"	"	P		&	N		)	P	.	0	Q		4	N		A	N		B	T		E	T		K	T	#	T	T		a	U	 			a
  g  nameg  default-exception-handler C5K	       h0      - 1 3  L&  "  L$  
L @L  @       g  thrown-k
			0 g  args			0  g  filenamef  ice-9/boot-9.scm
	\			]			]			]	'		]		(	^		0	_	 			0
   C        h   g  - . , 3 #   $  "   $  "  !4    >  "  G  45U  >M$  4L  5"  M[ O Y4>   Z"  XCXFG@   _      g  k
	  g  thunk	  g  handler		  g  pre-unwind-handler		  g  tag		U  g  prev		x  g  cont	   g  k	   g  args	    	g  filenamef  ice-9/boot-9.scm
	p		 		 		 		% 	#	) 	
	. 		2 		4 	)	6 		< 		A 	$	F 		O 		S 	&	U 		U 	
	^ 		f 		g 		x	[	  	  	  	 	 	  g  nameg  catchg  documentationf oInvoke @var{thunk} in the dynamic context of @var{handler} for
exceptions matching @var{key}.  If thunk throws to the symbol
@var{key}, then @var{handler} is invoked this way:
@lisp
 (handler key args ...)
@end lisp

@var{key} is a symbol or @code{#t}.

@var{thunk} takes no arguments.  If @var{thunk} returns
normally, that is the return value of @code{catch}.

Handler is invoked outside the scope of its own @code{catch}.
If @var{handler} again throws to the same key, a new handler
from further up the call chain is invoked.

If the key is @code{#t}, then a throw to @emph{any} symbol will
match this call to @code{catch}.

If a @var{pre-unwind-handler} is given and @var{thunk} throws
an exception that matches @var{key}, Guile calls the
@var{pre-unwind-handler} before unwinding the dynamic state and
invoking the main @var{handler}.  @var{pre-unwind-handler} should
be a procedure with the same signature as @var{handler}, that
is @code{(lambda (key . args))}.  It is typically used to save
the stack at the point where the exception occurred, but can also
query other parts of the dynamic state at that point, such as
fluid values.

A @var{pre-unwind-handler} can exit either normally or non-locally.
If it exits normally, Guile unwinds the stack and dynamic context
and then calls the normal (third argument) handler.  If it exits
non-locally, that exit determines the continuation. CO i  hX     ] $  "   $  "  !4    >  "  G  M 4L 5Y4>   ZCZF         g  k
		U g  thunk		U g  pre-unwind-handler			U  g  filenamef  ice-9/boot-9.scm
 		 			 		
 		 	#	 	
	 		 		! 	)	# 		) 		. 	$	3 		> 		J 	 		U	  g  nameg  with-throw-handlerg  documentationf  eAdd @var{handler} to the dynamic context as a throw handler
for key @var{k}, then invoke @var{thunk}. CO 
i    h0     - 1 3  $  	M [ @M [    6       g  key
			/ g  args			/  g  filenamef  ice-9/boot-9.scm
 		 		 	
	 		 	.	  	>	" 		( 	8	- 	E	/ 	 			/
  g  nameg  throwg  documentationf  Invoke the catch form matching @var{key}, passing @var{args} to the
@var{handler}.

@var{key} is a symbol. It will match catches of the same symbol or of @code{#t}.

If there is no handler at all, Guile prints an error and then exits. CO i        h       ] (  C4L  54L 5C           g  l
		  g  filenamef  ice-9/boot-9.scm
 		 			 		 		 		 		 		 	#	 		 	 		  g  nameg  map1 Ch(      ] (  C4L  54L 5C             g  l1
		" g  l2		"  g  filenamef  ice-9/boot-9.scm
 		 			 		 		 		 		 		 		 		 	 	  		! 	 		"	  g  nameg  map2 C     h0      ] (  C4L  45?4L 455C         g  l1
		. g  rest		.  g  filenamef  ice-9/boot-9.scm
 		 			 		 		 		 	#	 		 		! 		" 		, 		- 	 		.	  g  nameg  lp C    hh   E  )   3 O  Q 6)   3 O  Q 6- 1 3 O  Q 6       =      g  f
			 g  l			 g  map1			 g  f
	(	@ g  l1	(	@ g  l2		(	@ g  map2		1	@ g  f
	I	a g  l1	I	a g  rest		I	a g  lp		R	a  g  filenamef  ice-9/boot-9.scm
 		 		( 		1 		I 		R 	 				 	(	@	 	I	a	
	  g  nameg  map CR    h     )   43 "  %$  4 >  "  G  "C")   @3 "  -$  $4 >  "  G  "C"- 1 3 "  ;$  24 45>  "  G  45"C"    w      g  f
			: g  l			: g  l			2 g  f
	C  g  l1	C  g  l2		C  g  l1		G	t g  l2		G	t g  f
   g  l1   g  rest	   g  l1	   g  rest	    g  filenamef  ice-9/boot-9.scm
 		 		 		 		 		 		 		* 		0 		2 		C 		G 		J 		N 		O 		T 		W 		\ 		g 		j 	!	r 		t 	  	  	  	  	  	  	  	  	  	  	  	  	 #			:	 	C 	   	
	  g  nameg  for-each CR4 i!>  "  G  "#$%&    hX      -  1  3 4>   "  G  4>  "  G  4 >  "  G  4>   "  G  4 5C         g  stuff
			V  g  filenamef  ice-9/boot-9.scm
 
	
 						#		,		>		N		U	 
			V


  g  nameg  peek C'R'i(R)*"#+&   hP      ] 4>   "  G  4>  "  G  4L >  "  G  4>   "  G  4L 5C        g  filenamef  ice-9/boot-9.scm

										%		7		G		N	 
		O
   C h    |   -  1  3 45  O 6       t       g  stuff
			  g  filenamef  ice-9/boot-9.scm

						 			


  g  nameg  warn C,R- h       ]4 5$  C  C             g  sym
		  g  filenamef  ice-9/boot-9.scm

								 		  g  nameg  provide C.R-        h      ]4 5$  CC     y       g  feature
		  g  filenamef  ice-9/boot-9.scm

				 		  g  nameg  	provided? C/R0      h      - 1 3  
@             g  vtable
			 g  args			  g  filenamef  ice-9/boot-9.scm
&
	'	 			
  g  nameg  make-struct/no-tail C1R       h   {   ]C    s       g  	file-name
		  g  filenamef  ice-9/boot-9.scm
.
 		  g  nameg  absolute-file-name? C2RhP      ]"  :$  2(  "  $  (  "  C4 5"C"            g  f
		K g  lst		K g  result			@ g  l			@  g  filenamef  ice-9/boot-9.scm
=
	>		@		A		A			#A		,C		1C		3C		6C		>C		@>	 		K	  g  nameg  and-map C3R     h8      ]"  $$  C(  C4 5""          g  f
		5 g  lst		5 g  result			* g  l			*  g  filenamef  ice-9/boot-9.scm
J
	K		M		N		O		O		O		"O		*O		*K	 		5	  g  nameg  or-map C4R5iR6789       h   ^  - . , 3 #  
#  	45"   64 5$  F$  945$  '4 5$  C 456"""       V      g  	char_pred
	  g  s	  g  start		  g  end		  g  t		d	}  g  filenamef  ice-9/boot-9.scm
Z		Z	2	4`		4[		5[		?[		D\		H[		K]		R]		V[		W^		b^	1	d^		d^		r_		y_	%	{_		}_	 	 		  g  nameg  
string-any C:R6;89   h   Q  - . , 3 #  
#  	45"   64 5$  A$  445$  "4 5$   456C"""    I      g  	char_pred
	  g  s	  g  start		  g  end		   g  filenamef  ice-9/boot-9.scm
e		e	2	4k		4f		5f		?f		Dg		Hf		Kh		Rh		Vf		Wi		bi	4	di		hi		kj		rj	&	tj		vj	 	 		  g  nameg  string-every C<R=      h      ] 6         g  str
		 g  start		 g  end			 g  fill			  g  filenamef  ice-9/boot-9.scm
o
	p	 			  g  nameg  substring-fill! C>R@       h   t   ]C   l       g  x
		  g  filenamef  ice-9/boot-9.scm
v
	w	 		  g  nameg  module-name CARBC h      ]45 6        g  module
		 g  sym		 g  var			  g  filenamef  ice-9/boot-9.scm
x
	y		y	 			  g  nameg  module-add! CDRECDF   h0      ]445 5$  C45 456        g  module
		/ g  sym		/ g  val			/ g  v			/  g  filenamef  ice-9/boot-9.scm
z
	{		{		{		{		|		}		 ~		'~	*	/~	 		/	  g  nameg  module-define! CGRHI(    h0      ]
4 5$  C4 5456            g  module
		+ g  sym		+ g  v			+  g  filenamef  ice-9/boot-9.scm

								
		"		-	#	9	+	 
		+	  g  nameg  
module-ref CJR
H  h   }   ]	M N C  u       g  m
		 g  i		  g  filenamef  ice-9/boot-9.scm
								 		   C O  KRiLR       h   s   -  1  3 C     k       g  args
			  g  filenamef  ice-9/boot-9.scm

 			


  g  nameg  resolve-module CMRNRORPRQRRRSRTRURVR4 iW>  "  G  4XiYZV\r      h   -   ]C   %       g  dummy
		  		   Cs       h   <   ]C   4       g  dummy
		 g  x		  			   Cu        h   K   ]C       C       g  dummy
		 g  x		 g  y			  			   CN 
     hP      ]4 5$  @4 5$  @4 5$  @	 6       g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  ice-9/boot-9.scm
	 		P  g  
macro-typeg  syntax-rulesg  patternsg  x g  xg  y  C5YR4XiZV\       h   -   ]C   %       g  dummy
		  		   Cs       h   <   ]C   4       g  dummy
		 g  x		  			   Cu      h    K   ]    CC       g  dummy
		  g  x		  g  y			   		 	   CN 
     hP      ]4 5$  @4 5$  @4 5$  @	 6       g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  ice-9/boot-9.scm
	 		P  g  
macro-typeg  syntax-rulesg  patternsg  x g  xg  y  C5R4XiZVV     h   K   ]   C C       g  k
		 g  e*		 g  reps			  			   CN      h8      ]L 4L L5 45$  @6            g  e
		3 g  tmp		3 g  tmp			3  g  filenamef  ice-9/quasisyntax.scm		U	"		U	5		U	"		T		 		3   CtV   h   ^   ] 45 C    V       g  h*
		 g  rep1		 g  t*			 g  rep2			  			   CN   h@      ]4L  L54L L5 45$  @6              g  h
		9 g  t		9 g  tmp			9 g  tmp		"	9  g  filenamef  ice-9/quasisyntax.scm		p	(		q	(		p		 		9	   CV     h   <   ]4 5 C 4       g  e*
		 g  reps		  			   CN     h8      ]4L 44 55L545$  @6        g  e
		7 g  tmp		7 g  tmp		 	7  g  filenamef  ice-9/quasisyntax.scm		v			v	 		v			u		 		7   CRU        h8      ]
L 
$  )4 5$  4 5$  C 6CC          g  k
		5 g  r		5 g  t			1  g  filenamef  ice-9/quasisyntax.scm		i		
	i				j			i				k			k		1	l	 		5	   CVs  h   <   ]L   C   4       g  r*
		 g  reps		  			   CN     h8      ]4L L545$   O @6            g  k
		3 g  r		3 g  tmp			3 g  tmp			3  g  filenamef  ice-9/quasisyntax.scm		m	"	
	m	5		m	"		m		 		3	   C    h   h   ]L 
C `       g  e
		 g  r		  g  filenamef  ice-9/quasisyntax.scm		b		 			   CSV        h   7   ] C/       g  tmp-bde397a-a8c
		  		   CV   h(   )   ]44 ?L544 L 5L5 C  !       g  t
		&  		&   CN        h8      ]4545$  L  O @6         g  r*
		6 g  rep		6 g  t			6 g  tmp			6 g  tmp			6  g  filenamef  ice-9/quasisyntax.scm		e	 		6	   CN     h@      ]4L 
54 5 45$   O @6            g  e
		; g  r		; g  tmp			; g  tmp			;  g  filenamef  ice-9/quasisyntax.scm		c	'		d	'		c		 		;	   C    h   h   ]L 
C `       g  e
		 g  r		  g  filenamef  ice-9/quasisyntax.scm		\		 			   CSV       h(   J   ]4 544L 55 C       B       g  r*
		! g  rep		! g  t			!  		!	   CN       h@      ]4L 
54 5 45$   O @6            g  e
		; g  r		; g  tmp			; g  tmp			;  g  filenamef  ice-9/quasisyntax.scm		]	'		^	'		]		 		;	   C    h   Y   ]L 
C Q       g  e
		  g  filenamef  ice-9/quasisyntax.scm		X		 		   CSV\    h   )   ]  L    C      !       g  t
		  		   CN        h0      ]4545$   O @6       g  e
		0 g  tmp			0 g  tmp			0  g  filenamef  ice-9/quasisyntax.scm		Y			Y	2			Y				Y		 		0   C   hH     ]:4 5$   L O @4 5"  4 5"  4 5"  |4 5"  B4 5$  L O @4 	5$  
L O @ C$  !4O ?$  L O @""$  4O ?$  L O @"_"[$  4O ?$  L O @"'"#$  4O ?$  @""              g  x
	A g  level	A g  tmp		A g  tmp		+A g  tmp		: g  tmp		I  g  tmp		X  g  tmp		g  g  tmp	    	g  filenamef  ice-9/quasisyntax.scm
	Q	 	A	  g  nameg  expand CVVs	     h   K   ]   C       C       g  	template*
		 g  replacements		  			   CN      h0      ]4L  
545$  @6           g  template
		, g  tmp	
	, g  tmp			,  g  filenamef  ice-9/quasisyntax.scm		}	/	
	}	 		,   CN        h8   |   ]O Q 4 5$  O @ 6    t       g  e
		4 g  expand	
	4 g  tmp			4  g  filenamef  ice-9/quasisyntax.scm
	C	 		4   C5R4XiZN
   h   t   ] 6    l       g  e
		  g  filenamef  ice-9/quasisyntax.scm
 		 		 	 	 	 		   C5R4XiZN
   h   t   ] 6    l       g  e
		  g  filenamef  ice-9/quasisyntax.scm
 		 		 	 	 	 		   C5R4XiZV!#     h   d   ] C      \       g  dummy
		 g  test		 g  stmt			 g  stmt*			  			   CN     h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  testg  stmtg  stmt*g  ...   C5R4Xi$ZV356 h   d   ]  C \       g  dummy
		 g  test		 g  stmt			 g  stmt*			  			   CN     h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  testg  stmtg  stmt*g  ...   C5$R4Xi7Z h0      ]"  (  C4 5""       g  f
		0 g  seed		0 g  xs			0 g  xs			$ g  seed			$  g  filenamef  ice-9/boot-9.scm
														$		$	 
		0	  g  nameg  fold C    h   x   ]4L  5C   p       g  x
		 g  seed		  g  filenamef  ice-9/boot-9.scm
			#		 			   C     h      ]L  O 6       g  f
		 g  xs		  g  filenamef  ice-9/boot-9.scm
					 			  g  nameg  reverse-map CV8  h   |   ] 6t       g  clause-builder
		 g  tail		  g  filenamef  ice-9/boot-9.scm
			 			   CVZgN7h      h    {   ] (  LL CL L6s       g  tail
		   g  filenamef  ice-9/boot-9.scm
					+		,	 	 		    C  h   9   ]L L O C1       g  e
		 g  e*		  			   CiN7j        h   W   ] LL 6  O       g  filenamef  ice-9/boot-9.scm		+		<		 		
   CnV        h(   5   ]L  L    C     -       g  t-bde397a-b36
		#  		#   CN    h0   g   ]	4 5$  LL O @ 6       _       g  tail
		) g  tmp		)  g  filenamef  ice-9/boot-9.scm
	 		)   C      h   B   ] O C    :       g  test
		 g  receiver		  			   CN7       h      ]LL 6  x       g  test
		 g  receiver		  g  filenamef  ice-9/boot-9.scm		+		&		 			   CV h8   5   ]L L L    C       -       g  t-bde397a-b4c
		1  		1   CN    h0   g   ]	4 5$  LLL O @ 6     _       g  tail
		+ g  tmp		+  g  filenamef  ice-9/boot-9.scm
	 		+   C      h   Z   ] O C  R       g  	generator
		 g  guard		 g  receiver			  			   CN7       h      ]LL 6         g  	generator
		 g  guard		 g  receiver			  g  filenamef  ice-9/boot-9.scm		+		&		 			   C\V   h    5   ]L      C-       g  t-bde397a-b60
		   		    CN    h(   g   ]	4 5$  L O @ 6 _       g  tail
		' g  tmp		'  g  filenamef  ice-9/boot-9.scm
	 		'   C      h   ,   ] O C      $       g  test
		
  		
   CV h   5   ]LL L  C -       g  t-bde397a-b71
		  		   CN    h0   g   ]	4 5$  LLL O @ 6     _       g  tail
		+ g  tmp		+  g  filenamef  ice-9/boot-9.scm
	 		+   C      h   K   ] O C  C       g  test
		 g  e		 g  e*			  			   CN7j  h     ]A4 5$  L  O @4 5$   L O @4 5$  @4 5$  	 L O @4 
5$  @4 5$   L O @4 5$  @4 5$  @L  6            g  clause
	  g  tmp	  g  tmp		)  g  tmp		G  g  tmp		^  g  tmp		|  g  tmp	   g  tmp	   g  tmp	    	g  filenamef  ice-9/boot-9.scm
	 	+ 	< 	 	    CV  h   5   ] C-       g  t-bde397a-b12
		  		   CN    h@      ]4L 4LLO  5545$  @6          g  clause
		= g  clauses		= g  tmp			= g  tmp		&	=  g  filenamef  ice-9/boot-9.scm									 		=	   CN     h@      ]O Q 4 5$   O @ 6           g  
whole-expr
		< g  fold		< g  reverse-map			< g  tmp			<  g  filenamef  ice-9/boot-9.scm
	 		<   C57R4XiZ     h0      ]"  (  C4 5""       g  f
		0 g  seed		0 g  xs			0 g  xs			$ g  seed			$  g  filenamef  ice-9/boot-9.scm
														$		$	 
		0	  g  nameg  fold C    h8      ] (  D4L  >  G   "         g  xs
		6 g  a		6 g  b			6 g  a			6 g  b			6  g  filenamef  ice-9/boot-9.scm
												!		(		6	 
		6	  g  nameg  loop C   h       ]O  Q 6           g  f
		 g  a		 g  b			 g  xs			 g  loop			  g  filenamef  ice-9/boot-9.scm
			 			  g  nameg  fold2 C      h       ]4L  >  G D        g  x
		 g  ys		 g  seed			 g  y			 g  seed			  g  filenamef  ice-9/boot-9.scm
									 			   C  h      ]L  O 6             g  f
		 g  seed		 g  xs			  g  filenamef  ice-9/boot-9.scm
					 			  g  nameg  reverse-map-with-seed CV      h   |   ] 6t       g  clause-builder
		 g  tail		  g  filenamef  ice-9/boot-9.scm
			 			   CVtV  h   0   ]  C      (       g  receiver
		
  		
   CN h   n   ]LL 6  f       g  receiver
		  g  filenamef  ice-9/boot-9.scm		(		!		 		   C        h   9   ] C     1       g  e
		 g  e*		  			   CNjP 	 h     ]4 5$  >444 544L 555 4L54L5>  "  G  "    $  "  4 5$  >444 544L 555 4L54L5>  "  G  "    C      g  datum
	  g  seen	   g  filenamef  ice-9/boot-9.scm
	$	&	,	&	&		(		)	'	4	 	)	 	1	!	1	""	2	*!	1	, 	)	/$	)	6%	)	A	(	P(	0	T(	,	U(	0	Z(	>	d(	&	e	(	g	)	i)	4	j 	)	m 	1	t!	1	w"	2	!	1  	) $	) %	) 	( *	& "	 	   CPV457     h    5   ]L  L   C   -       g  t-bde397a-bf5
		  		   CN    h0   g   ]	4 5$  LL O @ 6       _       g  tail
		) g  tmp		)  g  filenamef  ice-9/boot-9.scm
-	& 		)   C      h0      ]	4L LLLO L4 55 LO D           g  datums
		, g  seen		,  g  filenamef  ice-9/boot-9.scm		#	,	$		#			,-	 		,   C:Nh h    {   ] (  L CL L6      s       g  tail
		  g  filenamef  ice-9/boot-9.scm
2	)	3	+		(	6	0		 		   C  h   E   ] LLLO L D       =       g  filenamef  ice-9/boot-9.scm	2	! 		
   C        h     ]45$  4?"  R45$  4LLO ?"  ,45$  4?"  4	
LL54 5$  L LLL O @4 5$  L LLO @	
LL6             g  test
	  g  rest	  g  tmp			s g  tmp		'	p g  tmp		J	m g  tmp		s  g  tmp		~  g  tmp	    g  filenamef  ice-9/boot-9.scm	^		b	(	d
	9	j		s	 	( 
	9 	 		 	   CNj    h0      ]
4 5$  L L O @L 6       g  clause
		0 g  seen		0 g  tmp			0  g  filenamef  ice-9/boot-9.scm
			(	(	*
	9	0	 		0	   CVD   h   5   ]L    C     -       g  t-bde397a-bbf
		  		   CN    hH      ]4L 4LL LO 5545$   O @6          g  expr
		E g  clause		E g  clauses			E g  tmp			E g  tmp		)	E  g  filenamef  ice-9/boot-9.scm						:							
 		E	   CN 	h@      ]!O Q 4 5$   O @ 6       g  
whole-expr
		@ g  fold		@ g  fold2			@ g  reverse-map-with-seed			@ g  tmp		 	@  g  filenamef  ice-9/boot-9.scm
	 		@   C5R4XiEZVIacdefhik    h   T   ] C  L       g  tmp-bde397a-c25
		 g  tmp-bde397a-c24		  			   C 
hH      ]44	5 5     C         g  dummy
		F g  var		F g  init			F g  step			F g  test			F g  expr			F g  command			F  		F	   Cnh   <   ]C   4       g  dummy
		 g  x		  			   Co       h   K   ]C   C       g  dummy
		 g  x		 g  y			  			   CN 
     hP   3  ]4 5$  @4 5$  @4 5$  @	 6+      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  ice-9/boot-9.scm
=	 		P  g  
macro-typeg  syntax-rulesg  patternsg  varg  initg  stepg  ... g  ... g  testg  exprg  ... g  commandg  ... f  stepg  x f  stepg  xg  y   C5ERpq   h      ] 6          g  filenamef  ice-9/boot-9.scm
U
	V				X			
Y			V	 		
  g  nameg  %define-values-arity-error CrR4XisZVtSuV\    h   -   ] L   C%       g  dummy
		  		   CN    h0      ]4545$   O @6       g  expr
		0 g  tmp			0 g  tmp			0  g  filenamef  ice-9/boot-9.scm	a		a	4		a			a	 		0   CN3R  h   |   ]4  56    t       g  var0
		 g  varn		 g  expr			  g  filenamef  ice-9/boot-9.scm		 			   CSuV\       h0   7   ] L    L L    C  /       g  tmp-bde397a-c85
		.  		.   C    hx   -   ] L  4LL54LL 5   44	
 O L5L       5C %       g  dummy
		w  		w   CN    h8      ]4545$   O @6           g  var0
		4 g  varn		4 g  expr			4 g  tmp				4 g  tmp			4  g  filenamef  ice-9/boot-9.scm				4						 		4	   CR h   i   ] 6a       g  var
		 g  expr		  g  filenamef  ice-9/boot-9.scm		 			   C       h   =   ]   C5       g  var
		 g  expr		  			   C3R h   |   ]4  56    t       g  var0
		 g  varn		 g  expr			  g  filenamef  ice-9/boot-9.scm	o	 			   CSuV\       h0   7   ] L    L L    C  /       g  tmp-bde397a-c64
		.  		.   C    h   -   ] L  4LL 54LL 5   44	
 O L5L       5C      %       g  dummy
		z  		z   CN    h8      ]4545$   O @6           g  var0
		4 g  varn		4 g  expr			4 g  tmp				4 g  tmp			4  g  filenamef  ice-9/boot-9.scm	q		q	4		q			q	 		4	   CR h   i   ] 6a       g  var
		 g  expr		  g  filenamef  ice-9/boot-9.scm	h	 			   C       h   =   ]   C5       g  var
		 g  expr		  			   C        h      ])4 5$  @4 5"  4 5"  e4 5"  74 5"  		 6$  4
?$  @""$  4?$  @""$  4?$  @""|$  4?$  @"R"N             g  	orig-form
	  g  tmp	  g  tmp		"  g  tmp		1  g  tmp		@  g  tmp		O	}  g  filenamef  ice-9/boot-9.scm
]	 	    C5sR4XiZVs   h   >   ]  C6       g  dummy
		 g  exp		  			   CN   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  exp   C5R4XiZVOQ    h    r   ]4L 4L 55   C      j       g  tmp
		  g  filenamef  ice-9/boot-9.scm				)				 		
   CN       h(   d   ]	4 5$   O @ 6 \       g  x
		' g  tmp		'  g  filenamef  ice-9/boot-9.scm
	 		'   C5R4XiZQ  h   q   ] 44L 556    i       g  filenamef  ice-9/boot-9.scm
					"		4				 		
   C     h   Y   -  1  3 C     Q       g  args
			  g  filenamef  ice-9/boot-9.scm
	 			


   C    h     ] O 6      g  x
		  g  filenamef  ice-9/boot-9.scm
			 		  g  documentationf  A macro that expands to the current filename: the filename that
the (current-filename) form appears in.  Expands to #f if this
information is unavailable. C5R4XiZV&')+,  h(   O   ]    C       G       g  dummy
		! g  sym		! g  val			!  		!	   CN  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  symg  val   C5R-./012        hh    )   3 "  |$  Y$  6&   64 5"4 5"(  6 6"r)  3 	"  $  $  $  [&   6&   64 5"4 5"h$  "   6(  )(  6$  "   6 6"- 1 3 45"  C(  "  A45$  	"4 >  "  G  "  ""  6(  64	
54 4	5?""           g  f
		  g  l		  g  hare		  g  tortoise		  g  move?		  g  out		  g  f
  g  l1  g  l2	  g  h1	  g  h2	  g  t1	  g  t2	  g  move?	  g  out	  g  f
c g  l1c g  rest	c g  len	 g  rest	 g  l1	T g  rest	T g  out	T  g  filenamef  ice-9/boot-9.scm
										"		&		(	.	*	4	/		2		5		8	$	:		?	 	A		D		P		S		W		\		^		a		m		s		y		}			* 	0 	 	 	 	6 	 	 	 		 	 	 		 	 	& 	, 	 	 		 	 	& 	, 	 	 	 	 	# 	, 	 		#					#	(	+	#-	0	@	D	F	&I	M	O	U	Z	]	c	i		o		s	u	$x	|	~							$						@																	,	2	"				$	*	-	.	7	<	 =	)G	J	T	T	Y	)c	 		 	  	 c	
	  g  nameg  map CRi3R4.0521     h  ]  )   3 "  $  j4 >  "  G  $  I&   4 >  "  G  "   4 >  "  G  "C(  C 6"k)  "3 " "  T(  (  "  "  $  "  $  C$   6 6$  $  $  a&   6&   64 >  "  G  "34 >  "  G  """ "- 1 3 45"  C(  "  A45$  	"4 >  "  G  "  ""  ;$  24	 4
5>  "  G  4
5"C"       U      g  f
		  g  l		  g  hare		  g  tortoise		  g  hare		*	~ g  f
  g  l1  g  l2	  g  h1	  g  h2	  g  t1	  g  t2	  g  move?	  g  f
y g  l1y g  rest	y g  len	. g  rest	# g  l1	2m g  rest	2m  g  filenamef  ice-9/boot-9.scm
																	*
		*
		/		3		;		<		@	"	B	2	D	=	I	"	O		\		a		f		q	 	t	+	|	 	 	 	* 	5 	 	 	 	 	 (		 )	 )	 )	 *	 *	 *	 	 -		 	 .	 .	$ .	/ /	 .		 1	 1	$ 1	/2	1			
							'	)	&+	10 	3	;		?"	A"	&C"	1H#	K"	L%	Q%	T%	Y%	d&	g&	j&	(m&	1|&	}									5	5	6	7		8	8	8	8	8	9	9	:	:		:	,:	7;	";	:	#6	2=	5>	9>	:@	A@	B@	O@	ZA	[A	!kA	m=	 w		 	  	 y	
	  g  nameg  for-each CR<=>?8:  hP     - /   0   3 #  #  #   $  "  6            g  file
		J g  binary		J g  encoding			J g  guess-encoding			J  g  filenamef  ice-9/boot-9.scm
J
	8O		:O		@O	"	JO	 		J
g  binarySg  encodingS	g  guess-encodingS	   g  nameg  open-input-fileg  documentationf  Takes a string naming an existing file and returns an input port
capable of delivering characters from the file.  If the file
cannot be opened, an error is signalled. C@RA=BC8 h@      - /   0   3 #  #   $  "  6         g  file
		= g  binary		= g  encoding			=  g  filenamef  ice-9/boot-9.scm
S
	/X		1X		7X	"	=X	 		=
g  binarySg  encodingS	   g  nameg  open-output-fileg  documentationf Takes a string naming an output file to be created and returns an
output port capable of writing characters to a new file by that
name.  If the file cannot be opened, an error is signalled.  If a
file with the given name already exists, the effect is unspecified. CDRH@68:I      hp     - /   0   3 #  #  #  4 54>  G4>  "  G  E             g  file
		i g  proc		i g  binary			i g  encoding			i g  guess-encoding			i g  p		A	i g  vals		N	i  g  filenamef  ice-9/boot-9.scm
[
	/g		Ag		Dl		Qk		Tn		io	 		i	
g  binaryS	g  encodingS	g  guess-encodingS	   g  nameg  call-with-input-fileg  documentationf FPROC should be a procedure of one argument, and FILE should be a
string naming a file.  The file must
already exist. These procedures call PROC
with one argument: the port obtained by opening the named file for
input or output.  If the file cannot be opened, an error is
signalled.  If the procedure returns, then the port is closed
automatically and the values yielded by the procedure are returned.
If the procedure does not return, then the port will not be closed
automatically unless it is possible to prove that the port will
never again be used for a read or write operation. CJRKD68L     h`     - /   0   3 #  #  4 54>  G4>  "  G  E          g  file
		\ g  proc		\ g  binary			\ g  encoding			\ g  p		4	\ g  vals		A	\  g  filenamef  ice-9/boot-9.scm
q
	&|		4|		7~		D}		G		\	 		\	
g  binaryS	g  encodingS	   g  nameg  call-with-output-fileg  documentationf bPROC should be a procedure of one argument, and FILE should be a
string naming a file.  The behaviour is unspecified if the file
already exists. These procedures call PROC
with one argument: the port obtained by opening the named file for
input or output.  If the file cannot be opened, an error is
signalled.  If the procedure returns, then the port is closed
automatically and the values yielded by the procedure are returned.
If the procedure does not return, then the port will not be closed
automatically unless it is possible to prove that the port will
never again be used for a read or write operation. CMRHJN       h   ]   ] L 6      U       g  p
		
  g  filenamef  ice-9/boot-9.scm
		
	 		
   C68:       hH   5  - /   0   3 #  #  #   O 6 -      g  file
		G g  thunk		G g  binary			G g  encoding			G g  guess-encoding			G  g  filenamef  ice-9/boot-9.scm

	G	 		G	
g  binaryS	g  encodingS	g  guess-encodingS	   g  nameg  with-input-from-fileg  documentationf THUNK must be a procedure of no arguments, and FILE must be a
string naming a file.  The file must already exist. The file is opened for
input, an input port connected to it is made
the default value returned by `current-input-port',
and the THUNK is called with no arguments.
When the THUNK returns, the port is closed and the previous
default is restored.  Returns the values yielded by THUNK.  If an
escape procedure is used to escape from the continuation of these
procedures, their behavior is implementation dependent. CORKM)  h   ]   ] L 6      U       g  p
		
  g  filenamef  ice-9/boot-9.scm
		
	 		
   C68  h@     - /   0   3 #  #   O 6            g  file
		: g  thunk		: g  binary			: g  encoding			:  g  filenamef  ice-9/boot-9.scm

	:	 		:	
g  binaryS	g  encodingS	   g  nameg  with-output-to-fileg  documentationf (THUNK must be a procedure of no arguments, and FILE must be a
string naming a file.  The effect is unspecified if the file already exists.
The file is opened for output, an output port connected to it is made
the default value returned by `current-output-port',
and the THUNK is called with no arguments.
When the THUNK returns, the port is closed and the previous
default is restored.  Returns the values yielded by THUNK.  If an
escape procedure is used to escape from the continuation of these
procedures, their behavior is implementation dependent. CPRKMQ        h   ]   ] L 6      U       g  p
		
  g  filenamef  ice-9/boot-9.scm
		
	 		
   C68  h@     - /   0   3 #  #   O 6            g  file
		: g  thunk		: g  binary			: g  encoding			:  g  filenamef  ice-9/boot-9.scm

	:	 		:	
g  binaryS	g  encodingS	   g  nameg  with-error-to-fileg  documentationf 'THUNK must be a procedure of no arguments, and FILE must be a
string naming a file.  The effect is unspecified if the file already exists.
The file is opened for output, an output port connected to it is made
the default value returned by `current-error-port',
and the THUNK is called with no arguments.
When the THUNK returns, the port is closed and the previous
default is restored.  Returns the values yielded by THUNK.  If an
escape procedure is used to escape from the continuation of these
procedures, their behavior is implementation dependent. CRRSRH TUVWX   hX   _  ]"4 5$  6$  "  66       W      g  frame
		Q g  port		Q g  source			Q g  t			* g  filename		4	I g  line		4	I g  col		4	I  g  filenamef  ice-9/boot-9.scm
												'	,	-		2		4	
	@		E	/	I		O		Q	
 		Q	  g  nameg  print-location C     h      ] M N C         g  key
		 g  proc		  g  filenamef  ice-9/boot-9.scm
			#		
 			  g  nameg  set-exception-printer! C O SiY       h   r   ] LLL 6  j       g  filenamef  ice-9/boot-9.scm
	
				 		
  g  nameg  default-printer CZ[\     h   M   ] L 6E       g  filenamef  ice-9/boot-9.scm
			0 		
   C h   Y   -  1  3 C     Q       g  args
			  g  filenamef  ice-9/boot-9.scm
	 			


   CY   h0      ]4M L5  $   LLLL6LLL6            g  printer
		+  g  filenamef  ice-9/boot-9.scm
										%		+	 		+
   C]       h   y   - 1 3 L 6       q       g  k
			 g  args			  g  filenamef  ice-9/boot-9.scm
					 			
   C"^       h   e  ]O  Q $  Z454L >  "  G  4 4O 5$  "  >  "  G  "   4L >  "  G  4L  O 	 O >  "  G  4
 >  "  G   6]      g  port
	  g  frame	  g  key		  g  args		  g  default-printer		  g  proc		"	q g  t		N	a  g  filenamef  ice-9/boot-9.scm
			
			"		%		9		?		@		N		f		v	
 	
 	
 	
 	 	  g  nameg  print-exception C O _i `       hP      *   ;1 3  $  4L >  "  G  "   L$  "  @-  1  3 L 6          g  subr
		A g  msg		A g  args			A g  rest			A g  _
	J	N  g  filenamef  ice-9/boot-9.scm
								 		8	%	?	.	A		J		N	 		A	
	 	J	N


   C     h      ] O @        g  port
		 g  key		 g  args			 g  default-printer			  g  filenamef  ice-9/boot-9.scm
			 			  g  nameg  scm-error-printer C 4Sia >  "  G  4Sib >  "  G  4Sicd      h      ] 6         g  port
		 g  key		 g  args			 g  default-printer			 g  message			 g  faulty			  g  filenamef  ice-9/boot-9.scm
																 			  g  nameg  keyword-error-printer C>  "  G  4Sie >  "  G  4Sif >  "  G  4Sig >  "  G  4Sih >  "  G  4Sii >  "  G  4Sij >  "  G  4Sik >  "  G  4Sil >  "  G  4Sim >  "  G  4Sin >  "  G  4Sio >  "  G  4Sip >  "  G  4Siq >  "  G  4Sip >  "  G  4Si >  "  G  4SirstTuvwWxyz{|  h    *   1 3 	4L>  "  G  $  b45$  "  44554	54L
>  "  G  "  4L>  "  G   $  4L >  "  G  "   4L>  "  G  $  L6$  
L6C-  1  3 L 6            g  who
	  g  what	  g  where		  g  form		  g  subform		  g  extra		  g  t		/	B g  file		[  g  line		[  g  col		[  g  _
   g  filenamef  ice-9/boot-9.scm
								&		'	"	-	2	/	"	/		?	=	C		F	%	L	5	N	%	R		S		Y	-	[		[		b		h	!	s	 	 	 	 	 	 	 	 	 	 	 	  	  	 	 	# 	 		 )	 	
	  


   C  h      ] O @        g  port
		 g  key		 g  args			 g  default-printer			  g  filenamef  ice-9/boot-9.scm
			 			  g  nameg  syntax-error-printer C>  "  G  4Si}~     h      ] 456             g  port
		 g  key		 g  args			 g  default-printer			  g  filenamef  ice-9/boot-9.scm
						0		>		0		 			  g  nameg  getaddrinfo-error-printer C>  "  G   4XiZV      h   Q   ]  C    I       g  macro
		 g  args		 g  body			  			   C  h   F   ]  C  >       g  macro
		 g  transformer		  			   CNP  h(      ]4455$  C45C             g  macro
		" g  doc		" g  transformer			" g  t			"  g  filenamef  ice-9/boot-9.scm	7		7		7		7		8		!8	 		"	   C h8   W   ] 	
      CO       g  macro
		8 g  doc		8 g  transformer			8  		8	   CP        h      ]456          g  macro
		 g  args		 g  doc			 g  body1			 g  body			  g  filenamef  ice-9/boot-9.scm	0		0	 			   C    h   u   ]  C m       g  macro
		 g  args		 g  doc			 g  body1			 g  body			  			   C        h      ]!4 5"  e4 5$  @4 5$  @4 5"  		 6$  4
?$  @""$  4?$  @""|          g  x
	  g  tmp	  g  tmp			v g  tmp		1	v g  tmp		H	v  g  filenamef  ice-9/boot-9.scm
,	 	   g  documentationf  Define a defmacro. C5R4XiZV        h   Q   ]  C    I       g  macro
		 g  args		 g  body			  			   CNP  h      ]456          g  macro
		 g  args		 g  doc			 g  body1			 g  body			  g  filenamef  ice-9/boot-9.scm	H		H	 			   C    h   u   ]  C m       g  macro
		 g  args		 g  doc			 g  body1			 g  body			  			   C 	       hP      ]4 5"   4 5$  @ 6$  4?$  @""       g  x
		P g  tmp		P g  tmp			1  g  filenamef  ice-9/boot-9.scm
D	 		P  g  documentationf  3Define a defmacro, with the old lispy defun syntax. C5R4.i>  "  G  4XiZV8  h   t   ]45 $  	 CC l       g  form
		 g  form*		  g  filenamef  ice-9/boot-9.scm	X		X	 			   CN     h(   d   ]	4 5$  @ 6      \       g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm
U	 		"   C5R    h   h   ] C   `       g  x
		  g  filenamef  ice-9/boot-9.scm
a
 		  g  nameg  identity CR     h   M   ] LL @E       g  filenamef  ice-9/boot-9.scm
k		k	' 		
   C        h    b   -  1  3 L 4 LO >   6<   Z       g  args
			  g  filenamef  ice-9/boot-9.scm
j		k	
 			


   C   h(   z  - 1 3 (   C4? O C   r      g  proc
			% g  rest			% g  g			%  g  filenamef  ice-9/boot-9.scm
c
	g		i		i	 			%
  g  nameg  composeg  documentationf  Compose PROC with the procedures in REST, such that the last one in
REST is applied first and PROC last, and return the resulting procedure.
The given procedures must have compatible arity. CR       h   k   -  1  3 4L  ?C      c       g  args
			  g  filenamef  ice-9/boot-9.scm
p		
q			q	 			


   C  h      ] O C             g  proc
		
  g  filenamef  ice-9/boot-9.scm
m
 		
  g  nameg  negateg  documentationf  WReturn a procedure with the same arity as PROC that returns the `not'
of PROC's result. CR   h   V   -  1  3 L C    N       g  _
			  g  filenamef  ice-9/boot-9.scm
v	 			


   C       h      ] O C             g  value
		
  g  filenamef  ice-9/boot-9.scm
s
 		
  g  nameg  constg  documentationf  JReturn a procedure that accepts any number of arguments and returns
VALUE. CR h      ] $   6C       g  value
		 g  	procedure		  g  filenamef  ice-9/boot-9.scm
y
	{		{	 			  g  nameg  and=>g  documentationf  =When VALUE is #f, return #f.  Otherwise, return (PROC VALUE). CTRiR4XiZVs       h   ?   ] C    7       g  dummy
		 g  expr		  			   C#$%()9;=@2?DFG        hH   f   ] 	
   C       ^       g  dummy
		A g  expr		A g  template			A g  arg			A  		A	   CN   h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  ice-9/boot-9.scm
	 		9  g  
macro-typeg  syntax-rulesg  patternsg  expr g  exprg  warningSg  templateg  argg  ...   C5RHIJK h   D   ] L 6<       g  filenamef  ice-9/boot-9.scm
	 		
   CL     h   D   ] L 6<       g  filenamef  ice-9/boot-9.scm
	 		
   CE       h`   q   ]L O L O 4L O >   "  G  V4L >  X4L O >   "  G  CX4L O >   "  G  Fi       g  obj
		`  g  filenamef  ice-9/boot-9.scm
				'	$	4	 		`   CK       h   D   ] L 6<       g  filenamef  ice-9/boot-9.scm
	 		
   CL     h   D   ] L 6<       g  filenamef  ice-9/boot-9.scm
	 		
   CB       hh      ]L O L O 4L O >   "  G  V4L >  X4L O >   "  G  CX4L O >   "  G  F      z       g  obj
		b g  val		b  g  filenamef  ice-9/boot-9.scm
				'	(	6	 		b	   C   h(      ]45 45   O  O 6         g  prop
		& g  lock		&  g  filenamef  ice-9/boot-9.scm

							&	 		&
  g  nameg  make-object-property CMRNO      h       ]
44 55$  CC         g  sym
		 g  prop		 g  pair			  g  filenamef  ice-9/boot-9.scm

												 			  g  nameg  symbol-property CPRNOQ    h8     ]44 55$  C 4 56             g  sym
		2 g  prop		2 g  val			2 g  pair			2  g  filenamef  ice-9/boot-9.scm

													(		)	*	0		2	 		2	  g  nameg  set-symbol-property! CRRNOQS       h0      ]
44 55$   44 556C         g  sym
		. g  prop		. g  pair			.  g  filenamef  ice-9/boot-9.scm

													"	&	*		,	 		.	  g  nameg  symbol-property-remove! CTRU    h   z   ]4 5$  
  C Cr       g  ind
		  g  filenamef  ice-9/boot-9.scm
							/		' 		   CV        h   }   ]4 56 u       g  a
		  g  filenamef  ice-9/boot-9.scm

				 		  g  nameg  array-shape CWRX        h(      ]
4 5$  $  CCC           g  args
		$ g  kw		$ g  rem			$  g  filenamef  ice-9/boot-9.scm

														 			$	  g  nameg  
kw-arg-ref CYRZ        h      ] C       w       g  s
			  g  filenamef  ice-9/boot-9.scm

				 			  g  nameg  struct-layout C[R\]   h       ]4 5$  4 56C          g  old-port
		 g  new-port		  g  filenamef  ice-9/boot-9.scm

						&		 			  g  nameg  inherit-print-state C^R4_i4`iaib5#cde   h8      ]4>  "  G  44 5>  "  G  6        g  s
		7 g  p		7  g  filenamef  ice-9/boot-9.scm
					#						#	'		3 	#	7 	 
		7	   C5 4fi g>  "  G    hRh h      ] $   CC             g  obj
		  g  filenamef  ice-9/boot-9.scm

							-		 		  g  nameg  record-type? CiR#jdklmne 	     h     ]4>  "  G  444 55>  "  G  "  l(  "  w4>  "  G  4>  "  G  4>  "  G  4 >  "  G  "44 55
"6             g  s
	  g  p	  g  fields		8  g  off		8   g  filenamef  ice-9/boot-9.scm
,		-		-		-		.		.		.		%.		,.		8/		>1		C3		G3		N3		W4		\4		c4		l5		p5		w5	 6	 6	 6	 7	 7	 7	 /	 /	 /	+ /	 /	 8	 8	 "	 	  g  nameg  default-record-printer Cho`p h   ]   ]C   U       g  f
		  g  filenamef  ice-9/boot-9.scm
=	'	=	3 		   Cqr2h   D   ] L  C<       g  filenamef  ice-9/boot-9.scm
B	 		
   C  h   T   ]L   C      L       g  a
		
  g  filenamef  ice-9/boot-9.scm
B	 		
   C  h   c   ]L   C    [       g  a
		 g  b		  g  filenamef  ice-9/boot-9.scm
B	 			   C   h   r   ]L   C  j       g  a
		 g  b		 g  c			  g  filenamef  ice-9/boot-9.scm
B	 			   C    h      ]L   Cy       g  a
		 g  b		 g  c			 g  d			  g  filenamef  ice-9/boot-9.scm
B	 			   C     h      ]L   C             g  a
		 g  b		 g  c			 g  d			 g  e			  g  filenamef  ice-9/boot-9.scm
B	 			   C      h      ]L   C           g  a
		 g  b		 g  c			 g  d			 g  e			 g  f			  g  filenamef  ice-9/boot-9.scm
B	 			   C       h      ]L   C         g  a
		 g  b		 g  c			 g  d			 g  e			 g  f			 g  g			  g  filenamef  ice-9/boot-9.scm
B	 			   Ch       , 3 L   	C           g  a
		 g  b		 g  c			 g  d			 g  e			 g  f			 g  g			 g  h			  g  filenamef  ice-9/boot-9.scm
B	 			   C h       , 	3 	L   
C         g  a
		 g  b		 g  c			 g  d			 g  e			 g  f			 g  g			 g  h			 g  i			  	g  filenamef  ice-9/boot-9.scm
B	 				   C  h       , 
3 
L  	 C       g  a
		  g  b		  g  c			  g  d			  g  e			  g  f			  g  g			  g  h			  g  i			  g  j				   
g  filenamef  ice-9/boot-9.scm
B	 		 	
   C   h(      , 3 L  	
 C             g  a
		" g  b		" g  c			" g  d			" g  e			" g  f			" g  g			" g  h			" g  i			" g  j				" g  k	
		"  g  filenamef  ice-9/boot-9.scm
B	 		"	   C    h(      , 3 L  	
 C           g  a
		$ g  b		$ g  c			$ g  d			$ g  e			$ g  f			$ g  g			$ g  h			$ g  i			$ g  j				$ g  k	
		$ g  l			$  g  filenamef  ice-9/boot-9.scm
B	 		$	   C     h(     , 3 L  	
 C         g  a
		& g  b		& g  c			& g  d			& g  e			& g  f			& g  g			& g  h			& g  i			& g  j				& g  k	
		& g  l			& g  m			&  g  filenamef  ice-9/boot-9.scm
B	 		&	   C      h(     , 3 L  	
 C      g  a
		( g  b		( g  c			( g  d			( g  e			( g  f			( g  g			( g  h			( g  i			( g  j				( g  k	
		( g  l			( g  m			( g  n			(  g  filenamef  ice-9/boot-9.scm
B	 		(	   C       h0   &  , 3 L  	
 C            g  a
		* g  b		* g  c			* g  d			* g  e			* g  f			* g  g			* g  h			* g  i			* g  j				* g  k	
		* g  l			* g  m			* g  n			* g  o			*  g  filenamef  ice-9/boot-9.scm
B	 		*	   Ch0   5  , 3 L  	
 C    -      g  a
		, g  b		, g  c			, g  d			, g  e			, g  f			, g  g			, g  h			, g  i			, g  j				, g  k	
		, g  l			, g  m			, g  n			, g  o			, g  p			,  g  filenamef  ice-9/boot-9.scm
B	 		,	   C h0   D  , 3 L  	
 C  <      g  a
		. g  b		. g  c			. g  d			. g  e			. g  f			. g  g			. g  h			. g  i			. g  j				. g  k	
		. g  l			. g  m			. g  n			. g  o			. g  p			. g  q			.  g  filenamef  ice-9/boot-9.scm
B	 		.	   C  h0   S  , 3 L  	
 CK      g  a
		0 g  b		0 g  c			0 g  d			0 g  e			0 g  f			0 g  g			0 g  h			0 g  i			0 g  j				0 g  k	
		0 g  l			0 g  m			0 g  n			0 g  o			0 g  p			0 g  q			0 g  r			0  g  filenamef  ice-9/boot-9.scm
B	 		0	   C   h8   b  , 3 L  	
 C      Z      g  a
		2 g  b		2 g  c			2 g  d			2 g  e			2 g  f			2 g  g			2 g  h			2 g  i			2 g  j				2 g  k	
		2 g  l			2 g  m			2 g  n			2 g  o			2 g  p			2 g  q			2 g  r			2 g  s			2  g  filenamef  ice-9/boot-9.scm
B	 		2	   C20pst        h8   Y   -  1  3 4 5L$  	L
 @4L 56    Q       g  args
			4  g  filenamef  ice-9/boot-9.scm
B	 			4


   Cfu !     h(    - . , 3 #  4445?5$  "   45 	4	5
$  
O " $  O " s	$  O " _	$  O " K	$  O " 7	$  O " #	$  O " 	$  O "  	$  O "  		$  O "  	
$  O "  	$  O "  	$  O "  	$  O "  	$  O "  o	$  O "  [	$  O "  G	$  O "  3	$  O "  	$  O "   O 4 $   "  4  5>  "  G  C             g  	type-name
	! g  fields	! g  printer		! g  default-record-printer		! g  rtd		H! g  n		X  g  filenamef  ice-9/boot-9.scm

	;		<		"=	"	,<		.;		4>		?@		H:		H:		QA		RB	'	XB	A	E	 E	%E	!G	%E	 	!	  g  nameg  make-record-type CvRirw        h       ]4 5$   C 6            g  obj
		  g  filenamef  ice-9/boot-9.scm
J
	K		K		L		M		M	 		  g  nameg  record-type-name CdRirw      h       ]4 5$   C 6           g  obj
		  g  filenamef  ice-9/boot-9.scm
O
	P		P		Q		Q		R		R	 		  g  nameg  record-type-fields CnRx06      h   f   ]4 L 5$   CC    ^       g  f
		  g  filenamef  ice-9/boot-9.scm
Y	&	Z	,	Z	( 		   Cnr 	hP      - . , 3 #  $  +  
4O 4 55 6 	C        g  rtd
		O g  field-names		O  g  filenamef  ice-9/boot-9.scm
T
	U		X		,Y	!	6]	&	>Y	!	?X		FW		MV		NV	 		O  g  nameg  record-constructor CyR   h   z   ] $  L  CC      r       g  obj
		  g  filenamef  ice-9/boot-9.scm
`		`			`		`	,	`	# 		   C   h   r   ] O C      j       g  rtd
		
  g  filenamef  ice-9/boot-9.scm
_
 		
  g  nameg  record-predicate CzRk{|d      h0      ]
 45$  C4 5 6         g  rtd
		. g  obj		. g  t			.  g  filenamef  ice-9/boot-9.scm
b
	c		c		c		d		d	!	e		 f		+f		.d	 		.	  g  nameg  %record-type-error C}R~n}    h    z   ] L&   L CL 6       r       g  obj
		  g  filenamef  ice-9/boot-9.scm
m		n		n		o	
	p	
 		   C   h@      ]
44 55$  "  4>  "  G   O C             g  rtd
		: g  
field-name		: g  pos			:  g  filenamef  ice-9/boot-9.scm
i
	j		j		j		j		k		l		!l		(l	 
		:	  g  nameg  record-accessor CR~n}       h       ] L&   L CL 6            g  obj
		 g  val		  g  filenamef  ice-9/boot-9.scm
v		w		w		x	
	y	
 			   C  h@      ]
44 55$  "  4>  "  G   O C             g  rtd
		: g  
field-name		: g  pos			:  g  filenamef  ice-9/boot-9.scm
r
	s		s		s		s		t		u		!u		(u	 
		:	  g  nameg  record-modifier CRi   h      ] $   6C             g  obj
		  g  filenamef  ice-9/boot-9.scm
{
	|			|		|	#	|	 		  g  nameg  record? CR      h      ] $   C 6          g  obj
		  g  filenamef  ice-9/boot-9.scm
~
											 		  g  nameg  record-type-descriptor CkR4.i>  "  G  h   x   ] C p       g  x
		  g  filenamef  ice-9/boot-9.scm

				 		  g  nameg  ->bool CRu`     h       -  1  3 44 5?6            g  args
			  g  filenamef  ice-9/boot-9.scm

				'				 			


  g  nameg  symbol-append CRu    h      -  1  3 4 ?6    {       g  args
			  g  filenamef  ice-9/boot-9.scm

				 			


  g  nameg  list->symbol CRu       h   }   -  1  3 4 ?6    u       g  args
			  g  filenamef  ice-9/boot-9.scm

				 			


  g  nameg  symbol CR     h8      ]"  "(  C&  C"
 "            g  l
		3 g  k		3 g  n			( g  l			(  g  filenamef  ice-9/boot-9.scm

												 		(		(	 
		3	  g  nameg  
list-index C~R4 i>  "  G  4/i5$  4 i>  "  G  "   4/i5$   h   h   ]4 56  `       g  str
		  g  filenamef  ice-9/boot-9.scm
					 		   C" o=    h   M   ] L 6      E       g  filenamef  ice-9/boot-9.scm
	)	
	4 		

   C h   Y   -  1  3 C     Q       g  args
			  g  filenamef  ice-9/boot-9.scm
	 			


   C h0      ]	4 O 5$  4>  "  G  CC       g  str
		0 g  port		0  g  filenamef  ice-9/boot-9.scm
											
		 		0   CR4/i5$      h      ]44 55C      {       g  str
		  g  filenamef  ice-9/boot-9.scm
									$		 		   C" o=`   h   h   ] 4L 56       `       g  filenamef  ice-9/boot-9.scm
			1		D		1		& 		
   C      h   Y   -  1  3 C     Q       g  args
			  g  filenamef  ice-9/boot-9.scm
	 			


   C h0      ]	4 O 5$  4>  "  G  CC       g  str
		0 g  port		0  g  filenamef  ice-9/boot-9.scm
											
		 		0   CRo     h      ] &  4 	5CC       g  args
		  g  filenamef  ice-9/boot-9.scm

										 		  g  nameg  system-error-errno CRe2 	      hH   (  )    3  6- 1 3 444555 6           g  message
		D g  args		D g  msg		3	D  g  filenamef  ice-9/boot-9.scm
												"	#	#	(	&	3	.	A	0	(	1		3		3		9		A	%	D	 			
 		D
  g  nameg  error CR   h   q   ] 
C i       g  obj
		  g  filenamef  ice-9/boot-9.scm

		 		  g  nameg  tm:sec CR h   q   ] C i       g  obj
		  g  filenamef  ice-9/boot-9.scm

		 		  g  nameg  tm:min CR h   r   ] 	Cj       g  obj
		  g  filenamef  ice-9/boot-9.scm

		 		  g  nameg  tm:hour CRh   r   ] 	Cj       g  obj
		  g  filenamef  ice-9/boot-9.scm

		 		  g  nameg  tm:mday CRh   q   ] 	Ci       g  obj
		  g  filenamef  ice-9/boot-9.scm

		 		  g  nameg  tm:mon CR h   r   ] 	Cj       g  obj
		  g  filenamef  ice-9/boot-9.scm

		 		  g  nameg  tm:year CRh   r   ] 	Cj       g  obj
		  g  filenamef  ice-9/boot-9.scm

		 		  g  nameg  tm:wday CRh   r   ] 	Cj       g  obj
		  g  filenamef  ice-9/boot-9.scm

		 		  g  nameg  tm:yday CRh   s   ] 	Ck       g  obj
		  g  filenamef  ice-9/boot-9.scm

		 		  g  nameg  tm:isdst CR       h   t   ] 		Cl       g  obj
		  g  filenamef  ice-9/boot-9.scm

		 		  g  nameg  	tm:gmtoff CR      h   r   ] 	
Cj       g  obj
		  g  filenamef  ice-9/boot-9.scm

		 		  g  nameg  tm:zone CRh      ] 
C      ~       g  obj
		
 g  val		
  g  filenamef  ice-9/boot-9.scm

		 		
	  g  nameg  
set-tm:sec CR    h      ] C      ~       g  obj
		
 g  val		
  g  filenamef  ice-9/boot-9.scm

		 		
	  g  nameg  
set-tm:min CR    h      ] 	C            g  obj
		 g  val		  g  filenamef  ice-9/boot-9.scm

			 			  g  nameg  set-tm:hour CR   h      ] 	C            g  obj
		 g  val		  g  filenamef  ice-9/boot-9.scm

			 			  g  nameg  set-tm:mday CR   h      ] 	C     ~       g  obj
		 g  val		  g  filenamef  ice-9/boot-9.scm

			 			  g  nameg  
set-tm:mon CR    h      ] 	C            g  obj
		 g  val		  g  filenamef  ice-9/boot-9.scm

			 			  g  nameg  set-tm:year CR   h      ] 	C            g  obj
		 g  val		  g  filenamef  ice-9/boot-9.scm

			 			  g  nameg  set-tm:wday CR   h      ] 	C            g  obj
		 g  val		  g  filenamef  ice-9/boot-9.scm

			 			  g  nameg  set-tm:yday CR   h      ] 	C            g  obj
		 g  val		  g  filenamef  ice-9/boot-9.scm

			 			  g  nameg  set-tm:isdst CR  h      ] 		C            g  obj
		 g  val		  g  filenamef  ice-9/boot-9.scm

			  			  g  nameg  set-tm:gmtoff CR h      ] 	
C            g  obj
		 g  val		  g  filenamef  ice-9/boot-9.scm

			 			  g  nameg  set-tm:zone CR   h   t   ] 
C l       g  obj
		  g  filenamef  ice-9/boot-9.scm

		 		  g  nameg  	tms:clock CR      h   t   ] C l       g  obj
		  g  filenamef  ice-9/boot-9.scm

		 		  g  nameg  	tms:utime CR      h   t   ] 	Cl       g  obj
		  g  filenamef  ice-9/boot-9.scm

		 		  g  nameg  	tms:stime CR      h   u   ] 	Cm       g  obj
		  g  filenamef  ice-9/boot-9.scm

		 		  g  nameg  
tms:cutime CR     h   u   ] 	Cm       g  obj
		  g  filenamef  ice-9/boot-9.scm

		 		  g  nameg  
tms:cstime CRiR    h       - . , 3 #   6       g  port
		  g  offset		  g  whence			   g  filenamef  ice-9/boot-9.scm

	 	 		 	  g  nameg  file-set-position CR    h`      ]4 5$  )4 >  "  G  4 >  "  G  C4 >  "  G  4 >  "  G   C       g  fd/port
		` g  fd		`  g  filenamef  ice-9/boot-9.scm

									"			7			K		 		`	  g  nameg  
move->fdes CR    h       ]	4 5
$  	 6C         g  port
		 g  revealed			  g  filenamef  ice-9/boot-9.scm

											!		 		  g  nameg  release-port-handle CR      h@     )   3 4 56]44 554>  "  G  C      g  port/fd
			 g  mode			 g  port/fd
		@ g  mode		@ g  new-fd			@ g  port		(	@  g  filenamef  ice-9/boot-9.scm
												(		(		+	 
				 		@	  g  nameg  	dup->port CR?    h       )   3  6] 6          g  port/fd
			 g  port/fd
		 g  new-fd		  g  filenamef  ice-9/boot-9.scm
		 		 				"		"	 			 			  g  nameg  dup->inport CRC   h       )   3  6] 6          g  port/fd
			 g  port/fd
		 g  new-fd		  g  filenamef  ice-9/boot-9.scm
%		'		'		%		)		)	 			 			  g  nameg  dup->outport CR     hP      )   !3 4 5$   6 4 56]4 5$   6 4 56            g  port/fd
			' g  port/fd
	)	K g  new-fd	)	K  g  filenamef  ice-9/boot-9.scm
,		
.			.		/			0		'0			),		*2			42		<3			A4		K4		 			' 	)	K	  g  nameg  dup CR        h      ] 6             g  port
		
 g  modes		
  g  filenamef  ice-9/boot-9.scm
6
	
7	 		
	  g  nameg  duplicate-port CR? hp   r  ]"  \(  !4 54>  "  G  C45$   445>  "  G  C"4 5" j      g  fdes
		o g  
rest-ports		b g  result			-  g  filenamef  ice-9/boot-9.scm
9
	:		;		<		<	&	<		<		=		.?		3?		5?		9;		:@		?@		@A	"	EA	1	GA	"	HA		M@		XB		\D		bD		b:		c:		o:	 		o  g  nameg  fdes->inport CRC    hp   s  ]"  \(  !4 54>  "  G  C45$   445>  "  G  C"4 5" k      g  fdes
		o g  
rest-ports		b g  result			-  g  filenamef  ice-9/boot-9.scm
F
	G		H		I		I	&	I		I		J		.L		3L		5L		9H		:M		?M		@N	"	EN	1	GN	"	HN		MM		XO		\Q		bQ		bG		cG		oG	 		o  g  nameg  fdes->outport CR    h(      ]4 4 5>  "  G   6             g  port
		"  g  filenamef  ice-9/boot-9.scm
S
	T		T		T		T		"U	 		"  g  nameg  
port->fdes CR`     h       ]$  4 56 6          g  name
		 g  value		  g  filenamef  ice-9/boot-9.scm
W
	X		Y		Y	"	Y		Y		Z	 			  g  nameg  setenv CR   h      ] 6       g  name
		  g  filenamef  ice-9/boot-9.scm
\
	^	 		  g  nameg  unsetenvg  documentationf  /Remove the entry for NAME from the environment. CR    h   ~   ] /6      v       g  c
		
  g  filenamef  ice-9/boot-9.scm
x		
y	 		
  g  nameg  file-name-separator? CRR     h      ] 6             g  	file-name
		
  g  filenamef  ice-9/boot-9.scm
}		~		
~	 		
  g  nameg  absolute-file-name? C2R69`   hP   %  ]
4 5
$  "  
4 5 $  45"  $  "  6         g  vicinity
		M g  file		M g  len				% g  tail		%	M  g  filenamef  ice-9/boot-9.scm

												 	)	"		%		1		2	&	=		A		C		M	 		M	  g  nameg  in-vicinity CR        h   e   ] 6   ]       g  filenamef  ice-9/boot-9.scm

		 		
  g  nameg  command-line CR h   h   ] 445 56`       g  filenamef  ice-9/boot-9.scm
			3		=		3		' 		
   C      h   Y   -  1  3 C     Q       g  args
			  g  filenamef  ice-9/boot-9.scm
	 			


   C     hX   !  ]45  $   "  45  $   "     4 54	5$  
6C       g  t
			7 g  t
	!	4 g  home
	7	W g  	init-file	B	W  g  filenamef  ice-9/boot-9.scm

													!		7		:		@	&	B		B		E		O		U	 		W
  g  nameg  load-user-init CR      h0   y   ]L L[  $   "   Y4L>   ZCZF   q       g  t
		  g  filenamef  ice-9/boot-9.scm					%		=			"		 		-
   C  h   M   ] LL @E       g  filenamef  ice-9/boot-9.scm
			$ 		
   C        h@      ]45U   4 O >   XCXFG O 6          g  tag
		= g  thunk		= g  
prompt-tag				= g  k		'	= g  args		'	=  g  filenamef  ice-9/boot-9.scm

				%									=	 		=	  g  nameg  %start-stack CR4XiZV  h   O   ]  C      G       g  dummy
		 g  tag		 g  exp			  			   CN  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  tagg  exp   C5R    h   M   ] L 6E       g  filenamef  ice-9/boot-9.scm
			 		
   C        h      ] O 6 {       g  name
		  g  filenamef  ice-9/boot-9.scm

				 		  g  nameg  load-from-path CR4Xi ZVs h    >   ]   C6       g  dummy
		  g  elt		   		 	   CN   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm

 		"  g  documentationf  >Add ELT to Guile's load path, at compile-time and at run-time.g  
macro-typeg  syntax-rulesg  patternsg  elt   C5 RR       h   ~   ]  Cv       g  v
		  g  filenamef  ice-9/boot-9.scm

		" 		  g  nameg  assert-load-verbosity C R)*#$!"^      hP      ] 4>  "  G  4>  "  G  4L >  "  G  4>   "  G  6            g  filenamef  ice-9/boot-9.scm
			
				
		
				
	'	
	9	
	L	
 		L
   C        h       ]$  45  O 6C             g  file
		  g  filenamef  ice-9/boot-9.scm

						 		  g  nameg  %load-announce C"R"i#i4i5$R4%i.$&'(     h       ][$  4545 66        g  c
		 g  port		  g  filenamef  ice-9/boot-9.scm
								*						 			   C>  "  G  #j)*lA+,e 
 h   r  ]
4>  "  G  44 5$  "  >  "  G  4>  "  G  44 5>  "  G  4>  "  G  444 5	5>  "  G  	6     j      g  mod
	  g  port	  g  t		 	3  g  filenamef  ice-9/boot-9.scm
]
	^		^		^		_		_		 _		0_	!	:_		C`		G`		N`		Wa		Za		ga		pb		tb		{b	 c	 c	 c	 c	 c	 d	 d	 	 	  g  nameg  %print-module C-Rhi.-   h   q   ] 6      i       g  obj
		
 g  port		
  g  filenamef  ice-9/boot-9.scm
		
	 		
	   C/? @R4fi@i/>  "  G  @i       h0     , 3 L  	
 C        g  obarray
		. g  uses		. g  binder			. g  eval-closure			. g  transformer			. g  name			. g  kind			. g  duplicates-handlers			. g  import-obarray			. g  	observers				. g  weak-observers	
		. g  version			. g  
submodules			. g  submodule-binder			. g  public-interface			. g  filename			. g  next-unique-id			.  g  filenamef  ice-9/boot-9.scm
	 		.	   C O  AR@iri	Ai@       h   j   ] $   CC      b       g  obj
		  g  filenamef  ice-9/boot-9.scm
	 		  g  nameg  module? CBR@i }    h   Y   ] L &   
CL  6Q       g  module
		  g  filenamef  ice-9/boot-9.scm
	 		   C O  CR@i }     h    j   ] L &   
CL  6      b       g  module
		 g  val		  g  filenamef  ice-9/boot-9.scm
	 			   C O  DR@i }    h   Y   ] L &   CL  6Q       g  module
		  g  filenamef  ice-9/boot-9.scm
	 		   C O  ER@i }     h    j   ] L &   CL  6      b       g  module
		 g  val		  g  filenamef  ice-9/boot-9.scm
	 			   C O  FR@i }    h    Y   ] L &   	CL  6       Q       g  module
		  g  filenamef  ice-9/boot-9.scm
	 		   C O  GR@i }     h    j   ] L &   	CL  6     b       g  module
		 g  val		  g  filenamef  ice-9/boot-9.scm
	 			   C O  HR@i }    h    Y   ] L &   	CL  6       Q       g  module
		  g  filenamef  ice-9/boot-9.scm
	 		   C O  IR@i }     h    j   ] L &   	CL  6     b       g  module
		 g  val		  g  filenamef  ice-9/boot-9.scm
	 			   C O  JR@i }    h    j   ] L &   	CL  6     b       g  module
		 g  val		  g  filenamef  ice-9/boot-9.scm
	 			   C O  KR@i }    h    j   ] L &   	CL  6     b       g  module
		 g  val		  g  filenamef  ice-9/boot-9.scm
	 			   C O  LR@i }    h    Y   ] L &   	CL  6       Q       g  module
		  g  filenamef  ice-9/boot-9.scm
	 		   C O  )R@i }     h    j   ] L &   	CL  6     b       g  module
		 g  val		  g  filenamef  ice-9/boot-9.scm
	 			   C O  MR@i }    h    Y   ] L &   	CL  6       Q       g  module
		  g  filenamef  ice-9/boot-9.scm
	 		   C O  NR@i }     h    j   ] L &   	CL  6     b       g  module
		 g  val		  g  filenamef  ice-9/boot-9.scm
	 			   C O  OR@i }    h    Y   ] L &   	CL  6       Q       g  module
		  g  filenamef  ice-9/boot-9.scm
	 		   C O  PR@i }     h    Y   ] L &   		CL  6       Q       g  module
		  g  filenamef  ice-9/boot-9.scm
	 		   C O  QR@i }     h    j   ] L &   		CL  6     b       g  module
		 g  val		  g  filenamef  ice-9/boot-9.scm
	 			   C O  RR@i }    h    Y   ] L &   	
CL  6       Q       g  module
		  g  filenamef  ice-9/boot-9.scm
	 		   C O  SR@i }     h    Y   ] L &   	CL  6       Q       g  module
		  g  filenamef  ice-9/boot-9.scm
	 		   C O  TR@i }     h    j   ] L &   	CL  6     b       g  module
		 g  val		  g  filenamef  ice-9/boot-9.scm
	 			   C O  UR@i }    h    Y   ] L &   	CL  6       Q       g  module
		  g  filenamef  ice-9/boot-9.scm
	 		   C O  VR@i }     h    j   ] L &   	CL  6     b       g  module
		 g  val		  g  filenamef  ice-9/boot-9.scm
	 			   C O  WR@i }    h    Y   ] L &   	CL  6       Q       g  module
		  g  filenamef  ice-9/boot-9.scm
	 		   C O  XR@i }     h    j   ] L &   	CL  6     b       g  module
		 g  val		  g  filenamef  ice-9/boot-9.scm
	 			   C O  YR@i }    h    Y   ] L &   	CL  6       Q       g  module
		  g  filenamef  ice-9/boot-9.scm
	 		   C O  ZR@i }     h    j   ] L &   	CL  6     b       g  module
		 g  val		  g  filenamef  ice-9/boot-9.scm
	 			   C O  [R@i }    h    Y   ] L &   	CL  6       Q       g  module
		  g  filenamef  ice-9/boot-9.scm
	 		   C O  \R@i }     h    j   ] L &   	CL  6     b       g  module
		 g  val		  g  filenamef  ice-9/boot-9.scm
	 			   C O  ]R@i }    h    Y   ] L &   	CL  6       Q       g  module
		  g  filenamef  ice-9/boot-9.scm
	 		   C O  ^R@i }     h    j   ] L &   	CL  6     b       g  module
		 g  val		  g  filenamef  ice-9/boot-9.scm
	 			   C O  _R`a3B8bAcdH      h     -  . , 3  #  	 #  #  4 5$  "  4 >  "  G  "  4>  "  +G  "  $$  45$  "  ""  "$  '45$  "  4>  "  G  "   	4
 54
X54	54
	5
6             g  size
	  g  uses	  g  binder		   g  filenamef  ice-9/boot-9.scm

		1	)		3		8		<		C		P 		T 		[ 		g		j		n		o		{	 	 	 	 	 	 	 	 	 		 
	 	 	 	 
	  g  nameg  make-module CeRRQ   h(      ]4 4 5>  "  G   C           g  module
		$ g  proc		$  g  filenamef  ice-9/boot-9.scm

			
	+		 			#	 		$	  g  nameg  module-observe CfRBS h(      - . , 3 #  4 56          g  module
		% g  observer-id		% g  proc			%  g  filenamef  ice-9/boot-9.scm

	!		%!	 		%	  g  nameg  module-observe-weak CgRhSRiQ h`     ]  45$  445>  "  G  "   44455>  "  G  C          g  token
		\ g  module		Z g  id			Z  g  filenamef  ice-9/boot-9.scm
#
	$		%		$		&		&		'		'		('		5(		:(	&	?(	1	G(	&	L(	 		\  g  nameg  module-unobserve CjRkR4Iil5mR4ci5 nRkonp        h      ]$  	 6 6        g  m
		  g  filenamef  ice-9/boot-9.scm
/
	0		1		2	 		  g  nameg  module-modified CqRKmk    h    V   ] 4>  "  G   C       N       g  filenamef  ice-9/boot-9.scm
9		:		;	 		
   Ckrp    h   p   ] 6h       g  m
		 g  dummy		  g  filenamef  ice-9/boot-9.scm
?		@	 			   CnsLm h8   h   ]  4>  "  G  4>  "  G  6       `       g  filenamef  ice-9/boot-9.scm
=		>		?		B		1C	 		1
   CKmk   h    V   ] 4>  "  G   C       N       g  filenamef  ice-9/boot-9.scm
9		:		;	 		
   Ckrp    h   p   ] 6h       g  m
		 g  dummy		  g  filenamef  ice-9/boot-9.scm
?		@	 			   CnsLm h8   h   ]  4>  "  G  4>  "  G  6       `       g  filenamef  ice-9/boot-9.scm
=		>		?		B		1C	 		1
   Ckrp  h   p   ] 6h       g  m
		 g  dummy		  g  filenamef  ice-9/boot-9.scm
?		@	 			   CnsLm h8   h   ]  4>  "  G  4>  "  G  6       `       g  filenamef  ice-9/boot-9.scm
=		>		?		B		1C	 		1
   C     hH      ]4>   "  G  V4 >   X4>   "  G  CX4>   "  G  F            g  thunk
		C  g  filenamef  ice-9/boot-9.scm
7
	8	 		C  g  nameg  call-with-deferred-observers CtR      h   `   ] L 6X       g  proc
		  g  filenamef  ice-9/boot-9.scm
F		F	 		   CQrh   p   ]L 6h       g  id
		 g  proc		  g  filenamef  ice-9/boot-9.scm
K		K	# 			   CS  h8      ]4 O 4 5>  "  G   O 4 56             g  m
		2  g  filenamef  ice-9/boot-9.scm
E
	F		F	%	F		*K	-	2K	 		2  g  nameg  module-call-observers CpRuE        hP   0  ]"  )$   4 5$  C"C4 5$  C45"(      g  fn
		P g  m		P g  v			P g  pos			/ g  t			- g  t		8	P  g  filenamef  ice-9/boot-9.scm
f
	g			h			h		i		i		i		i			'j		-j		0k		8k		Dl		Pl	 		P	  g  nameg  module-search CuRv     h       ]
4 5$  CC              g  m
		 g  v		 g  var			  g  filenamef  ice-9/boot-9.scm
y
	z		z		{		|		 			  g  nameg  module-locally-bound? C(RH     h       ]
4 5$  CC              g  m
		 g  v		 g  var			  g  filenamef  ice-9/boot-9.scm

									 			  g  nameg  module-bound? CwRxy h      ]$  "   6        g  ob
		 g  key		  g  filenamef  ice-9/boot-9.scm

							 			  g  nameg  module-obarray-get-handle CzRE{     h      ]$  "   6        g  ob
		 g  key		  g  filenamef  ice-9/boot-9.scm

							 			  g  nameg  module-obarray-ref C|RBo    h       ]$  "   6              g  ob
		 g  key		 g  val			  g  filenamef  ice-9/boot-9.scm

							 			  g  nameg  module-obarray-set! C}R~h h      ]$  "   6        g  ob
		 g  key		  g  filenamef  ice-9/boot-9.scm

							 			  g  nameg  module-obarray-remove! CRzC       h      ]44 55C            g  m
		 g  v		  g  filenamef  ice-9/boot-9.scm

				'						 			  g  nameg  module-symbol-locally-interned? CRu       h      ] 6           g  m
		 g  v		  g  filenamef  ice-9/boot-9.scm

		 			  g  nameg  module-symbol-interned? CRv hH     - 1 3 4 5"  (  6C$  $  C""           g  m
			C g  v			C g  opt-val				C g  var			C  g  filenamef  ice-9/boot-9.scm

	
						"		&		)		*		3		7		:	 			C	
	  g  nameg  module-symbol-local-binding CRH    hH     - 1 3 4 5"  (  6C$  $  C""            g  m
			C g  v			C g  opt-val				C g  var			C  g  filenamef  ice-9/boot-9.scm

	
						"		&		)		*		3		7		:	 			C	
	  g  nameg  module-symbol-binding CR|CqD        hh     ]
44 5545$  4 >  "  G  "  $  C45 4 >  "  G  C          g  m
		d g  v		d g  b			9 g  t		9	d g  	local-var		I	d  g  filenamef  ice-9/boot-9.scm

				#						 			 					9		E			I			L			 		d	  g  nameg  module-make-local-var! CRvD   h8      ]
4 5$  C45 4 >  "  G  C         g  module
		6 g  symbol		6 g  t			6 g  var			6  g  filenamef  ice-9/boot-9.scm
	
															 		6	  g  nameg  module-ensure-local-variable! CR}Cq hh   	  ]45$  "  4>  "  G  $  "  4>  "  G  44 5>  "  G   6         g  m
		e g  v		e g  var			e  g  filenamef  ice-9/boot-9.scm
	
																(			,			1	 		5	 		<	 		E	!		H	!		W	!		e	"	 		e	  g  nameg  module-add! CDRCq       h(      ]44 5>  "  G   6              g  m
		! g  v		!  g  filenamef  ice-9/boot-9.scm
	(
		)			)			)		!	*	 		!	  g  nameg  module-remove! CRsCq      h       ]44 5>  "  G   6        g  m
		  g  filenamef  ice-9/boot-9.scm
	,
		-			-			-			.	 		  g  nameg  module-clear! CRrC h      ] 456        g  proc
		 g  module		  g  filenamef  ice-9/boot-9.scm
	4
		5			5	 			  g  nameg  module-for-each CRC  h      ] 456        g  proc
		 g  module		  g  filenamef  ice-9/boot-9.scm
	7
		8			8	 			  g  nameg  
module-map CREVX     h8      ]
44 55$  C4 5$  4 5 6C          g  module
		5 g  name		5 g  t			5  g  filenamef  ice-9/boot-9.scm
	@
		A			A			A			A			B		&	B		'	C		3	C	 
		5	  g  nameg  module-ref-submodule CRBV h      ]4 56              g  module
		 g  name		 g  	submodule			  g  filenamef  ice-9/boot-9.scm
	E
		F			F	 			  g  nameg  module-define-submodule! CREVXvB,* 	 h     ]
44 55$  C4 5$  44 5 5"  $  C4 5$  1$  (45$  4 >  "  G  CCCC      g  module
	  g  name	  g  t		  g  t		9  g  var		M   g  filenamef  ice-9/boot-9.scm
	P		Q			Q			Q			Q			R		&	R		'	S		(	S		4	S		9	Q		E	T		M	T		U	U			X	U		\	U			]	U	(	b	U	1	d	U	(	h	U			i	W		m	W		q	W	&	v	W	 	X	 	 	  g  nameg  module-ref-submodule CRvB,GBV 	 h   o  ]4 5$  W$  "  	45$  4 >  "  G  "  4 >  "  G  "  4 >  "  G  4 56      g      g  module
	  g  name	  g  	submodule		  g  var		  g  t			0  g  filenamef  ice-9/boot-9.scm
	Z		[			[			\			]			]			]		%	^		*	^	 	,	^		-	^		4	\			5	_			9	_		=	_	(	D	_			Q	`		 	a	 	a	 	 	  g  nameg  module-define-submodule! CR h    h   ] 45 N4M >  "  G  N C`       g  filenamef  ice-9/boot-9.scm
	k			l	'			l		
	m			n	 		 
   C       h    h   ] 45 N4M >  "  G  N C`       g  filenamef  ice-9/boot-9.scm
	p			q	'			q		
	r			s	 		 
   C       h    h   ] 45 N4M >  "  G  N C`       g  filenamef  ice-9/boot-9.scm
	k			l	'			l		
	m			n	 		 
   C       h    h   ] 45 N4M >  "  G  N C`       g  filenamef  ice-9/boot-9.scm
	p			q	'			q		
	r			s	 		 
   C       h    h   ] 45 N4M >  "  G  N C`       g  filenamef  ice-9/boot-9.scm
	p			q	'			q		
	r			s	 		 
   C     hp      ]45 HHO O 4O >   "  G  V4 >   X4O >   "  G  CX4O >   "  G  F       g  thunk
		p g  inner-module		p g  outer-module			p  g  filenamef  ice-9/boot-9.scm
	h
		i			i			k	 		p  g  nameg  save-module-excursion CRH       hH     - 1 3 4 5"  (   6C$  $  C""       g  module
			G g  name			G g  rest				G g  variable			G  g  filenamef  ice-9/boot-9.scm
	~
	
									"			&		,	*			-			.			7			;			>		 			G	
	  g  nameg  
module-ref CJRH        h(      ]4 5$  C 6         g  module
		& g  name		& g  value			& g  variable			&  g  filenamef  ice-9/boot-9.scm
	
																"		(	&		 			&	  g  nameg  module-set! CRvqFD    h8     ]4 5$   645 6             g  module
		1 g  name		1 g  value			1 g  variable			1 g  variable		%	1  g  filenamef  ice-9/boot-9.scm
	
												
			
				%			1		
 
		1	  g  nameg  module-define! CGRH   h       ]
4 5$  CC              g  module
		 g  name		 g  variable			  g  filenamef  ice-9/boot-9.scm
	
												 			  g  nameg  module-defined? CREFsPq     hh     ] &  "  44 55$  C4 44 5 5>  "  G  44 5>  "  G   6           g  module
		c g  	interface		c  g  filenamef  ice-9/boot-9.scm
	
	
															!			$			)		!	,		)	7		)	9		!	>			G			J			U			c		 		c	  g  nameg  module-use! CREFsPq 	  h     ]*4 5"  U(  45"  O45$  "  	45$  "  ""4 45>  "  G  44 5>  "  G   6             g  module
	  g  
interfaces	  g  cur			  g  in			d g  out			d g  iface		&	\ g  t		1	J g  new		o   g  filenamef  ice-9/boot-9.scm
	
																	#			&		%	&			)		"	1			?		3	N			Y			d			d			g		,	o			o			r			w		 		 		 		 		 		 	 	  g  nameg  module-use-interfaces! CRJ        hX   D  ]"(   C"  4(  	645$  "C "   <      g  root
		U g  names		U g  cur			C g  head			C g  tail			C g  cur		'	C  g  filenamef  ice-9/boot-9.scm
	
													
 		'
 		/
		4
		7
	(	A
		C			H			K			U		 		U	  g  nameg  
nested-ref CR hX   _  ]#"  ;(  
645$  "6 "     W      g  root
		S g  names		S g  val			S g  cur			A g  head			A g  tail			A g  cur			A  g  filenamef  ice-9/boot-9.scm


	
		
		
			

		

		'
	
	,
		/
	#	9
		=
		A
		A
		F
		I
		S
	 		S	  g  nameg  nested-set! CRG       hX   b  ]#"  ;(  
645$  "6 "     Z      g  root
		S g  names		S g  val			S g  cur			A g  head			A g  tail			A g  cur			A  g  filenamef  ice-9/boot-9.scm


	
		
		
		
		
		'
	
	,
		/
	#	9
		=
		A
		A
		F
		I
		S
	 		S	  g  nameg  nested-define! CR   hX   Q  ]""  9(  645$  "6 "       I      g  root
		Q g  names		Q g  cur			? g  head			? g  tail			? g  cur			?  g  filenamef  ice-9/boot-9.scm


	
		
		
		
 		
 		%
!	
	*
#		-
#	#	7
#		;
"		?
"		?
		D
		G
		Q
	 		Q	  g  nameg  nested-remove! CR    h@     ]"  *(  C45$  "C "          g  root
		< g  names		< g  cur			0 g  names			0 g  cur			0  g  filenamef  ice-9/boot-9.scm

&
	
'		
)		
+		
+	-	
+		
+		!
,	
	&
-		.
-		0
'	 		<	  g  nameg  nested-ref-module CReMLA       h     ]#(  
 6"  (  
645$  "  [4	54>  "  G  44	4
5 5>  "  G  4>  "  G  "g "U       
      g  root
	  g  names	  g  module		  g  cur		  g  head		  g  tail		  g  t		/  g  m		D  g  cur	    	g  filenamef  ice-9/boot-9.scm

/
	
0		
1		
1		
2		
5		&
6		'
7		/
7		>
8	$	D
8		G
9		M
9	1	R
9		[
:		`
:	1	c
:	9	n
;	9	p
:	1	u
:		~
<	 
7	 
>	 
>	# 
>	 
2	 
3	 
4	 
2	 	 	  g  nameg  nested-define-module! CR h      ]45  6   w       g  names
		  g  filenamef  ice-9/boot-9.scm

A
	
B		
B	 		  g  nameg  	local-ref CR    h      ]45  6        g  names
		 g  val		  g  filenamef  ice-9/boot-9.scm

D
	
E		
E	 			  g  nameg  
local-set! CR  h      ]45  6        g  names
		 g  val		  g  filenamef  ice-9/boot-9.scm

G
	
H		
H	 			  g  nameg  local-define CR        h      ]45  6   z       g  names
		  g  filenamef  ice-9/boot-9.scm

J
	
K		
K	 		  g  nameg  local-remove CR h      ]45  6   ~       g  names
		  g  filenamef  ice-9/boot-9.scm

M
	
N		
N	 		  g  nameg  local-ref-module CR     h      ]45  6        g  names
		 g  mod		  g  filenamef  ice-9/boot-9.scm

P
	
Q		
Q	 			  g  nameg  local-define-module CR4ei
5 4Di 4Ci5 >  "  G  4Li @>  "  G  4_i 4Ki5>  "  G    R4ei
5 4Di 4Ci5 >  "  G  4Li @>  "  G  4Mi >  "  G  4[i  >  "  G    R4[iii>  "  G  @     h       - 1 3  $  C 6          g  name
			 g  args			  g  filenamef  ice-9/boot-9.scm


	
		
		
		
		
	 			
  g  nameg  resolve-module CMR^_  h(      ]	4 54 >  "  G  C            g  m
		# g  i			#  g  filenamef  ice-9/boot-9.scm


	
			
		
		
	"	
	 		#  g  nameg  module-generate-unique-id! CKRRRRR4ii>  "  G  4i@i45 LM    hX      ]	4L  5$  C45  4 >  "  G  445 >  "  G  L  6            g  mod
		S g  t			S g  name		S  g  filenamef  ice-9/boot-9.scm

		
	
		
		
		
		
	
	
		3
		6
	#	9
	3	<
	#	E
		S
	 		S   C O  ARu`A+K   hp     -  . , 3  #   #  45 $  @4 44554		54
54		556 6       g  id
		o g  m		o g  number		@	N g  number		W	e  g  filenamef  ice-9/boot-9.scm


	
	'	
	1	)
		,
		2
		3
	 	6
	&	@
	 	@
		C
		P
		Q
	 	W
		Z
		g
		i
		o
	 		o
	  g  nameg  module-gensymg  documentationf  Return a fresh symbol in the context of module M, based on ID (a
string or symbol).  As long as M is a valid module, this procedure is
deterministic. CLReMLA 	hp     ]
4 5$  C4	54>  "  G  444 55>  "  G  4 >  "  G  C          g  module
		l g  name		l g  t			l g  m			l  g  filenamef  ice-9/boot-9.scm


	
		
		
		
		 
		&
		+
		4
		9
		<
	$	F
		K
		T
	 		l	  g  nameg  make-modules-in CRZeLAUTM[E       h     ]4 5$  	 "  $  j4	544 5>  "  G  44 5>  "  G  4>  "  G  4	 >  "  G  "   4
4 55$  "   $   6C       g  module
	  g  	interface		  g  	interface		&   g  filenamef  ice-9/boot-9.scm


	
			
		
		
		
		
		 
		&
		)
	
	.
	&	9
	
	B
	
	G
	)	R
	
	[
	
	a
	&	f
	
	o
	
 
	 
	% 
	 
	 
	 
	 
	 
	 	   g  nameg  beautify-user-module! CR   h   r   ]L L 6      j       g  v
		
  g  filenamef  ice-9/boot-9.scm

		

	" 		
  g  nameg  matches? CUY344  h     ]O L Q 4 5$   C $  p $   C$   C$  	 6$  	 6	$   4L 5C
 6
 6            g  v-ref
	  g  t	  g  matches?		  g  key		-  g  v	    g  filenamef  ice-9/boot-9.scm

		
		
	
	
		"
		&
	
	*
		-
		-
	
	=
		?
		I
	
	N
		P
		Z
	
	a
	%	c
		l
	
	s
	$	u
		~
	
 
	" 
	 
	" 
	 
	 
	 
	 
	 	 	  g  nameg  sub-version-matches? C        h   r   ] L 6      j       g  v
		
  g  filenamef  ice-9/boot-9.scm

		

	 		
  g  nameg  matches? CY344 	    h     ]"  <O Q (  C(  C45$  "CO Q  (  C $  	 6$  	 6$   45C "]             g  version-ref
	  g  target	  g  v-refs			B g  t			B g  sub-version-matches?			B g  matches?		J  g  key		Z  g  v	    g  filenamef  ice-9/boot-9.scm


	
		
		
		!
		$
		)
	#	,
	0	.
		2
		5
	"	8
	/	@
		J
		U
		V
		Z
		Z
		l
	#	n
		w
		~
	" 
	 
	 
	  
	 
	 
	 
	 	 	  g  nameg  version-matches? CRe       h       ]45  4 >  "  G   C         g  m
		  g  filenamef  ice-9/boot-9.scm


	
		
		

	 		
  g  nameg  make-fresh-user-module CR4ei5  4Li >  "  G  4i ?i>  "  G  MZT    h     - /   0   3 #  #  #  4L  5"  >$  4 >  "  G   6$  C$  L  6C$  Q$  45"  $  7$  .44	55$  "  4
 >  "  G  "   C"k"g        g  name
	  g  autoload	  g  version		  g  ensure		  g  already		7   g  filenamef  ice-9/boot-9.scm

		/
		7
		C
		D	
	b		
	h	
	q		y		{
	  	  	"  	 
	
 	
 	 	2 	 	 	 	 	 	 	g  ensureS	    C O  MR        h      ] 6             g  name
		
 g  version		
  g  filenamef  ice-9/boot-9.scm

	
	 		
	  g  nameg  try-load-module CR\  h0   h   ] 445 >  "  G  4L>  "  G  L C    `       g  filenamef  ice-9/boot-9.scm
										 		,
   C        h(     ]	4 5$   O 6 6         g  m
		& g  f			&  g  filenamef  ice-9/boot-9.scm

										" 		& 	 		&  g  nameg  reload-moduleg  documentationf  <Revisit the source file corresponding to the module @var{m}. CRE&F       h8   Q  ]	4 5$  #45&   44556CC I      g  module
		7 g  use-list			7  g  filenamef  ice-9/boot-9.scm
"
	$			$		%		%		&		&		 %		%'	!	('	/	/'	*	1'	!	3'	 		7  g  nameg  purify-module!g  documentationf  GRemoves bindings in MODULE which are inherited from the (guile) module. CRMZ       h   g   ] C   _       g  sym
		 g  var		  g  filenamef  ice-9/boot-9.scm
Y	0 			   CeMLv5SD      h     ] $   "    $   "   4L5$  "  +4L 5$  "  44L554M5$  4M5NCL4L56        g  bspec
	  g  orig	  g  seen		$  g  t		/	k g  t		F	h g  var		k   g  filenamef  ice-9/boot-9.scm
`		a	&		b	#	b	5	a		a	&	c	#	$c	5	$a		'd	&	/d	"	>e	&	Fd	"	Uf	&	Xh	'	]i	+	ch	'	ef	&	ka		nk		zk		{l	' l	 n	) m	 	    Cv5        h(      ]4L 5$  C4 L 56              g  binding
		!  g  filenamef  ice-9/boot-9.scm
r		s		s		u		v		u		!t	 		!   C     hH  x  - /   0   3 
H#  #  K#  #  $  45"  #  4 5$  45"  $  "  4 >  "  G  $  "  J(  	"  $  C$  "  	4	
54	5	4	>  "  G  4	 >  "  G  4 	O >  "  G  4 O J>  "  G  	C     p      g  name
	C g  select	C g  hide		C g  prefix		C g  renamer		C g  version		C g  module		dC g  public-i		xC g  	selection	 C g  custom-i		 C  
g  filenamef  ice-9/boot-9.scm
K
	(M	"	?O	%	@P	)	XS		dS		lT		mT		xS	 U	 V	 V	 V	 W	 W	' W	 Y	 Y	$ [	 Y	 \	
 \	% \	
 ]	
`	
&r	
 	C
g  selectSg  hideS	g  prefixS	g  renamerS	g  versionS	   g  nameg  resolve-interface CR    h   b   ]L  6      Z       g  symbol
		
  g  filenamef  ice-9/boot-9.scm
|		
}	 		
   C   h   w   ] O C      o       g  prefix
		
  g  filenamef  ice-9/boot-9.scm
{
 		
  g  nameg  symbol-prefix-proc CR       h0      ](  C$  4 5$    "CC         g  pred
		. g  l		.  g  filenamef  ice-9/boot-9.scm
																			"	4	*	& 		.	  g  nameg  list-of C  h(      ] $  C $   $   CCC            g  x
		#  g  filenamef  ice-9/boot-9.scm
							
							,		#				>		5 		#  g  nameg  valid-export? C/      h`   q  ]"  L(  6$  1$  4?"  	45"6 "   i      g  imports
		] g  imports		R g  out			R g  import-spec			?  g  filenamef  ice-9/boot-9.scm
															"			$	
	(		)	
	4	
	8		<	
	B		J		N		R		R		U	$	]	 		]  g  nameg  resolve-imports CM]UZtO      h(    ]L$  4LL>  "  G  "   4LLL5$  #L$  4LL>  "  G  "   "  4>  "  G  4LLL5$  #L$  4LL>  "  G  "   "  4>  "  G  4LLL5$  #L$  4LL>  "  G  "   "  4>  "  G  L(  "  4	
LL>  "  G  L $  4L 5 L 6C             g  handlers
  g  filenamef  ice-9/boot-9.scm
								
		"		.			1		5		6		R		V		[		d		p			s		w		x	 	 	 	 	 		 	 	 	 	 	 	 		 	
						 $	!
   C&KJ     h   T  - /   0   3 #  #  #  #  #  #  #  #  	#  	
#  
O Q 4 54>  "  G  $  4>  "  G  "   $  4>  "  G  "   $  T4	5$  "  4
>  "  G  4>  "  G  445>  "  G  "   454	O 	>  "  G  
$  x"  4

>  "  _G  "  X
$  M4
5$  84
54
5445>  "  G  "  ""  ""   4>  "  G  C      L      g  name
	 g  filename	 g  pure		 g  version		 g  
duplicates		 g  imports		 g  exports		 g  replacements		 g  
re-exports		 g  	autoloads			 g  transformer	
	 g  list-of		} g  valid-export?		} g  resolve-imports		} g  module	  g  imports	9e g  iface	 g  sym	  g  filenamef  ice-9/boot-9.scm

	5	3	>		G	"	P	5	Y		b	' 	 	 	 	 	 	 	 	 	 	
 	 	 		
	
	&	
3	9	<	k	p	t	{					%							.		 -	
g  filenameSg  pureS	g  versionS	g  
duplicatesS	g  importsS	g  exportsS	g  replacementsS	g  
re-exportsS	g  	autoloadsS		g  transformerS	
   g  nameg  define-module* CR4i5RZMEv hh     ]4LL5$  W44L 55  $  "  4L >  "  G  4L4L55$  	 "    L6C      g  i
		f g  autoload	I	^  g  filenamef  ice-9/boot-9.scm
									5					#		(		,	 	3		<	%	A	-	I	%	I		N		R		W		f	 		h
   C.*5    h    T   ]4 5$  C45  6    L       g  s
		  g  filenamef  ice-9/boot-9.scm
	 		   C:<_  h(   i   ]4 LL>  "  G   L L6   a       g  port
		%  g  filenamef  ice-9/boot-9.scm
						 		%   C    h8   i   - 1 3 444 L LO 5
5>  "  G  C  a       g  key
			6 g  args			6  g  filenamef  ice-9/boot-9.scm
	 			6
   C    h       ]L  LLO L O 6        g  a
		 g  sym		 g  definep			  g  filenamef  ice-9/boot-9.scm
			 			  g  nameg  b CAc         hH     ]O  Q 4
54
54	54
5
6             g  module
		B g  name		B g  bindings			B g  b			B  g  filenamef  ice-9/boot-9.scm

						,	&	=	(		.	,	/	0	7		B	 		B	  g  nameg  make-autoload-interface CR h`   j  - 1 3 "  I(  C(  64 4 5>  "  G  ""  b      g  module
			^ g  args			^ g  args			V g  name		+	V g  bindings		+	V  g  filenamef  ice-9/boot-9.scm

									 		$		'		*		+		0		5	!	D		O		V		V	 			^
  g  nameg  module-autoload!g  documentationf Have @var{module} automatically load the module named @var{name} when one
of the symbols listed in @var{bindings} is looked up.  @var{args} should be a
list of module-name/binding-list pairs, e.g., as in @code{(module-autoload!
module '(ice-9 q) '(make-q q-length))}. CRR``    h   h   ]4 56 `       g  elt
		  g  filenamef  ice-9/boot-9.scm
			0		! 		   CM    h   M   ] LL 6      E       g  filenamef  ice-9/boot-9.scm
		
	 		

   C    h   M   ] LLM 6    E       g  filenamef  ice-9/boot-9.scm
3		3	 		
   C      h   M   ] L W FE       g  filenamef  ice-9/boot-9.scm
#	 	#	+ 		
   C        hX      ]445 >  "  G  45   U  (44L L5 O >  "  G  NXCXFG D            g  tag
		T g  k	M	T  g  filenamef  ice-9/boot-9.scm
		'		'	'	'			 			% 		&0		)0	+	=0		H2		P 		T$	$ 		T
   C     h     - . , 3 #  4 54545445?4>  "  G  45$  CHO 	O 4O >   "  G  V
Y4O >  "  G  ZX4	O >   "  G  JC       }      g  module-name
	  g  version	  g  reverse-name		  g  name		&  g  dir-hint-module-name		0  g  dir-hint		@  g  didit		e   g  filenamef  ice-9/boot-9.scm
	
							$		&		&		)		.	(	0		0		3		6		@		@		C		V		b		e			|	 	 	 	   g  nameg  try-module-autoloadg  documentationf  Try to load a module of the given name.  If it is not found, return
#f.  Otherwise return #t.  May raise an exception if a file is found,
but it fails to load. CR	
RX
        h0      ] 45$  "  	456       g  p
		0 g  m		0 g  n			0 g  t			.  g  filenamef  ice-9/boot-9.scm
=
	>		>		?		?		#@		0?	 		0	  g  nameg  autoload-done-or-in-progress? CRX
    h8      ] 45 45$  C C              g  p
		1 g  m		1 g  n			1 g  t			1  g  filenamef  ice-9/boot-9.scm
B
	C		C		
E	
	D		F		F		-G		/G	 
		1	  g  nameg  autoload-done! CR
    h       ]
 45  C          g  p
		 g  m		 g  n			  g  filenamef  ice-9/boot-9.scm
I
	J		J		
L	
	K		M	 	M	 			  g  nameg  autoload-in-progress! CR
   h0      ]$   6 45 45 C        g  p
		/ g  m		/ g  done?			/ g  n			/  g  filenamef  ice-9/boot-9.scm
O
	P		Q		R		R		S		"S		#T	$	-T	 
		/	  g  nameg  set-autoloaded! CR4XiZV%&')*-.WY[\</_`a^bdhimr   h      ]    	     

     
               C             g  dummy
	  g  	interface	  g  options		  g  enable		  g  disable		  g  option-set!		   	 	   CN       h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm
\	 		"  g  
macro-typeg  syntax-rulesg  patternsg  	interfaceg  optionsg  enableg  disable g  option-set!     C5Rs#6"    h      ]4 >  "  G  44 55	$  54	>  "  G  	$  4	>  "  G  "   "   4	>  "  G  4>  "  G  4	>  "  G  4>  "  G  6         g  name
	  g  value	  g  documentation		  g  len		 	c  g  filenamef  ice-9/boot-9.scm

 	 	   C    h   X   ] @P       g  option
		  g  filenamef  ice-9/boot-9.scm

 		   C     h8   w   )    3  6 ] $  4 >  "  G  6 456o       g  arg
		8  g  filenamef  ice-9/boot-9.scm

 			
 		8  g  nameg  debug-options CtRs    h0   r   -  1  3 44 45 5>  "  G  6        j       g  flags
			)  g  filenamef  ice-9/boot-9.scm

 			)


  g  nameg  debug-enable CuRsS     h   V   ]4 M 5N C N       g  flag
		  g  filenamef  ice-9/boot-9.scm

 		   C       h@      -  1  3 45 H4O  >  "  G  4J>  "  G  6         g  flags
			? g  debug-options		?  g  filenamef  ice-9/boot-9.scm

 			?


  g  nameg  debug-disable CvR4XiwZV      h(   O   ]     C    G       g  dummy
		$ g  opt		$ g  val			$  		$	   CN  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  optg  val   C5wR#6"    h      ]4 >  "  G  44 55	$  54	>  "  G  	$  4	>  "  G  "   "   4	>  "  G  4>  "  G  4	>  "  G  4>  "  G  6         g  name
	  g  value	  g  documentation		  g  len		 	c  g  filenamef  ice-9/boot-9.scm

 	 	   C    h   X   ] @P       g  option
		  g  filenamef  ice-9/boot-9.scm

 		   C     h8   v   )    3  6 ] $  4 >  "  G  6 456n       g  arg
		8  g  filenamef  ice-9/boot-9.scm

 			
 		8  g  nameg  read-options CR     h0   q   -  1  3 44 45 5>  "  G  6        i       g  flags
			)  g  filenamef  ice-9/boot-9.scm

 			)


  g  nameg  read-enable CRS      h   V   ]4 M 5N C N       g  flag
		  g  filenamef  ice-9/boot-9.scm

 		   C       h@      -  1  3 45 H4O  >  "  G  4J>  "  G  6         g  flags
			? g  read-options		?  g  filenamef  ice-9/boot-9.scm

 			?


  g  nameg  read-disable CR4XiZV        h(   O   ]     C    G       g  dummy
		$ g  opt		$ g  val			$  		$	   CN  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  optg  val   C5R#6"    h      ]4 >  "  G  44 55	$  54	>  "  G  	$  4	>  "  G  "   "   4	>  "  G  4>  "  G  4	>  "  G  4>  "  G  6         g  name
	  g  value	  g  documentation		  g  len		 	c  g  filenamef  ice-9/boot-9.scm

 	 	   C    h   X   ] @P       g  option
		  g  filenamef  ice-9/boot-9.scm

 		   C     h8   w   )    3  6 ] $  4 >  "  G  6 456o       g  arg
		8  g  filenamef  ice-9/boot-9.scm

 			
 		8  g  nameg  print-options CR    h0   r   -  1  3 44 45 5>  "  G  6        j       g  flags
			)  g  filenamef  ice-9/boot-9.scm

 			)


  g  nameg  print-enable CRS     h   V   ]4 M 5N C N       g  flag
		  g  filenamef  ice-9/boot-9.scm

 		   C       h@      -  1  3 45 H4O  >  "  G  4J>  "  G  6         g  flags
			? g  print-options		?  g  filenamef  ice-9/boot-9.scm

 			?


  g  nameg  print-disable CR4XiZV      h(   O   ]     C    G       g  dummy
		$ g  opt		$ g  val			$  		$	   CN  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  optg  val   C5R4XiZR       h   V   ] 6N       g  id
		  g  filenamef  ice-9/boot-9.scm		 		   C   h   *   ]C   "       g  id
		  		   CV  h   )   ] C!       g  x
		  		   CN        h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  ice-9/boot-9.scm
	 		:  g  
macro-typeg  identifier-syntax C5R       h   u   ] C m       g  v
		  g  filenamef  ice-9/boot-9.scm

		 		  g  nameg  unspecified? CRi R4fii>  "  G    h   T   ] C   L       g  x
		  g  filenamef  ice-9/boot-9.scm
	/ 		   C     h(      )    3  L[C]	L[L4L  5\C       w       g  x
		! g  prev		!  g  filenamef  ice-9/boot-9.scm
					, 			
 		!   C      h8     - . , 3 #  44 55O  C       g  init
		7 g  conv		7 g  fluid		"	7  g  filenamef  ice-9/boot-9.scm

					"		"		6	 		7  g  nameg  make-parameterg  documentationf BMake a new parameter.

A parameter is a dynamically bound value, accessed through a procedure.
To access the current value, apply the procedure with no arguments:

  (define p (make-parameter 10))
  (p) => 10

To provide a new value for the parameter in a dynamic extent, use
`parameterize':

  (parameterize ((p 20))
    (p)) => 20
  (p) => 10

The value outside of the dynamic extent of the body is unaffected.  To
update the current value, apply it to one argument:

  (p 20) => 10
  (p) => 20

As you can see, the call that updates a parameter returns its previous
value.

All values for the parameter are first run through the CONV procedure,
including INIT, the initial value.  The default CONV procedure is the
identity procedure.  CONV is commonly used to ensure some set of
invariants on the values that a parameter may have. CR      h   T   ] C   L       g  x
		  g  filenamef  ice-9/boot-9.scm
	2 		   C       h(      )    3  L[C]	L[L4L  5\C       w       g  x
		! g  prev		!  g  filenamef  ice-9/boot-9.scm
					* 			
 		!   C      h0     - . , 3 #   O   C             g  fluid
		) g  conv		)  g  filenamef  ice-9/boot-9.scm

	(	 		)  g  nameg  fluid->parameterg  documentationf `Make a parameter that wraps a fluid.

The value of the parameter will be the same as the value of the fluid.
If the parameter is rebound in some dynamic extent, perhaps via
`parameterize', the new value will be run through the optional CONV
procedure, as with any parameter.  Note that unlike `make-parameter',
CONV is not applied to the initial value. CR        h      ] $   CC             g  x
		  g  filenamef  ice-9/boot-9.scm

									 		  g  nameg  
parameter? CR     h(      ]4 5$   C  6             g  p
		"  g  filenamef  ice-9/boot-9.scm

										!				'	"	 
		"  g  nameg  parameter-fluid CR    h(      ]4 5$   	C  6            g  p
		#  g  filenamef  ice-9/boot-9.scm

										!			 	'	#	 
		#  g  nameg  parameter-converter CR4XiZVSV 
h0   8   ]     	 C      0       g  tmp-bde397a-17e9
		*  		*   C!        h    V   ]   C     N       g  tmp-bde397a-17e7
		 g  tmp-bde397a-17e6		  			   C       h8   )   ]4 L544 54L 5L L 5C !       g  p
		7  		7   CN        h8      ]4 545$   O @6         g  param
		6 g  value		6 g  body			6 g  body*			6 g  tmp				6 g  tmp			6  g  filenamef  ice-9/boot-9.scm					 		6	   CN     h(   d   ]	4 5$  @ 6      \       g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm
	 		"   C5R4i4Ji4i5 "5#   h   f   ]4 5$   C 6^       g  x
		  g  filenamef  ice-9/boot-9.scm
			"		 		   C5$i4i4i5 ">  "  G  4i4Ji4i5 %5&   h   f   ]4 5$   C 6^       g  x
		  g  filenamef  ice-9/boot-9.scm
			#		 		   C5'i4i4i5 %>  "  G  4i4Ji4i5 (5&   h   f   ]4 5$   C 6^       g  x
		  g  filenamef  ice-9/boot-9.scm
			#		 		   C5i4i4i5 (>  "  G  4i4Ji4i5 )5&    h   f   ]4 5$   C 6^       g  x
		  g  filenamef  ice-9/boot-9.scm
			#		 		   C5*i4i4i5 )>  "  G  4i*5+R4i5,R,     h   d   ] [C \       g  filenamef  ice-9/boot-9.scm
+
	,	 		
  g  nameg  batch-mode? C-R     h   \   ] C    T       g  filenamef  ice-9/boot-9.scm
3	 		
  g  nameg  batch-mode? C-      h   k   ]  Cc       g  filenamef  ice-9/boot-9.scm
2
	3	 		
  g  nameg  ensure-batch-mode! C.R h   {   -  1  3  @       s       g  args
			  g  filenamef  ice-9/boot-9.scm
5
	6		6	 			


  g  nameg  quit CRi/R012     h      ] 445 5C       g  filenamef  ice-9/boot-9.scm
:
	;		;		;		;		;	 		
  g  nameg  gc-run-time C3R4i5 4R4i5 5R4i5 6R4i5 7R4i5 8R4i5 9R4i5 :R4i5;R4i5<R4i5=R4i5>R4i5 ?R@A#B'^9&$ h     - . , 3 #  	4545 $  "  <44 5$   "  4 5 >  "  G  445 
>  "  G  4>   "  G  4	
>  "  G  $  "  45 6           g  prompt
	  g  reader	   g  filenamef  ice-9/boot-9.scm
Q		Q	&	R		$R		)T	
	,T		6T		=T	/	FT	
	Of	
	Rf		\f	
	eg		uh	 i	 i	 i	 	   g  nameg  repl-reader CCR       h0      ]"  
$  C" "          g  n
		- g  count		! g  result			!  g  filenamef  ice-9/boot-9.scm
q
	r		
s		s		t		t		!t		!r		$r		%r	$	-r	 		-  g  nameg  iota CDR4XiEZVOFGVs\jk^lme  hX   R   ] 	
L L     C      J       g  t-bde397a-1825
		R g  t-bde397a-1826		R  		R	   CN 	      h@      ]4 54 5 45$  O @6       g  while
		@ g  cond		@ g  body			@ g  tmp			@ g  tmp		"	@  g  filenamef  ice-9/boot-9.scm					6				$		;		$		 		@	   CN    h(   d   ]	4 5$  @ 6      \       g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm
	 		"   C5ERu      h      ]444 5556       g  sym
		  g  filenamef  ice-9/boot-9.scm

				#		.		#				 		  g  nameg  keyword-like-symbol->keyword CR4XiZVV        h       ] 4445556        g  t-bde397a-18ac
		 g  t-bde397a-18ab		 g  t-bde397a-18aa			 g  t-bde397a-18a9			 g  t-bde397a-18a8			  			   CN   h   *  ]8L(  "  L  L(  "  L  L(  "  L  L(  "  L  L (  "  	
L      45$  @6  "      g  imp
	u  g  exp	u  g  rex		u  g  rep		u  g  aut		u  g  tmp	   g  tmp	    g  filenamef  ice-9/boot-9.scm					$			 	$	6		7	$	M		N	$	d		e	$	u		 	 	 
   Ct       h   X   ]L LLLLL 6      P       g  args
		  g  filenamef  ice-9/boot-9.scm			 		   C
   h    q   ]	4L  LLLLL5C  i       g  args
		 g  tmp		  g  filenamef  ice-9/boot-9.scm				
 		   C\N h   h   ]L  6  `       g  kw
		  g  filenamef  ice-9/boot-9.scm				*			 		   C,-   h(      ]
4L LLLLL5  C     y       g  v
		# g  args		# g  tmp			#  g  filenamef  ice-9/boot-9.scm		#		
 		#	   C/?@  h(      ]
4L LLLLL5  C     y       g  d
		# g  args		# g  tmp			#  g  filenamef  ice-9/boot-9.scm		&		
 		#	   CBRS  h(      ]
4L LLLLL5  C     y       g  f
		# g  args		# g  tmp			#  g  filenamef  ice-9/boot-9.scm				
 		#	   CWZ\_V        h   6   ] L 6      .       g  t-bde397a-1967
		
  		
   CN   h@   y   ]
LL4L5$  4 O ?"  
4L5LLL 6  q       g  ex
		> g  args		> g  tmp			6  g  filenamef  ice-9/boot-9.scm	>		 		>	   CbV h   6   ] L 6      .       g  t-bde397a-1975
		
  		
   CN   h@   y   ]
LL4L5$  4 O ?"  
4L5LLL 6  q       g  ex
		> g  args		> g  tmp			6  g  filenamef  ice-9/boot-9.scm	>		 		>	   CeV h   6   ] L 6      .       g  t-bde397a-1983
		
  		
   CN   h@   y   ]
LLL4L5$  4 O ?"  
4L5LL 6  q       g  re
		> g  args		> g  tmp			8  g  filenamef  ice-9/boot-9.scm	>		 		>	   ChV h   6   ] L 6      .       g  t-bde397a-1991
		
  		
   CN   h@   y   ]
LLL4L5$  4 O ?"  
4L5LL 6  q       g  re
		> g  args		> g  tmp			8  g  filenamef  ice-9/boot-9.scm	>		 		>	   CkV h   6   ] L 6      .       g  t-bde397a-199f
		
  		
   CN   h@   x   ]
LLLL4L5$  4 O ?"  
4L5L 6  p       g  r
		> g  args		> g  tmp			:  g  filenamef  ice-9/boot-9.scm	>		 		>	   CnV  h   6   ] L 6      .       g  t-bde397a-19ad
		
  		
   CN   h@   x   ]
LLLL4L5$  4 O ?"  
4L5L 6  p       g  r
		> g  args		> g  tmp			:  g  filenamef  ice-9/boot-9.scm	>		 		>	   CqV  h   6   ] L L 6 .       g  t-bde397a-19bd
		  		   CN   h@      ]LLLLL4L 5$  4 O ?"  
4L 56       g  name
		@ g  bindings		@ g  args			@ g  tmp			>  g  filenamef  ice-9/boot-9.scm	@		 		@	   CuNr h      ] 6         g  kw
		 g  val		 g  args			  g  filenamef  ice-9/boot-9.scm						*				 			   CN3P      h      ]4 56             g  name
		 g  name*		 g  arg			 g  args			  g  filenamef  ice-9/boot-9.scm				 			   CV/      h   E   ] L 6=       g  filenamef  ice-9/boot-9.scm		 		
   Ctt    h   t   ]L  L 6   l       g  renamer
		 g  in		  g  filenamef  ice-9/boot-9.scm				 			   Cuh      ]L L 6x       g  kw
		 g  val		 g  in			  g  filenamef  ice-9/boot-9.scm				 			   CNP   h      ]44 55Cy       g  kw
		 g  in		  g  filenamef  ice-9/boot-9.scm				$				 			   CN   h   x   ]L  6  p       g  kw
		 g  in		  g  filenamef  ice-9/boot-9.scm				,		 			   CP9     h(      ]
4 5$  445
5:CC          g  sym
		% g  in		% g  dat				%  g  filenamef  ice-9/boot-9.scm																"	 			%	   CPu       h8      ]
L4 544445555L 6          g  sym
		5 g  in		5 g  sym			' g  tmp		'	1  g  filenamef  ice-9/boot-9.scm		!								'		2	 	'	"		$		'		5	 		5	   C  h      ]*4 5$  O @4 5"  x4 5"  E4 5$  L O @4 5$  L O @	 6$  4
?$  LO @""$  4?$  L O @"f"b             g  in
	  g  out	  g  tmp		
  g  tmp		&  g  tmp		5  g  tmp		D  g  tmp		b   g  filenamef  ice-9/boot-9.scm
	 	 	  g  nameg  loop CV h   R   ] L L 6     J       g  t-bde397a-1955
		 g  t-bde397a-1954		  			   CN       hh      ]LLO LQ 45 45$  4 O ?"  
45LLLL 6          g  name
		e g  name*		e g  arg			e g  args			e g  loop			# g  tmp		&	[ g  tmp		1	X  g  filenamef  ice-9/boot-9.scm				 	 		&		e		 		e	   C3P       h      ]4 56      ~       g  name
		 g  name*		 g  args			  g  filenamef  ice-9/boot-9.scm				 			   CV       h   6   ] L L  6     .       g  t-bde397a-1938
		  		   CN     hX      ]4L 4L5$  4 O ?"  
4L5LLLL5  C           g  name
		T g  name*		T g  args			T g  tmp			7 g  tmp		A	T  g  filenamef  ice-9/boot-9.scm			A	
 		T	   C3P     h      ]4 56      ~       g  name
		 g  name*		 g  args			  g  filenamef  ice-9/boot-9.scm				 			   CV       h   6   ] L L  6     .       g  t-bde397a-1919
		  		   CN   h@      ]L4L5$  4 O ?"  
4L5LLLL 6       g  name
		@ g  name*		@ g  args			@ g  tmp			6  g  filenamef  ice-9/boot-9.scm	@		 		@	   CP h      ]44 55C{       g  kw
		 g  args		  g  filenamef  ice-9/boot-9.scm				$				 			   CN h   z   ]L  6  r       g  kw
		 g  args		  g  filenamef  ice-9/boot-9.scm				*			 			   CP9   h(      ]
4 5$  445
5:CC          g  sym
		% g  args		% g  dat				%  g  filenamef  ice-9/boot-9.scm																"	 			%	   CPu     h@      ]
L4 544445555LLLLL 6          g  sym
		= g  args		= g  sym			' g  tmp		'	1  g  filenamef  ice-9/boot-9.scm		 								'		2	 	'	"		$		'		=		 		=	   C /       hX  <  ]4 5$  O @4 5" 4 5" 4 5		$  L O 	@4 5

$  L O 
@4 5$  	LO @4 
5$  L O @4 5$  L O @4 5$  L O @4 5" 4 5" i4 5" *4 5$  L O @4 5$  L O @4 5$  L O @4 5$  L O @4 5$  L O @4 5$  L O @4 5$   L O @4 !5$  "@#$ 6$  &4%?$  &LL O @""$  $4'?$  (L O @"m"i$  $4)?$  *L O @"0",$  4+?$  ,LO @"#"$  $4-?$  .L O @""      4      g  args
	R g  imp	R g  exp		R g  rex		R g  rep		R g  aut		R g  tmp		
R g  tmp		.R g  tmp		=$ g  tmp			L  g  tmp	
	r  g  tmp	   g  tmp	   g  tmp	   g  tmp	   g  tmp	&  g  tmp	5 g  tmp	D g  tmp	St g  tmp	yt g  tmp	t g  tmp	t g  tmp	t g  tmp	t g  tmp	7t g  tmp	]t  g  filenamef  ice-9/boot-9.scm
	 	R	  g  nameg  parse CVN3P        h      ]4 56      }       g  name
		 g  name*		 g  arg			  g  filenamef  ice-9/boot-9.scm				 			   CQV 	      h0   H   ]LL      C  @       g  
quoted-arg
		. g  filename		.  		.	   CN 
hx   L  ]4L 544L5$  "  545$  "   45$   O @	6       D      g  name
		q g  name*		q g  arg			q g  t			* g  f		.	E g  tmp		H	q g  tmp		S	q  g  filenamef  ice-9/boot-9.scm				)			-	
	1		5		9				(		6		2	'	H	,	2	.	(	.		1	&	;	!	H	 		q	   C hP   w   ]O  Q 4 5"  	 6$  4?$   O @""o       g  x
		P g  parse		P g  tmp			P  g  filenamef  ice-9/boot-9.scm
	 		P   C5R    h       ]	4 ?$  C 6           g  mif-args
		 g  t			  g  filenamef  ice-9/boot-9.scm
%		&			&		'	&	'	 		   Ct       h   V   ] 45 L 6   N       g  filenamef  ice-9/boot-9.scm
*		+		+	 		
   C       h      ]	4 5O 6       g  module-interface-args
		 g  
interfaces		  g  filenamef  ice-9/boot-9.scm
$
	%		%		)	 		  g  nameg  process-use-modules CR4XiZV     h   E   ] L 6=       g  filenamef  ice-9/boot-9.scm	G	 		
   CV[N3P      h      ]4 56             g  name
		 g  name*		 g  arg			 g  in			  g  filenamef  ice-9/boot-9.scm	L		L	 			   CV/        h   E   ] L 6=       g  filenamef  ice-9/boot-9.scm	9	 		
   Ctt       h   t   ]L L 6l       g  renamer
		 g  in		  g  filenamef  ice-9/boot-9.scm	@		@	 			   Cu   h      ]L  L 6   x       g  kw
		 g  val		 g  in			  g  filenamef  ice-9/boot-9.scm	B		B	 			   CNP   h      ]44 55Cy       g  kw
		 g  in		  g  filenamef  ice-9/boot-9.scm	=		=	$	=		=	 			   CN   h   x   ]L  6  p       g  kw
		 g  in		  g  filenamef  ice-9/boot-9.scm	>		>	,	>	 			   CP9     h(      ]
4 5$  445
5:CC          g  sym
		% g  in		% g  dat				%  g  filenamef  ice-9/boot-9.scm	0			0		1		1		2		2		2		"2	 			%	   CPu       h8      ]
L4 544445555L 6          g  sym
		5 g  in		5 g  sym			' g  tmp		'	1  g  filenamef  ice-9/boot-9.scm	<	!	<		4		4		4	'	4	2	 4	'	"4		$4		'<		5<	 		5	   C  h      ]*4 5$  O @4 5"  x4 5"  E4 5$  L O @4 5$  L O @	 6$  4
?$  LO @""$  4?$  L O @"f"b             g  in
	  g  out	  g  tmp		
  g  tmp		&  g  tmp		5  g  tmp		D  g  tmp		b   g  filenamef  ice-9/boot-9.scm
7	 	 	  g  nameg  loop CV      h    g   ]LLL L  L6     _       g  
quoted-arg
		  g  filenamef  ice-9/boot-9.scm	N		N	 		   CN  hP      ]O L Q 4545$   LLO @6           g  name
		L g  name*		L g  arg			L g  in			L g  loop			 g  tmp			L g  tmp		(	L  g  filenamef  ice-9/boot-9.scm	7		7	 	7		M	 		L	   C3P  h      ]4 56      |       g  name
		 g  name*		 g  in			  g  filenamef  ice-9/boot-9.scm	I		I	 			   C     h      ]L   L 6|       g  name
		 g  name*		 g  in			  g  filenamef  ice-9/boot-9.scm	J		J	 			   C h      ]4 5$  O @4 5"  @4 5"  	 6$  4?$  LL O @""$  4	?$  
L O @""             g  in
	  g  out	  g  tmp		
  g  tmp		&  g  tmp		5	l  g  filenamef  ice-9/boot-9.scm
E	 	 	  g  nameg  lp C        h       ]	O L Q  6              g  specs
		 g  lp		  g  filenamef  ice-9/boot-9.scm
D		E		E		E	 		  g  nameg  quotify CVV					
	     h   3   ]  C  +       g  quoted-args
		  		   CN      h0      ]4L  545$  @6     z       g  spec
		+ g  tmp			+ g  tmp			+  g  filenamef  ice-9/boot-9.scm	S	(		S	 		+   CN       h8   y   ]O  Q 4 5$  O @ 6    q       g  x
		4 g  quotify	
	4 g  tmp			4  g  filenamef  ice-9/boot-9.scm
.	 		4   C5R4Xi	ZV		&	'    h   ?   ] C 7       g  dummy
		 g  spec		  			   CN  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm
X
 		"  g  
macro-typeg  syntax-rulesg  patternsg  specg  ...   C5	RP        h   |   ]4 5C     t       g  x
		  g  filenamef  ice-9/r6rs-libraries.scm
						
		 		  g  nameg  sym? CV	?	@	A	E	I	M	R	=3 h   r   ]L  6   j       g  name
		 g  name*		  g  filenamef  ice-9/r6rs-libraries.scm		y	 			   C	S	Z        h   r   ] 45 6 j       g  name
		 g  name*		  g  filenamef  ice-9/r6rs-libraries.scm		z	 			   CN3    h      ]L  6          g  name
		 g  name*		 g  version			  g  filenamef  ice-9/r6rs-libraries.scm		u	 			   C	S	b     h       ] 4 5 6             g  name
		 g  name*		 g  version			  g  filenamef  ice-9/r6rs-libraries.scm		v	 			   C3   h       ]4L 5$  L 6C              g  
import-set
		 g  from		 g  to			  g  filenamef  ice-9/r6rs-libraries.scm		^	
		^			^	& 			   C	SeMLAD      h   v   ]L  6    n       g  sym
		 g  var		  g  filenamef  ice-9/r6rs-libraries.scm
	a			a	* 			   Cv	cD  h(      ]4L 5$   L 6L  6        g  pair
		'  g  filenamef  ice-9/r6rs-libraries.scm
	f			g		
	g	/		g			g			h			i			h		"	j	%	%	j	0	'	j	 		'   CvP     h   /  ]+4 545 4>  "  G  445>  "  G  4O >  "  G  "  z(  4	
O >  "  G  C45$  "  454>  "  G  "4455"m  '      g  
import-set
	  g  from	  g  to		  g  mod			  g  iface			D g  iface		D  g  in		c  g  out		c  g  t	   g  var	    
g  filenamef  ice-9/r6rs-libraries.scm		_				_																	'			,			7			D	_		G	a		c	b		i	c			j	e	 	n	 	n	5 	n	 	n	 	o	 	o	! 	p	! 	o	 	n	 	q	 	q	# 	q	 	r	 	r	! 	r	 	r	 	b	 	b	 	b	> 	b	 $	 	   CP   h      ]45C     }       g  
import-set
		 g  
identifier		  g  filenamef  ice-9/r6rs-libraries.scm				
		 			   C	SeMLAPD   h   ~   ]L4L  56     v       g  sym
		 g  var		  g  filenamef  ice-9/r6rs-libraries.scm
	X			Y	-		Y	 			   C 
      hp   -  ]4 545 4>  "  G  445>  "  G  454	O >  "  G  C   %      g  
import-set
		m g  
identifier		m g  mod				m g  iface			D g  iface		D	m g  pre		M	m  g  filenamef  ice-9/r6rs-libraries.scm		U				U																	'			,			7			D	U		G	W		M	U		P	X	 		m	   C3     h   }   ]L 6      u       g  
import-set
		
 g  
identifier		
  g  filenamef  ice-9/r6rs-libraries.scm	
	H	 		
	   C	SeMLAD        h   v   ]L  6    n       g  sym
		 g  var		  g  filenamef  ice-9/r6rs-libraries.scm
	K			K	* 			   Cv h(      ]4L 5$  L 6 L 6       }       g  sym
		!  g  filenamef  ice-9/r6rs-libraries.scm
	L			M			M			N			O		!	O	 		!   CP      h   )  ]4 545 4>  "  G  445>  "  G  4O >  "  G  4	
O 45>  "  G  C      !      g  
import-set
	  g  
identifier	  g  mod			  g  iface			D g  iface		D   g  filenamef  ice-9/r6rs-libraries.scm		I				I																	'			,			7			D	I		G	K		`	L		l	P		w	L	 	 	   C3 h   }   ]L 6      u       g  
import-set
		
 g  
identifier		
  g  filenamef  ice-9/r6rs-libraries.scm	
	<	 		
	   C	SeMLADv h0      ]	L 4L  5$  "  4 L 56        g  sym
		/ g  t		-  g  filenamef  ice-9/r6rs-libraries.scm
	?				A	$		A	 	 	B	$	$	B	+	*	B	$	/	@	 		/   CP 
       hp     ]4 545 4>  "  G  445>  "  G  4O 4	5>  "  G  C             g  
import-set
		i g  
identifier		i g  mod				i g  iface			D g  iface		D	i  g  filenamef  ice-9/r6rs-libraries.scm		=				=																	'			,			7			D	=		G	?		S	D		^	?	 		i	   C3      h   r   ]L  6   j       g  name
		 g  name*		  g  filenamef  ice-9/r6rs-libraries.scm		8	 			   C	S	i        h   r   ] 45 6 j       g  name
		 g  name*		  g  filenamef  ice-9/r6rs-libraries.scm		9	 			   C3        h      ]L  6          g  name
		 g  name*		 g  version			  g  filenamef  ice-9/r6rs-libraries.scm		3	 			   CP     h       ]4 5456              g  name
		 g  name*		 g  version			  g  filenamef  ice-9/r6rs-libraries.scm		4			5	"		4	 			   C3	rP9 h8      ]4L 5$  $4 5$  444 55
5:CCC       g  colon-n
		8 g  rest		8 g  version			8  g  filenamef  ice-9/r6rs-libraries.scm		!	
		!			"			"	
		!			#		"	#		%	#	,	-	#		0	#		3	#	
 		8	   Cu`	sP	SV		      h      ] LL   C              		
   C		        h    >   ]L4L  5 C      6       g  name
		 g  rest		  			   CN   h     ]44444 5555545$  4	O ?"  04
5$  4O ?"  
456           g  colon-n
		{ g  rest		{ g  version			{ g  srfi-n		 	{ g  tmp		,	y g  tmp		O	v  g  filenamef  ice-9/r6rs-libraries.scm		$			%		
	&			'			'	 		'	0		'	 		'			%		 	$		 	$		{	)	 		{	   C       h  >  ]Q4 5" 4 5" f4 5" 34 5"  4 5"  4 5"  4 	5"  l4 
5	"  94 5

$  4O 
?$  
@ 6 6	$  4O 	?$  	@""$  4O ?$  @"t"p$  4?$  @"F"B$  4O ?$  @""$  4O ?$  @""$  4O ?$  @""$  4O ?$  @"z"v$  4O ?$  @"G"C      6      g  import-spec
	 g  sym?	 g  tmp		 g  tmp		 g  tmp		- g  tmp		<f g  tmp		KB g  tmp		Z g  tmp		i  g  tmp			x  g  tmp	
    g  filenamef  ice-9/r6rs-libraries.scm
	
 	  g  nameg  resolve-r6rs-interface C	SR4Xi	(ZV		3R   h      ] 6          g  name
		 g  name*		 g  version			 g  espec			 g  ispec			 g  body			  g  filenamef  ice-9/r6rs-libraries.scm	 	 			   CV		S        h      ] 6x       g  
import-set
		 g  import-level		  g  filenamef  ice-9/r6rs-libraries.scm	 	 			   C	S  h    v   ]	4 5$  @ 6 n       g  im
		 g  tmp		  g  filenamef  ice-9/r6rs-libraries.scm
 		 	# 		   CV     h   M   ] LLL D      E       g  filenamef  ice-9/r6rs-libraries.scm	
 	 		

   C	tR        h   p   ] 6h       g  id
		 g  rest		  g  filenamef  ice-9/r6rs-libraries.scm	 	 			   CP4v    h   i   ] L 6      a       g  iface
		
  g  filenamef  ice-9/r6rs-libraries.scm
 		
 	  		
   Cv      hX      ]
4 54O L5$  L L LL645$  L LL L6L  LLL6        g  id
		W g  rest		W g  sym				W  g  filenamef  ice-9/r6rs-libraries.scm	 			 		 		 		( 		, 		- 		9 		F 		H 		Q 		W 	 		W	   CN3R        h       ]4 5$  6C              g  from
		 g  to		 g  rest			  g  filenamef  ice-9/r6rs-libraries.scm	 		 		 	 			   CV      h   M   ] LLLLL 6  E       g  filenamef  ice-9/r6rs-libraries.scm	 	 		
   C	P4v    h   i   ] L 6      a       g  iface
		
  g  filenamef  ice-9/r6rs-libraries.scm
 		
 	  		
   Cv      hp     ]4 54O L5$  L L LL64 545$  L LL L6L  LLL6       g  from
		o g  to		o g  in			o g  sym				 g  sym		9	G  g  filenamef  ice-9/r6rs-libraries.scm	 			 		 		  		. 		2 		3 		9 		< 		K 		[ 	 	] 		i 		o 	 		o	   CN  hX      ]4 5$  LLO @4 5$  L LO @ 6             g  in
		R g  e		R g  r			R g  x			R g  tmp		
	R g  tmp		.	R  g  filenamef  ice-9/r6rs-libraries.scm
 	 		R	  g  nameg  lp2 C    h0      ]O LL Q 4 5LLL6          g  from
		- g  to		- g  rest			- g  lp2			-  g  filenamef  ice-9/r6rs-libraries.scm	 	 		-	   C  h      ]4 5$  O @4 5"  A4 5$  '4?$  LL O @ 6 6$  "4	?$  
LL O @""          g  specs
	  g  e	  g  r		  g  x		  g  tmp		
  g  tmp		*  g  tmp		9	q  g  filenamef  ice-9/r6rs-libraries.scm
 	 	 	  g  nameg  lp CV						     h   8   ]  C      0       g  tmp-bde397a-1b2c
		
  		
   C				        h   8   ]LL   C       0       g  tmp-bde397a-1b2b
		  		   C     hH   G   ]LLL 44L 5 	
4LLO L55C ?       g  e
		G g  r		G g  x			G  		G	   CN 	 hp     ].45O Q 4>  G  	4	5

$   O 
@	6          g  name
		l g  name*		l g  version			l g  espec			l g  ispec			l g  body			l g  ifaces			* g  lp			* g  exports		+	l g  
re-exports		+	l g  replacements		+	l g  tmp			=	l g  tmp	
	H	l  g  filenamef  ice-9/r6rs-libraries.scm	 		 		 		# 	 	$ 	(	% 	0	* 		. 		= 	 
		l	   CN3R       h      ] 6          g  name
		 g  name*		 g  espec			 g  ispec			 g  body			  g  filenamef  ice-9/r6rs-libraries.scm	 	 			   C


	    h(   w   ] 45C       o       g  name
		! g  name*		! g  espec			! g  ispec			! g  body			!  		!	   C 
     hh   ~   ]4 5"  44 5$  4?$  @ 6 6$  4?$  	@""    v       g  stx
		d g  tmp		d g  tmp			E  g  filenamef  ice-9/r6rs-libraries.scm
	}	 		d   C5	(R4Xi	ZVV
 h   L   ] C   D       g  
import-set
		 g  import-level		  			   C h       ]	4 5$  @ C           g  
import-set
		 g  tmp		  g  filenamef  ice-9/r6rs-libraries.scm
 	 		  g  nameg  	strip-for CV
$
(
)
+
,
-
8   h    8   ]     C   0       g  tmp-bde397a-1b44
		  		   C
<  h    9   ]44 55C       1       g  library-reference
		  		   CN        h0      ]4 545$  @6          g  
import-set
		- g  tmp		- g  tmp			-  g  filenamef  ice-9/r6rs-libraries.scm	 	.	 	 		-   CN h(   n   ]	4 5$  @ 6      f       g  stx
		" g  tmp		"  g  filenamef  ice-9/r6rs-libraries.scm
 	 		"   C5	R4Xi
=ZV
N     h   O   ] C    G       g  dummy
		 g  foo		 g  bar			  			   CN  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm
a
 		"  g  
macro-typeg  syntax-rulesg  patternsg  foog  bar   C5
=R4Xi
OZV
P
`
a
b   h    c   ]  C      [       g  dummy
		 g  name		 g  args			 g  body			  			   C
k
l
m     h   P   ]   CH       g  dummy
		 g  name		 g  val			  			   CN h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  ice-9/boot-9.scm
e	 		9  g  
macro-typeg  syntax-rulesg  patternsg  nameg  argsg  bodyg  nameg  val   C5
OR4Xi
nZV
}
~
      h    c   ]  C      [       g  dummy
		 g  name		 g  args			 g  body			  			   CN      h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm
o
 		"  g  
macro-typeg  syntax-rulesg  patternsg  nameg  argsg  bodyg  ...   C5
nR4Xi
ZV
        h   T   ]C     L       g  dummy
		 g  formals		 g  body			  			   CN     h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm
u
 		"  g  
macro-typeg  syntax-rulesg  patternsg  formalsg  bodyg  ...   C5
RZD     h@      ] $   "    $   "   4L 5L6            g  name
		; g  internal-name		; g  external-name		$	; g  var		/	;  g  filenamef  ice-9/boot-9.scm
			*			&		7				*		&		7	$		'		/		;	 		;   C     h       ]
4 5 O 6             g  m
		 g  names		 g  public-i				  g  filenamef  ice-9/boot-9.scm
~
							 			  g  nameg  module-export! CRZ

D     hP     ] $   "    $   "   4L 54>  "  G  L6      g  name
		P g  internal-name		P g  external-name		$	P g  var		/	P  g  filenamef  ice-9/boot-9.scm
			*			&		7				*		&		7	$		'		/		2		8	,	>		P	 		P   C  h       ]
4 5 O 6             g  m
		 g  names		 g  public-i				  g  filenamef  ice-9/boot-9.scm

							 			  g  nameg  module-replace! CRZeLAUTM[DC     h   G  ]	4 5$  "  f45 44 5>  "  G  44 5>  "  G  4>  "  G  4	 >  "  G  
4 56 ?      g  mod
	  g  t		  g  iface		} g  iface    g  filenamef  ice-9/boot-9.scm

												$		/		8		=	!	H		Q		W		\		e	 	 	 	 	   g  nameg  module-export-all! C
RZHv
D
    h`   ?  ] $   "    $   "   4L 5$  !4L 5&  6L667      g  name
		` g  internal-name		` g  external-name		$	` g  var		/	`  g  filenamef  ice-9/boot-9.scm
			*			&		7				*		&		7	$		'		/		7		:	"	F		J	 	N		X		\	 	`	 		`   C      h       ]
4 5 O 6             g  m
		 g  names		 g  public-i				  g  filenamef  ice-9/boot-9.scm

							 			  g  nameg  module-re-export! CR4Xi	ZV






      h(   ?   ]     C     7       g  dummy
		# g  name		#  		#	   CN  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  nameg  ...   C5	R4Xi	ZV






      h(   ?   ]     C     7       g  dummy
		# g  name		#  		#	   CN  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  nameg  ...   C5	R4Xi	ZV






      h(   ?   ]     C     7       g  dummy
		# g  name		#  		#	   CN  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  nameg  ...   C5	R4Xi
ZV
        h   ?   ]C7       g  dummy
		 g  name		  			   CN  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  nameg  ...   C5
R4Xi
ZV
        h   ?   ]C7       g  dummy
		 g  name		  			   CN  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/boot-9.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  nameg  ...   C5
R       h    g   )    3  L[C]L4L  5\C     _       g  val
		  g  filenamef  ice-9/boot-9.scm
			 			
 		   C      h0      - . , 3 #  44 55O C         g  init
		. g  	converter		. g  fluid		"	.  g  filenamef  ice-9/boot-9.scm

					"		"	 		.  g  nameg  make-mutable-parameter C
R4ei	5        h      , 3 C       g  module
		 g  name		 g  int1			 g  val1			 g  int2			 g  val2			 g  var			 g  val			  g  filenamef  ice-9/boot-9.scm
	 			  g  nameg  noop C4Li 
>  "  G  4Mi >  "  G  4Gi 
e
A        h0   &  , 3 4 54545 6            g  module
		* g  name		* g  int1			* g  val1			* g  int2			* g  val2			* g  var			* g  val			*  g  filenamef  ice-9/boot-9.scm
		
										'		*	 			*	  g  nameg  check C>  "  G  4Gi ,*
A       h8   %  , 3 445 4 54545>  "  G  C        g  module
		6 g  name		6 g  int1			6 g  val1			6 g  int2			6 g  val2			6 g  var			6 g  val			6  g  filenamef  ice-9/boot-9.scm
				
								!		,	 			6	  g  nameg  warn C>  "  G  4Gi 


H        h      , 3 
$  45$  "  "  $  "  	4545	45$   	&  "  
4	5$  CC4	5$  	CC           g  module
	  g  name	  g  int1		  g  val1		  g  int2		  g  val2		  g  var		  g  val		  g  t		%	? g  old		H  g  new			H   g  filenamef  ice-9/boot-9.scm
							3					%		4		@		H		M		S	!	U		Y		a		b		g		m	/	o		p		t		z
	 
	& 
	 
	 	 	  g  nameg  replace C>  "  G  4Gi 
*
Av      h@   <  , 3 &  /445 4 545>  "  G  6C 4      g  module
		? g  name		? g  int1			? g  val1			? g  int2			? g  val2			? g  var			? g  val			?  g  filenamef  ice-9/boot-9.scm
												 		-		=	 
		?	  g  nameg  warn-override-core C>  "  G  4Gi  v      h      , 3 $  C6        g  module
		 g  name		 g  int1			 g  val1			 g  int2			 g  val2			 g  var			 g  val			  g  filenamef  ice-9/boot-9.scm
					 			  g  nameg  first C>  "  G  4Gi v h      , 3 6         g  module
		 g  name		 g  int1			 g  val1			 g  int2			 g  val2			 g  var			 g  val			  g  filenamef  ice-9/boot-9.scm
			 			  g  nameg  last C>  "  G  4Gi >  "  G  4Gi >  "  G    
R
    h       ]	4 5$  C 6        g  handler-name
		 g  t		  g  filenamef  ice-9/boot-9.scm
.		/		/		1		1	 		   C    h(      ] $   $   "    6C             g  handler-names
		"  g  filenamef  ice-9/boot-9.scm
,
	-		3		3		5		 .	 		"  g  nameg  lookup-duplicates-handlers CR4
i5R4
i h    {   ]44 5>  "  G   C    s       g  handler-names
		  g  filenamef  ice-9/boot-9.scm
<		=		>		=	 		   C5R
R     h   M   ] L 6E       g  filenamef  ice-9/boot-9.scm
			 		
   C.*5  h    T   ]4 5$  C45  6    L       g  s
		  g  filenamef  ice-9/boot-9.scm
	 		   C:<_  h(   i   ]4 L>  "  G   L L6     a       g  port
		#  g  filenamef  ice-9/boot-9.scm
						 		#   C    h8   i   - 1 3 444 L O 5
5>  "  G  C    a       g  key
			4 g  args			4  g  filenamef  ice-9/boot-9.scm
	 			4
   C44`J   h0      ]4545 4544 5L 56          g  objcode
		- g  program		-  g  filenamef  ice-9/boot-9.scm
					&				
			&															%		'		+		-	 		-
   C.*5 h    T   ]4 5$  C45  6    L       g  s
		  g  filenamef  ice-9/boot-9.scm
	 		   C:<_  h(   i   ]4 L>  "  G   L L6     a       g  port
		#  g  filenamef  ice-9/boot-9.scm
				 		 		#   C    h8   i   - 1 3 444 L O 5
5>  "  G  C    a       g  key
			4 g  args			4  g  filenamef  ice-9/boot-9.scm
	 			4
   C 	   h   H  ]44L L5 545$  _454M5$  "  '454M5$  454M5"  $  O O 6CC   @      g  ext
	  g  	candidate	  g  gostat		  g  t		3	j  g  filenamef  ice-9/boot-9.scm
	
				,									$		%		,		3		3		A		H	#	O		S		T		[		b		n	 	 	    C  h   _   ] L LO 6     W       g  dir
		  g  filenamef  ice-9/boot-9.scm
				 		   CT    h   M   ] L 6E       g  filenamef  ice-9/boot-9.scm
			! 		
   C h   Y   -  1  3 C     Q       g  args
			  g  filenamef  ice-9/boot-9.scm
	 			


   CT`.92* J"#$%&       hX    ] $  "  4L5 "   $  445 L L>  "  G  "   $  4>   "  G  445 L >  "  G  44	4
55L 45 5445 >  "  G  4
54
54	544	556C $  y4 54M5$  "  '4 54M5$  4 54M5"  $  +4
54
54	544	5L56""Õ      g  gostat
	X g  cfn   g  objcode	   g  program	   g  t ! g  objcode3P g  program	3P  g  filenamef  ice-9/boot-9.scm
								!		"		%		+		4		F		G		W		Z		`	.	g		p		q		t		x	$	z		|		~	 	 	 	 	 	 	0 	 	 	& 	 	 	& 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	#	
				%	&	*	&,	-	1	&3	3	8	>	@	A	B	H	J	N	P	 K	X
   C.*5  h    T   ]4 5$  C45  6    L       g  s
		  g  filenamef  ice-9/boot-9.scm
	 		   C:<'_  h(   i   ]4 L>  "  G   L L6     a       g  port
		#  g  filenamef  ice-9/boot-9.scm
						 		#   C    h8   i   - 1 3 444 L O 5
5>  "  G  C    a       g  key
			4 g  args			4  g  filenamef  ice-9/boot-9.scm
	 			4
   C    h    h   ]L L O L O 6       `       g  go-file-name
		  g  filenamef  ice-9/boot-9.scm
			 		   C     h     ]$  o44 5$  "  44 
55$   "  ;45 &  .4	 5$  4
4 
54 	55"   "   M5"  LL O 6          g  canon
	   g  filenamef  ice-9/boot-9.scm
		
					g		g		 h		#h	!	,h		0f		7j		=j	.	Af		Bk		Lj		Mo		Rp		[q		eo		u		 	 	    C#  h   M   ] L 6E       g  filenamef  ice-9/boot-9.scm
	
		 		
   C        h   8  ]H4 O  O 5KJ$  D4LO 5$  "  44 O 	5
 L O 5"  $   $  4 >  "  G  "   6  O 6     0      g  abs-file-name
	  g  scmstat	  g  t		1	a g  compiled		f   g  filenamef  ice-9/boot-9.scm
				!		"		1	!	@		C		^		f		n		t		u	 	 	 	
 	   g  nameg  load-absolute C.,()*+2  h`      ] L Y4L5$  4LL>  7"  14L5$  4L4LL5>  "  44LL5>  ZCZF             g  filenamef  ice-9/boot-9.scm
		
	5									&			0		1			4		A			F			I		V		 		Z
   C 	    hx   '  - . , 3 #  HO Q $  "  45$  4>  "  G  "  K O 6       g  dir
		w g  	file-name		w g  reader			w g  compiled-extension			w g  load-absolute		!	w g  t		+	C  g  filenamef  ice-9/boot-9.scm
\
	+v		+v		9w		>w		@w		Gv		Hx		Lx		Sx		]z		d{		w	 		w	  g  nameg  load-in-vicinityg  documentationf  Load source file FILE-NAME in vicinity of directory DIR.  Use a
pre-compiled version of FILE-NAME when available, and auto-compile one
when none is available, reading FILE-NAME with READER. C,R4XiZ4-iQ.VNX       h   W   ]L $  L "   C O       g  arg
		  g  filenamef  ice-9/boot-9.scm	
	  		   CR   h   V   ] 6N       g  id
		  g  filenamef  ice-9/boot-9.scm		
 		   Cefghqr    h(   V   ]L $  L "   C       N       g  id
		!  g  filenamef  ice-9/boot-9.scm	
	( 		!   CN   h     ])4 5$  45"  45$  45"  4 5$  O @  4	?$  
O @ 6          g  x
		| g  src			| g  file			| g  dir		8	| g  tmp		C	| g  tmp		[	|  g  filenamef  ice-9/boot-9.scm
 												)					"		,		-	%	8	 		|   C55RR4ci	5RZBE       h0      ]
4 5$  44556C           g  module
		, g  features		, g  mod				,  g  filenamef  ice-9/boot-9.scm
K
	L			L		M		O		O		"O	?	$O		(O		*N		 		,	  g  nameg  cond-expand-provide CR4XiZV3     h   U   ]L  6      M       g  c
		
  g  filenamef  ice-9/boot-9.scm	
\		 		
   C4  h   U   ]L  6      M       g  c
		
  g  filenamef  ice-9/boot-9.scm	
^		 		
   C      h   U   ]4L  5C     M       g  c
		  g  filenamef  ice-9/boot-9.scm	`	 		   CR     h   U   ] 6M       g  c
		  g  filenamef  ice-9/boot-9.scm	b		 		   CP4E    h   z   ]L 4 56      r       g  mod
		  g  filenamef  ice-9/boot-9.scm
U		V		V	<	V		V	 		   CE        h8      ]4 545$  C45 O 456            g  c
		3 g  sym			3 g  mod			3  g  filenamef  ice-9/boot-9.scm	c			c			d		d		f	$	f		+W		3U	 			3   CN    hx      ]!4 5$  L O @4 5$  L O @4 5$  L O @  4?$  	@
 6        g  	condition
		w g  tmp		w g  tmp		'	w g  tmp		C	w g  tmp		[	w  g  filenamef  ice-9/boot-9.scm
Y	 		w  g  nameg  condition-matches? CVV     h       ]4L 5$  CL L6            g  	condition
		 g  form		 g  rest			  g  filenamef  ice-9/boot-9.scm	k		k			m	 			   C   h   E   ] L 6   =       g  filenamef  ice-9/boot-9.scm	n	 		
   CN    hH      ]4 5$  LL O @4 5$  O @ 6         g  clauses
		F g  	alternate		F g  tmp			F g  tmp		*	F  g  filenamef  ice-9/boot-9.scm
h	 		F	  g  nameg  match CV      h   D   ] L C<       g  filenamef  ice-9/boot-9.scm
s		 		
   C h   l   ]L  O 6 d       g  clause
		 g  form		  g  filenamef  ice-9/boot-9.scm	r	 			   CN    h   _   ] L 6    W       g  filenamef  ice-9/boot-9.scm
w			x		x	*	x	 		
   C      h   Z   ]L L O 6 R       g  clause
		  g  filenamef  ice-9/boot-9.scm	v	 		   CN 
      hh      ]!O O Q Q 4 5$  O @4 5$   O @	 6             g  x
		b g  condition-matches?		b g  match			b g  tmp		(	b g  tmp		D	b  g  filenamef  ice-9/boot-9.scm
S	 		b   C5R	8u`	s+ h       ]444 555  C         g  num
		  g  filenamef  ice-9/boot-9.scm
									,		4								
 		   C      h      ]4 56 w       g  srfis
		  g  filenamef  ice-9/boot-9.scm
}
			~	 		  g  nameg  	use-srfis CR4XiZVNR        h   i   ] 6a       g  type
		 g  arg		  g  filenamef  ice-9/boot-9.scm		 			   CN   h   {   ]L 6    s       g  type
		 g  arg		  g  filenamef  ice-9/boot-9.scm				,		 			   C3P   h   ^   ]4 56 V       g  n
		  g  filenamef  ice-9/boot-9.scm				 		   CO   h   x   ]L 4 56       p       g  n
		  g  filenamef  ice-9/boot-9.scm
			%		4		%		 		   Cu+PV       h   8   ]  C      0       g  tmp-bde397a-1e89
		
  		
   C     h   .   ]4 5C &       g  srfi-n
		  		   CN   hH      ]4L O 444 555545$  @	
6          g  n
		E g  tmp	#	E g  tmp		.	E  g  filenamef  ice-9/boot-9.scm								+			!		#		#	 			E   C 
       hx   u   ]4 5"  <4 5"  	 6$  4?$   O @""$  4?$  	 O @""       m       g  x
		q g  tmp		q g  tmp			M  g  filenamef  ice-9/boot-9.scm
	 		q   C5R4XiZuVNR     h      ] 6w       g  name
		 g  formals		 g  body			  g  filenamef  ice-9/boot-9.scm		 			   COPSV    h   F   ] LL     L L 	
L     LL   L   
       C       >       g  	proc-name
	  g  args	   	 	   CN   hP      ]4 4M 4 55545 45$   O @	
6         g  name
		N g  formals		N g  body			N g  tmp		#	N g  tmp		.	N  g  filenamef  ice-9/boot-9.scm						+		$						!	#	 			N	   C 	    hP      ]H45K4 5"  	 6$  4?$  O @""             g  x
		J g  prefix		J g  tmp			J  g  filenamef  ice-9/boot-9.scm
				
	#		 		J   C5R4i5  4Ji      h   D   ] L [C  <       g  filenamef  ice-9/boot-9.scm
	 		
   C O      h   T   ]L  \C       L       g  v
			  g  filenamef  ice-9/boot-9.scm
	 			   C O 5 	R4ii4i5>  "  G  4ii4i5>  "  G  4i5 4i >  "  G   i4Mi5 4ivD h0      ]	4L 54L >  "  G  L  6            g  sym
		+ g  v		+  g  filenamef  ice-9/boot-9.scm
									+		 		+   C O >  "  G  4i>  "  G   45 4 >  "  G   C+%      g  %default-prompt-tag
 K g  %running-exception-handlers
D g  %exception-handlerD g  custom-throw-handler	 g  next-id
-. g  exception-printers
      V      O g  print-location      1      L g  scm-error-printer
             g  s
             g  rtd
     J     M" g  rtd
     M     Ni g  rtd
     Nr     O g  rtd
     O#     O g  rtd
     O     Pb g  rtd
     Pk     Q g  rtd
     Q
     Q g  rtd
     Q     RQ g  rtd
     RZ     S g  rtd
     S     S g  rtd
     S     Tb g  rtd
     Tk     U g  rtd
     U
     U g  rtd
     U     VQ g  rtd
     VZ     W g  rtd
     W     W g  rtd
     W     XA g  rtd
     XJ     X g  rtd
     X     Y g  rtd
     Y     Z1 g  rtd
     Z:     Z g  rtd
     Z     [ g  rtd
     [     \2 g  rtd
     \;     \ g  rtd
     \     ] g  rtd
     ]     ^! g  rtd
     ^*     ^ g  rtd
     ^     _q g  rtd
     _z     `" g  rtd
     `+     ` g  rtd
     `     ar g  m
           g  m
          t g  accessor
           g  root
     ]     . g  m
          v g  noop          s g  using-readline?
           g  m
           g  from
           g  to           g  m
     6     N  3g  filenamef  ice-9/boot-9.scm		+			+
		,			,			,	 	6
 	<	 	<	N	:
	@
>	B
B	I
	W	&	W	2	W	&	X		o	 	 	 
 
 
! 	& 
U 
\

 
!t
"7&
".
$)=
%^J
%eU
'qY
)dd
*;o
*v
+x
,z
-
-	.
.
/>
/B
/F
/J
/N
/R
/V
/Z
/^
/b
/c
/i	/n
qU
      
      
      
      TJ
      S
      [
      3q
      Y
      R
      P
      U
      V	      V
      	      I	      	      	      	      	      	      	      	      	      	      &	      .	      5	      >	      F	      M	      V	      ^	      e	      n	      v	      }	      	      	      	      	      	      	      	      	      	      	      	      	      	      	      	      	      	      	      	      	      %	      .	      6	      =	      F	      N	      U	      ^	      f	      m	      v	      }	      	      !	      !	      N!	      W#	      _#	      #	      mM
      tM		      yM
      \a
      c
      њm
      s
      y
      
}
      
      
      i
      ު
      
      	
      
      
      	      	      	>      	      	      	      	      	      	      
      
      
     sJ
     ^O
     BT
     v_
     b
     i
     
r
     Y{
     1~
     2
     9		     >
     
     
     _
     
     ;
     <
     C	     H
     Q	     X	     Z	     ^
     _	     f	     k	     x	     	     	     	     
     	     	     	     	     
     v
     
     
     %
     
     6
     
     F
     
     V
     
     p
     
     
     J
     
      
     !B
     !
     "
     #;
     #
     $
     %3
     %
     &P
     &
     'q
     (
     (

     (
     *"
     +
     ,
     -
     .$
     0+
     06
     29
     4F
     5S
     6W
     7\
     8*x	     8-{	(     81{	     8}	     :
     ;	
     =
     @$
     B
     Dj
     E

     F
     F
     F	     F
     F
     J.]
     J6	     d+
     e
     f
     g#
     g+
     g,	%     g,	1     g,	%     g,
     g-	%     g-
     h/
     ne7
     pVE
     qf
     ry
     s
     t
     us
     v]
     w/
     x
     x
     zI
     {
     }a
     ~	
     ,	
     	(
     	,
     	4
     _	7
     	@
     |	E
     	P     	Z     [	h
     	~
     	
     g	
     \	
     	
     	
     x	
     K

     &

     

     Z
&
     f
/
     
A
     
D
     
G
     .
J
     
M
     
P
     
g	     
g	     
h	     
h	     
h	     
i	     
i	     
i	     
m	     
m	"     
m	     
f
     
u	     
u	     
v	     
v	     !
v	     *
w	     3
w	     8
w	     A
x	     K
x	     P
x	     Y
{	     x
t
     y

     

     x

     }

     

     

     

     

     
	     
	/     
	     
	     

     

     M

     

     

     U

     V
	     ]
	     `
	     h
	     m
	     v
	     
	#     
	     1

     
     
     "
     ,K
     K{
     
     	     
     ݨ
     
     	     
     9	
     <;	     @;
     t=
     B
     I
     O
     {
     
     
     I
     Q	,     T	     X
     Y
     f	%     k
     	
     q
     2
     3
     7
     	     s	     C	     	     	     	)     	     
     %	     %	!     %	     %
     +
     2
     &5
     .8
     :
     =	     =
     >	     >
     ?	     ?
     	@	     @
     A	      A
     !C	     ,C
     -D	     8D
     9E	     EE
     FF	     RF
     SG	     _G
     `H	     lH
     mL	     xL
     gP
     q
     !P
     Nm$
g  filenamef  ice-9/r6rs-libraries.scm     |	
g  filenamef  ice-9/boot-9.scm     ~
     
     
     A
     
     	     	      	     # 	     ( 	     1!	     ;!	     @!	     I"	     R"	     "	     #	     #	     Z#	     c$	     l$	     $	     &%	     /%	     %	     &	     &	     &	     '	      '	     4'	     =(	     F(	     M(	     V)	     _)	     f)	     z
     7,
     88	     D7
     E;	     M;	     ;	     :
     Y	     W
     \
     	     7.	     ;*
     <F	     IF
     ֌K
     K}
     	     	     	     
          	     	0     	          
     	     	/     	     
     
     		#     	3     	#     	     	     	     	      	     
	     	     
	     P
   C6                                                                                                                                                                                                                                                                                            ccache/ice-9/deprecated.go                                                                          0000644                 00000141470 15154557173 0011333 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0       ][ 4   h ;      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  
deprecated	 		g  filenameS	
f  ice-9/deprecated.scm	g  exportsS	g  substring-move-left!	g  substring-move-right!	g  dynamic-maybe-call	g  dynamic-maybe-link	g  try-module-linked	g  try-module-dynamic-link	g  list*	g  feature?	g  	eval-case	g  unmemoize-expr	g  $asinh	g  $acosh	g  $atanh	g  $sqrt	g  $abs	g  $exp	g  $expt	g  $log	g  $sin	g  $cos	 g  $tan	!g  $asin	"g  $acos	#g  $atan	$g  $sinh	%g  $cosh	&g  $tanh	'g  closure?	(g  %nil	)g  @bind	*g  	bad-throw	+g  error-catching-loop	,g  error-catching-repl	-g  scm-style-repl	.g  apply-to-args	/g  has-suffix?	0g  scheme-file-suffix	1g  
get-option	2g  for-next-option	3g  display-usage-report	4g  transform-usage-lambda	5g  collect	6g  assert-repl-silence	7g  assert-repl-print-unspecified	8g  assert-repl-verbosity	9g  set-repl-prompt!	:g  set-batch-mode?!	;g  repl	<g  pre-unwind-handler-dispatch	=g  default-pre-unwind-handler	>g  handle-system-error	?g  stack-saved?	@g  the-last-stack	Ag  
save-stack	Bg  named-module-use!	Cg  top-repl	Dg  turn-on-debugging	Eg  read-hash-procedures	Fg  process-define-module	Gg  fluid-let-syntax	Hg  set-system-module!	Ig  char-code-limit	Jg  generalized-vector?	Kg  generalized-vector-length	Lg  generalized-vector-ref	Mg  generalized-vector-set!	Ng  generalized-vector->list	O !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMN C	Pg  set-current-module	QP 	RP 	Sg  issue-deprecation-warning	Tf  E`substring-move-left!' is deprecated.  Use `substring-move!' instead.	Ug  substring-move!	Vf  F`substring-move-right!' is deprecated.  Use `substring-move!' instead.	Wg  reverse	Xg  string->symbol	Yg  	substring	Zg  
string-ref	[g  string-length	\g  split-c-module-name	]g  map	^g  c-registered-modules	_g  c-clear-registered-modules	`g  convert-c-registered-modules	ag  registered-modules	bg  append!	cg  register-modules	df  3Autoloading of compiled code modules is deprecated.	ef  7Write a Scheme file instead that uses `load-extension'.	fg  simple-format	gf   (You just autoloaded module ~S.)	hg  warn-autoload-deprecation	ig  or-map	jg  delq!	kg  resolve-module	lg  save-module-excursion	mg  set-module-public-interface!	ng  dynamic-call	og  init-dynamic-module	pf  %`dynamic-maybe-call' is deprecated.  	qf  7Wrap `dynamic-call' in a `false-if-exception' yourself.	rg  catch	sr 	tr 	uf  %`dynamic-maybe-link' is deprecated.  	vf  7Wrap `dynamic-link' in a `false-if-exception' yourself.	wg  dynamic-link	xg  string-append	yf  lib	zg  symbol->string	{f  /	|f   	}f  _	~f  scm_init	g  list->string g  char-alphabetic? g  char-numeric? g  string->list f  _module g  in-vicinity g  try-using-libtool-name g  try-using-sharlib-name g  file-exists? g  link-dynamic-module g  
%load-path g  find-and-link-dynamic-module f  .la f  .so f  "`try-module-linked' is deprecated. f  ,See the manual for how more on C extensions. f  (`try-module-dynamic-link' is deprecated. f  ,'list*' is deprecated.  Use 'cons*' instead. g  cons* f  3`feature?' is deprecated.  Use `provided?' instead. g  	provided? g  make-syntax-transformer     g  macro g  $sc-dispatch     g  _ g  any  g  syntax->datum     g  datum->syntax     f  4`eval-case' is deprecated.  Use `eval-when' instead. g  	assoc-ref g  load-toplevel   g  begin g  *unspecified* g  else   g  syntax-violation     f  -source expression failed to match any pattern g  read-hash-extend f  =The `#y' bytevector syntax is deprecated.  Use `#s8' instead. g  read g  list->s8vector g  error f  !#y needs to be followed by a list f  C`unmemoize-expr' is deprecated. Use `unmemoize-expression' instead. g  unmemoize-expression f  -`$asinh' is deprecated.  Use `asinh' instead. g  asinh f  -`$acosh' is deprecated.  Use `acosh' instead. g  acosh f  -`$atanh' is deprecated.  Use `atanh' instead. g  atanh f  +`$sqrt' is deprecated.  Use `sqrt' instead. g  sqrt f  )`$abs' is deprecated.  Use `abs' instead. g  abs f  )`$exp' is deprecated.  Use `exp' instead. g  exp f  +`$expt' is deprecated.  Use `expt' instead. g  expt f  )`$log' is deprecated.  Use `log' instead. g  log f  )`$sin' is deprecated.  Use `sin' instead. g  sin f  )`$cos' is deprecated.  Use `cos' instead. g  cos f  )`$tan' is deprecated.  Use `tan' instead. g  tan f  +`$asin' is deprecated.  Use `asin' instead. g  asin f  +`$acos' is deprecated.  Use `acos' instead. g  acos f  +`$atan' is deprecated.  Use `atan' instead. g  atan f  +`$sinh' is deprecated.  Use `sinh' instead. g  sinh f  +`$cosh' is deprecated.  Use `cosh' instead. g  cosh f  +`$tanh' is deprecated.  Use `tanh' instead. g  tanh f  3`closure?' is deprecated. Use `procedure?' instead. g  
procedure? g  bound-identifier=? f  1`@bind' is deprecated. Use `with-fluids' instead. g  each-any ތ ߌ  g  syntax-object g  let g  top   g  ribcage g  b0 g  b1     f  l-2f788c0406b05c-348 f  l-2f788c0406b05c-349     g  bound-member     f  l-2f788c0406b05c-33d     g  x     f  l-2f788c0406b05c-33c       g  hygiene     g  each    ߌg  and-mapg  identifier?f  duplicate bound identifierg  generate-temporaries 	 
g  old-vg  v
 f  l-2f788c0406b05c-368f  l-2f788c0406b05c-369  g  idg  val  f  l-2f788c0406b05c-357f  l-2f788c0406b05c-358f  l-2f788c0406b05c-359f  l-2f788c0406b05c-35a  	  g  append   ] !] "g  list#g  dynamic-wind$# %g  lambda&% 'g  set!(' )g  make-module*g  set-module-name!+g  %app,+ -g  module-define-submodule!.g  the-root-module/g  app0g  modules1g  module-public-interface2g  and=>3g  module-local-variable4g  %module-public-interface5g  variable-ref6f  Setting a module's public interface via munging %module-public-interface is
deprecated. Use set-module-public-interface! instead.7g  module-define!8f  m`bad-throw' in the default environment is deprecated.
Find it in the `(ice-9 scm-style-repl)' module instead.9- :9* ;9* <f  w`error-catching-loop' in the default environment is deprecated.
Find it in the `(ice-9 scm-style-repl)' module instead.=9+ >9+ ?f  w`error-catching-repl' in the default environment is deprecated.
Find it in the `(ice-9 scm-style-repl)' module instead.@9, A9, Bf  `scm-style-repl' in the default environment is deprecated.
Find it in the `(ice-9 scm-style-repl)' module instead, or
better yet, use the repl from `(system repl repl)'.C9- D9- Ef  D`apply-to-args' is deprecated. Include a local copy in your program.Ff  J`has-suffix?' is deprecated. Use `string-suffix?' instead (args reversed).Gg  string-suffix?Hf  C`scheme-file-suffix' is deprecated. Use `%load-extensions' instead.If  .scmJf  >`get-option' is deprecated. Use `(ice-9 getopt-long)' instead.Kg  
normal-argLg  string-indexMg  symbol->keywordNg  memberOg  usage-errorPf  -Qf  C`for-next-option' is deprecated. Use `(ice-9 getopt-long)' instead.Rf  H`display-usage-report' is deprecated. Use `(ice-9 getopt-long)' instead.Sg  for-eachTg  string?Uf  <Vf  >Wg  with-output-to-stringXg  displayYg  keyword->symbolZf   [g  make-string\f  
	]g  newline^g  car_g  boolean?`g  %display-usageag  quotebg  %argvcb dg  	%next-argebb fe gg  %opthg  %argig  	%new-argvjghi kg  caself  ,`collect' is deprecated. Define it yourself.m nf  l-2f788c0406b05c-442on po q	p raq sr tߌug  x*vu wf  l-2f788c0406b05c-446xf  l-2f788c0406b05c-447ywx zvy {z	p |{ }{ ~g  cons~{ 5{ f  <`assert-repl-silence' has moved to `(ice-9 scm-style-repl)'.96 96 f  F`assert-repl-print-unspecified' has moved to `(ice-9 scm-style-repl)'.97 97 f  >`assert-repl-verbosity' has moved to `(ice-9 scm-style-repl)'.98 98 f  h`set-repl-prompt!' is deprecated. Use `repl-default-prompt-set!' from
the `(system repl common)' module.g  
module-refg  resolve-interfaceg  systemg  common; g  repl-default-prompt-set!f  C`set-batch-mode?!' is deprecated. Use `ensure-batch-mode!' instead.g  ensure-batch-mode!f  ``set-batch-mode?!' with an argument of `#f' is deprecated. Use the
`*repl-stack*' fluid instead.f  )`repl' is deprecated. Define it yourself.g  current-input-portf  u`pre-unwind-handler-dispatch' is deprecated. Use
`default-pre-unwind-handler' from `(ice-9 scm-style-repl)' directly.9= 9= f  a`default-pre-unwind-handler' is deprecated. Use it from 
`(ice-9 scm-style-repl)' if you need it.f  Z`handle-system-error' is deprecated. Use it from 
`(ice-9 scm-style-repl)' if you need it.9> 9> g  make-variable-transformerf  N`stack-saved?' is deprecated. Use it from
`(ice-9 save-stack)' if you need it.g  free-idf  l-2f788c0406b05c-46d  	 '   g  @ f  l-2f788c0406b05c-47b  	   A  ?   f  l-2f788c0406b05c-474f  l-2f788c0406b05c-475  	 '   A  ?  f  P`the-last-stack' is deprecated. Use it from `(ice-9 save-stack)'
if you need it.f  l-2f788c0406b05c-483  f  l-2f788c0406b05c-47e  	   A  @  f  L`save-stack' is deprecated. Use it from `(ice-9 save-stack)' if you need
it.A A A f  E`named-module-use!' is deprecated. Define it yourself if you need it.g  module-use!f  6`top-repl' has moved to the `(ice-9 top-repl)' module.C g  debug-enableg  memqg  debugf  6`(debug-enable 'debug)' is obsolete and has no effect.f  Remove it from your code.g  delqf  <`(turn-on-debugging)' is obsolete and usually has no effect.f  .Debugging capabilities are present by default.g  	backtraceg  read-enableg  	positionsf  %`read-hash-procedures' is deprecated.f  .Use the fluid `%read-hash-procedures' instead.g  read-hash-procedures-warning  g  m-2f788c0406b05c-48f  f  l-2f788c0406b05c-491  g  shiftg  exp1g  varg  exp2  f  l-bde397a-1becf  l-bde397a-1bedf  l-bde397a-1beef  l-bde397a-1beff  l-bde397a-1bf0  g  xx f  l-bde397a-1bda  		   '    g  expr f  l-2f788c0406b05c-494  	 	 
 
 g  
fluid-set! g  %read-hash-procedures ތf  l-2f788c0406b05c-497  	    g  	fluid-ref      	   ! " #" $ % &$% '!#& (f  E`process-define-module' is deprecated.  Use `define-module*' instead.)g  pureS*g  versionS+g  
duplicatesS,g  transformerS-g  importsS.g  reverse!/g  
re-exportsS0g  replacementsS1g  	autoloadsS2g  
use-moduleS3g  
use-syntaxS4f  )missing argument to define-module keyword5g  syncase65 7f  L(ice-9 syncase) is deprecated. Support for syntax-case is now in Guile core.8g  autoloadS9g  no-backtraceS:g  exportS;g  export-syntaxS<g  	re-exportS=g  re-export-syntaxS>g  replaceS?g  replace-syntaxS@f  #unrecognized define-module argumentAf  A`fluid-let-syntax' is deprecated.  Use syntax parameters instead.Bg  syntax-parameterizeCg  kDg  body0Eg  bodyFCDE Gf  l-2f788c0406b05c-4edHf  l-2f788c0406b05c-4eeIf  l-2f788c0406b05c-4efJf  l-2f788c0406b05c-4f0KGHIJ LFK Mf  l-2f788c0406b05c-4eaNM ON PL	O QBP Rf  9`close-io-port' is deprecated.  Use `close-port' instead.Sg  
close-portTg  close-io-portUf  @`set-system-module!' is deprecated.  There is no need to use it.Vg  set-procedure-property!Wg  module-eval-closureXg  system-moduleYf  T`module-eval-closure' is deprecated.  Use module-variable or module-define! instead.Zg  standard-eval-closureC 5   hp  .  ]4	
O5 4R >  "  G   STU      h(      -  1  3 4>  "  G   @              g  args
			!  g  filenamef  ice-9/deprecated.scm
	T		
	U			V			U		!	W	 			!


  g  nameg  substring-move-left! CRSVU      h(      -  1  3 4>  "  G   @              g  args
			!  g  filenamef  ice-9/deprecated.scm
	Y		
	Z			[			Z		!	\	 			!


  g  nameg  substring-move-right! CRWXYZ[ h   x  ]!"  k$  44 5564 5 &  '44 55""

4 5" p      g  str
	  g  rev		q g  start			q g  pos			q g  end			q  g  filenamef  ice-9/deprecated.scm
	c
		d			i			h			j			j	%	!	j		$	j		&	j		'	k		5	h		6	l		9	l	"	E	l		H	l		K	m		N	n		\	l		c	q		q	q		q	d		r	d		u	g	 	d	 	   g  nameg  split-c-module-name C\R]\    h      ]4 5 L  C     w       g  c
		  g  filenamef  ice-9/deprecated.scm
	t			u			u	/	
	u			u	8		u	 		   C^_  h(      ]	4 O 45 54>   "  G  C       g  dynobj
		( g  res		(  g  filenamef  ice-9/deprecated.scm
	s
		t			v			t			t			w	 		(  g  nameg  convert-c-registered-modules C`RaRb`a   h      ]44 55 C           g  dynobj
		  g  filenamef  ice-9/deprecated.scm
	|
		~			~			~			}	 		  g  nameg  register-modules CcRSdefg       h(      ]4>  "  G  4 56           g  modname
		$  g  filenamef  ice-9/deprecated.scm
 
	 		 			 		 		 		 		" 		$ 	 
		$  g  nameg  warn-autoload-deprecation ChRcihjaklPmn        h8   u   ] 4L>  "  G  4LL>  "  G  L L 6   m       g  filenamef  ice-9/deprecated.scm
 		 		 		- 	%	1 	4	5 	 		5
   C        hP      ]	 L $  B4L >  "  G  4 5 4L 54 O >  "  G  CC       g  modinfo
		P g  mod	1	N  g  filenamef  ice-9/deprecated.scm
 	
	 		 		 		 		 	+	) 		* 		1 		4 	 		P   Ca    h       ]4>  "  G   O 6       g  modname
		   g  filenamef  ice-9/deprecated.scm
 
	 		  	 		   g  nameg  init-dynamic-module CoRSpqtn       h   Q   ] LL 6      I       g  filenamef  ice-9/deprecated.scm
 		
 	 		

   C     h   ]   -  1  3 C     U       g  args
			  g  filenamef  ice-9/deprecated.scm
 	 			


   C        h(      ]4>  "  G   O 6         g  name
		& g  dynobj		&  g  filenamef  ice-9/deprecated.scm
 
	 		 			 		 		& 	 		&	  g  nameg  dynamic-maybe-call CRSuvtw    h   Q   ] L 6I       g  filenamef  ice-9/deprecated.scm
 		 	 		
   C     h   ]   -  1  3 C     U       g  args
			  g  filenamef  ice-9/deprecated.scm
 	 			


   C        h(      ]4>  "  G   O 6           g  filename
		$  g  filenamef  ice-9/deprecated.scm
 
	 		 			 		 		$ 	 		$  g  nameg  dynamic-maybe-link CRxyz{|]x}z    h   s   ]4 56 k       g  s
		  g  filenamef  ice-9/deprecated.scm
 	*	 	;	 	;	 	, 		   C~ h0      ]	4 5$  "  4 5$   C_C             g  c
		* g  t			   g  filenamef  ice-9/deprecated.scm
 	&	 	0		 	,	 	0	$ 	( 		*   C   h     ]9"  9(  4455"  (4455" "44 5?44	4
45555"  g(  C4545$  "  	45"  	"$  45$  6"""     w      g  module-name
	  g  dirs		? g  syms			? g  mod-name	Y	z g  subdir-and-libname	z  g  init		z  g  subdir	   g  libname	   g  dir-list	   g  dir	   g  t	   g  sharlib-full	    g  filenamef  ice-9/deprecated.scm
 
	 				 		 		 		 	)	 	/	 	?	 	/	 		 		$ 		) 	)	. 	9	0 	)	2 	E	4 		7 		? 		? 			A 		K 			L 		O 	%	Y 		Y 		\ 		` 		a 		d 	!	i 	&	q 	!	s 		u 		w 		z 	  	  	  	  	  	  	  	%  	  	  	  	  	  	  	  	  	  	$  	  	  	 9	   g  nameg  find-and-link-dynamic-module CRx  h(      ]
4 45545$  CC           g  libdir
		$ g  libname		$ g  libtool-filename			$  g  filenamef  ice-9/deprecated.scm
 
	 		 	'	 	>	 	'	 		 		 			 	 
		$	  g  nameg  try-using-libtool-name CRx h      ] 456              g  libdir
		 g  libname		  g  filenamef  ice-9/deprecated.scm
 
	 		 	-	 		 	 			  g  nameg  try-using-sharlib-name CRcwn   h8      ]
4>  "  G  4 54>  "  G  6         g  filename
		6 g  initname		6 g  dynobj			6  g  filenamef  ice-9/deprecated.scm
 
	 		 		 		 		6 	 		6	  g  nameg  link-dynamic-module CRSo    h       ]4>  "  G   6           g  module-name
		  g  filenamef  ice-9/deprecated.scm
 
	 		 			 		 		 	 		  g  nameg  try-module-linked CRSo   h0      ]4>  "  G  4 5$   6C              g  module-name
		)  g  filenamef  ice-9/deprecated.scm
 
	 		 			 		 		 		! 		' 	 			)  g  nameg  try-module-dynamic-link CRS       h(      -  1  3 4>  "  G   @              g  args
			!  g  filenamef  ice-9/deprecated.scm
 
	
 		 		 		! 	 			!


  g  nameg  list* CRS h       ]4>  "  G   6             g  sym
		  g  filenamef  ice-9/deprecated.scm
 
	 		 		 		 	 		  g  nameg  feature? CR4S 	     hX      -  1  3 4>  "  G  4 5$  	C4 5$  	CC             g  clauses
			R g  t	$	R g  t		>	R  g  filenamef  ice-9/deprecated.scm
 
	
 		 		 				"		$		$		.			6		<		>		>		H
			Q	 			R


   C   h   i   ]	4 5L 4?6a       g  args
		 g  v			  g  filenamef  ice-9/deprecated.scm	 
 		   C        h(   g   ]	4 5$   O @ 6 _       g  y
		' g  tmp		'  g  filenamef  ice-9/deprecated.scm
 
 		'   C5R4iyS     h8      ]
4>  "  G  45$  66             g  c
		2 g  port		2 g  x			2  g  filenamef  ice-9/deprecated.scm
											 		$		*		.		2	 		2	   C>  "  G  S       h(      -  1  3 4>  "  G   @              g  args
			!  g  filenamef  ice-9/deprecated.scm

	
						!	 			!


  g  nameg  unmemoize-expr CRS        h       ]4>  "  G   6             g  z
		  g  filenamef  ice-9/deprecated.scm

	 		!		 		"	 		  g  nameg  $asinh CRS     h       ]4>  "  G   6             g  z
		  g  filenamef  ice-9/deprecated.scm
#
	$		%		$		&	 		  g  nameg  $acosh CRS     h       ]4>  "  G   6             g  z
		  g  filenamef  ice-9/deprecated.scm
'
	(		)		(		*	 		  g  nameg  $atanh CRS     h       ]4>  "  G   6             g  z
		  g  filenamef  ice-9/deprecated.scm
+
	,		-		,		.	 		  g  nameg  $sqrt CRS      h       ]4>  "  G   6             g  z
		  g  filenamef  ice-9/deprecated.scm
/
	0		1		0		2	 		  g  nameg  $abs CRS       h       ]4>  "  G   6             g  z
		  g  filenamef  ice-9/deprecated.scm
3
	4		5		4		6	 		  g  nameg  $exp CRS       h       ]4>  "  G   6           g  z1
		 g  z2		  g  filenamef  ice-9/deprecated.scm
7
	8		9		8		:	 			  g  nameg  $expt CRS     h       ]4>  "  G   6             g  z
		  g  filenamef  ice-9/deprecated.scm
;
	<		=		<		>	 		  g  nameg  $log CRS       h       ]4>  "  G   6             g  z
		  g  filenamef  ice-9/deprecated.scm
?
	@		A		@		B	 		  g  nameg  $sin CRS       h       ]4>  "  G   6             g  z
		  g  filenamef  ice-9/deprecated.scm
C
	D		E		D		F	 		  g  nameg  $cos CRS       h       ]4>  "  G   6             g  z
		  g  filenamef  ice-9/deprecated.scm
G
	H		I		H		J	 		  g  nameg  $tan C RS       h       ]4>  "  G   6             g  z
		  g  filenamef  ice-9/deprecated.scm
K
	L		M		L		N	 		  g  nameg  $asin C!RS      h       ]4>  "  G   6             g  z
		  g  filenamef  ice-9/deprecated.scm
O
	P		Q		P		R	 		  g  nameg  $acos C"RS      h       ]4>  "  G   6             g  z
		  g  filenamef  ice-9/deprecated.scm
S
	T		U		T		V	 		  g  nameg  $atan C#RS      h       ]4>  "  G   6             g  z
		  g  filenamef  ice-9/deprecated.scm
W
	X		Y		X		Z	 		  g  nameg  $sinh C$RS      h       ]4>  "  G   6             g  z
		  g  filenamef  ice-9/deprecated.scm
[
	\		]		\		^	 		  g  nameg  $cosh C%RS      h       ]4>  "  G   6             g  z
		  g  filenamef  ice-9/deprecated.scm
_
	`		a		`		b	 		  g  nameg  $tanh C&RS      h       ]4>  "  G   6             g  x
		  g  filenamef  ice-9/deprecated.scm
d
	e		f		e		g	 		  g  nameg  closure? C'R(R4)   h8      ]
(  C4 5$  C4L 5$  CC             g  id
		2 g  ids		2 g  t		%	2  g  filenamef  ice-9/deprecated.scm
p		q		r		r	$	r		q		s		 s		#s	%	%s		%q	 		2	  g  nameg  bound-member CS      h   :   ] C   2       g  b0
		 g  b1		  			   C     h      ] 6             g  id
		
 g  val		
 g  b0			
 g  b1			
  g  filenamef  ice-9/deprecated.scm	
|	 		
	   C)!"$&(   h   b   ]  C    Z       g  tmp-2f788c0406b05c-371
		 g  tmp-2f788c0406b05c-370		  			   C(       h   b   ]  C    Z       g  tmp-2f788c0406b05c-374
		 g  tmp-2f788c0406b05c-373		  			   C 	  hX   <   ]44 L54L554L5LL 4 L5  C      4       g  old-v
		R g  v		R  		R	   C 
    h   U  ]"  ((  "  %4L5$  "  " "$  
L 64 54 5 45$   O @	6      M      g  id
	  g  val	  g  b0		  g  b1		  g  ids			. g  tmp		U  g  tmp		`   g  filenamef  ice-9/deprecated.scm	}		~					"		,			 ~		(		.		.}		:}		>		@	$	D		E	&	L	"	U	 	 	   C        hx      ]O Q 4>  "  G  4 5$  @4 5"  		 6$  4
?$   O @""         g  x
		v g  bound-member	
	v g  tmp		*	v g  tmp		A	v  g  filenamef  ice-9/deprecated.scm
o		u		v		u	 		v   C5)R4)i	5 4*i ,>  "  G  4-i.i+ >  "  G  4-i.i/ >  "  G  4-i 04ki5>  "  G   1i 2345S6m     hX      ]	4L  5$  C44 55$  )4>  "  G  4 >  "  G  CC        g  mod
		W g  t			W g  t	$	W  g  filenamef  ice-9/deprecated.scm
						
						2	 		$		$		-		1
	6		?	 		W   C O  1imi 74  h       ]4L  >  "  G   6       g  mod
		  g  iface		   g  filenamef  ice-9/deprecated.scm
			
			 	
 		 	   C O  miS8;        h(      - 1 3 4>  "  G   @            g  key
			# g  args			#  g  filenamef  ice-9/deprecated.scm

	
						#	 			#
  g  nameg  	bad-throw C*RS<>   h       ]4>  "  G   6             g  thunk
		  g  filenamef  ice-9/deprecated.scm

										 		  g  nameg  error-catching-loop C+RS?A h       ]4>  "  G   6         g  r
		 g  e		 g  p			  g  filenamef  ice-9/deprecated.scm

										 			  g  nameg  error-catching-repl C,RSBD       h      ] 4>  "  G  6        g  filenamef  ice-9/deprecated.scm

										 		
  g  nameg  scm-style-repl C-RSE     h       ]4>  "  G   @             g  args
		 g  fn		  g  filenamef  ice-9/deprecated.scm

								 			  g  nameg  apply-to-args C.RSFG h       ]4>  "  G   6           g  str
		 g  suffix		  g  filenamef  ice-9/deprecated.scm

								 			  g  nameg  has-suffix? C/RSHI        h      ] 4>  "  G  C        g  filenamef  ice-9/deprecated.scm
									 		
  g  nameg  scheme-file-suffix C0RSJZ[KLMYNOxP       h  L  ], H 4>  "  G  J (  J 6-4J 
5$  "  
4J 5$  J J 6-4J 5&  4J =5$  "  4J 544J 	554	54	54J 5&  "  4J 4J 55$  "  $  J K J "  $  "  $  J 6
J 64J 	5454	5$  @4J 	4J 55
45$  J "  45J 64	5$  Q4J 	4J 55
45$  J "  
45$  J "  J 6
J 6D      g  argv
	 g  kw-opts	 g  kw-args		 g  return		 g  t		3	M g  t		v  g  
kw-arg-pos	 - g  kw	 - g  kw-opt?	 - g  kw-arg?	 - g  t	  g  arg	- g  char	8 g  kw	A g  rest-car	b g  new-argv	 g  rest-car	 g  arg	 g  new-argv	  g  filenamef  ice-9/deprecated.scm

									&		)		.	"	1		2		3		3		A		F		H		J		Q		U		X		[	#	]		`		e		h		l		m		r	)	v		v	 	 	* 	 	 	 	  	+ 	  	 	 	 	  	 	 	. 	= 	. 	 	 	$ 	$ 	$ 	3 	$ 	 	 	 	+ 	  	7		
	 	"	
&		+		"-		
.	3	8	8	;	A	D	P	Q	V	$Y	1^	@`	1b	b	f	"m	q	t	y	#}	2	#	@			
				$	1	@	1								"						
!	!	 u		  g  nameg  
get-option C1RSQ1      h      ] $  L  L6C         g  opt
		 g  opt-arg		 g  argv			  g  filenamef  ice-9/deprecated.scm
(		)		)	 			   C  h   u   ] LLLL O 6   m       g  argv
		  g  filenamef  ice-9/deprecated.scm
&		'	 		  g  nameg  loop C1       h      ] $  L  L6C         g  opt
		 g  opt-arg		 g  argv			  g  filenamef  ice-9/deprecated.scm
(		)		)	 			   C  h@      ]4>  "  G  O  Q  O 6          g  proc
		= g  argv		= g  kw-opts			= g  kw-args			= g  loop			=  g  filenamef  ice-9/deprecated.scm
#
	$		%		$		&		='	 		=	  g  nameg  for-next-option C2RSRSTxUV|W]XYZ        h       ]44 5>  "  G  6 }       g  x
		  g  filenamef  ice-9/deprecated.scm
<	%	<	1	<	:	<	1	<	X	<	O 		   C        h   Q   ] L 6      I       g  filenamef  ice-9/deprecated.scm
;		
<	  		

   C[[\X]      h     ]1 $  C $  C  45$  "  45$  45"  44O 554	5	$  )4	5	($  4
	4	5 5"  "  4>  "  G  4>  "  G  4>  "  G  6        g  kw
	  g  t	  g  t	  g  help	'  g  opts		,  g  opts-proper		C  g  arg-name		c  g  	left-part		x  g  middle-part	    	g  filenamef  ice-9/deprecated.scm
/		0		0			0		1		1		1			0		&3		'2			,4		,2			/5	!	45	*	65	!	:5		=5	6	C2			F6		K6	'	M6		Q6		R7		V7	-	Y7	1	[7	<	]7		c8		c2			f9		i:		x9		x2			{?	) ?	& ?	 @	) @	& ?	! A	! A	4 A	. A	! B	! 2		 C	 D	 E	 F	 2	    C    h       ]4>  "  G   6           g  kw-desc
		  g  filenamef  ice-9/deprecated.scm
+
	,		-		,		.	 		  g  nameg  display-usage-report C3RSRj]^_     hX      ]	 $  "   $   $  "   C $  C4 5$  "  $  C C             g  x
		R g  t	'	R g  t	D	R  g  filenamef  ice-9/deprecated.scm
M	#	N	2		N	(	N	$	N	2	N	(	&O	6	'O	-	'N	$	3P	-	8P	7	:P	-	>P	(	DN	$ 		R   CT     h   |   ]4 5$  C C     t       g  x
		  g  filenamef  ice-9/deprecated.scm
U	%	U	;	U	D	
U	;	U	1 		   CT     h      ]4 5$   CC    }       g  x
		  g  filenamef  ice-9/deprecated.scm
V	%	V	6	V	?	
V	6	V	1	V	H 		   C_T       hp   A  ] 45$  "  $  "  8$  "  *45$  "  45$  "   C   9      g  case
		m g  opts		h g  t			#  g  filenamef  ice-9/deprecated.scm
W	$	X	8	X	,	Y	6	Y	2	Y	K	 Y	F	'Y	.	0\	=	1\	4	5[	2	<]	4	A]	>	C]	4	G[	2	N^	4	S^	=	V^	4	Z[	2	]^	J	e_	9	k`	,	lX	& 		m   C`%3acdf1bjkg        h     ]94>  "  G  44 5545454544	5?44
5?4 5            C         g  cases
	  g  	raw-usage	$  g  usage-sans-specials		/  g  
usage-desc		9  g  kw-desc		D  g  kw-opts		T  g  kw-args		d  g  transmogrified-cases		o   g  filenamef  ice-9/deprecated.scm
I
	J		K		J		L		L		L	!	$L		$L		'M		/L		2S		9L		<T		DL		GU		JU	 	TU		TL		WV		ZV	 	dV		dL		gW		oL		sb	 	   g  nameg  transform-usage-lambda C4R45Slms    h      ] C          		
   Ct|}    h    9   ]     C  1       g  x
		 g  x*		  			   C 
       hP      ]4>  "  G  4 5$  @4 5$  @	 6            g  x
		K g  tmp		K g  tmp		4	K  g  filenamef  ice-9/deprecated.scm
u		v		w		v	 		K   C55RS   h       ]4>  "  G   6             g  v
		  g  filenamef  ice-9/deprecated.scm

										 		  g  nameg  assert-repl-silence C6RS     h       ]4>  "  G   6             g  v
		  g  filenamef  ice-9/deprecated.scm

										 		  g  nameg  assert-repl-print-unspecified C7RS   h       ]4>  "  G   6             g  v
		  g  filenamef  ice-9/deprecated.scm

										 		  g  nameg  assert-repl-verbosity C8RS  h(      ]4>  "  G  4455 6         g  v
		&  g  filenamef  ice-9/deprecated.scm

												"			 		"		&	 		&  g  nameg  set-repl-prompt! C9RS        h8      ] $  4>  "  G  6 4>  "  G  C             g  arg
		2  g  filenamef  ice-9/deprecated.scm

														#		(	 
		2  g  nameg  set-batch-mode?! C:RS   hP   6  ]4>  "  G  "  '445>  "  G  4 45 5"4 45 5" .      g  read
		O g  evaler		O g  print			O g  source			?  g  filenamef  ice-9/deprecated.scm

													'		0	
	3		9	
	?		?		@		C		I		O	 		O	  g  nameg  repl C;RS   h(      - 1 3 4>  "  G   @            g  key
			# g  args			#  g  filenamef  ice-9/deprecated.scm

	
						#	 			#
  g  nameg  pre-unwind-handler-dispatch C<RS h(      - 1 3 4>  "  G   @            g  key
			# g  args			#  g  filenamef  ice-9/deprecated.scm

	
						#	 			#
  g  nameg  default-pre-unwind-handler C=RS  h(      - 1 3 4>  "  G   @            g  key
			# g  args			#  g  filenamef  ice-9/deprecated.scm

	
						#	 			#
  g  nameg  handle-system-error C>R4?4iS      h   Z   ] 6R       g  id
		  g  filenamef  ice-9/deprecated.scm		 		   C       h   *   ]C   "       g  id
		  		   C   h   k   ] 6c       g  id
		 g  val		  g  filenamef  ice-9/deprecated.scm		 			   C   h   ;   ] C    3       g  id
		 g  val		  			   C  hh      ]4>  "  G  4 5"  !  4?$  @ 6$  4	?$  
@""            g  x
		c g  tmp		c g  tmp		(	D  g  filenamef  ice-9/deprecated.scm
							 		c   C55?R4@S h   Z   ] 6R       g  id
		  g  filenamef  ice-9/deprecated.scm		 		   C       h   *   ]C   "       g  id
		  		   C       h8      ]	4>  "  G    4?$  @ 6   {       g  x
		5 g  tmp		5  g  filenamef  ice-9/deprecated.scm
							 		5   C5@RS    h(      -  1  3 4>  "  G   @              g  args
			!  g  filenamef  ice-9/deprecated.scm

	
						!	 			!


  g  nameg  
save-stack CARSk     h(      ]4>  "  G  4 5456         g  user
		& g  usee		&  g  filenamef  ice-9/deprecated.scm

										%	&	 		&	  g  nameg  named-module-use! CBRSkC  h(      ] 4>  "  G  44556            g  filenamef  ice-9/deprecated.scm

															 	2	"		$	 		$
  g  nameg  top-repl CCRi S   h@      -  1  3 4 5$  !4>  "  G  L 4 5@L  @          g  opts
			=  g  filenamef  ice-9/deprecated.scm
		
							
							"		-	$	1	*	5	$	7		=	 			=


   C O  iS h0      ] 4>  "  G  4>  "  G  6         g  filenamef  ice-9/deprecated.scm

														 		,		.	 		.
  g  nameg  turn-on-debugging CDRS   h      ] 6             g  filenamef  ice-9/deprecated.scm

					
	 		

  g  nameg  read-hash-procedures-warning CR4E4	        h   ,   ]   C     $       g  expr
		  		   C  h   )   ] C!       g  x
		  		   C        h   I   ] 6A       g  filenamef  ice-9/deprecated.scm	 	 		
   C'        h      ] C          		
   C    hh      ]4 5$  @4 5$  @4 5"  	 6$  4	?$  
@""        g  x
		g g  tmp		g g  tmp		"	g g  tmp		9	g  g  filenamef  ice-9/deprecated.scm
 	 		g  g  
macro-typeg  variable-transformer C55ERS(	)*+,-./012346789:;<=>?@       hX    ]y4>  "  G   HHHHH" (  3JJJJJ	4
5	
6$  "  $  $  "  4>  "  G  $  04>  "  G  	

	"B&  K"   	

	"$  n$  	"  $  "  4>  "  G  	

	"$  	

	"n$   K	

	"E$  R$  "  4>  "  G  K	

	"$  K$  "  4>  "  G  K	

	"$  "  $  U$  "  4>  "  G  4	5

	"*$  "  $  U$  "  4>  "  G  	4
5
	"$  "  $  U$  "  4>  "  G  	
45
	"R$  R$  "  4>  "  G  K	

	"6 
	"         g  args
	U g  name	U g  filename		U g  pure?		U g  version		U g  
duplicates		U g  transformer		U g  kws		,= g  imports		,= g  exports			,= g  
re-exports	
	,= g  replacements		,= g  	autoloads		,= g  key		h= g  t	   g  kw	   g  
iface-spec	 ! g  t	<f g  kw	Jc g  name	o g  bindings	o g  t	 g  kw	 g  kw	Yr g  t	 g  kw	 g  t	G g  kw	+D g  t	 g  kw	 g  t	 g  kw	   g  filenamef  ice-9/deprecated.scm

													,		2		M"		e	
	h'		h'	
 )	 )	 )	 *	 *	 
	 
	 
	 ,	 ,	" ,	 +	 -	 .	 -	 /	 /	 2	! 2	 3	 3	 4	5		6	!5	*'	
-9	.9	29	59	/79	(<9	J:	J:	M
	Q
	X
	i;	m<	o;	v=	?	"=	'	
C	C	'	
F	G	G	'	
J	J	J	K	K	
		
	
	!L	$L	'M	BM	K'	
NP	OP	SP	YQ	YQ	\
	`
	g
	uR	xR	{S	S	'	
V	V	V	W	W	
	
	
	X	Y	Y	+Y	X	'	
\	\	\	+]	+]	.
	2
	9
	J^	P_	#W_	6Z_	#n^	w'	
b	b	b	c	c	
	
	
	d	f	f	(f	d	'	
h	h	h	i	i	
	
	
	j	j	k	5k	9	=	=	@	A	B	C	D	E	U	 	U  g  nameg  process-define-module CFR4GSAQ!"   h   ]   ]4 5C U       g  k
		 g  v		 g  body0			 g  body			  			   C    h8      ]	4>  "  G  4 5$  @ 6    {       g  x
		4 g  tmp		4  g  filenamef  ice-9/deprecated.scm
q		r		s		r	 		4   C5GRSRS    h       ]4>  "  G   6             g  port
		  g  filenamef  ice-9/deprecated.scm
y
	z		{		z		|	 		  g  nameg  close-io-port CTRSUVWX  h(      ]4>  "  G  4 56            g  m
		# g  s		#  g  filenamef  ice-9/deprecated.scm
~
										3	#	 		#	  g  nameg  set-system-module! CHRSYZ      h       ]4>  "  G   6             g  m
		  g  filenamef  ice-9/deprecated.scm
										 		  g  nameg  module-eval-closure CWi IRC       &      g  m
		( g  %app
5e5 g  getter
57I g  setter
7R8 g  debug-enable
jkJ  g  filenamef  ice-9/deprecated.scm		
	S
	X
	c
	s
	z		z
s	|
 

B 
5 
 
" 
] 
C 
h 
O 
_ 
5 
 


 
!i#
"1'
"+
#/
$3
%a7
&';
&?
'C
(G
)HK
*O
*S
+W
,h[
-0_
-d
-i
5\	5e
5h	5r	5w	5	5	,5	5	5	,5	5	5	!5	*5	:5	*5	5	7N
7R	8
9	
9
:
;
<
=l
>.
F
J#
O+
WI
Z?
[)
\	
]!
^9
_
`
a
b
b	h
i
j	
j	kO
lY
m
m 	}>
y
      ~
      a
      g
 a	      i
   C6                                                                                                                                                                                                         ccache/ice-9/safe-r5rs.go                                                                           0000644                 00000011420 15154557173 0011031 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4    hS      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  	safe-r5rs	 		g  filenameS	
f  ice-9/safe-r5rs.scm	g  exportsS	g  null-environment	 	g  
re-exportsS	g  eqv?	g  eq?	g  equal?	g  number?	g  complex?	g  real?	g  	rational?	g  integer?	g  exact?	g  inexact?	g  =	g  <	g  >	g  <=	g  >=	g  zero?	g  	positive?	 g  	negative?	!g  odd?	"g  even?	#g  max	$g  min	%g  +	&g  *	'g  -	(g  /	)g  abs	*g  quotient	+g  	remainder	,g  modulo	-g  gcd	.g  lcm	/g  	numerator	0g  denominator	1g  rationalize	2g  floor	3g  ceiling	4g  truncate	5g  round	6g  exp	7g  log	8g  sin	9g  cos	:g  tan	;g  asin	<g  acos	=g  atan	>g  sqrt	?g  expt	@g  make-rectangular	Ag  
make-polar	Bg  	real-part	Cg  	imag-part	Dg  	magnitude	Eg  angle	Fg  exact->inexact	Gg  inexact->exact	Hg  number->string	Ig  string->number	Jg  boolean?	Kg  not	Lg  pair?	Mg  cons	Ng  car	Og  cdr	Pg  set-car!	Qg  set-cdr!	Rg  caar	Sg  cadr	Tg  cdar	Ug  cddr	Vg  caaar	Wg  caadr	Xg  cadar	Yg  caddr	Zg  cdaar	[g  cdadr	\g  cddar	]g  cdddr	^g  caaaar	_g  caaadr	`g  caadar	ag  caaddr	bg  cadaar	cg  cadadr	dg  caddar	eg  cadddr	fg  cdaaar	gg  cdaadr	hg  cdadar	ig  cdaddr	jg  cddaar	kg  cddadr	lg  cdddar	mg  cddddr	ng  null?	og  list?	pg  list	qg  length	rg  append	sg  reverse	tg  	list-tail	ug  list-ref	vg  memq	wg  memv	xg  member	yg  assq	zg  assv	{g  assoc	|g  symbol?	}g  symbol->string	~g  string->symbol	g  char? g  char=? g  char<? g  char>? g  char<=? g  char>=? g  	char-ci=? g  	char-ci<? g  	char-ci>? g  
char-ci<=? g  
char-ci>=? g  char-alphabetic? g  char-numeric? g  char-whitespace? g  char-upper-case? g  char-lower-case? g  char->integer g  integer->char g  char-upcase g  char-downcase g  string? g  make-string g  string g  string-length g  
string-ref g  string-set! g  string=? g  string-ci=? g  string<? g  string>? g  	string<=? g  	string>=? g  string-ci<? g  string-ci>? g  string-ci<=? g  string-ci>=? g  	substring g  string-append g  string->list g  list->string g  string-copy g  string-fill! g  vector? g  make-vector g  vector g  vector-length g  
vector-ref g  vector-set! g  vector->list g  list->vector g  vector-fill! g  
procedure? g  apply g  map g  for-each g  force g  call-with-current-continuation g  values g  call-with-values g  dynamic-wind g  eval g  input-port? g  output-port? g  current-input-port g  current-output-port g  read g  	read-char g  	peek-char g  eof-object? g  char-ready? g  write g  display g  newline g  
write-char  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~  g  set-current-module     g  resolve-interface g  null   g  null-interface g  module-use! g  module-public-interface g  current-module g  	scm-error g  
misc-error f  ~A is not a valid version g  make-module g  set-module-kind! g  	interfaceC 5h     ]4	
5 4 >  "  G   4i5R4i4i4i5 5i>  "  G   
     h`     ]	 	$  "  4  >  "  G  4	54>  "  G  4	>  "  G  C       g  n
		_ g  	interface	2	_  g  filenamef  ice-9/safe-r5rs.scm
 
	 		 		 		 		 		 		 		 		# 		, 		2 		5 		; 	 	@ 		I 	 		_  g  nameg  null-environment CRC          g  m
		,  g  filenamef  ice-9/safe-r5rs.scm		
	- 		3 	*	5 		8 
	9 
	> 		C 	&	K 		T 
 
 	
   C6                                                                                                                                                                                                                                                 ccache/ice-9/serialize.go                                                                           0000644                 00000011676 15154557173 0011226 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] 4 4  h^      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  	serialize	 		g  filenameS	
f  ice-9/serialize.scm	g  importsS	g  threads	 	 	 	g  exportsS	g  call-with-serialization	g  call-with-parallelization	g  parallelize	 	g  set-current-module	 	 	g  
make-mutex	g  serialization-mutex	g  admin-mutex	g  owner	g  
lock-mutex	g  dynamic-root	g  unlock-mutex	g  make-syntax-transformer	  	! 	"g  macro	#g  $sc-dispatch	$# 	%# 	&g  _	'g  any	(&'	)g  syntax->datum	*) 	+) 	,g  datum->syntax	-, 	., 	/g  lambda	0g  syntax-violation	10 	20 	3f  -source expression failed to match any patternC 5     h`     ]4	
5 4 >  "  G   4i5 R4i5 RR   hX      ] 4>  "  G  N M 45 $  64>  "  G  4>  "  G  45  C        g  filenamef  ice-9/serialize.scm
	F			G	
		H	
		I	%	 	I		$	I	
	*	N		+	K		=	L		O	M		U	M	 		W
   C  h@   ~   ] 4>  "  G  M 45 $  "   4>  "  G  6 v       g  filenamef  ice-9/serialize.scm
	P			Q	
		R	%		R		 	R	
	'	T		(	U		?	V	
 			?
   C  hX      ] 4>  "  G  N M 45 $  64>  "  G  4>  "  G  45  C        g  filenamef  ice-9/serialize.scm
	F			G	
		H	
		I	%	 	I		$	I	
	*	N		+	K		=	L		O	M		U	M	 		W
   C  h@   ~   ] 4>  "  G  M 45 $  "   4>  "  G  6 v       g  filenamef  ice-9/serialize.scm
	P			Q	
		R	%		R		 	R	
	'	T		(	U		?	V	
 			?
   C  h@   ~   ] 4>  "  G  M 45 $  "   4>  "  G  6 v       g  filenamef  ice-9/serialize.scm
	P			Q	
		R	%		R		 	R	
	'	T		(	U		?	V	
 			?
   C       h`      ]	HO O 4O >   "  G  V4 >   X4O >   "  G  CX4O >   "  G  F        g  thunk
		_ g  outer-owner		_  g  filenamef  ice-9/serialize.scm
	C
		D			E	 		_  g  nameg  call-with-serialization CR4!"%(+./       h   c   -  1  3   C  [       g  forms
			  g  filenamef  ice-9/serialize.scm
	X
		Y	 			


   C  h   g   ]	4 5L 4?6_       g  args
		 g  v			  g  filenamef  ice-9/serialize.scm		X
 		   C23  h(   e   ]	4 5$   O @ 6 ]       g  y
		' g  tmp		'  g  filenamef  ice-9/serialize.scm
	X
 		'   C5R     hH      ] 4>  "  G  N M 45 $   4>  "  G  "   6     ~       g  filenamef  ice-9/serialize.scm
	^			_	
		`	
		a	 	 	a		$	a	
	'	c		(	d		C	e	
 
		C
   C  hP      ] 4>  "  G  M 45 $  *4>  "  G  4>  "  G  M  C6~       g  filenamef  ice-9/serialize.scm
	g			h	
		i	 		i		 	i	
	!	k		3	l		H	m		P	n	 
		P
   C  hH      ] 4>  "  G  N M 45 $   4>  "  G  "   6     ~       g  filenamef  ice-9/serialize.scm
	^			_	
		`	
		a	 	 	a		$	a	
	'	c		(	d		C	e	
 
		C
   C  hP      ] 4>  "  G  M 45 $  *4>  "  G  4>  "  G  M  C6~       g  filenamef  ice-9/serialize.scm
	g			h	
		i	 		i		 	i	
	!	k		3	l		H	m		P	n	 
		P
   C  hP      ] 4>  "  G  M 45 $  *4>  "  G  4>  "  G  M  C6~       g  filenamef  ice-9/serialize.scm
	g			h	
		i	 		i		 	i	
	!	k		3	l		H	m		P	n	 
		P
   C       h`      ]	HO O 4O >   "  G  V4 >   X4O >   "  G  CX4O >   "  G  F        g  thunk
		_ g  outer-owner		_  g  filenamef  ice-9/serialize.scm
	[
		\			]	 		_  g  nameg  call-with-parallelization CR4!"%(+./     h   c   -  1  3   C  [       g  forms
			  g  filenamef  ice-9/serialize.scm
	p
		q	 			


   C  h   g   ]	4 5L 4?6_       g  args
		 g  v			  g  filenamef  ice-9/serialize.scm		p
 		   C23  h(   e   ]	4 5$   O @ 6 ]       g  y
		' g  tmp		'  g  filenamef  ice-9/serialize.scm
	p
 		'   C5RC           g  m
		,  g  filenamef  ice-9/serialize.scm		7
	-	?		6	?
	7	@		@	@
	D	A
	C
	[
 		\
   C6                                                                   ccache/ice-9/optargs.go                                                                             0000644                 00000046515 15154557173 0010716 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.05M      ] 4        h7      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  optargs	 		g  filenameS	
f  ice-9/optargs.scm	g  importsS	g  system	g  base	g  pmatch	 	 	 	g  exportsS	g  let-optional	g  let-optional*	g  let-keywords	g  let-keywords*	g  define*-public	g  	defmacro*	g  defmacro*-public	 	g  
re-exportsS	g  lambda*	g  define*	 	g  set-current-module	  	! 	"g  $sc-dispatch	#" 	$" 	%g  reverse	&g  any	'&& 	('&	)&&	*g  syntax-violation	+* 	,* 	-f  -source expression failed to match any pattern	.g  identifier?	/g  syntax-object	0g  top	10 	2g  ribcage	3g  v	4g  rest	534 	611 	7f  l-44375c4e67-1f0	8f  l-44375c4e67-1f1	978 	:2569 	;2 	<g  lp	=g  bindings	>g  vars	?g  inits	@<=>? 	A1111 	Bf  l-44375c4e67-1d4	Cf  l-44375c4e67-1d5	Df  l-44375c4e67-1d6	Ef  l-44375c4e67-1d7	FBCDE 	G2@AF 	H= 	I1 	Jf  l-44375c4e67-1d3	KJ 	L2HIK 	M1:;G;L 	Ng  hygiene	ON 	P/MO 	Qg  
vars&inits	Rg  make-syntax-transformer	SR 	TR 	Ug  macro	Vg  _	Wg  each-any	X&W	YWX	Z&Y	[VZ	\g  length	]g  append	^g  generate-temporaries	_&&&WW 	`g  let	ag  n	bg  n+1	cg  t	dg  i	eab>cd 	f11111 	gf  l-44375c4e67-210	hf  l-44375c4e67-211	if  l-44375c4e67-212	jf  l-44375c4e67-213	kf  l-44375c4e67-214	lghijk 	m2efl 	n>? 	of  l-44375c4e67-20b	pf  l-44375c4e67-20c	qop 	r2n6q 	sg  rest-arg	tg  binding	ug  b0	vg  b1	wstuv 	xf  l-44375c4e67-200	yf  l-44375c4e67-201	zf  l-44375c4e67-202	{f  l-44375c4e67-203	|xyz{ 	}2wA| 	~g  x	~  f  l-44375c4e67-1f5   2I  1;m;;r}; 	 /`O  g  map     g  lambda /O  g  apply /O  g  or /O  g  parse-lambda-case /O  g  quote /O  /
O  /O      g  list /O  g  error /O  f  sth /O  &&&W  ab>d  f  l-44375c4e67-23a f  l-44375c4e67-23b f  l-44375c4e67-23c f  l-44375c4e67-23d   2A  f  l-44375c4e67-235 f  l-44375c4e67-236   2n6  f  l-44375c4e67-22a f  l-44375c4e67-22b f  l-44375c4e67-22c f  l-44375c4e67-22d   2wA  f  l-44375c4e67-21f   2I  1;;;; 	 /O  /O  /O  /O  /O  /
O  /O      /O  /O  /O  &Z V g  aok stuv  f  l-44375c4e67-279 f  l-44375c4e67-27a f  l-44375c4e67-27b f  l-44375c4e67-27c f  l-44375c4e67-27d   2f  f  l-44375c4e67-245   2I  1;  /`O  g  r /O  /O  g  symbol->keyword g  syntax->datum g  iota &&&WWWW  g  ivars g  kw g  idx a>cd  1111111  f  l-44375c4e67-264 f  l-44375c4e67-265 f  l-44375c4e67-266 f  l-44375c4e67-267 f  l-44375c4e67-268 f  l-44375c4e67-269 f  l-44375c4e67-26a   2  f  l-44375c4e67-25f f  l-44375c4e67-260   2n6  f  l-44375c4e67-252 f  l-44375c4e67-253 f  l-44375c4e67-254 f  l-44375c4e67-255 f  l-44375c4e67-256   2f  1;;;; 	 /`O  /O  /O  /O  /O  /O  /
O  /O  g  cons /O  /O  /O  f  l-44375c4e67-2b4 f  l-44375c4e67-2b5 f  l-44375c4e67-2b6 f  l-44375c4e67-2b7 f  l-44375c4e67-2b8  2f  f  l-44375c4e67-286 2I 1; /`O /O /O 	&&WWW 
a>d f  l-44375c4e67-2a5f  l-44375c4e67-2a6f  l-44375c4e67-2a7f  l-44375c4e67-2a8f  l-44375c4e67-2a9 2
f f  l-44375c4e67-2a0f  l-44375c4e67-2a1 2n6 f  l-44375c4e67-293f  l-44375c4e67-294f  l-44375c4e67-295f  l-44375c4e67-296f  l-44375c4e67-297 2f 1;;;; 	/O /O  /O !/O "/O #/
O $/O %/O &/O '/O ()X)V(*g  define-public+g  id,g  args-+,uv .f  l-44375c4e67-2c4/f  l-44375c4e67-2c50f  l-44375c4e67-2c61f  l-44375c4e67-2c72./01 32-A2 4f  l-44375c4e67-2c154 62I5 713;6 8/*7O 9/7O :V&& ;g  val<+; =f  l-44375c4e67-2d2>f  l-44375c4e67-2d3?=> @2<6? A1@;6 B/*AO C&XD&CE&DFVEGVDHg  define-macroIf  l-44375c4e67-2f0Jf  l-44375c4e67-2f1Kf  l-44375c4e67-2f2Lf  l-44375c4e67-2f3MIJKL N2-AM Of  l-44375c4e67-2d7PO Q2IP R1N;Q S/HRO T/RO U/RO Vg  string?Wg  docX+,Wuv Yf  l-44375c4e67-2e4Zf  l-44375c4e67-2e5[f  l-44375c4e67-2e6\f  l-44375c4e67-2e7]f  l-44375c4e67-2e8^YZ[\] _2Xf^ `1_;Q a/H`O b/`O cg  begindg  dummyed+,uv fg  m-44375c4e67-2fagf0 hg1111 if  l-44375c4e67-2ffjf  l-44375c4e67-300kf  l-44375c4e67-301lf  l-44375c4e67-302mf  l-44375c4e67-303nijklm o2ehn pg qf  l-44375c4e67-2fcrq s2pr t1o;s u/ctO v/tO wg  export-syntaxx/wtO yg  uninitializedzg  *uninitialized*{g  	make-list|g  append!}g  keyword?~g  assq-refg  	list-set!g  	scm-errorg  keyword-argument-errorf  Unrecognized keywordf  Invalid keywordg  	list-copyf  unexpected specC 5    h/     ]4	
5	 4! >  "  G   $%      h   U   ] 4L54L 5D      M       g  filenamef  ice-9/optargs.scm		Z		
	Z			Z	 		
   C(),-.     h   g   ] 6_       g  v
		 g  rest		  g  filenamef  ice-9/optargs.scm		]	 			   CP   h   w   ]L LL 6      o       g  v
		 g  rest		  g  filenamef  ice-9/optargs.scm		^			^	"		^	 			   C.   h   y   ] 6q       g  v
		 g  init		 g  rest			  g  filenamef  ice-9/optargs.scm		[	 			   C     h      ]L LL 6             g  v
		 g  init		 g  rest			  g  filenamef  ice-9/optargs.scm		\			\	"		\	 			   C    h      ]4 5$  O @4 5"  @4 5"  	 6$  4?$  L O @""$  4	?$  
L O @""         g  bindings
	  g  vars	  g  inits		  g  tmp		
  g  tmp		(  g  tmp		7	n  g  filenamef  ice-9/optargs.scm
	W	 	 	  g  nameg  lp C     h      ]	O Q  6        g  bindings
		 g  lp	
	  g  filenamef  ice-9/optargs.scm
	V
	
	W			W	%		W	1		W	 		  g  nameg  
vars&inits CQR4TU$[,-.       h      ] 6       g  rest-arg
		 g  binding		 g  b0			 g  b1			  g  filenamef  ice-9/optargs.scm		c	, 			   CQ\]^$_       h   Z   ]L    C       R       g  tmp-44375c4e67-21b
		 g  tmp-44375c4e67-21a		  			   C       hX   j   ]4O 5LL 	  
 L L    C   b       g  n
		U g  n+1		U g  vars			U g  t			U g  i			U  		U	   C,- 
      hh      ]$4>  G 45454  545 45$   O @	6        g  rest-arg
		f g  binding		f g  b0			f g  b1			f g  vars			f g  inits			f g  tmp		;	f g  tmp		F	f  g  filenamef  ice-9/optargs.scm		d	$		d			f			g	"	#	g		$	h		-	h	,	/	h		0	i	"	;	f	 		f	   C     h@   d   ]	4 5"  	 6$  4?$  @""       \       g  x
		9 g  tmp		9  g  filenamef  ice-9/optargs.scm
	a	 		9   C5R4TU$[,-. h      ] 6       g  rest-arg
		 g  binding		 g  b0			 g  b1			  g  filenamef  ice-9/optargs.scm		v	, 			   CQ\]$   h   :   ]L   C    2       g  tmp-44375c4e67-243
		  		   C       hP   [   ]LL   4	
O 5L  L    C    S       g  n
		L g  n+1		L g  vars			L g  i			L  		L	   C,- 	     h`     ]$4>  G 45454  5 45$   O @6       g  rest-arg
		_ g  binding		_ g  b0			_ g  b1			_ g  vars			_ g  inits			_ g  tmp		4	_ g  tmp		?	_  g  filenamef  ice-9/optargs.scm		w	$		w			y			z	"	#	z		$	{		-	{	,	/	{		4	y	 
		_	   C     h@   d   ]	4 5"  	 6$  4?$  @""       \       g  x
		9 g  tmp		9  g  filenamef  ice-9/optargs.scm
	t	 		9   C5R4TU$ h(   v   ]    C     n       g  rest-arg
		# g  aok		# g  binding			# g  b0			# g  b1			#  		#	   C,-.        h      ] 6       g  rest-arg
		 g  aok		 g  binding			 g  b0			 g  b1			  g  filenamef  ice-9/optargs.scm	 	0 			   CQ\^$       h   Z   ]L    C       R       g  tmp-44375c4e67-273
		 g  tmp-44375c4e67-272		  			   C     h`      ]4O 5LL 		
 L45  L L    C        g  n
		_ g  vars		_ g  ivars			_ g  kw			_ g  idx			_ g  t			_ g  i			_  		_	   C,-    h   M  ]%4>  G 45454455445545 4	5$  
 O @6       E      g  rest-arg
		y g  aok		y g  binding			y g  b0			y g  b1			y g  vars			y g  inits			y g  tmp		L	y g  tmp		W	y  	g  filenamef  ice-9/optargs.scm	 	$	 		 		 	 	% 	#	* 	(	4 	#	5 	$	8 	*	@ 	$	A 	"	L 	 		y	   C        hP   v   ]4 5"   4 5$  @ 6$  4?$  @""n       g  x
		P g  tmp		P g  tmp			1  g  filenamef  ice-9/optargs.scm
 	 		P   C5R4TU$    h(   v   ]    C     n       g  rest-arg
		# g  aok		# g  binding			# g  b0			# g  b1			#  		#	   C,-.        h      ] 6       g  rest-arg
		 g  aok		 g  binding			 g  b0			 g  b1			  g  filenamef  ice-9/optargs.scm	 	0 			   CQ\$	 !"#$%       h   :   ]L   C    2       g  tmp-44375c4e67-2b2
		  		   C&'     hX   k   ]LL L 4	5  
4O 5L L   C  c       g  n
		V g  vars		V g  kw			V g  idx			V g  i			V  		V	   C,-      hp   ;  ]%4>  G 4544554455 45$  	 O @
6     3      g  rest-arg
		k g  aok		k g  binding			k g  b0			k g  b1			k g  vars			k g  inits			k g  tmp		>	k g  tmp		I	k  	g  filenamef  ice-9/optargs.scm	 	$	 		 		 	#	# 	(	- 	#	. 	$	1 	*	9 	$	> 	 		k	   C  hP   v   ]4 5"   4 5$  @ 6$  4?$  @""n       g  x
		P g  tmp		P g  tmp			1  g  filenamef  ice-9/optargs.scm
 	 		P   C5R4TU$)89      h   \   ]  C   T       g  id
		 g  args		 g  b0			 g  b1			  			   C:,-.       h   h   ] 6`       g  id
		 g  val		  g  filenamef  ice-9/optargs.scm		 			   CB h   ;   ]  C    3       g  id
		 g  val		  			   C 	 hP   v   ]4 5$  @4 5"  	 6$  4?$  @""n       g  x
		P g  tmp		P g  tmp		"	P  g  filenamef  ice-9/optargs.scm
 	 		P   C5R4TU$FGSTU        h   \   ]  C T       g  id
		 g  args		 g  b0			 g  b1			  			   C,-V       h      ]456          g  id
		 g  args		 g  doc			 g  b0			 g  b1			  g  filenamef  ice-9/optargs.scm		*		! 			   Cab   h   m   ]  C e       g  id
		 g  args		 g  doc			 g  b0			 g  b1			  			   C 	       hP   v   ]4 5"   4 5$  @ 6$  4?$  @""n       g  x
		P g  tmp		P g  tmp			1  g  filenamef  ice-9/optargs.scm
	 		P   C5R4TU$Euvx   h    o   ]  C   g       g  dummy
		 g  id		 g  args			 g  b0			 g  b1			  			   C,-  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/optargs.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  idg  argsg  b0g  b1g  ...   C5Ry zR{z|}~ hP  
  ] $ ;  $ "$ 	$ 
	
$ 

$ ( "  m
$  G$  "   4	5$  45"  "  "(  C""  m
$  "  Q(  %4?"""  ~$  8$  "  ["$  -(  "  45$  " C$  CC" (  6(  C&  4?"   "45$  45$  $  45"  "  $  .4>  "  G  "Z"  	645$  ,$   $  """""" (  6(  C&  4?"   "45$  45$  $  45"  "  $  .4>  "  G  "Z"  	645$  ,$   $  """"$  "
645"^ 6 6 6 6 6 6 6    
      g  spec
	L g  inits	L g  args		L g  vx		D g  vy		D g  vx		 < g  vy		 < g  vx		14 g  vy		14 g  vx			B, g  vy	
	B, g  vx		S$ g  vy		S$ g  vx		d g  vy		d g  args		r  g  prev		r  g  tail		r  g  n		r  g  
slots-tail	   g  slots	 P g  
slots-tail	 P g  	args-tail	 P g  n	 P g  inits	 P g  slots	T g  
slots-tail	T g  	args-tail	T g  inits	T g  rest-idx	T g  slots	 g  
slots-tail	 g  	args-tail	 g  inits	 g  t	F g  slots	 g  
slots-tail	 g  	args-tail	 g  inits	 g  t	Q g  args	  )g  filenamef  ice-9/optargs.scm

	 		r"		u$			z#	 %		 %	! %	 &	 &	& &	 &		 '	 '	 '	 #	 ,	 ,	# ,		 -	 /		 .	0			.	2	2	%2	2		3	3	%3	) 3	0.3		35	45		96	<6	%?6	5B6	<P6		T7	Z8	_;		b<	f<		k=	${=	>	 >	1>	?		8	B	B	B	-B	7B	-B		C	D		8	H	I	K		N	N	O	(O	/O	(O	P	&P	7P	;P	Q	Q	Q	I	S	$S	&S	*S		-T	.T	2S		3U	:U	#<U	FI	OW	XW	!^W	mX	0|X	]	]	4^	]	I	Y	Y	Y	I	Z	Z	Y		\	+\		R	+R		_	`	b		e	e	f	(f	/f	(f	g	g	+g	/g	h	#h	%h	)`	*n	/n	1n	5n		8o	9o	=n		>p	Ep	#Gp	Q`	Zr	cr	!ir	xs	$s	x	x	4y	x	`	t	t	t	`	u	u	t		w	w		i		k	#k	l	l	3m	l	z	z	{	|	|	
 |	$|	
(|	,|	
0|	4|	
8|	<|	
@|	D|	
H|	L|	
 	L	  g  nameg  parse-lambda-case CRC       {       g  m
		0  g  filenamef  ice-9/optargs.scm		;
[	V
 	 	 
/
 	/
   C6                                                                                                                                                                                    ccache/ice-9/top-repl.go                                                                            0000644                 00000007020 15154557173 0010765 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] C 4   h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  top-repl	 		g  filenameS	
f  ice-9/top-repl.scm	g  importsS	 	g  system	g  repl	 	g  selectS	g  
start-repl	 	 	 	g  replacementsS	 	g  set-current-module	 	 	g  	provided?	g  posix	g  	sigaction	g  SIGINT	g  	scm-error	g  signal	 f  User interrupt	!g  call-with-sigint	"g  resolve-module	#g  
guile-user	$# 	%g  process-use-modules	&g  append	'g  r5rs	(' 	)( 	*g  session	+* 	,+ 	-), 	.g  regex	/. 	0/ 	10 	2g  threads	32 	43 	54 	6g  defined?	7g  	setlocale	8g  catch	9g  system-error	:g  LC_ALL	;f   	<g  format	=g  current-error-port	>f  'warning: failed to install locale: ~a~%	?g  strerror	@g  current-language	Ag  run-hook	Bg  	exit-hookC 5      h	     ]4	
5 4 >  "  G   4i5$          h      ]  6       w       g  sig
		  g  filenamef  ice-9/top-repl.scm
	$			%	#			%	.	
	%	?		&	#		%	 		   C      h   U   ] 45N C M       g  filenamef  ice-9/top-repl.scm
	!			#			"	 		
   C   h    m   ] M $  M M 66     e       g  filenamef  ice-9/top-repl.scm
	(			)			+	$		+	2		+			-	 		
   C   h    m   ] M $  M M 66     e       g  filenamef  ice-9/top-repl.scm
	(			)			+	$		+	2		+			-	 		
   C   h    m   ] M $  M M 66     e       g  filenamef  ice-9/top-repl.scm
	(			)			+	$		+	2		+			-	 		
   C        h`   }   ]	HO O 4O >   "  G  V4 >   X4O >   "  G  CX4O >   "  G  F u       g  thunk
		_ g  handler		_  g  filenamef  ice-9/top-repl.scm
							 	
 		_   C"  x     h   a   ] 6   Y       g  thunk
		  g  filenamef  ice-9/top-repl.scm
					 		   C!R"$%&-.125!67897:;        h   U   ] 6      M       g  filenamef  ice-9/top-repl.scm
	D			E	"	
	E	 		

   C<=>?       h      ]45 456          g  key
		 g  subr		 g  fmt			 g  args			 g  errno			  g  filenamef  ice-9/top-repl.scm
	F			G			H			I			I	"		I			G	 			   C@AB      hH      ]45$  4>  "  G  "   445 5 4	
>  "  G   C       g  status
	1	H  g  filenamef  ice-9/top-repl.scm
	A			B			B				B			B			C			C			C		(	K		+	K	!	1	K		1	K		4	L		 		H
   C   h`   1  ]45 4 >  "  G  4445$  	"  4
5$  "  5>  "  G  6  )      g  guile-user-module
			^  g  filenamef  ice-9/top-repl.scm
	/
		0			0	+			0				0			4			5		!	6		%	7		&	9	
	*	9		,	9	
	0	9		2	:	
	7	;	
	8	<	
	<	<		>	<	
	B	<		D	=	
	I	>	
	K	6		P	5		^	@	 		^
  g  nameg  top-repl CRC  ~       g  m
		,  g  filenamef  ice-9/top-repl.scm		
	-			3			5			9			
		/
 		
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ccache/ice-9/ftw.go                                                                                 0000644                 00000051370 15154557173 0010032 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0R      ]  4  h
      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  ftw	 		g  filenameS	
f  ice-9/ftw.scm	g  importsS	g  match	 	 	g  vlist	 	 	g  srfi	g  srfi-1	 	 	 	g  exportsS	g  nftw	g  file-system-fold	g  file-system-tree	g  scandir	 	g  	autoloadsS	g  i18n	 	 g  string-locale<?	!  	"! 	#g  set-current-module	$# 	%# 	&g  opendir	'g  eof-object?	(g  closedir	)g  readdir	*g  string=?	+f  .	,f  ..	-g  directory-files	.f   	/g  	substring	0g  string-length	1g  string-append	2f  /	3g  pathify	4g  char=?	5g  
string-ref	6g  abs?	7g  make-hash-table	8g  	hashv-ref	9g  stat:dev	:g  stat:ino	;g  
hashv-set!	<g  visited?-proc	=g  getuid	>g  getgid	?g  
stat:perms	@g  stat:uid	Ag  stat:gid	Bg  stat-dir-readable?-proc	Cg  memq	Dg  depth	Eg  directory-processed	Fg  	directory	Gg  
nftw-style	Hg  stale-symlink	Ig  symlink	Jg  physical	Kg  catch	LK 	MK 	Ng  lstat	Og  	stat:type	Pg  stat	Qg  directory-not-readable	Rg  regular	Sg  invalid-stat	Tg  stat&flag-proc	Ug  clean	Vg  	hash-size	Wg  throw	Xg  ftw-early-exit	Yg  for-each	Zg  getcwd	[g  mount	\g  chdir	]g  nftw-early-exit	^g  make-syntax-transformer	_^ 	`^ 	ag  errno-if-exception	bg  macro	cg  $sc-dispatch	dc 	ec 	fg  any	gff 	hg  syntax-object	ig  top	ji 	kg  ribcage	lg  dummy	mg  expr	nlm 	og  m-c0b95d8-107	poi 	qpj 	rf  l-c0b95d8-10c	sf  l-c0b95d8-10d	trs 	uknqt 	vk 	wg  x	xw 	yp 	zf  l-c0b95d8-109	{z 	|kxy{ 	}juv| 	~g  hygiene	~  hK}  g  quote h}  g  system-error h}    g  lambda h}  g  args h}  g  system-error-errno h}        g  syntax-violation     f  -source expression failed to match any pattern g  integer? g  vhash-assoc g  
vhash-cons g  directory-stream? g  fold g  cons g  
alist-cons g  
vlist-null g  basename g  error     f  no matching pattern   g  const g  and=> g  sortC 5      hPG     ]4	
"5	 4% >  "  G   &'()*+,      h   s  ]!4 5"  `45$  4>  "  G  C4545$  "  	45$  "  "45" k      g  dir
		 g  
dir-stream			 g  new			o g  acc			o g  t		?	X  g  filenamef  ice-9/ftw.scm
 
	 			 		 		 	
	 		 		0 		7 		; 	"	? 		? 		M 		Q 	"	U 		\ 		g 		o 	
	o 		p 		w 		 	 		  g  nameg  directory-files C-R*./012  hh   J  -  1  3 "  J(  -45$  "  $  C45645" "     B      g  nodes
			c g  nodes		W g  result			W g  t		'	@  g  filenamef  ice-9/ftw.scm
 
	 		 		 		 		 		  		" 	&	' 		8 	 	@ 		C 		D 		J 	0	M 	4	O 		W 		W 		[ 		c 	 			c


  g  nameg  pathify C3R45   h   z   ]/4 
56r       g  filename
		  g  filenamef  ice-9/ftw.scm
 
	 		 	 		  g  nameg  abs? C6R789:7;  h   !  ] $  y4L 4 554 5HJ$  "  $4L5K4L 4 5J>  "  G  4J5$  C4J>  "  G  CC           g  s
	  g  ino-hash	  g  ino		  g  t		#	V g  t		_   g  filenamef  ice-9/ftw.scm
 		 			 		 	/	 		 		 		# 		0 	"	8 		9 		> 	(	K 		W 		_ 		k 	 	    C    h      ]	4	5 O C          g  size
		 g  dev-hash			  g  filenamef  ice-9/ftw.scm
 
	 			 	 		  g  nameg  visited?-proc C<R=>?@A  hp   M  ]4 5L
$  CL4 5$  
 "  $  CL 4 5$  
	 "  $  C
	CE      g  s
		p g  perms			p g  t			p g  t		6	p g  t		\	p  g  filenamef  ice-9/ftw.scm
													$		(		/	)	0	$	1		6		D		K		O		U	)	V	$	W		\		m	)	n	$	o	 		p   C        h       ]45 45 O C             g  uid
		 g  gid		 g  uid			 g  gid			  g  filenamef  ice-9/ftw.scm
 
	 		 		 	 			  g  nameg  stat-dir-readable?-proc CBRCDEFGHIJMN       h   J   ] L 6B       g  filenamef  ice-9/ftw.scm
			# 		
   C    h   V   -  1  3 C     N       g  args
			  g  filenamef  ice-9/ftw.scm
	 			


   CIOP        h   J   ] L 6B       g  filenamef  ice-9/ftw.scm
 		 	3 		
   C    h   V   -  1  3 C     N       g  args
			  g  filenamef  ice-9/ftw.scm
 	 			


   CFQRS       h     ]4 O 5$  45&  Z4 O 5$  =L$  D45&  4L5$  L"  	"  
DL D45&  4L5$  L"  	"  
DD       g  name
	  g  s	  g  s-follow		5  g  type		R	x g  type	    g  filenamef  ice-9/ftw.scm
												&		' 		5 		=!		C#		G$	"	I$		L	"	R		V	!	\		]	 	g		o	 	u		z&	 "	 	" 	 	! 	 	  	 	  	 '	 	 	 #	    C 
     hP     - 1 3 45$  "  45$  "  45	 O C      g  dir-readable?
			P g  control-flags			P g  directory-flag			P g  stale-symlink-flag		5	P g  	physical?		@	P  g  filenamef  ice-9/ftw.scm

	
			#											!	!	%	'	)	!	-		/	!	5	!	5		8		<		@		@	 			P
  g  nameg  stat&flag-proc CTR045/ h0      ]	4 54/4 55$  	 
6 C           g  name
		, g  last-char-index	
	,  g  filenamef  ice-9/ftw.scm
)
	*		
*		
*		+		+		+		 +		),	 
		,  g  nameg  clean CUR<CVTB=>WXFY3      h   g   ]L4L  56 _       g  child
		  g  filenamef  ice-9/ftw.scm
=	#	>	)	>	% 		   C-    h   4  ]4L >  G 4L5$  C4L  5&  "  4>  "  G  &  $4 LO 4 5>  "  G  "   C,      g  fullname
	  g  s	  g  flag		  g  t		  g  ret		1   g  filenamef  ice-9/ftw.scm
4		5	0	5		7		7		'8	&	18		:9		?:	!	C:	(	J:	!	T;	'	Z;		[<	"	g?	#	r<	" 	   g  nameg  go CKXU  h   S   ] L4L 56   K       g  filenamef  ice-9/ftw.scm
B		B		B	 		
   C   h   d   ]C   \       g  key
		 g  val		  g  filenamef  ice-9/ftw.scm
C	 			   C hp   v  - 1 3 445$  "   54445 45 55O Q 	
 O 6    n      g  filename
			l g  proc			l g  options				l g  t			+ g  visited?		-	l g  	stat&flag		C	l g  go		P	l  g  filenamef  ice-9/ftw.scm
/
	
0		0	)	0	/	0	)	0	"	-0		-0		02		33		63	.	;3	7	A3		C2		C0		P4		_A		lA	 			l	
	  g  nameg  ftw CRZMN    h   J   ] L 6B       g  filenamef  ice-9/ftw.scm
G		G	, 		
   C    h   V   -  1  3 C     N       g  args
			  g  filenamef  ice-9/ftw.scm
G	 			


   C9C[9      h   c   ]4 5L C   [       g  s
		  g  filenamef  ice-9/ftw.scm
J		J	'	J	$ 		   C   h   Q   ]C    I       g  s
		  g  filenamef  ice-9/ftw.scm
K	 		   C\6\/   h       ]

$  C4 
56        g  fullname
		 g  base		 g  t			  g  filenamef  ice-9/ftw.scm
O		P	!	P		L	'	Q	! 			   C\3/ h      ]4L 4 
556        g  fullname
		 g  base		  g  filenamef  ice-9/ftw.scm
R		T		
L	'	T		S	 			   Ch   j   ]C    b       g  fullname
		 g  base		  g  filenamef  ice-9/ftw.scm
U	 			   C\        h   J   ] L 6B       g  filenamef  ice-9/ftw.scm
W		W	' 		
   C    h   A   ] C    9       g  filenamef  ice-9/ftw.scm
X	 		
   CD<VE   h   f   ] C^       g  flag
		  g  filenamef  ice-9/ftw.scm
^		^	1	^	' 		   CF    h   f   ] C^       g  flag
		  g  filenamef  ice-9/ftw.scm
_		_	1	_	' 		   CTB=>GY30     h       ]L4L 54L5L 6      z       g  child
		  g  filenamef  ice-9/ftw.scm
q	.	r	4	s	8	s	4	u	4	r	0 		   C-W]30        h       ]L4L 54L5L 6      z       g  child
		  g  filenamef  ice-9/ftw.scm
q	.	r	4	s	8	s	4	u	4	r	0 		   C   hh  ?  ]+4L >  G 4L5$  " 14L 5$  " L$  4L5$  &4 LO 4 5>  "  G  "   4L >  "  G  4L 54L>   "  G  &  "  4>  "  G  "  4L >  "  G  4L 54L>   "  G  &  "  4>  "  G  4L5$  &4 LO 4 5>  "  G  "   C     7      g  fullname
	c g  base	c g  level		c g  s		a g  flag		a g  t		[ g  t		/X g  ret	   g  ret	 $  	g  filenamef  ice-9/ftw.scm
c		d	0	d		w		w		(x	"	/x		/w		Ay		Bo	-	Lo	(	Mp	-	[v	.	fp	-	sg	( i	3 i	( k	* l	* m	. m	5 m	. g	( i	3 i	( k	*	l	*m	.m	5m	.%o	-/o	(0p	->v	.Ip	- $	c	  g  nameg  go CK]U       h   S   ] L4L 5

6 K       g  filenamef  ice-9/ftw.scm
~		~	'	~	# 		
   C   h   d   ]C   \       g  key
		 g  val		  g  filenamef  ice-9/ftw.scm
	 			   C\ !      hH    - 1 3 45 4 O 5$  45"  	45$  O "  	4
5$  4 5$  "  O "  4
5$  O "  45445		$  	"   	5	$  "  
4445 45 5?O 	
	Q 4 O 54 >  "  G  C       g  filename
		G g  proc		G g  control-flags			G g  od		G g  s			7 g  odev		7G g  	same-dev?		SG g  maybe-cd	 G g  maybe-cd-back	 G g  depth-first?	 G g  t		   g  visited?		 G g  	has-kids?	
 G g  	stat&flag	 G g  go		G g  ret	0G  g  filenamef  ice-9/ftw.scm
E
	
F		F		G		G		'H		(H		7F		:I		>I		BI		FI		SF		VM		ZM		^M		bM		cN		mN	 F	 V	 V	" V	 V	 F	 Y	 Y	 Y	 F	 Z	 [	 [	! [	 [	 Z	 F	 ]	 F	 `	 a	 a	4 a	= a	 b	! `	 F		c	}	#}	0}	0}	3	 5		G	
	  g  nameg  nftw CR4`abeg h   ?   ] C    7       g  dummy
		 g  expr		  			   C  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/ftw.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  expr   C5aRN*.129:FOK&        h   J   ] M 6B       g  filenamef  ice-9/ftw.scm
			- 		
   C        h   V   -  1  3  6 N       g  args
			  g  filenamef  ice-9/ftw.scm
	 			


   C'(   h   n   ] LLMLL L 6    f       g  filenamef  ice-9/ftw.scm
	,		4		4		4		4		. 		
   C       h    {   ]4L  LO >   6<      s       g  subdir
		 g  result+visited		  g  filenamef  ice-9/ftw.scm
	&		( 			   C+,)     h   J   ] LL 6B       g  filenamef  ice-9/ftw.scm
	%		9 		
   C        h   V   -  1  3  6 N       g  args
			  g  filenamef  ice-9/ftw.scm
	% 			


   C     h(    ]EH45$   "  4 5K45$  L J6445455$  D	4
5& 4LJ5$ |4O 544545545$ 5" 45$  :4>  "  G  4LO 	
54LJ5D45$  "  	45$  45	

	"4J54LO 545$  454L 	5

	"54
5	&  45	4
5
	"
454L	5

	"454LJ5
	"4L J5D4LJ5445455DLJ6             g  name
	! g  path	! g  dir-stat		! g  result		! g  visited		! g  	full-name		! g  dir	  g  visited	  g  entry	  g  result		  g  subdirs	
  g  r+v	   g  t	  g  child	< g  st	P  g  filenamef  ice-9/ftw.scm
			
				
				
			#	
	&		0		;		<		?		F	$	M		Q		U		[		]		^		h		i	
	w		x	 	 	 	# 	 	 	
 	 	 	 	 	 	 	  	& 	  	 	# 	: 	# 	# 	 	 	+ 	 			+			1	2	%8	><	%<	?	%P	S	]	^	#e	#|	}	&	5		'	'	!	'	'	!		"	"	"								#			
!	 [	!	  g  nameg  loop C.K  h   J   ] LL 6B       g  filenamef  ice-9/ftw.scm
			+ 		
   C        h   V   -  1  3  6 N       g  args
			  g  filenamef  ice-9/ftw.scm
	 			


   C 	    hX   J  - . 	, 	3 
#  O 		 Q 		4O 56  B      g  enter?
		V g  leaf		V g  down			V g  up			V g  skip			V g  error			V g  init			V g  	file-name			V g  stat			V g  loop			%	V  
g  filenamef  ice-9/ftw.scm

	%		>		?		V	 		V	  g  nameg  file-system-foldg  documentationf Traverse the directory at FILE-NAME, recursively.  Enter
sub-directories only when (ENTER? PATH STAT RESULT) returns true.  When
a sub-directory is entered, call (DOWN PATH STAT RESULT), where PATH is
the path of the sub-directory and STAT the result of (stat PATH); when
it is left, call (UP PATH STAT RESULT).  For each file in a directory,
call (LEAF PATH STAT RESULT).  When ENTER? returns false, call (SKIP
PATH STAT RESULT).  When an `opendir' or STAT call raises an exception,
call (ERROR PATH STAT ERRNO RESULT), with ERRNO being the operating
system error number that was raised.

Return the result of these successive applications.
When FILE-NAME names a flat file, (LEAF PATH STAT INIT) is returned.
The optional STAT parameter defaults to `lstat'. CRh   `   ]C    X       g  n
		 g  s		  g  filenamef  ice-9/ftw.scm
	. 			   CN        h`      ]$  I$  +$  44 5 5C456 456 456         g  name
		_ g  stat		_ g  result			_ g  w			R g  x			R  g  filenamef  ice-9/ftw.scm
				"		%		0	4	4		7		9	 			_	  g  nameg  leaf C  h   
  ]#$  {$  ]$  I$  +$  44 55C456 456 456 456 456              g  name
	  g  stat	  g  result		  g  w		  g  x		  g  w		'	j g  x		'	j  g  filenamef  ice-9/ftw.scm
				:		=		H	)	L		O		Q	 		 	  g  nameg  up C  h      ]L  6             g  name
		
 g  stat		
 g  result			
  g  filenamef  ice-9/ftw.scm
		
	 		
	  g  nameg  enter?* C       h      ]C        g  name
		 g  stat		 g  result			  g  filenamef  ice-9/ftw.scm
 			
		 			  g  nameg  down C*     h       ]4 L5$  CL  6           g  name
		 g  stat		 g  errno			 g  result			  g  filenamef  ice-9/ftw.scm

							 			  g  nameg  error C   h   w  - . , 3 #  #  4O  O 	 5	$  e(  Q"  .(  (  C4
56 4
56 $  (  C""4
56 4
56   o      g  	file-name
	  g  enter?	  g  stat		  g  leaf		(  g  up		(  g  v		K  g  w		^  g  w		n   g  filenamef  ice-9/ftw.scm

	)		E	;	K	 	 	  g  nameg  file-system-treeg  documentationf RReturn a tree of the form (FILE-NAME STAT CHILDREN ...) where STAT is
the result of (STAT FILE-NAME) and CHILDREN are similar structures for
each file contained in FILE-NAME when it designates a directory.  The
optional ENTER? predicate is invoked as (ENTER? NAME STAT) and should
return true to allow recursion into directory NAME; the default value is
a procedure that always returns #t.  When a directory does not match
ENTER?, it nonetheless appears in the resulting tree, only with zero
children.  The optional STAT parameter defaults to `lstat'.  Return #f
when FILE-NAME is not readable. CR K&     h   J   ] L 6B       g  filenamef  ice-9/ftw.scm
"		#	 		
   C'()  h`      ]"  J45$  4 >  "  G  L 64 54L5$  	"  "4 5"       g  stream
		` g  entry		P g  files			P  g  filenamef  ice-9/ftw.scm
'			(		*		*		,		+-		,.		3/		=/		B0		P.		P(		Q(		X)		`(	 		`   C    hH     - . , 3 #  45#  4 O 455O 6         g  name
		E g  select?		E g  entry<?			E  g  filenamef  ice-9/ftw.scm

		+	'!		+!		3$		:!		E&	 		E	  g  nameg  scandirg  documentationf Return the list of the names of files contained in directory NAME
that match predicate SELECT? (by default, all files.)  The returned list
of file names is sorted according to ENTRY<?, which defaults to
`string-locale<?'.  Return #f when NAME is unreadable or is not a
directory. CRC             g  m
		0  g  filenamef  ice-9/ftw.scm	 
F 
 
 
7 

 
k
|)
/
'E
8
C
GH
 	GJ
   C6                                                                                                                                                                                                                                                                         ccache/ice-9/save-stack.go                                                                          0000644                 00000001570 15154557173 0011270 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0`      ]  4 hP      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  
save-stack	 		g  filenameS	
f  ice-9/save-stack.scm	g  replacementsS	g  stack-saved?	g  the-last-stack	 	g  set-current-module	 	 	g  
make-fluid	g  %stacks	g  
make-stackC 5   h`  v   ]4	
5 4 >  "  G   R4i5 R      h@      -  1  3 $  C[4	$  "  
 ?\ C            g  	narrowing
			; g  stacks		6  g  filenamef  ice-9/save-stack.scm
	*
		+			-			5		!	7	!	%	7		(	7	0	2	5		9	9	 
			;


  g  nameg  
save-stack CRC n       g  m
		(  g  filenamef  ice-9/save-stack.scm		
	,	&
	-	(		6	(
]	*
 	_
   C6                                                                                                                                         ccache/ice-9/safe.go                                                                                0000644                 00000002153 15154557173 0010143 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0S      ]  4    h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  safe	 		g  filenameS	
f  ice-9/safe.scm	g  exportsS	g  safe-environment	g  make-safe-module	 	g  set-current-module	 	 	g  resolve-interface	g  	safe-r5rs	 	g  safe-r5rs-interface	g  	scm-error	g  
misc-error	f  ~A is not a valid version	g  make-moduleC 5    h     ]4	
5 4 >  "  G   4i5R      h0      ] 	$  "  4  >  "  G  C         g  n
		.  g  filenamef  ice-9/safe.scm
	
																									#		 		.  g  nameg  safe-environment CR        h   m   ]  6  e       g  filenamef  ice-9/safe.scm
	 
		!			!	 		
  g  nameg  make-safe-module CRC      y       g  m
		(  g  filenamef  ice-9/safe.scm		
	)			/		/	1			4	
8	
	 
 	
   C6                                                                                                                                                                                                                                                                                                                                                                                                                      ccache/ice-9/regex.go                                                                               0000644                 00000016612 15154557173 0010344 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0r      ] 3 4   h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  regex	 		g  filenameS	
f  ice-9/regex.scm	g  exportsS	g  match:count	g  match:string	g  match:prefix	g  match:suffix	g  regexp-match?	g  regexp-quote	g  match:start	g  	match:end	g  match:substring	g  string-match	g  regexp-substitute	g  fold-matches	g  list-matches	g  regexp-substitute/global	 	g  set-current-module	 	 	g  vector-length	g  	substring	 g  string?	!g  integer?	"g  call-with-output-string	#g  string-for-each	$g  
write-char	%g  make-regexp	&g  regexp-exec	'g  for-each	(g  display	)g  pre	*g  post	+g  error	,g  wrong-type-arg	-g  regexp?	.g  regexp/notbol	/g  string-length	0g  reverse!	1g  cons	2g  
procedure?C 5      h     ]4	
5 4 >  "  G     h   }   ]4 5C     u       g  match
		  g  filenamef  ice-9/regex.scm
	;
		<		
	<	 		  g  nameg  match:count CR      h   v   ] 
C n       g  match
		  g  filenamef  ice-9/regex.scm
	>
		?	 		  g  nameg  match:string CR     h      ]4 5
4 
56  ~       g  match
		  g  filenamef  ice-9/regex.scm
	A
		B			B	$		B	 		  g  nameg  match:prefix CR     h      ]4 54 
56   ~       g  match
		  g  filenamef  ice-9/regex.scm
	D
		E			E	"		E	 		  g  nameg  match:suffix CR !     hp   M  ]	 $  a4 
5$  R"  G4 5$  C $  +4 5$  4 5$  	"CCC"CC    E      g  match
		l g  i		a  g  filenamef  ice-9/regex.scm
	J
		K				K		
	L			L			L			K			M			N		$	N		(	N			/	O		0	O		4	N			5	P		<	P	$	=	P		?	P		C	O		D	Q		K	Q	$	L	Q		N	Q		R	O		U	R		[	R		a	M	 		l  g  nameg  regexp-match? CR"#$    h     ] *$  "  = .$  "  / \$  "  ! ^$  "   $$  "   [$  4\L >  "  G   L 6 ($  "  K )$  "  = +$  "  / ?$  "  ! {$  "   }$  "   |$  04[L >  "  G  4 L >  "  G  ]L 6 L 6             g  c
	  g  filenamef  ice-9/regex.scm
	g			h		R	j		m	k		v	h	 	m	 	n	 	o		q	 
	   C     h   Z   ] O L 6 R       g  p
		  g  filenamef  ice-9/regex.scm
	f			g	 		   C   h   w   ] O 6   o       g  string
		  g  filenamef  ice-9/regex.scm
	d
		e	 		  g  nameg  regexp-quote CR    h0      - . , 3 #  
 	$  CC           g  match
		, g  n		, g  start			,  g  filenamef  ice-9/regex.scm
	t
		u	&		u			u			u		#	v		'	v	 		,  g  nameg  match:start CR    h0      - . , 3 #  
 	$  CC           g  match
		, g  n		, g  end			,  g  filenamef  ice-9/regex.scm
	x
		y	%		y			y			y		#	z		'	z	 		,  g  nameg  	match:end CR      hP      - . , 3 #  
4 54 5$  $  4 56CC             g  match
		J g  n		J g  start			J g  end		)	J  g  filenamef  ice-9/regex.scm
	|
		}			}		!	~		)	}		1			:			F		 			J  g  nameg  match:substring CR%& h0      - 1 3 4 5$  "  
6          g  pattern
			- g  str			- g  args				- g  rx			- g  start			-  g  filenamef  ice-9/regex.scm
 
	
 		 		 		 	 	 		- 	 			-	
	  g  nameg  string-match CR' (!)*+,  hh      ]4 5$   L64 5$  4L  5L6 &  4L 5L6 &  4L 5L6	
 6              g  obj
		a  g  filenamef  ice-9/regex.scm
 		 		 		 	)	 		  		# 	2	/ 	)	1 		7 		: 	2	D 	)	F 		L 		O 	2	Y 	)	] 	%	a 	 		a   C"  h   \   ] LL @    T       g  p
		  g  filenamef  ice-9/regex.scm
 		 		 		   C h0      - 1 3  $   O 6O 6            g  port
			+ g  match			+ g  items				+  g  filenamef  ice-9/regex.scm
 
	 		 		+ 	 			+	
	  g  nameg  regexp-substitute CR-%./&    h   2  - . , 3 #  
4 5$   "  4 5"  H	
$  
"  K	45$  "  4J	5

$  P"  4
54
5"4
54
5$  $  "y""C
"`     *      g  regexp
	  g  string	  g  init		  g  proc		  g  flags		  g  regexp		-  g  start		3  g  value		3  g  abuts		3  g  bol			4  g  m	
	j   g  filenamef  ice-9/regex.scm
 
	 		  		' 	,	- 		3 		9 		> 		J 		Q 		U 		[ 		h 	4	j 		j 		r 		w 		~ 	  	
  	  	  	"  	  	  	
  	  	
  	 	 	  g  nameg  fold-matches CR01 h(      - . , 3 #  
4 56        g  regexp
		' g  string		' g  flags			'  g  filenamef  ice-9/regex.scm
 
	 		 	(	% 		' 	 		'	  g  nameg  list-matches CR( (!2)*+,       h   E  ]4 5$   L64 5$  4L  5L64 5$  4 L 5L6 &  4LL4L 55L6 	&  LL4
L 56 6     =      g  item
	   g  filenamef  ice-9/regex.scm
 		 		 		 	&	 		  		# 	/	/ 	&	0 		: 		= 	/	G 	&	K 		O 		R 		Y 	-	a 		e 		i 		m 		r 	 	s 	.	{ 		 	   	 	   g  nameg  do-item C        hx   \  ] (  4L5L6 "  OO LL LQ $  *(  64>  "  G  "CL " T      g  matches
		w g  start		w g  m			w g  items		 	o g  do-item		-	o  g  filenamef  ice-9/regex.scm
 		 		 		 		 		 		  		? 		C 		F 		J 		O 	!	Q 		R 		W 	#	\ 		g 	%	m 		o 	 		w	  g  nameg  
next-match C"  h   \   ] LLL @  T       g  p
		  g  filenamef  ice-9/regex.scm
 		 		 		   C hH      - 1 3  $  $O  Q 45
6O 6             g  port
			B g  regexp			B g  string				B g  items				B g  
next-match			3  g  filenamef  ice-9/regex.scm
 
	 		 		( 	 	3 		B 	 			B	
	  g  nameg  regexp-substitute/global CRC             g  m
		(  g  filenamef  ice-9/regex.scm		'
 	;
Y	>
	A
	D
	J
j	d
j	t
	f	x

	|
 
 
 
 
 
 	
   C6                                                                                                                       ccache/ice-9/expect.go                                                                              0000644                 00000012623 15154557173 0010520 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0{      ] t 4  h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  expect	 		g  filenameS	
f  ice-9/expect.scm	g  importsS	g  regex	 	 	 	g  exportsS	g  expect-strings	g  expect-port	g  expect-timeout	g  expect-timeout-proc	g  expect-eof-proc	g  expect-char-proc	g  expect-strings-compile-flags	g  expect-strings-exec-flags	g  expect-select	g  expect-regexec	 	g  set-current-module	 	 	g  make-syntax-transformer	  	! 	"g  macro	#g  $sc-dispatch	$# 	%# 	&g  _	'g  any	(&'	)g  syntax->datum	*) 	+) 	,g  datum->syntax	-, 	., 	/g  gensym	0g  let	1f   	21 	3g  or	4g  current-input-port	54 	635 	76 	8g  if	9g  let*	:g  
secs-usecs	;g  gettimeofday	<; 	=:< 	>= 	?g  +	@g  car	A@: 	Bg  /	Cg  cdr	DC: 	EBD     B@ 	F?AE 	G9>F 	H8G 	IH 	Jg  	next-char	Kg  and	Lg  not	M 	Ng  	read-char	Og  eof-object?	Pg  set!	Qg  string-append	Rg  string	Sg  cond	Tg  append	UT 	VT 	Wg  reverse	Xg  =>	Yg  length	Zg  apply	[g  	scm-error	\g  
misc-error	]f  expect	^f  bad recipient: ~S	_g  map	`g  else	aJ 	b`a 	cb 	dg  syntax-violation	ed 	fd 	gf  -source expression failed to match any pattern	hg  regexp/newline	ig  regexp/noteol	jg  make-regexp	k 	lg  lambda	mg  s	ng  eof?	omn 	pg  select	qg  regexp-exec	rg  match:substring	sg  match:countC 5     h`     ]4	
5 4 >  "  G   RRRRR4!"%(+./027IJ8KLMNOPQRSVWXYZ[\]^_@C`c $    h  q  -  1  3 45 45 45 45  	
         
      4"  (  45"    (  "  M&  @45	$     "  4 5"  "s4 54  5"V! ""  #  5    C   i      g  clauses
		 g  s	 g  c		 g  port		 g  timeout		 g  tests	 @ g  exprs	 @ g  body	 @  g  filenamef  ice-9/expect.scm
	1
	
	2			3			4			5			2		'	6	 	O	 	R	 	T	 	W	 	X	 	Z	 	Z	 	[	* 	[	 	\	# 	]	( 	]	5 	[	 	^	/ 	^	7 	^	/ 	^	, 	^	# 	e	'	e	1	f	2	e	'	`	'	`	2 	a	2"	b	2%	c	8(	c	2+	`	'2	h	#3	Z	6	Y	@	V	@	O	A	O	)J	P	)S	Q	(]	O	_	6	 /		


   C    h   d   ]	4 5L 4?6\       g  args
		 g  v			  g  filenamef  ice-9/expect.scm		1
 		   Cfg     h(   b   ]	4 5$   O @ 6 Z       g  y
		' g  tmp		'  g  filenamef  ice-9/expect.scm
	1
 		'   C5RhiRiiR4!"%(+.0W/jklo_@C      h     -  1  3 "  a(  4545 "  c45  	 "4
 54
 5"C            g  clauses
		  g  tests		p g  exprs			p g  defs			p g  body			p g  rxname		2	p  g  filenamef  ice-9/expect.scm
	x
		y			y	
		}			~			~	(		~	3	&	~	(	)	~		. 	!	2 		7 	 	: 	 	> 	&	A 	2	C 	&	K 	 	M 	&	] 	*	^ 	&	a 	 	m 		p	y	
	q	y	!	z	z	! 	{	  	|	  	y	
 	y	 		 


   C   h   d   ]	4 5L 4?6\       g  args
		 g  v			  g  filenamef  ice-9/expect.scm		x
 		   Cfg     h(   b   ]	4 5$   O @ 6 Z       g  y
		' g  tmp		'  g  filenamef  ice-9/expect.scm
	x
 		'   C5R;p h@   L  ]45      B@
$  4  5CC      D      g  port
		: g  timeout		: g  
secs-usecs			: g  relative			:  g  filenamef  ice-9/expect.scm
 
	 		 		 		 		 		 		 		 		# 			' 		( 		/ 		0 	)	1 	-	5 		6 		7 		 		:	  g  nameg  expect-select CRiqrs   h     ]#"  "  $$  $  	"  ""  "4 
5$  7"  "
$  C45"45"C |      g  rx
		 g  s		 g  eof?			 g  flags		0	 g  match		>	 g  i		J	l g  result		J	l  g  filenamef  ice-9/expect.scm
 
	 		 		 		  		0 		3 		> 		F 		J 		N 		R 		X 	*	Y 		d 		l 		m 		t 		u 		} 	 			  g  nameg  expect-regexec CRC              g  m
		,  g  filenamef  ice-9/expect.scm		
	0	)
	4	*
	8	+
	<	,
	@	-
	s
	t
7 
W 
 	Y
   C6                                                                                                              ccache/ice-9/match.go                                                                               0000644                 00000244343 15154557173 0010332 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0H     ] 4  hR      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  match	 		g  filenameS	
f  ice-9/match.scm	g  exportsS	g  match-lambda	g  match-lambda*	g  	match-let	g  
match-let*	g  match-letrec	 	g  set-current-module	 	 	g  throw	g  match-error	f  match	g  error	g  make-syntax-transformer	 	 	g  slot-ref	g  macro	g  $sc-dispatch	 	  	!g  any	"!!!! 	#g  syntax-object	$g  
struct-ref	%g  top	&% 	'g  ribcage	(g  dummy	)g  rtd	*g  rec	+g  n	,()*+ 	-g  m-1883f58c-6d8	.-% 	/.&&& 	0f  l-1883f58c-6dd	1f  l-1883f58c-6de	2f  l-1883f58c-6df	3f  l-1883f58c-6e0	40123 	5',/4 	6' 	7g  x	87 	9. 	:f  l-1883f58c-6da	;: 	<'89; 	=&56< 	>g  hygiene	?> 	@#$=? 	Ag  syntax-violation	BA 	CA 	Df  -source expression failed to match any pattern	Eg  	slot-set!	F!!!!! 	Gg  struct-set!	Hg  value	I()*+H 	Jg  m-1883f58c-6e5	KJ% 	LK&&&& 	Mf  l-1883f58c-6ea	Nf  l-1883f58c-6eb	Of  l-1883f58c-6ec	Pf  l-1883f58c-6ed	Qf  l-1883f58c-6ee	RMNOPQ 	S'ILR 	TK 	Uf  l-1883f58c-6e7	VU 	W'8TV 	X&S6W 	Y#GX? 	Zg  is-a?	[!!! 	\g  and	](*) 	^g  m-1883f58c-6f4	_^% 	`_&& 	af  l-1883f58c-6f9	bf  l-1883f58c-6fa	cf  l-1883f58c-6fb	dabc 	e']`d 	f_ 	gf  l-1883f58c-6f6	hg 	i'8fh 	j&e6i 	k#\j? 	lg  struct?	m#lj? 	ng  eq?	o#nj? 	pg  struct-vtable	q#pj? 	rg  match-syntax-error	s! 	t( 	ug  m-1883f58c-701	vu% 	wv 	xf  l-1883f58c-706	yx 	z'twy 	{f  l-1883f58c-703	|{ 	}'8w| 	~&z6} 	#r~?  f   invalid match-syntax-error usage #~?    g  m-1883f58c-708 %    f  l-1883f58c-70d   't  f  l-1883f58c-70a   '8  &6  #r?  f  missing match expression #?    !!  g  atom (  &  f  l-1883f58c-710 f  l-1883f58c-711   '  &6  #r?  f  no match clauses #?    g  each-any g  each !!    ! g  let g  app g  pat g  body (  &&&  f  l-1883f58c-715 f  l-1883f58c-716 f  l-1883f58c-717 f  l-1883f58c-718   '  &6  #?  g  v #?  g  
match-next #?  g  set! #?  g  map     g  cons g  vector    ! g  vec (  f  l-1883f58c-723 f  l-1883f58c-724 f  l-1883f58c-725 f  l-1883f58c-726   '  &6  #?  #?  g  list->vector     #?  #?      ! !Ҍ (  f  l-1883f58c-72f f  l-1883f58c-730 f  l-1883f58c-731 f  l-1883f58c-732   '  &6  #?  #?  #?  #?  g  g+s (  g  m-1883f58c-739 %  &&  f  l-1883f58c-73e f  l-1883f58c-73f f  l-1883f58c-740   '    f  l-1883f58c-73b   '8  &6  #?  g  quote #?  #?    f  no matching pattern #?  g  free-id g  => &6  #?    !  ! ! ! ! !! g  failureg  rest( &&&&&& f  l-1883f58c-745f  l-1883f58c-746f  l-1883f58c-747	f  l-1883f58c-748
f  l-1883f58c-749f  l-1883f58c-74af  l-1883f58c-74b	
 ' &6 #? g  lambda#? #? g  	match-one#? g  match-drop-ids#? g  begin#?  !!!!(  &&&&& !f  l-1883f58c-754"f  l-1883f58c-755#f  l-1883f58c-756$f  l-1883f58c-757%f  l-1883f58c-758&f  l-1883f58c-759'!"#$%& (' ' )&(6 *#)? +#)? ,#)? -+, .!/!!.!!!! 0g  match-check-ellipse1g  p2g  q3g  r4g  sk5g  fk6g  i7(123456 	8g  m-1883f58c-76098% :9&&&&&&&& 	;f  l-1883f58c-765<f  l-1883f58c-766=f  l-1883f58c-767>f  l-1883f58c-768?f  l-1883f58c-769@f  l-1883f58c-76aAf  l-1883f58c-76bBf  l-1883f58c-76cCf  l-1883f58c-76dD;<=>?@ABC 	E'7:D F9 Gf  l-1883f58c-762HG I'8FH J&E6I K#0J? Lg  match-extract-varsM#LJ? Ng  match-gen-ellipsesO#NJ? Pg  	match-twoQ#PJ? R(7 S9& Tf  l-1883f58c-778Uf  l-1883f58c-779VTU W'RSV X&W6I Y#PX? Z!!!!! [g  if\(456 ]g  m-1883f58c-77c^]% _^&&&&& `f  l-1883f58c-781af  l-1883f58c-782bf  l-1883f58c-783cf  l-1883f58c-784df  l-1883f58c-785ef  l-1883f58c-786f`abcde g'\_f h^ if  l-1883f58c-77eji k'8hj l&g6k m#[l? ng  null?o#nl? pg  appendqp rp s&6k t#s? ut vu! w!!v!!! x(1456 y^&&&&&& zf  l-1883f58c-78f{f  l-1883f58c-790|f  l-1883f58c-791}f  l-1883f58c-792~f  l-1883f58c-793f  l-1883f58c-794f  l-1883f58c-795z{|}~ 'xy &6k #[? g  equal?#? #? g  
quasiquote#s?  ! !!!g  match-quasiquote(17 ^&&& f  l-1883f58c-79ff  l-1883f58c-7a0f  l-1883f58c-7a1f  l-1883f58c-7a2 ' &6k #? #\s?   !!!!! !!!!!!! (12456 ^&&&&&&& f  l-1883f58c-7b6f  l-1883f58c-7b7f  l-1883f58c-7b8f  l-1883f58c-7b9f  l-1883f58c-7baf  l-1883f58c-7bbf  l-1883f58c-7bcf  l-1883f58c-7bd ' &6k #? #\? g  or#s?   !!!!!! ! !!!f  l-1883f58c-7d5f  l-1883f58c-7d6f  l-1883f58c-7d7f  l-1883f58c-7d8 ' &6k #? !!!!!! f  l-1883f58c-7def  l-1883f58c-7dff  l-1883f58c-7e0f  l-1883f58c-7e1f  l-1883f58c-7e2f  l-1883f58c-7e3f  l-1883f58c-7e4 'xy &6k #L? #? g  match-gen-or#? g  not#s?  ! !!!!! f  l-1883f58c-7eff  l-1883f58c-7f0f  l-1883f58c-7f1f  l-1883f58c-7f2f  l-1883f58c-7f3f  l-1883f58c-7f4f  l-1883f58c-7f5 'xy &6k #? #? g  get!#s?  ! !!!! g  getterg  gg  s(456 f  l-1883f58c-7fff  l-1883f58c-800f  l-1883f58c-801f  l-1883f58c-802f  l-1883f58c-803f  l-1883f58c-804f  l-1883f58c-805f  l-1883f58c-806 ' &6k #? #? #s?  ! ! !!!! g  setter(456 f  l-1883f58c-811 f  l-1883f58c-812f  l-1883f58c-813f  l-1883f58c-814f  l-1883f58c-815f  l-1883f58c-816f  l-1883f58c-817f  l-1883f58c-818  ' 	&6k 
#	? #	? #7	?  g  ?#s?  !!!!!! g  pred(1456 f  l-1883f58c-824f  l-1883f58c-825f  l-1883f58c-826f  l-1883f58c-827f  l-1883f58c-828f  l-1883f58c-829f  l-1883f58c-82af  l-1883f58c-82b ' &6k  #[? !#? "#\? #g  =$##s? %$ &%!! '&!(!')!(*g  proc+(*17 ,^&&&& -f  l-1883f58c-835.f  l-1883f58c-836/f  l-1883f58c-8370f  l-1883f58c-8381f  l-1883f58c-8392-./01 3'+,2 4&36k 5#4? 6g  w7#64? 8#4? 9g  ___:#9s? ;: <;!=!<>!!=!!!! ?(13456 @f  l-1883f58c-840Af  l-1883f58c-841Bf  l-1883f58c-842Cf  l-1883f58c-843Df  l-1883f58c-844Ef  l-1883f58c-845Ff  l-1883f58c-846Gf  l-1883f58c-847H@ABCDEFG I'?H J&I6k K#LJ? L#NJ? M!!s!!!! Nf  l-1883f58c-851Of  l-1883f58c-852Pf  l-1883f58c-853Qf  l-1883f58c-854Rf  l-1883f58c-855Sf  l-1883f58c-856Tf  l-1883f58c-857UNOPQRST V'xyU W&V6k X#[W? Y#\W? Zg  pair?[#ZW? \#nW? ]g  cdr^#]W? _#W? `#6W? ag  carb#aW? c#W? dg  set-car!e#dW? fg  ***g#fs? hg i!h! j!!i!!!! kf  l-1883f58c-860lf  l-1883f58c-861mf  l-1883f58c-862nf  l-1883f58c-863of  l-1883f58c-864pf  l-1883f58c-865qf  l-1883f58c-866rf  l-1883f58c-867sklmnopqr t's u&t6k v#Lu? wg  match-gen-searchx#wu? yh!z!y{!!z!!!! |f  l-1883f58c-871}f  l-1883f58c-872~f  l-1883f58c-873f  l-1883f58c-874f  l-1883f58c-875f  l-1883f58c-876f  l-1883f58c-877f  l-1883f58c-878|}~ ' &6k #r? f  invalid use of ***#? #f? g  ..1#s?  ! !!!!!! f  l-1883f58c-882f  l-1883f58c-883f  l-1883f58c-884f  l-1883f58c-885f  l-1883f58c-886f  l-1883f58c-887f  l-1883f58c-888 'xy &6k #[? #Z? #? #9?  g  $#s?  !!!!!! (*1456 f  l-1883f58c-891f  l-1883f58c-892f  l-1883f58c-893f  l-1883f58c-894f  l-1883f58c-895f  l-1883f58c-896f  l-1883f58c-897f  l-1883f58c-898 ' &6k #[? #Z? g  match-record-refs#? #
? !!!!!! f  l-1883f58c-8a3f  l-1883f58c-8a4f  l-1883f58c-8a5f  l-1883f58c-8a6f  l-1883f58c-8a7f  l-1883f58c-8a8f  l-1883f58c-8a9f  l-1883f58c-8aa ' &6k #[? #Z? #? #6? #a? #7? #]? #? #d? g  set-cdr!#? !̌!͌g  match-vector(17 f  l-1883f58c-8b4f  l-1883f58c-8b5f  l-1883f58c-8b6f  l-1883f58c-8b7f  l-1883f58c-8b8 ', &6k #? #
? g  _#s?  !!!!! !!!!! g  
let-syntaxg  id(745 f  l-1883f58c-8cef  l-1883f58c-8cff  l-1883f58c-8d0f  l-1883f58c-8d1f  l-1883f58c-8d2f  l-1883f58c-8d3f  l-1883f58c-8d4 'y &6k #? g  new-sym?#? g  syntax-rules#? g  sk2#? g  fk2#?   g  y#?    g  random-sym-to-match#? #?  #[? #? g  unquoteg  m-1883f58c-8e1%  f  l-1883f58c-8e3 '8 	&6 
#	? 
 ! !!!!!! &&&&&& f  l-1883f58c-8e6f  l-1883f58c-8e7f  l-1883f58c-8e8f  l-1883f58c-8e9f  l-1883f58c-8eaf  l-1883f58c-8ebf  l-1883f58c-8ec 'x &6 #? g  unquote-splicing#	?  ! !!!!!!!  (1456 !&&&&&&& "f  l-1883f58c-8f5#f  l-1883f58c-8f6$f  l-1883f58c-8f7%f  l-1883f58c-8f8&f  l-1883f58c-8f9'f  l-1883f58c-8fa(f  l-1883f58c-8fb)f  l-1883f58c-8fc*"#$%&'() +' !* ,&+6 -#[,? .#Z,? /#,? 0g  tmp1#0,? 2#,? 3#	? 43 54! 6!.7!68579!8:!9;g  depth<(1456; =f  l-1883f58c-906>f  l-1883f58c-907?f  l-1883f58c-908@f  l-1883f58c-909Af  l-1883f58c-90aBf  l-1883f58c-90bCf  l-1883f58c-90cDf  l-1883f58c-90dE=>?@ABCD F'<!E G&F6 H#G? I#G? J!7KJL!KM!LN(14567; 	O&&&&&&&& 	Pf  l-1883f58c-917Qf  l-1883f58c-918Rf  l-1883f58c-919Sf  l-1883f58c-91aTf  l-1883f58c-91bUf  l-1883f58c-91cVf  l-1883f58c-91dWf  l-1883f58c-91eXf  l-1883f58c-91fYPQRSTUVWX 	Z'NOY [&Z6 \#[? ]J^!]_!^`f  l-1883f58c-92aaf  l-1883f58c-92bbf  l-1883f58c-92ccf  l-1883f58c-92ddf  l-1883f58c-92eef  l-1883f58c-92fff  l-1883f58c-930gf  l-1883f58c-931hf  l-1883f58c-932i`abcdefgh 	j'NOi k&j6 l#k? m7n!mo!np(12456; 	qf  l-1883f58c-93drf  l-1883f58c-93esf  l-1883f58c-93ftf  l-1883f58c-940uf  l-1883f58c-941vf  l-1883f58c-942wf  l-1883f58c-943xf  l-1883f58c-944yf  l-1883f58c-945zqrstuvwxy 	{'pOz |&{6 }#[|? ~#Z|? #|? #6|? #a|? #7|? #]|? #|? g  match-quasiquote-step#|? 7!!g  elt(456; f  l-1883f58c-950f  l-1883f58c-951f  l-1883f58c-952f  l-1883f58c-953f  l-1883f58c-954f  l-1883f58c-955f  l-1883f58c-956f  l-1883f58c-957 '! &6 #[? g  vector?#? #? g  ls#? g  vector->list#? #? !J!(7456; f  l-1883f58c-962f  l-1883f58c-963f  l-1883f58c-964f  l-1883f58c-965f  l-1883f58c-966f  l-1883f58c-967f  l-1883f58c-968f  l-1883f58c-969 '! &6 #? #? !!!!!!!! (7245;6 g  m-1883f58c-972% &&&&&&& f  l-1883f58c-977f  l-1883f58c-978f  l-1883f58c-979f  l-1883f58c-97af  l-1883f58c-97bf  l-1883f58c-97cf  l-1883f58c-97df  l-1883f58c-97e '  f  l-1883f58c-974 '8 &6 #? !g  match-tuck-ids!! !Ȍg  match-drop-first-arg !!!!! g  id-ls(1456 	g  m-1883f58c-9ae% &&&&&&&& 	f  l-1883f58c-9b3f  l-1883f58c-9b4f  l-1883f58c-9b5f  l-1883f58c-9b6f  l-1883f58c-9b7f  l-1883f58c-9b8f  l-1883f58c-9b9f  l-1883f58c-9baf  l-1883f58c-9bb 	'  f  l-1883f58c-9b0 '8 &6 #? #? #? g  match-gen-or-step#? #? 6!茤!錤s!!댤!쌤g  m-1883f58c-9cb% &&& f  l-1883f58c-9ddf  l-1883f58c-9def  l-1883f58c-9dff  l-1883f58c-9e0 '  f  l-1883f58c-9cd '8 &6 #? &&&&&&& f  l-1883f58c-9e6f  l-1883f58c-9e7 f  l-1883f58c-9e8f  l-1883f58c-9e9f  l-1883f58c-9eaf  l-1883f58c-9ebf  l-1883f58c-9ecf  l-1883f58c-9ed  ' &6 	#? 
#? #? #? #? 
 !!!!!! 	g  match-check-identifierg  m-1883f58c-9f6% &&&&&&&& 	f  l-1883f58c-9fbf  l-1883f58c-9fcf  l-1883f58c-9fdf  l-1883f58c-9fef  l-1883f58c-9fff  l-1883f58c-a00f  l-1883f58c-a01f  l-1883f58c-a02f  l-1883f58c-a03 	'   f  l-1883f58c-9f8!  "'8! #&6" $##? %##? &#[#? 'g  list?(#'#? )g  loop*#)#? +##? ,##? -, .- /g  cond0#/#? 1#n#? 21+ 3g  reverse4#3#? 5#Z#? 65+ 7#6#? 8#a#? 98+ :79 ;: <##? =#d#? >=+ ?9> @##? A#]#? BA+ C##? Dg  elseE#D#? F!!!!!!! 	Gg  match-verify-no-ellipsesH(13456 
I&&&&&&&&& 
Jf  l-1883f58c-a15Kf  l-1883f58c-a16Lf  l-1883f58c-a17Mf  l-1883f58c-a18Nf  l-1883f58c-a19Of  l-1883f58c-a1aPf  l-1883f58c-a1bQf  l-1883f58c-a1cRf  l-1883f58c-a1dSf  l-1883f58c-a1eTJKLMNOPQRS 
U'HIT V&U6" W#GV? Xg  let*Y#XV? Zg  tail-len[#ZV? \g  length]#\V? ^#V? _#V? `g  lena#`V? b#\V? c#'V? dc_ e]_ fbde gaf hg i#[V? j#V? k#V? lka mg  <n#mV? ona[ pjlo q#V? r#)V? s__ t#+V? uta v^ wv x#/V? y##V? zyt[ {#3V? |#V? }#V? ~}} #ZV? _ #6V? #aV? _   #dV? _  #V? #]V? _ g  -#V? #V? t #V? #DV? !! (74 g  m-1883f58c-a2f% &&& f  l-1883f58c-a34f  l-1883f58c-a35f  l-1883f58c-a36f  l-1883f58c-a37 '  f  l-1883f58c-a31 '8 &6 #0? #r? f  3multiple ellipse patterns not allowed at same level#?  #G? !! (74 && f  l-1883f58c-a42f  l-1883f58c-a43f  l-1883f58c-a44 ' &6 #r? f  %dotted tail not allowed after ellipse#? !!!!!!!! 	g  letrec(12456 
g  m-1883f58c-a48% &&&&&&&&& 
f  l-1883f58c-a4df  l-1883f58c-a4ef  l-1883f58c-a4ff  l-1883f58c-a50f  l-1883f58c-a51f  l-1883f58c-a52f  l-1883f58c-a53f  l-1883f58c-a54f  l-1883f58c-a55f  l-1883f58c-a56 
'  f  l-1883f58c-a4a '8 &6 #? g  try#? #? #6? g  fail#? #? #? #? #3? g  next#? #[? #? #Z?    g  u#? #a?    #d?   #? #? g  lp#? #? #]?          #?   !!!!!g  pats(+127  g  m-1883f58c-a6b % &&&&&& f  l-1883f58c-a70f  l-1883f58c-a71f  l-1883f58c-a72f  l-1883f58c-a73f  l-1883f58c-a74f  l-1883f58c-a75	f  l-1883f58c-a76
	 '
  f  l-1883f58c-a6d '8 &6 #0? g  match-gen-vector-ellipses#? g  match-vector-two#? &6 #9?  ! !!!!!!! (+1456 &&&&&&& f  l-1883f58c-a7ff  l-1883f58c-a80f  l-1883f58c-a81 f  l-1883f58c-a82!f  l-1883f58c-a83"f  l-1883f58c-a84#f  l-1883f58c-a85$f  l-1883f58c-a86% !"#$ &'% '&&6 (#'? )& *f  l-1883f58c-a90+f  l-1883f58c-a91,*+ -'R), .&-6 /#.? 0!!!!!! 1g  index2(+1456 3g  m-1883f58c-a9443% 54&&&&&&& 6f  l-1883f58c-a997f  l-1883f58c-a9a8f  l-1883f58c-a9b9f  l-1883f58c-a9c:f  l-1883f58c-a9d;f  l-1883f58c-a9e<f  l-1883f58c-a9f=f  l-1883f58c-aa0>6789:;<= ?'25> @4 Af  l-1883f58c-a96BA C'8@B D&?6C E#[D? F#D? G#D? H#`D? Ig  vector-lengthJ#ID? K##D? Lg  match-vector-stepM#LD? Ng  listOP!OQ!PR!QS4&&&&&& Tf  l-1883f58c-aacUf  l-1883f58c-aadVf  l-1883f58c-aaeWf  l-1883f58c-aafXf  l-1883f58c-ab0Yf  l-1883f58c-ab1Zf  l-1883f58c-ab2[TUVWXYZ \'S[ ]&\6C ^#]? _g  +`#_]? a#]? ba c!!!! d!!!!! e(1456 fg  m-1883f58c-abbgf% hg&&&&&&& if  l-1883f58c-accjf  l-1883f58c-acdkf  l-1883f58c-acelf  l-1883f58c-acfmf  l-1883f58c-ad0nf  l-1883f58c-ad1of  l-1883f58c-ad2pf  l-1883f58c-ad3qijklmnop r'ehq sg tf  l-1883f58c-abdut v'8su w&r6v x#w? y#6w? zg  
vector-ref{#zw? |#w? }g  vector-set!~#}w? #Lw? !!!!!!! (+11456 	g  m-1883f58c-adc% &&&&&&&& 	f  l-1883f58c-ae1f  l-1883f58c-ae2f  l-1883f58c-ae3f  l-1883f58c-ae4f  l-1883f58c-ae5f  l-1883f58c-ae6f  l-1883f58c-ae7f  l-1883f58c-ae8f  l-1883f58c-ae9 	'  f  l-1883f58c-ade '8 &6 #[? #? #? #`? #I? g  >=#? #L? g  match-vector-tail#? (1+`456 g  m-1883f58c-af5% &&&&&&& f  l-1883f58c-afaf  l-1883f58c-afbf  l-1883f58c-afcf  l-1883f58c-afdf  l-1883f58c-afef  l-1883f58c-afff  l-1883f58c-b00f  l-1883f58c-b01 '  f  l-1883f58c-af7 '8 &6 #L? g  match-vector-tail-two#? (1+`456 
g  m-1883f58c-b0a% &&&&&&&&& 
f  l-1883f58c-b0ff  l-1883f58c-b10f  l-1883f58c-b11f  l-1883f58c-b12f  l-1883f58c-b13f  l-1883f58c-b14f  l-1883f58c-b15f  l-1883f58c-b16f  l-1883f58c-b17f  l-1883f58c-b18 
'  f  l-1883f58c-b0c '8 &6 #? #)? g  j#? #?   #[? #? #3? #6? #z?  #? g  
vetor-set!#? #? #_? #?  #? !!!!!!!! 	(*+12456 
g  m-1883f58c-b29% &&&&&&&&& 
f  l-1883f58c-b2ef  l-1883f58c-b2ff  l-1883f58c-b30f  l-1883f58c-b31f  l-1883f58c-b32f  l-1883f58c-b33f  l-1883f58c-b34f  l-1883f58c-b35f  l-1883f58c-b36f  l-1883f58c-b37 
'  f  l-1883f58c-b2b '8 &6 #? #6? #? #? #E? #? #_? #?  !!!!!!! 	g  m-1883f58c-b54 %   f  l-1883f58c-b56 '8 &6 #?  	!
!	(17  &&& f  l-1883f58c-b59f  l-1883f58c-b5af  l-1883f58c-b5bf  l-1883f58c-b5c ' &6 #L? #?  !!(*17 f  l-1883f58c-b62f  l-1883f58c-b63f  l-1883f58c-b64f  l-1883f58c-b65  ' !& 6 "#L!? ###? $# %$!! &%!'!&((*17 )f  l-1883f58c-b6b*f  l-1883f58c-b6c+f  l-1883f58c-b6d,f  l-1883f58c-b6e-)*+, .'(- /&.6 0#L/? 1#? 21 32! 4!3!! 5#? 65 76! 8!7!!! 9g  match-extract-quasiquote-vars:g  k;(7:6 < &&&& =f  l-1883f58c-b80>f  l-1883f58c-b81?f  l-1883f58c-b82@f  l-1883f58c-b83Af  l-1883f58c-b84B=>?@A C';<B D&C6 E#9D? F#D? GF HG I#\? JI KJ!LK!M!LN(17 O && Pf  l-1883f58c-b8bQf  l-1883f58c-b8cRf  l-1883f58c-b8dSPQR T'NOS U&T6 V#LU? W#? XW YX!ZY![!Z\f  l-1883f58c-b92]f  l-1883f58c-b93^f  l-1883f58c-b94_\]^ `'NO_ a&`6 b#La? c#? dc ed!fe!g!fhf  l-1883f58c-b99if  l-1883f58c-b9ajf  l-1883f58c-b9bkhij l'NOk m&l6 n#Lm? o!.!!! p(123:6 q &&&&&& rf  l-1883f58c-ba0sf  l-1883f58c-ba1tf  l-1883f58c-ba2uf  l-1883f58c-ba3vf  l-1883f58c-ba4wf  l-1883f58c-ba5xf  l-1883f58c-ba6yrstuvwx z'pqy {&z6 |#0{? }#L{? ~g  match-extract-vars-step#~{? !!!! (12:6  &&&&& f  l-1883f58c-baff  l-1883f58c-bb0f  l-1883f58c-bb1f  l-1883f58c-bb2f  l-1883f58c-bb3f  l-1883f58c-bb4 ' &6 #L? #~? !!f  l-1883f58c-bbcf  l-1883f58c-bbdf  l-1883f58c-bbe 'NO &6 #L? #?  !!! #9?  !!! #f?  !!! #?  !!! !!! (1:6 f  l-1883f58c-becf  l-1883f58c-bedf  l-1883f58c-beef  l-1883f58c-beff  l-1883f58c-bf0 '< &6 #? #? #? #4? #5?   #!?    #? g  p-ls#?  !!!!! g  v2g  v2-ls(1:6 g  m-1883f58c-bf9% &&&&&& f  l-1883f58c-bfef  l-1883f58c-bfff  l-1883f58c-c00f  l-1883f58c-c01f  l-1883f58c-c02f  l-1883f58c-c03f  l-1883f58c-c04 '  f  l-1883f58c-bfb '8 &6 #L? g  m-1883f58c-c0f%  f  l-1883f58c-c11 '8 &6 #?  ! !!!!! g  d(7:6 &&&&& f  l-1883f58c-c14f  l-1883f58c-c15f  l-1883f58c-c16f  l-1883f58c-c17f  l-1883f58c-c18f  l-1883f58c-c19 ' &6 #9? #? #?  ! !!!!! f  l-1883f58c-c21f  l-1883f58c-c22f  l-1883f58c-c23f  l-1883f58c-c24f  l-1883f58c-c25f  l-1883f58c-c26 ' &6 #9? #? #?  !   !!!!  &&&& f  l-1883f58c-c2ef  l-1883f58c-c2ff  l-1883f58c-c30f  l-1883f58c-c31f  l-1883f58c-c32 ';  &6 	#L? 
!!!!!
 f  l-1883f58c-c39f  l-1883f58c-c3af  l-1883f58c-c3bf  l-1883f58c-c3cf  l-1883f58c-c3df  l-1883f58c-c3e ' &6 #9? !!!!
 (7:6 &&&&&& f  l-1883f58c-c46f  l-1883f58c-c47f  l-1883f58c-c48f  l-1883f58c-c49f  l-1883f58c-c4af  l-1883f58c-c4bf  l-1883f58c-c4c  !'  "&!6 ##9"? $g  "match-extract-quasiquote-vars-step%#$"? &!!!!
 'f  l-1883f58c-c55(f  l-1883f58c-c56)f  l-1883f58c-c57*f  l-1883f58c-c58+f  l-1883f58c-c59,f  l-1883f58c-c5a-'()*+, .'- /&.6 0#9/? 1!!!!
 2!!!!!! 3(7:6 4g  m-1883f58c-c7054% 65&&&&&&& 7f  l-1883f58c-c758f  l-1883f58c-c769f  l-1883f58c-c77:f  l-1883f58c-c78;f  l-1883f58c-c79<f  l-1883f58c-c7a=f  l-1883f58c-c7b>f  l-1883f58c-c7c?789:;<=> @'36? A5 Bf  l-1883f58c-c72CB D'8AC E&@6D F#9E? Gg  patternH(G Ig  m-1883f58c-c88JI% KJ&& Lf  l-1883f58c-c8dMf  l-1883f58c-c8eNf  l-1883f58c-c8fOLMN P'HKO QJ Rf  l-1883f58c-c8aSR T'8QS U&P6T V#U? Wg  exprX#WU? YX Z#U? [g  m-1883f58c-c95\[% ]\&& ^f  l-1883f58c-c9a_f  l-1883f58c-c9b`f  l-1883f58c-c9ca^_` b'H]a c\ df  l-1883f58c-c97ed f'8ce g&b6f h#g? i#Wg? j#g? k!l!kmg  match-let/helperng  varo(nH pg  m-1883f58c-ca2qp% rq&&& sf  l-1883f58c-ca7tf  l-1883f58c-ca8uf  l-1883f58c-ca9vf  l-1883f58c-caawstuv x'orw yq zf  l-1883f58c-ca4{z |'8y{ }&x6| ~#m}? #}? !lg  match-named-letg  init()n q&&&& f  l-1883f58c-cb2f  l-1883f58c-cb3f  l-1883f58c-cb4f  l-1883f58c-cb5f  l-1883f58c-cb6 ' &6| #? g  m-1883f58c-cbe% &&& f  l-1883f58c-cc3f  l-1883f58c-cc4f  l-1883f58c-cc5f  l-1883f58c-cc6 'o  f  l-1883f58c-cc0 '8 &6 #m? #? !!!!!(nW0 g  m-1883f58c-ccd% &&&&&& f  l-1883f58c-cdff  l-1883f58c-ce0f  l-1883f58c-ce1f  l-1883f58c-ce2f  l-1883f58c-ce3f  l-1883f58c-ce4f  l-1883f58c-ce5 '  f  l-1883f58c-ccf '8 &6 #? ! !!!!g  ag  b(1W 	&&&&&&&& 	f  l-1883f58c-cf2f  l-1883f58c-cf3f  l-1883f58c-cf4f  l-1883f58c-cf5f  l-1883f58c-cf6f  l-1883f58c-cf7f  l-1883f58c-cf8f  l-1883f58c-cf9f  l-1883f58c-cfa 	' &6 #m? #0?  ! !!֌׌!،!ٌ(1W &&&&&&& f  l-1883f58c-d07f  l-1883f58c-d08f  l-1883f58c-d09f  l-1883f58c-d0af  l-1883f58c-d0bf  l-1883f58c-d0cf  l-1883f58c-d0df  l-1883f58c-d0e ' &6 #m? #0?  !댤쌤!팤!f  l-1883f58c-d1bf  l-1883f58c-d1cf  l-1883f58c-d1df  l-1883f58c-d1ef  l-1883f58c-d1ff  l-1883f58c-d20f  l-1883f58c-d21f  l-1883f58c-d22 ' &6 #m? [ !! ()Wn g  m-1883f58c-d2d% &&&&& f  l-1883f58c-d32f  l-1883f58c-d33f  l-1883f58c-d34f  l-1883f58c-d35f  l-1883f58c-d36	f  l-1883f58c-d37
	 ' 
  f  l-1883f58c-d2f '8 &6 #? #? !쌤!()W &&&&&& f  l-1883f58c-d43f  l-1883f58c-d44f  l-1883f58c-d45f  l-1883f58c-d46f  l-1883f58c-d47f  l-1883f58c-d48f  l-1883f58c-d49 '  &6 !# ? "#0 ? #" $!%( &g  m-1883f58c-d52'&% ('& )f  l-1883f58c-d57*f  l-1883f58c-d58+)* ,'%(+ -' .f  l-1883f58c-d54/. 0'8-/ 1&,60 2#1? 3!댤4(W 5'&&&& 6f  l-1883f58c-d5c7f  l-1883f58c-d5d8f  l-1883f58c-d5e9f  l-1883f58c-d5f:f  l-1883f58c-d60;6789: <'45; =&<60 >#=? ?#=? @!!! A!!! Bg  	success-kCg  	failure-kD(BC Eg  m-1883f58c-d66FE% GF&&& Hf  l-1883f58c-d7fIf  l-1883f58c-d80Jf  l-1883f58c-d81Kf  l-1883f58c-d82LHIJK M'DGL NF Of  l-1883f58c-d68PO Q'8NP R&M6Q S#R? Tg  ellipse?U#TR? V#R? Wg  fooX#WR? Y#4R? Z#5R? [YZ \Y ]g  other^#]R? _U^YZ `_Z a` b#R? c#R? dg  ce#dR? fbce g(7BC hg  m-1883f58c-d87ih% ji&&& kf  l-1883f58c-da0lf  l-1883f58c-da1mf  l-1883f58c-da2nf  l-1883f58c-da3oklmn p'gjo qi rf  l-1883f58c-d89sr t'8qs u&p6t v#u? wg  sym?x#wu? y#u? z#4u? {#5u? |z{ }z ~#u? x~z{ {  g  abracadabra#u? C 5 hp  a   ]4	
5 4 >  "  G         h      - 1 3 @            g  _
			 g  args			  g  filenamef  ice-9/match.scm
	
									 			
  g  nameg  error CR4 "@     h   ^   ] C    V       g  dummy
		 g  rtd		 g  rec			 g  n			  			   CCD   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/match.scm
	!	 		"  g  
macro-typeg  syntax-rulesg  patternsg  rtdg  recg  n   C5R4E FY   h   q   ] C  i       g  dummy
		 g  rtd		 g  rec			 g  n			 g  value			  			   CCD        h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/match.scm
	&	 		"  g  
macro-typeg  syntax-rulesg  patternsg  rtdg  recg  ng  value   C5ER4Z [kmoq    h    O   ]    C   G       g  dummy
		 g  rec		 g  rtd			  			   CCD  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/match.scm
	+	 		"  g  
macro-typeg  syntax-rulesg  patternsg  recg  rtd   C5ZR4r s        h   -   ]C   %       g  dummy
		  		   CCD    h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/match.upstream.scm
 	 		"  g  
macro-typeg  syntax-rulesg  patterns  C5rR4 s      h   -   ]C   %       g  dummy
		  		   C   h   ?   ]C   7       g  dummy
		 g  atom		  			   C       h0   a   ]    45 CY       g  dummy
		0 g  app		0 g  pat			0 g  body			0  		0	   C   h0   a   ]45  45 C     Y       g  dummy
		+ g  vec		+ g  pat			+ g  body			+  		+	   C     h0   b   ]    45 CZ       g  dummy
		0 g  atom		0 g  pat			0 g  body			0  		0	   CCD       h   b  ])4 5$  @4 5$  @4 5$  @4 5$  	@4 
5$  @ 6  Z      g  x
		~ g  tmp		~ g  tmp		"	~ g  tmp		9	~ g  tmp		P	~ g  tmp		g	~  g  filenamef  ice-9/match.upstream.scm
	 		~  g  
macro-typeg  syntax-rulesg  patternsg  atom g  appg  ... g  patg  bodyg  ... g  vecg  ... g  patg  bodyg  ... g  atomg  patg  bodyg  ...   C5R4 [   h   M   ]  C       E       g  dummy
		 g  v		 g  g+s			  			   C       h@      ]      C       g  dummy
		@ g  v		@ g  g+s			@ g  pat			@ g  failure			@ g  body			@ g  rest			@  		@	   C*-    h      ]C z       g  dummy
		 g  v		 g  g+s			 g  pat			 g  body			 g  rest			  			   CCD 
      hP   .  ]4 5$  @4 5$  @4 5$  @	 6&      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  ice-9/match.upstream.scm
	 		P  g  
macro-typeg  syntax-rulesg  patternsg  vg  g+s g  vg  g+sg  patg  =>g  failure g  bodyg  restg  vg  g+sg  patg  bodyg  rest  C5R4 /KMOQ    hH      , 	3 	   C           g  dummy
		D g  v		D g  p			D g  q			D g  r			D g  g+s			D g  sk			D g  fk			D g  i			D  			D		   CY      h   <   ]C4       g  dummy
		 g  x		  			   CCD     h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  ice-9/match.upstream.scm
/	 		9  g  
macro-typeg  syntax-rulesg  patternsg  vg  pg  qg  rg  g+sg  skg  fkg  i g  x  C5R4P Zmor      h    |   ] 4 5 C   t       g  dummy
		 g  v		 g  g+s			 g  sk			 g  fk			 g  i			  			   Cwr h(      ]  4 5 C           g  dummy
		$ g  v		$ g  p			$ g  g+s			$ g  sk			$ g  fk			$ g  i			$  		$	   C   h   Z   ]C  R       g  dummy
		 g  v		 g  p			 g  x			  			   Cr    h   |   ] 6   t       g  dummy
		 g  v		 g  g+s			 g  sk			 g  fk			 g  i			  			   C       h(      , 3   C       g  dummy
		( g  v		( g  p			( g  q			( g  g+s			( g  sk			( g  fk			( g  i			(  		(	   C h   |   ]C   t       g  dummy
		 g  v		 g  g+s			 g  sk			 g  fk			 g  i			  			   C  h   Z   ]C  R       g  dummy
		 g  v		 g  p			 g  x			  			   C   h(      ] C            g  dummy
		# g  v		# g  p			# g  g+s			# g  sk			# g  fk			# g  i			#  		#	   Cr     h(      ] 4 5 C            g  dummy
		# g  v		# g  p			# g  g+s			# g  sk			# g  fk			# g  i			#  		#	   Cr     h(      , 3    4 5 C       g  dummy
		( g  v		( g  getter			( g  g			( g  s			( g  sk			( g  fk			( g  i			(  		(	   C
r        h0      , 3 45   4 5 C       g  dummy
		0 g  v		0 g  setter			0 g  g			0 g  s			0 g  sk			0 g  fk			0 g  i			0  		0	   C !"   h0      , 3    C              g  dummy
		) g  v		) g  pred			) g  p			) g  g+s			) g  sk			) g  fk			) g  i			)  		)	   C)578   h(   l   ]    C      d       g  dummy
		" g  v		" g  proc			" g  p			" g  x			"  		"	   C>KL    h(      , 3  C         g  dummy
		& g  v		& g  p			& g  r			& g  g+s			& g  sk			& g  fk			& g  i			&  		&	   CMXY[\^_`bce hX      ]       	 
     C         g  dummy
		V g  v		V g  p			V g  g+s			V g  sk			V g  fk			V g  i			V  		V	   Cjvx     h(      , 3  C         g  dummy
		& g  v		& g  p			& g  q			& g  g+s			& g  sk			& g  fk			& g  i			&  		&	   C{      h      , 3  C         g  dummy
		 g  v		 g  p			 g  q			 g  g+s			 g  sk			 g  fk			 g  i			  			   C   h(      ]   C          g  dummy
		% g  v		% g  p			% g  g+s			% g  sk			% g  fk			% g  i			%  		%	   C  h0      , 3   	 C           g  dummy
		, g  v		, g  rec			, g  p			, g  g+s			, g  sk			, g  fk			, g  i			,  		,	   C       hx      , 3        	   
      C              g  dummy
		q g  v		q g  p			q g  q			q g  g+s			q g  sk			q g  fk			q g  i			q  		q	   C h   k   ]C     c       g  dummy
		 g  v		 g  p			 g  g+s			 g  x			  			   Cr   h   |   ] 6   t       g  dummy
		 g  v		 g  g+s			 g  sk			 g  fk			 g  i			  			   Cr     hp      ]    4	4	 5 5 
 4	 5   C           g  dummy
		l g  v		l g  x			l g  g+s			l g  sk			l g  fk			l g  id			l  		l	   CCD 2    h     ]4 5$  @4 5$  @4 5$  @4 5$  	@4 
5$  @4 5$  @4 5$  @4 5$  @4 5		$  	@4 5

$  
@4 5$  @4 5$  @4 5$  @4 5$  @4 5$  @4  5$  !@4 "5$  #@4 $5$  %@4 &5$  '@4 (5$  )@4 *5$  +@4 ,5$  -@4 .5$  /@01 6          g  x
	 g  tmp	 g  tmp		" g  tmp		9 g  tmp		P g  tmp		g g  tmp		~ g  tmp	  g  tmp	  g  tmp		  g  tmp	
  g  tmp	  g  tmp	 g  tmp	 g  tmp	6 g  tmp	M g  tmp	d g  tmp	{ g  tmp	 g  tmp	 g  tmp	 g  tmp	 g  tmp	 g  tmp	  g  filenamef  ice-9/match.upstream.scm
N	 	  g  
macro-typeg  syntax-rulesg  patternsg  vg  g+sg  skg  ... g  fkg  i g  vg  quoteg  p g  g+sg  skg  ... g  fkg  i g  vg  
quasiquoteg  p g  xg  vg  and g  g+sg  skg  ... g  fkg  i g  vg  andg  pg  qg  ... g  g+sg  skg  fkg  i g  vg  or g  g+sg  skg  fkg  i g  vg  org  p g  xg  vg  org  pg  ... g  g+sg  skg  fkg  i g  vg  notg  p g  g+sg  skg  ... g  fkg  i g  vg  get!g  getter g  gg  s g  skg  ... g  fkg  i g  vg  set!g  setter g  gg  sg  ...  g  skg  ... g  fkg  i g  vg  ?g  predg  pg  g+sg  skg  fkg  i g  vg  =g  procg  p g  xg  vg  pg  ___g  rg  g+sg  skg  fkg  i g  vg  p g  g+sg  skg  fkg  i g  vg  pg  ***g  q g  g+sg  skg  fkg  i g  vg  pg  ***g  qg  g+sg  skg  fkg  i g  vg  pg  ..1 g  g+sg  skg  fkg  i g  vg  $g  recg  pg  ... g  g+sg  skg  fkg  i g  vg  pg  qg  g+sg  skg  fkg  i g  vg  pg  ... g  g+sg  xg  vg  _g  g+sg  skg  ... g  fkg  i g  vg  xg  g+sg  skg  ... g  fkg  idg  ...    C5PR4        h      ] C           g  dummy
		 g  v		 g  p			 g  g+s			 g  sk			 g  fk			 g  i			  			   C-./12       h8      , 3     C           g  dummy
		4 g  v		4 g  p			4 g  rest			4 g  g+s			4 g  sk			4 g  fk			4 g  i			4  		4	   C:HI      h(      , 3 C              g  dummy
		! g  v		! g  p			! g  g+s			! g  sk			! g  fk			! g  i			! g  depth			!  		!	   CM\        h       , 	3 	C         g  dummy
		 g  v		 g  p			 g  g+s			 g  sk			 g  fk			 g  i			 g  x			 g  depth			  					   C_l h       , 	3 	C         g  dummy
		 g  v		 g  p			 g  g+s			 g  sk			 g  fk			 g  i			 g  x			 g  depth			  					   Co}~ 
h`      , 	3 	      	   C            g  dummy
		[ g  v		[ g  p			[ g  q			[ g  g+s			[ g  sk			[ g  fk			[ g  i			[ g  depth			[  			[		   C  h@      , 3       C       g  dummy
		@ g  v		@ g  elt			@ g  g+s			@ g  sk			@ g  fk			@ g  i			@ g  depth			@  		@	   C   h       , 3   C          g  dummy
		 g  v		 g  x			 g  g+s			 g  sk			 g  fk			 g  i			 g  depth			  			   CCD   h     ]A4 5$  @4 5$  @4 5$  @4 5$  	@4 
5$  @4 5$  @4 5$  @4 5$  @ 6           g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp		~  g  tmp	   g  tmp	    	g  filenamef  ice-9/match.upstream.scm
	 	   g  
macro-typeg  syntax-rulesg  patternsg  vg  unquoteg  p g  g+sg  skg  fkg  i g  vg  unquote-splicingg  p g  restg  g+sg  skg  fkg  i g  vg  
quasiquoteg  p g  g+sg  skg  fkg  ig  depthg  vg  unquoteg  p g  g+sg  skg  fkg  ig  xg  depthg  vg  unquote-splicingg  p g  g+sg  skg  fkg  ig  xg  depthg  vg  pg  qg  g+sg  skg  fkg  ig  depthg  vg  eltg  ... g  g+sg  skg  fkg  ig  depthg  vg  xg  g+sg  skg  fkg  ig  depth 	 C5R4       h       , 3 C         g  dummy
		 g  x		 g  q			 g  g+s			 g  sk			 g  fk			 g  depth			 g  i			  			   CCD   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/match.upstream.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  xg  qg  g+sg  skg  fkg  depthg  i   C5R4   h   P   ]C   H       g  dummy
		 g  expr		 g  ids			  			   CCD h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/match.upstream.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  exprg  idsg  ...   C5R4 r  h   v   ]45 C     n       g  dummy
		 g  letish		 g  args			 g  expr			 g  ids			  			   CCD   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/match.upstream.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  letishg  argsg  exprg  ...  g  idsg  ...   C5R4 [ h   P   ]C   H       g  dummy
		 g  arg		 g  expr			  			   CCD h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/match.upstream.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  argg  expr   C5R4 r  hH      , 	3 	445 5      C        g  dummy
		G g  v		G g  p			G g  g+s			G g  sk			G g  fk			G g  i			G g  id			G g  id-ls			G  			G		   CCD   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/match.upstream.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  vg  pg  g+sg  skg  ... g  fkg  ig  ... g  idg  id-ls g  ...    C5R4    h   |   ]C   t       g  dummy
		 g  v		 g  g+s			 g  sk			 g  fk			 g  x			  			   C  h   Z   ]C  R       g  dummy
		 g  v		 g  p			 g  x			  			   C	
     h@      , 3       C           g  dummy
		< g  v		< g  p			< g  q			< g  g+s			< g  sk			< g  fk			< g  i			<  		<	   CCD 
      hP     ]4 5$  @4 5$  @4 5$  @	 6      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  ice-9/match.upstream.scm
	 		P  g  
macro-typeg  syntax-rulesg  patternsg  vg  g+sg  skg  fkg  xg  vg  p g  xg  vg  pg  qg  g+sg  skg  fkg  i   C5R4N $%&(r*+.       h   8   ] C0       g  tmp-1883f58c-a0e
		  		   C024   h   V   ]   C N       g  tmp-1883f58c-a10
		 g  tmp-1883f58c-a0f		  			   C6;<7?@BC      h   V   ]  C    N       g  tmp-1883f58c-a13
		 g  tmp-1883f58c-a12		  			   CE    h      , 	3 	   4 5   4	5
454 5  45        C          g  dummy
	  g  v	  g  p		  g  g+s		  g  sk		  g  fk		  g  i		  g  id		  g  id-ls		   		 		   CFWY[]^_hipqrsuw    h   8   ] C0       g  tmp-1883f58c-a29
		  		   Cxz{   h   V   ]   C N       g  tmp-1883f58c-a2b
		 g  tmp-1883f58c-a2a		  			   C|~        h   V   ]  C    N       g  tmp-1883f58c-a2e
		 g  tmp-1883f58c-a2d		  			   C    h      , 
3 
    	
4	5
4	5   
4	5          C           g  dummy
	  g  v	  g  p		  g  r		  g  g+s		  g  sk		  g  fk		  g  i		  g  id		  g  id-ls			   
	 	
   CCD h@   G  ]4 5$  @4 5$  @ 6       ?      g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  ice-9/match.upstream.scm
	 		9  g  
macro-typeg  syntax-rulesg  patternsg  vg  pg  g+sg  skg  ... g  fkg  ig  idg  id-ls g  ...  g  vg  pg  rg  g+sg  skg  ... g  fkg  ig  idg  id-ls g  ...    C5NR4G         h   [   ]  C   S       g  dummy
		 g  x		 g  y			 g  sk			  			   Ch   =   ]C   5       g  dummy
		 g  sk		  			   C[       h   L   ] C    D       g  dummy
		 g  x		 g  sk			  			   CCD 
    hP      ]4 5$  @4 5$  @4 5$  @	 6       g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  ice-9/match.upstream.scm
,	 		P  g  
macro-typeg  syntax-rulesg  patternsg  xg  yg  sk g  sk g  xg  sk   C5GR4w   h   V   ]   C N       g  tmp-1883f58c-a63
		 g  tmp-1883f58c-a62		  			   C   h   V   ]   C       N       g  tmp-1883f58c-a67
		 g  tmp-1883f58c-a66		  			   C h   8   ] C0       g  tmp-1883f58c-a69
		  		   C     h      , 
3 
	4	
	5  	   	4		5	         4		5 	  C             g  dummy
	  g  v	  g  p		  g  q		  g  g+s		  g  sk		  g  fk		  g  i		  g  id		  g  id-ls			   
	 	
   CCD h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/match.upstream.scm
E	 		"  g  
macro-typeg  syntax-rulesg  patternsg  vg  pg  qg  g+sg  skg  fkg  ig  idg  id-ls g  ...    C5wR4        h8      ]  C              g  dummy
		1 g  v		1 g  n			1 g  pats			1 g  p			1 g  q			1 g  x			1  		1	   C(    h       , 3  C             g  dummy
		 g  v		 g  n			 g  pats			 g  p			 g  sk			 g  fk			 g  i			  			   C/    h   <   ]C4       g  dummy
		 g  x		  			   CCD 
    hP     ]4 5$  @4 5$  @4 5$  @	 6      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  ice-9/match.upstream.scm
h	 		P  g  
macro-typeg  syntax-rulesg  patternsg  vg  ng  patsg  pg  q g  xg  vg  ng  patsg  pg  ___ g  skg  fkg  i g  x  C5R4 0EFGHJKMN 
       hX      , 3      4	5    C              g  dummy
		Q g  v		Q g  n			Q g  pat			Q g  index			Q g  sk			Q g  fk			Q g  i			Q  		Q	   CR^`br       h0      ]4  5C              g  dummy
		) g  v		) g  n			) g  pats			) g  p			) g  q			) g  x			)  		)	   CCD       h@     ]4 5$  @4 5$  @ 6             g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  ice-9/match.upstream.scm
u	 		9  g  
macro-typeg  syntax-rulesg  patternsg  vg  ng  patg  index g  ... g  skg  fkg  i g  vg  ng  patsg  ... g  pg  qg  x  C5R4L cr      h   k   ] 6   c       g  dummy
		 g  v		 g  sk			 g  fk			 g  i			  			   Cdxy{|~    hP      , 3          C           g  dummy
		L g  v		L g  pat			L g  index			L g  rest			L g  sk			L g  fk			L g  i			L  		L	   CCD        h@     ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  ice-9/match.upstream.scm
	 		9  g  
macro-typeg  syntax-rulesg  patternsg  vg  skg  ... g  fkg  i g  vg  patg  index g  restg  skg  fkg  i   C5LR4 N       h`      , 	3 	     4	5
     C       g  dummy
		` g  v		` g  n			` g  pat			` g  index			` g  p			` g  sk			` g  fk			` g  i			`  			`		   CCD    h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/match.upstream.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  vg  ng  patg  index g  ... g  pg  skg  fkg  i   C5R4      h(      , 3  C         g  dummy
		& g  v		& g  p			& g  n			& g  len			& g  sk			& g  fk			& g  i			&  		&	   CCD       h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/match.upstream.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  vg  pg  ng  leng  skg  fkg  i   C5R4 F     h   8   ] C0       g  tmp-1883f58c-b23
		  		   C   h   V   ]   C N       g  tmp-1883f58c-b25
		 g  tmp-1883f58c-b24		  			   Cr   h   V   ]  C    N       g  tmp-1883f58c-b28
		 g  tmp-1883f58c-b27		  			   C       h      , 
3 
 4	5 4	54	 5 
  
 4	5     C           g  dummy
	  g  v	  g  p		  g  n		  g  len		  g  sk		  g  fk		  g  i		  g  id		  g  id-ls			   
	 	
   CCD h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/match.upstream.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  vg  pg  ng  leng  skg  ... g  fkg  ig  idg  id-ls g  ...    C5R4  	     h`      , 
3 
       	  C         g  dummy
		^ g  v		^ g  rec			^ g  n			^ g  p			^ g  q			^ g  g+s			^ g  sk			^ g  fk			^ g  i				^  
		^	
   Cr    h      , 3  6              g  dummy
		 g  v		 g  rec			 g  n			 g  g+s			 g  sk			 g  fk			 g  i			  			   CCD     h@     ]4 5$  @4 5$  @ 6             g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  ice-9/match.upstream.scm
	 		9  g  
macro-typeg  syntax-rulesg  patternsg  vg  recg  ng  pg  qg  g+sg  skg  fkg  i g  vg  recg  ng  g+sg  skg  ... g  fkg  i   C5R4L 
    h   ]   ]C     U       g  dummy
		 g  pred		 g  p			 g  x			  			   C" h   \   ]C     T       g  dummy
		 g  rec		 g  p			 g  x			  			   C'0  h   ]   ]C     U       g  dummy
		 g  proc		 g  p			 g  x			  			   C4r h   i   ] 6   a       g  dummy
		 g  x		 g  k			 g  i			 g  v			  			   C8EH  h   i   ]C    a       g  dummy
		 g  x		 g  k			 g  i			 g  v			  			   CMV     h   K   ]C     C       g  dummy
		 g  p		 g  x			  			   C[b   h   K   ]C     C       g  dummy
		 g  p		 g  x			  			   Cgn   h   K   ]C     C       g  dummy
		 g  p		 g  x			  			   Co|}  h8      ]   C         g  dummy
		6 g  p		6 g  q			6 g  r			6 g  k			6 g  i			6 g  v			6  		6	   C h    x   ] C    p       g  dummy
		 g  p		 g  q			 g  k			 g  i			 g  v			  			   C      h   K   ]C     C       g  dummy
		 g  p		 g  x			  			   Cr   h   Z   ] 6   R       g  dummy
		 g  k		 g  i			 g  v			  			   Cr    h   Z   ] 6   R       g  dummy
		 g  k		 g  i			 g  v			  			   Cr    h   Z   ] 6   R       g  dummy
		 g  k		 g  i			 g  v			  			   Cr    h   Z   ] 6   R       g  dummy
		 g  k		 g  i			 g  v			  			   Cr 
   hP   i   ]  4	 54 5  C       a       g  dummy
		I g  p		I g  k			I g  i			I g  v			I  		I	   CCD $       h    ]4 5$  @4 5$  @4 5$  @4 5$  	@4 
5$  @4 5$  @4 5$  @4 5$  @4 5		$  	@4 5

$  
@4 5$  @4 5$  @4 5$  @4 5$  @4 5$  @4  5$  !@"# 6           g  x
	{ g  tmp	{ g  tmp		"{ g  tmp		9{ g  tmp		P{ g  tmp		g{ g  tmp		~{ g  tmp	 { g  tmp	 { g  tmp		 { g  tmp	
 { g  tmp	 { g  tmp	{ g  tmp	{ g  tmp	6{ g  tmp	M{ g  tmp	d{  g  filenamef  ice-9/match.upstream.scm
	 	{  g  
macro-typeg  syntax-rulesg  patternsg  ?g  predg  pg  xg  $g  recg  pg  xg  =g  procg  p g  xg  quoteg  x g  kg  ... g  ig  v g  
quasiquoteg  x g  kg  ig  v g  andg  pg  xg  org  pg  xg  notg  pg  xg  pg  qg  rg  kg  ig  v g  pg  qg  kg  ig  v g  pg  ... g  xg  _g  kg  ... g  ig  v g  ___g  kg  ... g  ig  v g  ***g  kg  ... g  ig  v g  ..1g  kg  ... g  ig  v g  pg  kg  ... g  ig  ... g  v   C5LR4~ rN   h(      ]454455 C        g  dummy
		' g  p		' g  k			' g  i			' g  v			' g  v2			' g  v2-ls			'  		'	   CCD     h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/match.upstream.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  pg  kg  ig  vg  v2g  v2-ls g  ...    C5~R49      h   x   ] C   p       g  dummy
		 g  x		 g  k			 g  i			 g  v			 g  d			  			   C   h   x   ]  C p       g  dummy
		 g  x		 g  k			 g  i			 g  v			 g  d			  			   C	      h   i   ] Ca       g  dummy
		 g  x		 g  k			 g  i			 g  v			  			   C     h   x   ] C      p       g  dummy
		 g  x		 g  k			 g  i			 g  v			 g  d			  			   C#%        h       ] C         g  dummy
		 g  x		 g  y			 g  k			 g  i			 g  v			 g  d			  			   C&0       h   x   ] C      p       g  dummy
		 g  x		 g  k			 g  i			 g  v			 g  d			  			   C1r      h   x   ] 6   p       g  dummy
		 g  x		 g  k			 g  i			 g  v			 g  d			  			   CCD h   3  ]94 5$  @4 5$  @4 5$  @4 5$  	@4 
5$  @4 5$  @4 5$  @ 6    +      g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp		~  g  tmp	    g  filenamef  ice-9/match.upstream.scm
	 	   g  
macro-typeg  syntax-rulesg  patternsg  
quasiquoteg  x g  kg  ig  vg  d g  unquote-splicingg  x g  kg  ig  vg  d g  unquoteg  x g  kg  ig  v  g  unquoteg  x g  kg  ig  vg  d g  xg  yg  kg  ig  vg  d g  xg  ... g  kg  ig  vg  d g  xg  kg  ... g  ig  vg  d   C59R4$ 2FrN  h0      , 3 454455 C          g  dummy
		- g  x		- g  k			- g  i			- g  v			- g  d			- g  v2			- g  v2-ls			-  		-	   CCD      h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/match.upstream.scm
		 		"  g  
macro-typeg  syntax-rulesg  patternsg  xg  kg  ig  vg  dg  v2g  v2-ls g  ...    C5$R4 VYZX        h    T   ]45 C     L       g  dummy
		 g  pattern		 g  body			  			   CCD     h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/match.upstream.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  patterng  bodyg  ...   C5R4 hij      h    T   ]45 C     L       g  dummy
		 g  pattern		 g  body			  			   CCD     h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/match.upstream.scm
	 		"  g  
macro-typeg  syntax-rulesg  patternsg  patterng  bodyg  ...   C5R4 l~N       h    c   ]45C     [       g  dummy
		 g  var		 g  value			 g  body			  			   CN      h   t   ]45C l       g  dummy
		 g  loop		 g  var			 g  init			 g  body			  			   CCD     h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  ice-9/match.upstream.scm
)	 		9  g  
macro-typeg  syntax-rulesg  patternsg  varg  value g  ... g  bodyg  loopg  varg  init g  ... g  body  C5R4 lN        h    c   ]45C     [       g  dummy
		 g  var		 g  value			 g  body			  			   CCD      h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/match.upstream.scm
3	 		"  g  
macro-typeg  syntax-rulesg  patternsg  varg  value g  ... g  body  C5R4m N    h   s   ]45C    k       g  dummy
		 g  let		 g  var			 g  expr			 g  body			  			   CN      h(      ]4545 C           g  dummy
		$ g  let		$ g  var			$ g  expr			$ g  pat			$ g  tmp			$ g  body			$  		$	   Cr        h8      , 	3 	4  54 5C        g  dummy
		7 g  let		7 g  v			7 g  p			7 g  a			7 g  b			7 g  expr			7 g  rest			7 g  body			7  			7		   Cr   h@      , 3 4  5445 5C              g  dummy
		9 g  let		9 g  v			9 g  p			9 g  a			9 g  expr			9 g  rest			9 g  body			9  		9	   Cr  h(      , 3 4  5C        g  dummy
		' g  let		' g  v			' g  p			' g  a			' g  expr			' g  rest			' g  body			'  		'	   CCD        h   H  ])4 5$  @4 5$  @4 5$  @4 5$  	@4 
5$  @ 6  @      g  x
		~ g  tmp		~ g  tmp		"	~ g  tmp		9	~ g  tmp		P	~ g  tmp		g	~  g  filenamef  ice-9/match.upstream.scm
8	 		~  g  
macro-typeg  syntax-rulesg  patternsg  letg  varg  expr g  ... g  bodyg  letg  varg  expr g  ... g  patg  tmp g  ... g  bodyg  letg  vg  ... g  pg  ... g  ag  bg  expr g  restg  bodyg  letg  vg  ... g  pg  ... g  ag  ... g  expr g  restg  bodyg  letg  vg  ... g  pg  ... g  ag  expr g  restg  body  C5mR4 N     h(      ]4545 C  }       g  dummy
		& g  loop		& g  pat			& g  expr			& g  var			& g  body			&  		&	   C!r#   h(      ]4 5C              g  dummy
		! g  loop		! g  v			! g  pat			! g  expr			! g  rest			! g  body			!  		!	   CCD    h@     ]4 5$  @4 5$  @ 6             g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  ice-9/match.upstream.scm
I	 		9  g  
macro-typeg  syntax-rulesg  patternsg  loopg  patg  exprg  var g  ... g  bodyg  loopg  vg  ... g  patg  expr g  restg  body  C5R4 $2       h   ?   ]C7       g  dummy
		 g  body		  			   C3>?    h   t   ]  C l       g  dummy
		 g  pat		 g  expr			 g  rest			 g  body			  			   CCD     h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  ice-9/match.upstream.scm
X	 		9  g  
macro-typeg  syntax-rulesg  patternsg  bodyg  patg  expr g  restg  body  C5R40 @  h   y   ]C   q       g  dummy
		 g  a		 g  b			 g  	success-k			 g  	failure-k			  			   CA  h   j   ]C   b       g  dummy
		 g  a		 g  	success-k			 g  	failure-k			  			   C"SUVX[\af 	       h8   k   ]     C     c       g  dummy
		3 g  id		3 g  	success-k			3 g  	failure-k			3  		3	   CCD 
     hP   3  ]4 5$  @4 5$  @4 5$  @	 6+      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  ice-9/match.upstream.scm
l	 		P  g  
macro-typeg  syntax-rulesg  patternsg  ag  bg  	success-kg  	failure-k g  ag  ... g  	success-kg  	failure-k g  idg  	success-kg  	failure-k   C50R4 @       h   y   ]C   q       g  dummy
		 g  x		 g  y			 g  	success-k			 g  	failure-k			  			   CA  h   j   ]C   b       g  dummy
		 g  x		 g  	success-k			 g  	failure-k			  			   C"vxy|}   h0   j   ]    C  b       g  dummy
		. g  x		. g  	success-k			. g  	failure-k			.  		.	   CCD 
      hP   2  ]4 5$  @4 5$  @4 5$  @	 6*      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  ice-9/match.upstream.scm
	 		P  g  
macro-typeg  syntax-rulesg  patternsg  xg  yg  	success-kg  	failure-k g  xg  ... g  	success-kg  	failure-k g  xg  	success-kg  	failure-k   C5RC      Y       g  m
		(  g  filenamef  ice-9/match.scm		
 	
 	      j
   C6                                                                                                                                                                                                                                                                                              ccache/ice-9/calling.go                                                                             0000644                 00000026032 15154557173 0010640 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0,      ] m 4 h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  calling	 		g  filenameS	
f  ice-9/calling.scm	g  exportsS	g  with-excursion-function	g  with-getter-and-setter	g  with-getter	g  !with-delegating-getter-and-setter	g   with-excursion-getter-and-setter	g  $with-configuration-getter-and-setter	g  /with-delegating-configuration-getter-and-setter	g  (let-with-configuration-getter-and-setter	 	g  set-current-module	 	 	g  make-syntax-transformer	 	 	g  macro	g  $sc-dispatch	 	 	g  _	 g  any	! 	"g  syntax->datum	#" 	$" 	%g  datum->syntax	&% 	'% 	(g  excursion-function-syntax	)g  syntax-violation	*) 	+) 	,f  -source expression failed to match any pattern	-g  getter-and-setter-syntax	.g  #delegating-getter-and-setter-syntax	/g  map	0g  gensym	1f  temp	2f  swap	3f  thunk	4g  lambda	5g  letrec	6 	7g  begin	8g  set!	9g  dynamic-wind	:f  args	;f  an-arg	<f  	new-value	=f  loop	>g  symbol->keyword	?g  let	@g  if	Ag  null?	Bg  quote	CB 	Dg  all-vals	Eg  vals	FED 	Gg  kws	HAE 	Ig  
quasiquote	Jg  unquote	Kg  car	LKG 	MJL 	NKE 	OJN 	Pg  unquote-splicing	Qg  cdr	RQE 	SQG 	TRS 	Ug  case	Vg  append	Wg  else	Xg  throw	Yg  bad-get-option	ZBY 	[g  or	\g  cadr	]g  bad-set-option	^B] 	_g  cddr	`g  append!	ag  simpler-get	bg  simpler-set	cg  	body-proc	dabc 	eabc 	f4de 	gg  kw	hg 	ig  list	jg  new-val	kgj 	lj C 5     h#  p   ]4	
5 4 >  "  G   4!$'( h   x   ]4 5 C p       g  vars
		 g  proc		  g  filenamef  ice-9/calling.scm
	/
		0			0	 			   C     h   e   ]	4 5L 4?6]       g  args
		 g  v			  g  filenamef  ice-9/calling.scm		/
 		   C+,    h(   c   ]	4 5$   O @ 6 [       g  y
		' g  tmp		'  g  filenamef  ice-9/calling.scm
	/
 		'   C5R4!$'- h   x   ]4 5C   p       g  vars
		 g  proc		  g  filenamef  ice-9/calling.scm
	\
		]			]	 			   C     h   e   ]	4 5L 4?6]       g  args
		 g  v			  g  filenamef  ice-9/calling.scm		\
 		   C+,    h(   c   ]	4 5$   O @ 6 [       g  y
		' g  tmp		'  g  filenamef  ice-9/calling.scm
	\
 		'   C5R4!$'- h      ]4 5 Cx       g  vars
		 g  proc		  g  filenamef  ice-9/calling.scm
	d
		e			e			e	 			   C     h   e   ]	4 5L 4?6]       g  args
		 g  v			  g  filenamef  ice-9/calling.scm		d
 		   C+,    h(   c   ]	4 5$   O @ 6 [       g  y
		' g  tmp		'  g  filenamef  ice-9/calling.scm
	d
 		'   C5R4!$'. h      ]4 5C              g  vars
		 g  get-delegate		 g  set-delegate			 g  proc			  g  filenamef  ice-9/calling.scm
	u
		v			v	 			   C h   e   ]	4 5L 4?6]       g  args
		 g  v			  g  filenamef  ice-9/calling.scm		u
 		   C+,    h(   c   ]	4 5$   O @ 6 [       g  y
		' g  tmp		'  g  filenamef  ice-9/calling.scm
	u
 		'   C5R4!$'(-       h      ]4 54 5C   |       g  vars
		 g  proc		  g  filenamef  ice-9/calling.scm
 
	 		 		 	 			   C h   f   ]	4 5L 4?6^       g  args
		 g  v			  g  filenamef  ice-9/calling.scm	 
 		   C+,   h(   d   ]	4 5$   O @ 6 \       g  y
		' g  tmp		'  g  filenamef  ice-9/calling.scm
 
 		'   C5R/012345678      h(   n   ]L     L   C     f       g  n
		# g  sn		#  g  filenamef  ice-9/calling.scm
 	$	 	& 		#	   Ch   n   ]  C      f       g  sn
		
 g  n		
  g  filenamef  ice-9/calling.scm
 			 	' 		
	   C9     hp   w  ]!4 5454545 4	O  5 4
 5   C o      g  vars
		o g  saved-value-names	 	o g  tmp-var-name		 	o g  swap-fn-name		 	o g  
thunk-name		 	o  g  filenamef  ice-9/calling.scm
 
	 		 		 		 		 		 		 		 		 		  		  		* 		< 		L 		Q 		\ 	 		o  g  nameg  excursion-function-syntax C(R0:;<=/>4?@ACDBFGHIMOPT/UV h   n   ]   C   f       g  kw
		 g  v		  g  filenamef  ice-9/calling.scm
 	(	 	7 			   CWXZ[QK\8      h   n   ]  L   C    f       g  kw
		 g  v		  g  filenamef  ice-9/calling.scm
 	#	 	2 			   C^_ %  hx    ])454545454 5	  
 (  "  P	    	   
       44 5   5     	     	   !   44"O  5#   5$       C         g  vars
	u g  	args-name	'u g  an-arg-name		'u g  new-val-name		'u g  	loop-name		'u g  kws		'u  g  filenamef  ice-9/calling.scm
 
	 		 			 		
 		 		 		 		 		 		 		 		 		 		' 		3 	
	R 		T 		Z 	  	
  	"  	#  	#  	"  	
  	
2 	5 	F 	W 	X 	
t 	 !	u  g  nameg  getter-and-setter-syntax C-R0:;<=/>4?@A`CDBFGHIMOPT/UV      h   n   ]   C   f       g  kw
		 g  v		  g  filenamef  ice-9/calling.scm
 	(	 	7 			   CWK[Q\8  h   n   ]  L   C    f       g  kw
		 g  v		  g  filenamef  ice-9/calling.scm
 	#	 	2 			   C_ #    h  Z  ]+454545454 5	  
 (  "  P	    	   
         44 5    5     	     	      44!O  5   5"       C      R      g  vars
	 g  get-delegate	 g  set-delegate		 g  	args-name		' g  an-arg-name		' g  new-val-name		' g  	loop-name		' g  kws		'  g  filenamef  ice-9/calling.scm
 
	 		 			 		
 		 		 		 		 		 		 		 		 		 		' 		3 	
	T 		V 		\ 	  	
  	"  	#  	#  	"  	
  	
? 	B 	S 	d 	e 	
 	 !		  g  nameg  #delegating-getter-and-setter-syntax C.R4!$'f4hUg/>i     h8      ]	4 5  $  	 "     C              g  v
		1 g  t		-  g  filenamef  ice-9/calling.scm
					0	
				
	 				$	0	'	8	*	0	0	 		1   Ck>l8       h8      ]	4 5  $  	"  	  C            g  v
		3 g  t		/  g  filenamef  ice-9/calling.scm
					0	
					 				B	%	0	(	8	*	0	2	 		3   C 
      h8      ]4 5 4	 5  C         g  vars-etc
		6 g  proc		6  g  filenamef  ice-9/calling.scm

				
			#	
	,	 		6	   C   h   f   ]	4 5L 4?6^       g  args
		 g  v			  g  filenamef  ice-9/calling.scm	
 		   C+,   h(   d   ]	4 5$   O @ 6 \       g  y
		' g  tmp		'  g  filenamef  ice-9/calling.scm

 		'   C5R4!$'f4hUg`/>i       h8      ]	4 5  $  	 "     C              g  v
		1 g  t		-  g  filenamef  ice-9/calling.scm
			(		9	
	(		$	!	)	 	'	$"	8	'"	@	*"	8	0	$ 		1   CWk>l8     h8      ]	4 5  $  	"  	  C            g  v
		3 g  t		/  g  filenamef  ice-9/calling.scm
(		(	(	(	9	
(	(	(	$	*	)	)	'	*	J	%+	8	(+	@	*+	8	2(	$ 		3   C       h`     ]44 5	  5 
44 5	
  5  C             g  vars-etc
		Z g  delegate-get		Z g  delegate-set			Z g  proc			Z  g  filenamef  ice-9/calling.scm

				
			$		'	
	(		5(	
	8(		B-		O(	
	P	 		Z	   C h   f   ]	4 5L 4?6^       g  args
		 g  v			  g  filenamef  ice-9/calling.scm	
 		   C+,   h(   d   ]	4 5$   O @ 6 \       g  y
		' g  tmp		'  g  filenamef  ice-9/calling.scm

 		'   C5R4!$'?/       h   p   ]   C   h       g  v
		  g  filenamef  ice-9/calling.scm
C		C		C	&	C	 		   C    h   y   ]    C    q       g  v
		  g  filenamef  ice-9/calling.scm
D	1	D	@	D	I	D	T	D	= 		   C    h(      ]4 54 5  C              g  vars-etc
		! g  proc		!  g  filenamef  ice-9/calling.scm
B
	C		C			C		D	,	C	 		!	   C   h   f   ]	4 5L 4?6^       g  args
		 g  v			  g  filenamef  ice-9/calling.scm	B
 		   C+,   h(   d   ]	4 5$   O @ 6 \       g  y
		' g  tmp		'  g  filenamef  ice-9/calling.scm
B
 		'   C5RC     h       g  m
		(  g  filenamef  ice-9/calling.scm		
 
 
] 
 	#
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                       ccache/ice-9/threads.go                                                                             0000644                 00000026737 15154557173 0010675 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0-      ]  4       h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  threads	 		g  filenameS	
f  ice-9/threads.scm	g  importsS	g  futures	 	 	g  match	 	 	 	g  exportsS	g  begin-thread	g  parallel	g  letpar	g  make-thread	g  
with-mutex	g  monitor	g  par-map	g  par-for-each	g  	n-par-map	g  n-par-for-each	g  n-for-each-par-map	g  %thread-handler	  	!g  set-current-module	"! 	#! 	$g  make-syntax-transformer	%$ 	&$ 	'g  macro	(g  $sc-dispatch	)( 	*( 	+g  any	,g  each-any	-+,	.+-	/g  syntax-object	0g  call-with-new-thread	1g  top	21 	3g  ribcage	4g  dummy	5g  e0	6g  e1	7456 	8g  m-4712ba65e6-1	981 	:922 	;f  l-4712ba65e6-6	<f  l-4712ba65e6-7	=f  l-4712ba65e6-8	>;<= 	?37:> 	@3 	Ag  x	BA 	C9 	Df  l-4712ba65e6-3	ED 	F3BCE 	G2?@F 	Hg  hygiene	IH 	J/0GI 	Kg  lambda	L/KGI 	M/GI 	NM 	Og  syntax-violation	PO 	QO 	Rf  -source expression failed to match any pattern	Sg  _	TS,	Ug  generate-temporaries	Vg  let	Wg  tmp0	XW 	Y2 	Zf  l-4712ba65e6-16	[Z 	\3XY[ 	]5 	^f  l-4712ba65e6-11	_^ 	`3]Y_ 	af  l-4712ba65e6-e	ba 	c3BYb 	d2@\`@c 	e/VdI 	fg  map	gf 	hf 	ig  future	j/idI 	kg  values	l/kdI 	mg  touch	n/mdI 	og  each	p++ 	qop 	rq-	s+r	tg  call-with-values	ug  v	vg  e	wg  b0	xg  b1	y4uvwx 	zg  m-4712ba65e6-1d	{z1 	|{2222 	}f  l-4712ba65e6-22	~f  l-4712ba65e6-23	f  l-4712ba65e6-24 f  l-4712ba65e6-25 f  l-4712ba65e6-26 }~  3y|  {  f  l-4712ba65e6-1f   3B  2@  /tI  /KI  /I  g  proc g  arg 4  g  m-4712ba65e6-30 1  22  f  l-4712ba65e6-35 f  l-4712ba65e6-36 f  l-4712ba65e6-37   3    f  l-4712ba65e6-32   3B  2@  /0I  /KI  /I    +. g  m 456  g  m-4712ba65e6-3d 1  222  f  l-4712ba65e6-42 f  l-4712ba65e6-43 f  l-4712ba65e6-44 f  l-4712ba65e6-45   3    f  l-4712ba65e6-3f   3B  2@  /VI  /AI  g  dynamic-wind /I  /KI  g  
lock-mutex /I      g  begin /I  g  unlock-mutex /I        g  first g  rest 4  g  m-4712ba65e6-4c 1  22  f  l-4712ba65e6-51 f  l-4712ba65e6-52 f  l-4712ba65e6-53   3    f  l-4712ba65e6-4e   3B  2@  /I  g  
make-mutex /I    g  reverse     g  make-future     g  
par-mapper g  cons g  for-each g  const g  	make-list g  length g  join-thread g  car g  cdr g  apply g  no-value   g  current-error-port g  display f  
In thread: g  newline g  display-error f  uncaught throw to  f  :  g  thread-handlerC 5     h8     ]4	
 5 4# >  "  G   4&'*.JLN      h   M   ]C     E       g  dummy
		 g  e0		 g  e1			  			   CQR    h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/threads.scm
	7
 		"  g  
macro-typeg  syntax-rulesg  patternsg  e0g  e1g  ...   C5R4&'*TU*,ehj      h   X   ]   C P       g  tmp-4712ba65e6-19
		 g  tmp-4712ba65e6-18		  			   Cln        h   9   ]  C      1       g  tmp-4712ba65e6-1a
		
  		
   C    h    ,   ]4L  54 5 C $       g  tmp0
		  		   CQR     h0      ]4 545$   O @6w       g  e0
		0 g  tmp			0 g  tmp			0  g  filenamef  ice-9/threads.scm		@	!			@	 		0   CQR  h(   d   ]	4 5$  @ 6      \       g  x
		" g  tmp		"  g  filenamef  ice-9/threads.scm
	=	 		"   C5R4&'*s h    k   ]  C  c       g  dummy
		 g  v		 g  e			 g  b0			 g  b1			  			   CQR      h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/threads.scm
	E
 		"  g  
macro-typeg  syntax-rulesg  patternsg  vg  e g  ... g  b0g  b1g  ...   C5R4&'*.       h   P   ] C    H       g  dummy
		 g  proc		 g  arg			  			   CQR h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/threads.scm
	K
 		"  g  
macro-typeg  syntax-rulesg  patternsg  procg  argg  ...   C5R4&'*   h0   \   ]    C       T       g  dummy
		) g  m		) g  e0			) g  e1			)  		)	   CQR     h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/threads.scm
	P
 		"  g  
macro-typeg  syntax-rulesg  patternsg  mg  e0g  e1g  ...   C5R4&'*.   h   R   ]C  J       g  dummy
		 g  first		 g  rest			  			   CQR       h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/threads.scm
	W
 		"  g  
macro-typeg  syntax-rulesg  patternsg  firstg  restg  ...   C5R      h   L   ] LL 6D       g  filenamef  ice-9/threads.scm
	`			`	 		
   Cm       h   e  ]9"  (  845454LO 54L ?L456$  8$  *$  "CCC "s     ]      g  lists
	  g  ls	  g  p-ls		  g  p-ls		  g  tails			D g  heads			D g  tail		3	D g  head		3	D g  w		N  g  w		]  g  x		]   g  filenamef  ice-9/threads.scm
	]			^			`		-	a		3	`			<	b		D	b		G	^	 	d		 	^	 	   g  nameg  loop C        h(      - 1 3 O  L Q 6      }       g  proc
			" g  lists			" g  loop			"  g  filenamef  ice-9/threads.scm
	\			]	 			"
   C        h      ]O C      y       g  mapper
		
 g  cons		
  g  filenamef  ice-9/threads.scm
	[
 		
	  g  nameg  
par-mapper CR4ifii5R4ii4i55R0f hh      ]"  ]4L >  "  G  M(  L 64M5M 4M5NMN4L >  "  G  4L ?""        g  args
	/	c g  	my-result	/	c  g  filenamef  ice-9/threads.scm
	s			t			u			v		$	w		%	x	%	/	x		4	z	*	>	z		A	{	(	C	{		D	|		X	}	/	_	}		c	~		c	t	 		g
   C 	     hx     - 1 3 H45 H44J55H"  B $  4J>  "  G  C4O 5JK"
"       g  n
		w g  proc		w g  arglists			w g  m			w g  threads			w g  results		$	w g  result		(	w g  i		.	p  g  filenamef  ice-9/threads.scm
	i
		j			j			k			j			l			l		 	l	%	"	l		$	l		$	j		.	n		3	o			7	n		8	p			O	s		e	s		g	r		j	n		p	n	 			w	
	  g  nameg  	n-par-map CR0f    hp      ]"  _4L >  "  G  M(  L 64M5 4M5N4L >  "  G  4L >  "  G  ""              g  args
	.	e  g  filenamef  ice-9/threads.scm
 		 		 		 	 	 		% 		& 	%	. 		1 	*	; 		< 		N 		e 		e 	 		i
   C      hX   9  - 1 3 H45 H"  1 $  J64O 5JK"
"     1      g  n
		S g  proc		S g  arglists			S g  m			S g  threads			S g  i			L  g  filenamef  ice-9/threads.scm
 
	 		 		 		 		  			$ 		, 			- 		A 		C 		F 		L 	 			S	
	  g  nameg  n-par-for-each CR0f     h     ]"  4L >  "  G  M(  L 6M&  KM(  L 64M5M 4M5NMN4L >  "  G  4L ?"M M4L >  "  G  4L >  "  G  4L >  "  G  MN4L >  "  G  "3"/       g  args
	D	x g  	my-result	D	x g  arg
	{   g  filenamef  ice-9/threads.scm
 		 		 		 		$ 		' 	&	) 		- 		9 		: 	(	D 		I 	-	S 		V 	+	X 		Y 		m 	2	t 		x 		{ 	'	{ 	  	  	  	  	  	  	,  	  	  	  	  	 
   C 
  hp   A  - 1 3 	H45 H44J55HJH"  7 $  J64O 	5JK"
"  9      g  n
		n g  s-proc		n g  p-proc			n g  arglists			n g  m			n g  threads			n g  results		&	n g  result		*	n g  i		0	g  	g  filenamef  ice-9/threads.scm
 
	 		 		 		 		 		 		  	%	" 		$ 		& 		& 		0 		5 			9 		A 			B 		\ 		^ 		a 		g 	 			n	
	  g  nameg  n-for-each-par-mapg  documentationf  gUsing N parallel processes, apply S-PROC in serial order on the results
of applying P-PROC on ARGLISTS. CR 	       h     - 1 3 4545 4>  "  G  4>  "  G  	$  74	$  
"  >  "  G  "  b4>  "  G  4 >  "  G  4>  "  G  4>  "  G  4>  "  G  C           g  tag
		  g  args		  g  n		  g  p		   g  filenamef  ice-9/threads.scm
 
	
 		 		 		 		 		% 		. 		D 		H 		I 		Q 		T 		X 		_ 		c 		f 		n 		s 	  	
  	  	
  	
  	
  	  	
  	
  	
 		 
  g  nameg  thread-handler CRiRC        g  m
		,  g  filenamef  ice-9/threads.scm		"
d	[
e	f	v	f
w	g		g	*	g		g
	i
 
| 
. 
5 
 	7
   C6                                  ccache/ice-9/iconv.go                                                                               0000644                 00000007555 15154557173 0010356 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0U      ] 3 4   h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  iconv	 		g  filenameS	
f  ice-9/iconv.scm	g  importsS	g  rnrs	g  bytevectors	 	 	g  binary-ports	 	 	g  rdelim	 	g  selectS	g  read-string	 	 	 	g  exportsS	g  string->bytevector	g  bytevector->string	g  call-with-encoded-output-string	 	g  set-current-module	  	! 	"g  open-output-string	#g  get-output-string	$g  
close-port	%g  call-with-output-string*	&g  open-bytevector-output-port	'g  call-with-output-bytevector*	(g  error	)g  set-port-encoding!	*g  set-port-conversion-strategy!	+g  string-ci=?	,f  utf-8	-g  string->utf8	.g  display	/g  open-bytevector-input-port	0g  eof-object?	1f   	2g  utf8->stringC 5       h
  {   ]4	
5 4! >  "  G   "#$  h@      ]45 4 >  "  G  454>  "  G  C              g  proc
		9 g  port		9 g  str		"	9  g  filenamef  ice-9/iconv.scm
	
							
				 		"	 		%	!	 		9  g  nameg  call-with-output-string* C%R&$  h@      ]4>   G 4 >  "  G  45 4>  "  G  C       g  proc
		@ g  port		@ g  get-bytevector			@ g  bv		)	@  g  filenamef  ice-9/iconv.scm
	$
		%			%			'		%	(		)	(		,	)	 		@  g  nameg  call-with-output-bytevector* C'R(')*      h@   u   ]4 L>  "  G  L$  4 L>  "  G  "   L  6      m       g  port
		:  g  filenamef  ice-9/iconv.scm
	8			9				:				;		:	<		 		:   C+,-%        hX     - . , 3 #  "   O 64 5$  &  456""             g  encoding
		Q g  proc		Q g  conversion-strategy			Q  g  filenamef  ice-9/iconv.scm
	,
		.	?	)	7		)	1		*	1		0	1	!	2	1		6	1		:	2	$	>	1		A	6		I	6	 		Q	  g  nameg  call-with-encoded-output-stringg  documentationf  yCall PROC on a fresh port.  Encode the resulting string as a
bytevector according to ENCODING, and return the bytevector. CR(.   h   ]   ]L  6      U       g  port
		
  g  filenamef  ice-9/iconv.scm
	J		
	K		 		
   C+,-  hP   x  - . , 3 #  "   O 645$  &   6""    p      g  str
		L g  encoding		L g  conversion-strategy			L  g  filenamef  ice-9/iconv.scm
	A
		B	=	)	H		)	E		*	E		0	E	!	2	E		6	E		:	F	$	>	E		D	G	 		L	  g  nameg  string->bytevectorg  documentationf  hEncode STRING according to ENCODING, which should be a string naming
a character encoding, like "utf-8". CR(/)*$01+,2   h   =  - . , 3 #  "  g4 54>  "  G  $  4>  "  G  "   454>  "  G  45$  CC4	
5$  &   6"z"v    5      g  bv
	  g  encoding	  g  conversion-strategy		  g  p		!  g  res		\   g  filenamef  ice-9/iconv.scm
	N
		O	=		V		!	V		$	W		=	X		>	Y		V	Z		\	Z		_	[	
	q	\		{	\	
	}	]	 	S	 	S	 	S	! 	S	 	S	 	T	$ 	S	 	U	 	 	  g  nameg  bytevector->stringg  documentationf  Decode the string represented by BV.  The bytes in the bytevector
will be interpreted according to ENCODING, which should be a string
naming a character encoding, like "utf-8". CRC      s       g  m
		,  g  filenamef  ice-9/iconv.scm		
N	
	$
r	,
	A

	N
 	

   C6                                                                                                                                                    ccache/ice-9/hcons.go                                                                               0000644                 00000006355 15154557173 0010347 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] ! 4     hm      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  hcons	 		g  filenameS	
f  ice-9/hcons.scm	g  exportsS	g  hashq-cons-hash	g  hashq-cons-assoc	g  hashq-cons-get-handle	g  hashq-cons-create-handle!	g  hashq-cons-ref	g  hashq-cons-set!	g  
hashq-cons	g  hashq-conser	g  make-gc-buffer	 		g  set-current-module	 	 	g  hashq	g  hashx-get-handle	g  hashx-create-handle!	g  	hashx-ref	g  
hashx-set!	g  make-doubly-weak-hash-table	g  	make-list	 g  append!C 5      h	     ]4	
5 4 >  "  G     h0      ]4      ?54      ?5C              g  pair
		) g  n		)  g  filenamef  ice-9/hcons.scm
	"
		#			#			#			$			$		$	$		%	#	
	(	#	 
		)	  g  nameg  hashq-cons-hash CR        hp   &  ]
(  C$  D$  7$  ) &   &  "  "  "  "  "  $  C 6            g  key
		j g  l		j g  t		V	j  g  filenamef  ice-9/hcons.scm
	'
		(			)			)			*			*			)			+			+		"	)		%	,		(	,		.	)		1	-		4	-		:	)		=	.		V	)		h	/	!	j	/	 		j	  g  nameg  hashq-cons-assoc CR     h      ] 6         g  table
		 g  key		  g  filenamef  ice-9/hcons.scm
	1
		2	 			  g  nameg  hashq-cons-get-handle CR   h      ] 6       g  table
		 g  key		 g  init			  g  filenamef  ice-9/hcons.scm
	4
		5	 			  g  nameg  hashq-cons-create-handle! CR     h      ] 6        g  table
		 g  key		  g  filenamef  ice-9/hcons.scm
	7
		8	 			  g  nameg  hashq-cons-ref CR  h      ] 6       g  table
		 g  key		 g  val			  g  filenamef  ice-9/hcons.scm
	:
		;	 			  g  nameg  hashq-cons-set! CR    h      ]4 5C              g  table
		 g  a		 g  d			  g  filenamef  ice-9/hcons.scm
	=
		>			>	(		>			>	 			  g  nameg  
hashq-cons CR  h   i   ]L  6    a       g  a
		 g  d		  g  filenamef  ice-9/hcons.scm
	D			D	 			   C    h       ]	 $   "  4 5O C       g  hash-tab-or-size
		  g  table		   g  filenamef  ice-9/hcons.scm
	@
		A				A			C			A	 		   g  nameg  hashq-conser CR    h   m   ]M  M N  C e       g  next
		  g  filenamef  ice-9/hcons.scm
	L			M		
	N			N	 		   C        h(      ]	4 5H4JJ>  "  G  O C       g  n
		( g  ring	
	(  g  filenamef  ice-9/hcons.scm
	I
		J		
	J			K	 		(  g  nameg  make-gc-buffer CRC             g  m
		(  g  filenamef  ice-9/hcons.scm		
*	"
	'
	1
a	4
	7
	:
	=
	@
	x	I
 		z
   C6                                                                                                                                                                                                                                                                                    ccache/ice-9/null.go                                                                                0000644                 00000001342 15154557173 0010176 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] # 4   h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  null	 		g  filenameS	
f  ice-9/null.scm	g  
re-exportsS	g  define	g  quote	g  lambda	g  if	g  set!	g  cond	g  case	g  and	g  or	g  let	g  let*	g  letrec	g  begin	g  do	g  delay	g  
quasiquote	g  define-syntax	g  
let-syntax	g  letrec-syntax	 	 g  set-current-module	!  	"  C 5   h(   P   ]4	
5 4" >  "  G   CH       g  m
		(  g  filenamef  ice-9/null.scm
	
 		(
   C6                                                                                                                                                                                                                                                                                               ccache/ice-9/i18n.go                                                                                0000644                 00000051600 15154557173 0010005 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0hS      ]  4   h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  i18n	 		g  filenameS	
f  ice-9/i18n.scm	g  importsS	g  optargs	 	 	 	g  exportsS	g  make-locale	g  locale?	g  %global-locale	g  string-locale<?	g  string-locale>?	g  string-locale-ci<?	g  string-locale-ci>?	g  string-locale-ci=?	g  char-locale<?	g  char-locale>?	g  char-locale-ci<?	g  char-locale-ci>?	g  char-locale-ci=?	g  char-locale-downcase	g  char-locale-upcase	 g  char-locale-titlecase	!g  string-locale-downcase	"g  string-locale-upcase	#g  string-locale-titlecase	$g  locale-string->integer	%g  locale-string->inexact	&g  locale-encoding	'g  locale-day-short	(g  
locale-day	)g  locale-month-short	*g  locale-month	+g  locale-am-string	,g  locale-pm-string	-g  locale-date+time-format	.g  locale-date-format	/g  locale-time-format	0g  locale-time+am/pm-format	1g  
locale-era	2g  locale-era-year	3g  locale-era-date-format	4g  locale-era-date+time-format	5g  locale-era-time-format	6g  locale-currency-symbol	7g  locale-monetary-decimal-point	8g  #locale-monetary-thousands-separator	9g  locale-monetary-grouping	:g  !locale-monetary-fractional-digits	;g  )locale-currency-symbol-precedes-positive?	<g  )locale-currency-symbol-precedes-negative?	=g  #locale-positive-separated-by-space?	>g  #locale-negative-separated-by-space?	?g  locale-monetary-positive-sign	@g  locale-monetary-negative-sign	Ag  locale-positive-sign-position	Bg  locale-negative-sign-position	Cg  monetary-amount->locale-string	Dg  locale-digit-grouping	Eg  locale-decimal-point	Fg  locale-thousands-separator	Gg  number->locale-string	Hg  locale-yes-regexp	Ig  locale-no-regexp	J !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHI 9	Kg  set-current-module	LK 	MK 	Ng  load-extension	Og  string-append	Pf  	libguile-	Qg  effective-version	Rf  scm_init_i18n	Sg  nl-langinfo	Tg  CODESET	Ug  make-syntax-transformer	VU 	WU 	Xg  define-vector-langinfo-mapping	Yg  macro	Zg  $sc-dispatch	[Z 	\Z 	]g  _	^g  any	_]^	`g  syntax->datum	a` 	b` 	cg  datum->syntax	dc 	ec 	fg  length	gg  define	hg  	%nl-items	ig  vector	jg  item	kg  locale	ljk	mg  if	ng  and	og  integer?	poj 	qg  exact?	rqj 	snpr 	tg  >=	utj 	vg  <=	wg  apply	xg  
vector-ref	yxhj 	zwSyk 	{g  throw	|g  quote	}g  out-of-range	~|} 	f  out of range {~j    g  wrong-type-arg |  f  wrong argument type {j    g  syntax-violation     f  -source expression failed to match any pattern g  ABDAY_1 g  ABDAY_2 g  ABDAY_3 g  ABDAY_4 g  ABDAY_5 g  ABDAY_6 g  ABDAY_7 g  DAY_1 g  DAY_2 g  DAY_3 g  DAY_4 g  DAY_5 g  DAY_6 g  DAY_7 g  ABMON_1 g  ABMON_2 g  ABMON_3 g  ABMON_4 g  ABMON_5 g  ABMON_6 g  ABMON_7 g  ABMON_8 g  ABMON_9 g  ABMON_10 g  ABMON_11 g  ABMON_12 g  MON_1 g  MON_2 g  MON_3 g  MON_4 g  MON_5 g  MON_6 g  MON_7 g  MON_8 g  MON_9 g  MON_10 g  MON_11 g  MON_12 g  define-simple-langinfo-mapping g  defined? k  g  AM_STR g  PM_STR g  D_T_FMT g  D_FMT g  T_FMT g  
T_FMT_AMPM g  ERA g  ERA_YEAR g  ERA_D_T_FMT g  	ERA_D_FMT g  	ERA_T_FMT g   define-monetary-langinfo-mapping g  intl? k g  INT_CURR_SYMBOL g  CRNCYSTR g  INT_FRAC_DIGITS g  FRAC_DIGITS g  POSITIVE_SIGN g  NEGATIVE_SIGN g  MON_DECIMAL_POINT g  MON_THOUSANDS_SEP g  MON_GROUPING g  locale-monetary-digit-grouping g  INT_P_CS_PRECEDES g  P_CS_PRECEDES g  INT_N_CS_PRECEDES g  N_CS_PRECEDES g  INT_P_SEP_BY_SPACE g  P_SEP_BY_SPACE g  INT_N_SEP_BY_SPACE g  N_SEP_BY_SPACE g  INT_P_SIGN_POSN g  P_SIGN_POSN g  INT_N_SIGN_POSN g  N_SIGN_POSN f  0 g  list->string g  integer->char g  integer->string g  expt g  floor g  
string-pad g  round g  inexact->exact f    g  number-decimal-string g  string=? g  string-length g  min g  	substring g  %number-integer-part f    g  parenthesize f  ( f  ) g  sign-before g  
sign-after g  unspecified g  sign-before-currency-symbol g  sign-after-currency-symbol g  error f  unsupported sign position g  add-monetary-sign+currency g  abs g  GROUPING g  	RADIXCHAR g  THOUSEP f  - g  YESEXPR g  NOEXPRC 5   hh<    ]4	
J5 4M >  "  G   4Ni4OiP4Qi5 5R>  "  G  ST        h   {   -  1  3  @       s       g  locale
			  g  filenamef  ice-9/i18n.scm
	_
		`	 			


  g  nameg  locale-encoding C&R4WXY\_befghilmsnuvjz hP      ]45  	
   C             g  name
		J g  nl-items		J g  
item-count				J g  defines			J  g  filenamef  ice-9/i18n.scm
	i
		j				j			k			j			r		&	m		<	t		>	m		I	r	 		J	   C       h   b   ]	4 5L 4?6Z       g  args
		 g  v			  g  filenamef  ice-9/i18n.scm		i
 		   C       h(   `   ]	4 5$   O @ 6 X       g  y
		' g  tmp		'  g  filenamef  ice-9/i18n.scm
	i
 		'   C5XR{oq}S h      - 1 3 H K"  
	
 64 5$  A4 5$  2"  
 6 $   	$  J @""""         g  item
			~ g  locale			~ g  	%nl-items		
	~  g  filenamef  ice-9/i18n.scm
	w
	*	q	2	N	p	4	j	t	'	n	t	 			~
  g  nameg  locale-day-short C'R{oq}S       h      - 1 3 H K"  
	
 64 5$  A4 5$  2"  
 6 $   	$  J @""""         g  item
			~ g  locale			~ g  	%nl-items		
	~  g  filenamef  ice-9/i18n.scm
	z
	*	q	2	N	p	4	j	t	'	n	t	 			~
  g  nameg  
locale-day C(R{oq}S   h      - 1 3 H	
 K"  
 64 5$  A4 5$  2"  
 6 $   	$  J @""""       g  item
		  g  locale		  g  	%nl-items		
   g  filenamef  ice-9/i18n.scm
	}
	4	q	2	X	p	4	t	t	'	x	t	 		 
  g  nameg  locale-month-short C)R{oq}S       h      - 1 3 H	
 K"  
 64 5$  A4 5$  2"  
 6 $   	$  J @""""       g  item
		  g  locale		  g  	%nl-items		
   g  filenamef  ice-9/i18n.scm
 
	4	q	2	X	p	4	t	t	'	x	t	 		 
  g  nameg  locale-month C*R4WY\_bewSgk       h0      ]45$  "    C          g  name
		- g  item		- g  default			- g  body			-  g  filenamef  ice-9/i18n.scm
 
	 		 		 		 		" 	 		-	   C   h   c   ]	4 5L 4?6[       g  args
		 g  v			  g  filenamef  ice-9/i18n.scm	 
 		   C      h(   a   ]	4 5$   O @ 6 Y       g  y
		' g  tmp		'  g  filenamef  ice-9/i18n.scm
 
 		'   C5RS  h   u   -  1  3  @       m       g  locale
			  g  filenamef  ice-9/i18n.scm
 
 			


  g  nameg  locale-am-string C+RS        h   u   -  1  3  @       m       g  locale
			  g  filenamef  ice-9/i18n.scm
 
 			


  g  nameg  locale-pm-string C,RS        h   |   -  1  3  @       t       g  locale
			  g  filenamef  ice-9/i18n.scm
 
 			


  g  nameg  locale-date+time-format C-RS h   w   -  1  3  @       o       g  locale
			  g  filenamef  ice-9/i18n.scm
 
 			


  g  nameg  locale-date-format C.RS      h   w   -  1  3  @       o       g  locale
			  g  filenamef  ice-9/i18n.scm
 
 			


  g  nameg  locale-time-format C/RS      h   }   -  1  3  @       u       g  locale
			  g  filenamef  ice-9/i18n.scm
 
 			


  g  nameg  locale-time+am/pm-format C0RS        h   o   -  1  3  @       g       g  locale
			  g  filenamef  ice-9/i18n.scm
 
 			


  g  nameg  
locale-era C1RS      h   t   -  1  3  @       l       g  locale
			  g  filenamef  ice-9/i18n.scm
 
 			


  g  nameg  locale-era-year C2RS h      -  1  3  @       x       g  locale
			  g  filenamef  ice-9/i18n.scm
 
 			


  g  nameg  locale-era-date+time-format C4RS     h   {   -  1  3  @       s       g  locale
			  g  filenamef  ice-9/i18n.scm
 
 			


  g  nameg  locale-era-date-format C3RS  h   {   -  1  3  @       s       g  locale
			  g  filenamef  ice-9/i18n.scm
 
 			


  g  nameg  locale-era-time-format C5R4WY\_bewSmg 	    h`   I  ]45$  "  45$  "     C  A      g  name
		^ g  
local-item		^ g  	intl-item			^ g  default/local			^ g  default/intl			^ g  intl		:	O g  local		:	O g  body		O	^  g  filenamef  ice-9/i18n.scm
 
	 		 		 		 		) 		+ 		: 			@ 		O 		S 	 		^	   C    h   c   ]	4 5L 4?6[       g  args
		 g  v			  g  filenamef  ice-9/i18n.scm	 
 		   C      h(   a   ]	4 5$   O @ 6 Y       g  y
		' g  tmp		'  g  filenamef  ice-9/i18n.scm
 
 		'   C5RS        h       - 1 3  $  @@        g  intl?
			 g  locale			  g  filenamef  ice-9/i18n.scm
 
 			
  g  nameg  locale-currency-symbol C6RS      h       - 1 3  $  @@        g  intl?
			 g  locale			  g  filenamef  ice-9/i18n.scm
 
 			
  g  nameg  !locale-monetary-fractional-digits C:RS     h      -  1  3  @       z       g  locale
			  g  filenamef  ice-9/i18n.scm
 
 			


  g  nameg  locale-monetary-positive-sign C?RS   h      -  1  3  @       z       g  locale
			  g  filenamef  ice-9/i18n.scm
 
 			


  g  nameg  locale-monetary-negative-sign C@RS   h      -  1  3  @       z       g  locale
			  g  filenamef  ice-9/i18n.scm
 
 			


  g  nameg  locale-monetary-decimal-point C7RS   h      -  1  3  @              g  locale
			  g  filenamef  ice-9/i18n.scm
 
 			


  g  nameg  #locale-monetary-thousands-separator C8RS     h      -  1  3  @       {       g  locale
			  g  filenamef  ice-9/i18n.scm
 
 			


  g  nameg  locale-monetary-digit-grouping CRS        h       - 1 3  $  @@        g  intl?
			 g  locale			  g  filenamef  ice-9/i18n.scm
 
 			
  g  nameg  )locale-currency-symbol-precedes-positive? C;RS   h       - 1 3  $  @@        g  intl?
			 g  locale			  g  filenamef  ice-9/i18n.scm
 
 			
  g  nameg  )locale-currency-symbol-precedes-negative? C<RS   h       - 1 3  $  @@        g  intl?
			 g  locale			  g  filenamef  ice-9/i18n.scm
 
 			
  g  nameg  #locale-positive-separated-by-space? C=RS h       - 1 3  $  @@        g  intl?
			 g  locale			  g  filenamef  ice-9/i18n.scm
 
 			
  g  nameg  #locale-negative-separated-by-space? C>RS h       - 1 3  $  @@        g  intl?
			 g  locale			  g  filenamef  ice-9/i18n.scm
 
 			
  g  nameg  locale-positive-sign-position CARS       h       - 1 3  $  @@        g  intl?
			 g  locale			  g  filenamef  ice-9/i18n.scm
 
 			
  g  nameg  locale-negative-sign-position CBR       hP     ] 
$  C"  2
$  6	
	
4	05" "        g  number
		N g  number		C g  digits			C g  digit		)	8  g  filenamef  ice-9/i18n.scm
 
	 		
 		 		 								$		)	%	)		, 		2 		3 		5 		;		C		C 		F 		N 	 		N  g  nameg  integer->stringg  documentationf  DReturn a string representing NUMBER, an integer, written in base 10. CRo 	       h   g  ]"45$  /4	
5 4 544455506"  q 4	
545$  "  	$  74 54	
5444555
$  CC"
"_      g  number
	  g  digit-count	  g  number		!	< g  decimals		@  g  number'		L  g  t		X	m g  fraction	   g  str	    g  filenamef  ice-9/i18n.scm

								!	 		!		!		&		)	%	,	,	4	%	6		<		@		C	!	L		L		Q		X		X		j		q	
	t	%	{	% 	" 	 	 	  	   	'  	  	 	 !	 !	 "	 $	 $	 	 )	 	  g  nameg  number-decimal-stringg  documentationf  Return a string representing the decimal part of NUMBER.  When
DIGIT-COUNT is an integer, return exactly DIGIT-COUNT digits; when
DIGIT-COUNT is #t, return as many decimals as necessary, up to an
arbitrary limit. CRO      h   *  ]3"  }45$  @(  @45454
545$  "  " "t      "      g  int
	  g  grouping	  g  	separator		  g  int		  g  grouping		  g  result		  g  len		.  g  cut		:  g  sub		Z	y  	g  filenamef  ice-9/i18n.scm
&
	,		/		/		/		/		/		/		'0		(2		.2		13		63		:3		:2		=4		G4	$	I4		L5		M6		V6	-	Z6		Z6		a7		e7		l8		v9	 4	 ,	 .	 ,	  	 	  g  nameg  %number-integer-part CR?@6;<=>ABO   h    ]D 
$  45"   
$  45"  45$  "  $  "  $  	"  
	45$  "  
4	5$  /45$  4
5"  4
56$  -45$  4
5"  4
56$  "  $  %45$  
6
6$  %45$  
6
6$  %45$  
6
64	56            g  amount
	 g  figure	 g  intl?		 g  locale		 g  	positive?		 g  sign		. g  currency		9 g  currency-precedes?		I g  
separated?		Y g  sign-position			i g  currency-space	
  g  key	   g  filenamef  ice-9/i18n.scm
;
	>		>		
@		@	
	@		A		!@	
	"A		.B		.>		1C		9>		AE	
	I>		QI	
	Y>		aM	
	i>		lQ		xQ	
	zQ	( Q	, >	 X	
 X	 Z	 T	 T	 U	 V	 Z	3 Z	 X	 T	 T	 U	 V	 \	X	_	_	+`	7a	@X	Ac	Mc	Yd	ee	nX	og	{g	h	i	k	k	*k	 :		  g  nameg  add-monetary-sign+currency CR:O78      h     - . , 3 #  45$  "  	4444 555544 554	5$  "  
$  	"  *4
4545$  4
5"  54545 4
4556      g  amount
	  g  intl?	  g  locale		  g  t			2 g  fraction-digits		2  g  int		J  g  dec		Z  g  t		e	y g  dec	   g  grouping	   g  	separator	    g  filenamef  ice-9/i18n.scm
n
	v		v	
	2u		5		8	%	;	&	>	-	F	&	H	%	J		Ju		M		P	,	Z		Z		]y		cy	"	ey		ey		vy	&	}y		z	 {	 {	 |	6 |	# |	 }	# {	 u	 	 u	 	 u	 	" 	# 	" 	 (	 	  g  nameg  monetary-amount->locale-stringg  documentationf  Convert @var{amount} (an inexact) into a string according to the cultural
conventions of either @var{locale} (a locale object) or the current locale.
If @var{intl?} is true, then the international monetary format for the given
locale is used. CCRS      h   z   -  1  3  @       r       g  locale
			  g  filenamef  ice-9/i18n.scm

 			


  g  nameg  locale-digit-grouping CDRS   h   y   -  1  3  @       q       g  locale
			  g  filenamef  ice-9/i18n.scm

 			


  g  nameg  locale-decimal-point CERS    h      -  1  3  @       w       g  locale
			  g  filenamef  ice-9/i18n.scm

 			


  g  nameg  locale-thousands-separator CFROEoDF        h   C  - . , 3 #  #   
$  "   
$  "  4444 555544 554	5$  "  
$  "  ;4
4545$  "45$  4
5"  "  54545
456     ;      g  number
	  g  fraction-digits	  g  locale		  g  sign		=  g  int		U  g  dec		e  g  t		p  g  dec	   g  grouping	   g  	separator	    
g  filenamef  ice-9/i18n.scm

	#		'	
	)		1		5	
	7		=		=		@		C	'	F	(	I	/	Q	(	S	'	U		U		X		[	.	e		e		h		n	"	p		p	 	& 	 	 	 	 	( 	 	+ 	( 	# 	# 	 	 	 	 	 	 	 	 -	 	  g  nameg  number->locale-stringg  documentationf ^Convert @var{number} (an inexact) into a string according to the cultural
conventions of either @var{locale} (a locale object) or the current locale.
By default, print as many fractional digits as necessary, up to an upper bound.
Optionally, @var{fraction-digits} may be bound to an integer specifying the
number of fractional digits to be displayed. CGRS  h   v   -  1  3  @       n       g  locale
			  g  filenamef  ice-9/i18n.scm

 			


  g  nameg  locale-yes-regexp CHRS       h   u   -  1  3  @       m       g  locale
			  g  filenamef  ice-9/i18n.scm

 			


  g  nameg  locale-no-regexp CIRC            g  m
		,  g  filenamef  ice-9/i18n.scm		
	-	W		2	W		8	W	!	9	W	-	A	W		C	X		H	W	 	_
	w
i	z
	}
	p 
X 
  
 
R 
 
 
J 
 
 
F 
 
 
 
E 
 
 
[ 
 
 
 
 
e 
/ 
 
" 
&b
)E&
.;
3n
4M
4
5
;
;
<`
 1	<b
   C6                                                                                                                                 ccache/ice-9/gap-buffer.go                                                                          0000644                 00000024670 15154557173 0011253 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0)      ] V 4        h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  
gap-buffer	 		g  filenameS	
f  ice-9/gap-buffer.scm	g  exportsS	g  gb?	g  make-gap-buffer	g  gb-point	g  gb-point-min	g  gb-point-max	g  gb-insert-string!	g  gb-insert-char!	g  gb-delete-char!	g  	gb-erase!	g  gb-goto-char	g  
gb->string	g  
gb-filter!	g  	gb->lines	g  gb-filter-lines!	g  make-gap-buffer-port	 	g  	autoloadsS	g  srfi	g  srfi-13	 	 g  string-join	!  	"! 	#g  set-current-module	$# 	%# 	&g  make-record-type	'g  s	(g  all-sz	)g  gap-ofs	*g  aft-ofs	+'()* 	,g  record-predicate	-g  record-accessor	.g  s:	/g  all-sz:	0g  gap-ofs:	1g  aft-ofs:	2g  record-modifier	3g  s!	4g  all-sz!	5g  gap-ofs!	6g  aft-ofs!	7g  default-initial-allocation	8g  default-chunk-size	9g  default-realloc-threshold	:g  round-up	;g  record-constructor	<g  new	=g  make-string	>g  substring-move!	?g  realloc	@g  port?	Ag  eof-object?	Bg  list->string	Cg  reverse	Dg  	read-char	Eg  string?	Fg  string-length	Gg  error	Hf  bad init type	Ig  insert-prep	Jg  string-set!	Kg  max	Lg  min	Mg  	point++n!	Ng  	point+-n!	Og  string-append	Pg  	substring	Qg  string-index	Rf  not a gap-buffer:	Sg  make-soft-port	Tg  
string-ref	Uf  rwC 5   h     ]4	
"5 4% >  "  G   4&i+5R4,ii5R4-ii'5.R4-ii(5/R4-ii)50R4-ii*51R42ii'53R42ii(54R42ii)55R42ii*56R 7R 8R	 9R8 h      ] C           g  n
		  g  filenamef  ice-9/gap-buffer.scm
 
		 		
 		 	 		  g  nameg  round-up C:R4;ii5<R./01=>346 
h     ]:4 54 54 54 5454

>  "  G  4>  "  G  4 >  "  G  4 >  "  G  	 6       g  gb
	  g  inc	  g  old-s			  g  all-sz		  g  new-sz		  g  gap-ofs		"  g  aft-ofs		+  g  new-s		4  g  new-aft-ofs		;   	g  filenamef  ice-9/gap-buffer.scm
 
	 			 		 		 		 		 		 		" 		% 		+ 		. 		4 		; 		; 		> 		V 		p 	  	  	 	 	  g  nameg  realloc C?R<3=7456@ABC:>.DEFGH      h  Q  -  1  3 45  (  X445>  "  G  4>  "  G  4
>  "  G  4>  "  G  "  45$  "  4	5$  4
45545445>  "  G  4>  "  G  4
45
>  "  G  4>  "  G  4>  "  9G  "  245"I45
"6"  45$  4545445>  "  G  4>  "  G  4
45
>  "  G  4>  "  G  4>  "  G  "  4>  "  G  C       I      g  init
		 g  gb	 g  v		q g  c	 9 g  acc	 9 g  len	 9 g  string	   g  alloc	  g  len	b g  alloc	k  
g  filenamef  ice-9/gap-buffer.scm
 
	
 		 		 		 		 		' 		0 		D 		W 		q 		q 		t 		~ 	  	  	!  	  	'  	5  	'  	!  	+  	  	   	'  	   	   	   	>  	   	  	 ! 	0, 	./ 	;9 	!9 	: 	0A 	6L 	Q 	[ 	\ 	!b 	e 	+k 	n 	 s 	'~ 	  	  	  	> 	  	  	  	 	% 	 ;		


  g  nameg  make-gap-buffer CR0      h      ]4 5C     w       g  gb
		  g  filenamef  ice-9/gap-buffer.scm
 
	 		
 	 		  g  nameg  gb-point CR    h   q   ]C    i       g  gb
		  g  filenamef  ice-9/gap-buffer.scm
 
 		  g  nameg  gb-point-min CR/10  h       ]4 54 54 5C            g  gb
		  g  filenamef  ice-9/gap-buffer.scm
 
	 			
 		 	'	 		 		 	 		  g  nameg  gb-point-max CR019?:        hP   <  ]4 54 5$  4 4
5>  "  G  "   C       4      g  gb
		I g  len		I g  gap-ofs				I g  aft-ofs			I g  slack			I  g  filenamef  ice-9/gap-buffer.scm
 
	 			 		 		 		 		 		 		# 			' 		( 			- 		0 		5 		: 		 		I	  g  nameg  insert-prep CIRFI>.5   h@     ]454 54
4 5>  "  G   6        g  gb
		? g  string		? g  len				? g  gap-ofs			?  g  filenamef  ice-9/gap-buffer.scm
 
	 			 		 		 		 		 	"	, 		= 		? 	 		?	  g  nameg  gb-insert-string! CRIJ.5        h0      ]
4 544 5>  "  G   6       g  gb
		0 g  char		0 g  gap-ofs		
	0  g  filenamef  ice-9/gap-buffer.scm
 
	 		
 		 		 		 		. 		0 	 			0	  g  nameg  gb-insert-char! CR5K06L/1 hP      ]
$   4
4 556
$   44 54 556
$  CC      g  gb
		P g  count		P  g  filenamef  ice-9/gap-buffer.scm
 
	 			
 		 		 	 	 		 		  			$ 			( 		- 		0 		7 	+	@ 	(	B 		D 			H 			L 	 		P	  g  nameg  gb-delete-char! CR56/   h(      ]4 
>  "  G   4 56             g  gb
		"  g  filenamef  ice-9/gap-buffer.scm
 
	 		 		" 	 		"  g  nameg  	gb-erase! CR>56  hH      ]4>  "  G  4 >  "  G   6              g  gb
		A g  n		A g  s			A g  gap-ofs			A g  aft-ofs			A  g  filenamef  ice-9/gap-buffer.scm
 
	 		 		 		  		) 		. 		? 		A 	 
		A	  g  nameg  	point++n! CMR>56     hH     ]4>  "  G  4 >  "  G   6           g  gb
		D g  n		D g  s			D g  gap-ofs			D g  aft-ofs			D  g  filenamef  ice-9/gap-buffer.scm
 
	 		 		 	-	 		# 		, 		1 		B 		D 	 		D	  g  nameg  	point+-n! CNRNM.01 	 h     ]*4 5$  4 5"  $  "  $  4 5"  $  "  Y4 5
$  "  74
$  "   4 54 54 5>  "  G  C          g  gb
	  g  	new-point	  g  pmax			  g  t		   g  t		C  g  delta		Y  g  t		_   g  filenamef  ice-9/gap-buffer.scm
 
	 			 		 		 		 	 	  		1 		5 		6 	 	C 		R 	"	Y 		Y 		_ 		_ 	
	l 		p 		t 	  	  	   	.  	 	 	  g  nameg  gb-goto-char CR.OP01   h0      ]	4 54
4 5544 556           g  gb
		, g  s			,  g  filenamef  ice-9/gap-buffer.scm
 
	 			 		 		 	"	 		 		" 	 	* 		, 	 		,  g  nameg  
gb->string CR     h0      ]
44 554 >  "  G   6             g  gb
		* g  string-proc		* g  new			*  g  filenamef  ice-9/gap-buffer.scm
 
	 		 		 		 		 		* 	 		*	  g  nameg  
gb-filter! CRQPC  hX   8  ]!4 5"  <4
5$  45"456
"   0      g  gb
		U g  str			U g  start			K g  acc			K g  t			K  g  filenamef  ice-9/gap-buffer.scm
 
	 			 		 		 		 		% 		& 	%	3 		; 		> 	!	I 		K 		K 		M 		U 	 		U  g  nameg  	gb->lines CR  h8      ]
44 554 >  "  G   4
56              g  gb
		1 g  
lines-proc		1 g  	new-lines			1  g  filenamef  ice-9/gap-buffer.scm
 
											'		1	 			1	  g  nameg  gb-filter-lines! CRGRS   h   a   ]L  6      Y       g  c
		
  g  filenamef  ice-9/gap-buffer.scm

		

	 		
   C h   a   ]L  6      Y       g  s
		
  g  filenamef  ice-9/gap-buffer.scm
		
	 		
   C01/.TJ56 	  h   )  ] 4L 54L 5 4L 5$  C4L 5454 >  "  G  4L  >  "  G  4L >  "  G  C     !      g  gap-ofs
		{ g  aft-ofs		{ g  s		+	{ g  c		6	{  g  filenamef  ice-9/gap-buffer.scm
				
					 			"		%		+		.		6		9		O		V	$	[		d		k	$	p	 		{
   CU 	 hP      ]	4 5$  "  4 >  "  G   O  O  O  6           g  gb
		L g  t			,  g  filenamef  ice-9/gap-buffer.scm

										!		H			J		L	 
		L  g  nameg  make-gap-buffer-port CRC    ~      g  m
		,  g  filenamef  ice-9/gap-buffer.scm		Y
	-	l		3	l		5	m		7	l		:	k
	;	s		H	s
	I	u		S	u	-	U	u		X	u
	Y	v		c	v	-	e	v		h	v
	i	w		s	w	-	u	w		x	w
	y	x	 	x	- 	x	 	x
 	z	 	z	- 	z	 	z
 	{	 	{	- 	{	 	{
 	|	 	|	- 	|	 	|
 	}	 	}	- 	}	 	}
  
  
  
 
 	 	+ 	 
 
	 

R 

 
 
g 
 
 
{ 
D 
 

 
 
 
 
k 
 
 
 C	 
   C6                                                                         ccache/ice-9/control.go                                                                             0000644                 00000020267 15154557173 0010713 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0       ]  4     h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  control	 		g  filenameS	
f  ice-9/control.scm	g  exportsS	g  %	g  abort	g  shift	g  reset	g  shift*	g  reset*	g  call-with-escape-continuation	g  call/ec	g  let-escape-continuation	g  let/ec	 
	g  
re-exportsS	g  call-with-prompt	g  abort-to-prompt	g  default-prompt-tag	g  make-prompt-tag	 	g  set-current-module	 	 	 g  make-syntax-transformer	!  	"  	#g  macro	$g  $sc-dispatch	%$ 	&$ 	'g  any	('' 	)g  syntax-object	*g  top	+* 	,g  ribcage	-g  dummy	.g  expr	/-. 	0g  m-3d0776c508-76	10* 	21+ 	3f  l-3d0776c508-7b	4f  l-3d0776c508-7c	534 	6,/25 	7, 	8g  x	98 	:1 	;f  l-3d0776c508-78	<; 	=,9:< 	>+67= 	?g  hygiene	@? 	A)>@ 	B)>@ 	CB 	Dg  lambda	E)D>@ 	Fg  default-prompt-handler	G)F>@ 	HG 	I''' 	Jg  handler	K-.J 	L1++ 	Mf  l-3d0776c508-80	Nf  l-3d0776c508-81	Of  l-3d0776c508-82	PMNO 	Q,KLP 	R+Q7= 	S)R@ 	T)R@ 	UT 	V)DR@ 	W'''' 	Xg  tag	Y-X.J 	Z1+++ 	[f  l-3d0776c508-87	\f  l-3d0776c508-88	]f  l-3d0776c508-89	^f  l-3d0776c508-8a	_[\]^ 	`,YZ_ 	a+`7= 	b)a@ 	c)Da@ 	dg  syntax-violation	ed 	fd 	gf  -source expression failed to match any pattern	h''	ig  body	j-i 	kg  m-3d0776c508-95	lk* 	ml+ 	nf  l-3d0776c508-9a	of  l-3d0776c508-9b	pno 	q,jmp 	rl 	sf  l-3d0776c508-97	ts 	u,9rt 	v+q7u 	w)v@ 	x)v@ 	yx 	z)Dv@ 	{g  cont	|){v@ 	}g  f	~)}v@ 	|~  ~|  z    'h g  var -i  g  m-3d0776c508-9f *  ++  f  l-3d0776c508-a4 f  l-3d0776c508-a5 f  l-3d0776c508-a6   ,    f  l-3d0776c508-a1   ,9  +7  )@  )@    )D@  ){@    )@  g  vals )@  g  apply )@          g  each-any ' ' g  let g  k -i  g  m-3d0776c508-cf *  ++  f  l-3d0776c508-d4 f  l-3d0776c508-d5 f  l-3d0776c508-d6   ,    f  l-3d0776c508-d1   ,9  +7  )@  )X@  g  list )@  g  quote )@  )@          )@  )D@  g  args )@  )@  )@        g  _ )@  g  results )@  ̌ g  values )@        g  m-3d0776c508-dc *  ++  f  l-3d0776c508-e1 f  l-3d0776c508-e2 f  l-3d0776c508-e3   ,    f  l-3d0776c508-de   ,9  +7  )@ C 5       h`     ]4	
5 4 >  "  G       h   z   -  1  3 45  @    r       g  args
			  g  filenamef  ice-9/control.scm
	
						 			


  g  nameg  abort CR4"#&(ACEH   h   ?   ] C    7       g  dummy
		 g  expr		  			   CISUV     h   T   ]  C    L       g  dummy
		 g  expr		 g  handler			  			   CWbc  h   e   ]  C    ]       g  dummy
		 g  tag		 g  expr			 g  handler			  			   Cfg 
   hP      ]4 5$  @4 5$  @4 5$  @	 6       g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  ice-9/control.scm
		 		P  g  
macro-typeg  syntax-rulesg  patternsg  expr g  exprg  handler g  tagg  exprg  handler   C5RF  h   E   ] LL 6=       g  filenamef  ice-9/control.scm		8	 		
   C        h0      ]45 U   4 O >   XCXFG@         g  k
		. g  proc		. g  handler			. g  args		#	.  g  filenamef  ice-9/control.scm
	6
		7			7			7	 		.	  g  nameg  default-prompt-handler CFR4"#&hwyz      h   ?   ]C     7       g  dummy
		 g  body		  			   Cfg  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/control.scm
	@
 		"  g  
macro-typeg  syntax-rulesg  patternsg  body  C5R4"#&      h(   P   ]    C     H       g  dummy
		# g  var		# g  body			#  		#	   Cfg h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/control.scm
	E
 		"  g  
macro-typeg  syntax-rulesg  patternsg  varg  body  C5R     h   E   ] L 6   =       g  filenamef  ice-9/control.scm		L		 		
   C        h0      ]45 U   4 O >   XCXFG 6             g  thunk
		* g  cont		* g  f			*  g  filenamef  ice-9/control.scm
	K
		L	 		*  g  nameg  reset* CR       h   E   ] LL @=       g  filenamef  ice-9/control.scm		O	 		
   C        h8   y   -  1  3 45 U   4 L O >   XCXFG 6     q       g  vals
			3 g  cont	&	3 g  f		&	3  g  filenamef  ice-9/control.scm
	O	 			3


   C    h   E   ] LL O 6   =       g  filenamef  ice-9/control.scm		O	 		
   C        h0   w   ]45 U   4 L O >   XCXFG 6    o       g  cont
		, g  cont		, g  f			,  g  filenamef  ice-9/control.scm
	O	 		,   C      h   o   ]45  O WF      g       g  fc
		  g  filenamef  ice-9/control.scm
	N
		O	 		  g  nameg  shift* CR     h   a   -  1  3 L  @       Y       g  args
			  g  filenamef  ice-9/control.scm
	V			W	  			


   C    h0   %  ] U  4 O >  XCXFGE        g  proc
		. g  tag		. g  _		#	. g  args		#	.  g  filenamef  ice-9/control.scm
	Q
		S			S			S			T			V		&	T		.	Y	 			.  g  nameg  call-with-escape-continuationg  documentationf  &Call PROC with an escape continuation. CRiR4"#&   h(   N   ]   C F       g  dummy
		' g  k		' g  body			'  		'	   Cfg   h(     ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/control.scm
	]
 		"  g  documentationf  CBind K to an escape continuation within the lexical extent of BODY.g  
macro-typeg  syntax-rulesg  patternsg  kg  bodyg  ...   C5R4"#&        h   N   ]C     F       g  dummy
		 g  k		 g  body			  			   Cfg   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/control.scm
	h
 		"  g  
macro-typeg  syntax-rulesg  patternsg  kg  bodyg  ...   C5RC }       g  m
		,  g  filenamef  ice-9/control.scm		
 	
*	6
	5	K
	N
	Q
	[
 	_
   C6                                                                                                                                                                                                                                                                                                                                          ccache/ice-9/buffered-input.go                                                                      0000644                 00000010645 15154557173 0012151 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] ! 4     ha      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  buffered-input	 		g  filenameS	
f  ice-9/buffered-input.scm	g  exportsS	g  make-buffered-input-port	g  make-line-buffered-input-port	g  !set-buffered-input-continuation?!	 	g  set-current-module	 	 	g  make-object-property	g  buffered-input-continuation?	g  setter	 	 	f   	g  string-length	g  
string-ref	g  char-whitespace?	g  eof-object?	g  make-soft-port	f  r	g  string-append	 f  
C 5  h`     ]4	
5 4 >  "  G   4i5 R      h   @  ]45 6 8      g  port
		 g  val		  g  filenamef  ice-9/buffered-input.scm
	
		!	 			  g  nameg  !set-buffered-input-continuation?!g  documentationf  Set the read continuation flag for @var{port} to @var{val}.

See @code{make-buffered-input-port} for the meaning and use of this
flag. CR  hx     ]M4M5$  :4MM5 MN4 5$  "  445M>  "  G   C4L4M55 4 5$   C N
N"             g  res
		J g  x
	V	q  g  filenamef  ice-9/buffered-input.scm
	?			@	$		@			@			B			B			C	)	 	C		!	D		+	D		0	E		K	H		N	H	%	V	H		V	H		Y	J		c	I		j	N		m	O		q	P	 		q
  g  nameg  get-character C   h   u   ] 4M5M C   m       g  filenamef  ice-9/buffered-input.scm
	R			S			S	 		
  g  nameg  input-waiting C  hh   5  ])
HHHO  Q K4O  5K445J>  "  G  JC   -      g  reader
		e g  read-string		e g  string-index			e g  port		
	e g  get-character			e g  port		&	/  g  filenamef  ice-9/buffered-input.scm
	#
		<			<		
	>		0	U		D	U	!	F	U	R	H	U		J	U		K	V	 		e  g  nameg  make-buffered-input-portg  documentationf Construct a line-buffered input port from the specified @var{reader}.
@var{reader} should be a procedure of one argument that somehow reads
a chunk of input and returns it as a string.

The port created by @code{make-buffered-input-port} does @emph{not}
interpolate any additional characters between the strings returned by
@var{reader}.

@var{reader} should take a boolean @var{continuation?} argument.
@var{continuation?} indicates whether @var{reader} is being called to
start a logically new read operation (in which case
@var{continuation?} is @code{#f}) or to continue a read operation for
which some input has already been read (in which case
@var{continuation?} is @code{#t}).  Some @var{reader} implementations
use the @var{continuation?} argument to determine what prompt to
display to the user.

The new/continuation distinction is largely an application-level
concept: @code{set-buffered-input-continuation?!} allows an
application to specify when a read operation is considered to be new.
But note that if there is non-whitespace data already buffered in the
port when a new read operation starts, this data will be read before
the first call to @var{reader}, and so @var{reader} will be called
with @var{continuation?} set to @code{#t}. CR    h(      ]	4L  545$  C6              g  continuation?
		! g  str			!  g  filenamef  ice-9/buffered-input.scm
	f			g	)			g			h	$		h	 		j	7	!	j	$ 		!   C      h     ] O 6         g  reader
		  g  filenamef  ice-9/buffered-input.scm
	Y
		f	 		  g  nameg  make-line-buffered-input-portg  documentationf Construct a line-buffered input port from the specified @var{reader}.
@var{reader} should be a procedure of one argument that somehow reads
a line of input and returns it as a string @emph{without} the
terminating newline character.

The port created by @code{make-line-buffered-input-port} automatically
interpolates a newline character after each string returned by
@var{reader}.

@var{reader} should take a boolean @var{continuation?} argument.  For
the meaning and use of this argument, see
@code{make-buffered-input-port}. CRC     {       g  m
		(  g  filenamef  ice-9/buffered-input.scm		
	)		%	2	
	

	#
Y	Y
 	[
   C6                                                                                            ccache/ice-9/syncase.go                                                                             0000644                 00000001450 15154557173 0010671 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4      h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  syncase	 		g  filenameS	
f  ice-9/syncase.scm	g  exportsS	g  datum->syntax-object	g  syntax-object->datum	g  	sc-expand	 	g  set-current-module	 	 	g  issue-deprecation-warning	f  bSyntax-case macros are now a part of Guile core; importing (ice-9 syncase) is no longer necessary.	g  datum->syntax	g  syntax->datum	g  macroexpandC 5  hX   ~   ]4	
5 4 >  "  G   4i>  "  G  iRiRiRC     v       g  m
		(  g  filenamef  ice-9/syncase.scm		
	)	
	/		4	
	C	
	J	
	Q	
 		S
   C6                                                                                                                                                                                                                         ccache/ice-9/r5rs.go                                                                                0000644                 00000002641 15154557173 0010122 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] ' 4       h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  r5rs	 		g  filenameS	
f  ice-9/r5rs.scm	g  exportsS	g  scheme-report-environment	 	g  
re-exportsS	g  interaction-environment	g  call-with-input-file	g  call-with-output-file	g  with-input-from-file	g  with-output-to-file	g  open-input-file	g  open-output-file	g  close-input-port	g  close-output-port	g  load	 
	g  set-current-module	 	 	g  module-use!	g  module-public-interface	g  current-module	 g  resolve-interface	!g  	safe-r5rs	"! 	#g  scheme-report-interface	$g  	scm-error	%g  
misc-error	&f  ~A is not a valid versionC 5   hx     ]4	
5 4 >  "  G   4i4i4i5 54 i"5>  "  G  4i4i5 5#R$%&#    h0      ] 	$  "  4  >  "  G  C         g  n
		.  g  filenamef  ice-9/r5rs.scm
	&
		'			'			(			(			(			)			*			+		#	(	 		.  g  nameg  scheme-report-environment CRC            g  m
		,  g  filenamef  ice-9/r5rs.scm		
	-	!
	2	!		7	!	&	?	!		@	"		F	"	 	H	"		M	!
	V	$	 	[	$	9	c	$	 	f	$
q	&
 	s
   C6                                                                                                ccache/ice-9/stack-catch.go                                                                         0000644                 00000003323 15154557173 0011412 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4       hE      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  stack-catch	 		g  filenameS	
f  ice-9/stack-catch.scm	g  importsS	g  
save-stack	 	 	 	g  exportsS	 	g  set-current-module	 	 	g  catch	g  throwC 5      h  a   ]4	
5 4 >  "  G    h(   }   - 1 3 4	>  "  G   @     u       g  key
			# g  args			#  g  filenamef  ice-9/stack-catch.scm
	+			
	-		#	.	 			#
   C        h     ] 6        g  key
		 g  thunk		 g  handler			  g  filenamef  ice-9/stack-catch.scm
	
		(	 			  g  nameg  stack-catchg  documentationf Like @code{catch}, invoke @var{thunk} in the dynamic context of
@var{handler} for exceptions matching @var{key}, but also save the
current stack state in the @var{the-last-stack} fluid, for the purpose
of debugging or re-throwing of an error.  If thunk throws to the
symbol @var{key}, then @var{handler} is invoked this way:

@example
 (handler key args ...)
@end example

@var{key} is a symbol or #t.

@var{thunk} takes no arguments.  If @var{thunk} returns normally, that
is the return value of @code{catch}.

Handler is invoked outside the scope of its own @code{catch}.  If
@var{handler} again throws to the same key, a new handler from further
up the call chain is invoked.

If the key is @code{#t}, then a throw to @emph{any} symbol will match
this call to @code{catch}. CRC    Y       g  m
		,  g  filenamef  ice-9/stack-catch.scm		
	
 	
   C6                                                                                                                                                                                                                                                                                                              ccache/ice-9/and-let-star.go                                                                        0000644                 00000016126 15154557173 0011525 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0>      ]  4     h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  and-let-star	 		g  filenameS	
f  ice-9/and-let-star.scm	g  exportsS	g  and-let*	 	g  set-current-module	 	 	g  make-syntax-transformer	 	 	g  	%and-let*	g  macro	g  $sc-dispatch	 	 	g  _	g  any				g  syntax-object	g  begin	 g  top	!  	"g  ribcage	#g  	orig-form	$g  body	%#$ 	&!! 	'f  l-1706b9545eb5b006-4	(f  l-1706b9545eb5b006-5	)'( 	*"%&) 	+" 	,g  form	-, 	.! 	/f  l-1706b9545eb5b006-1	0/ 	1"-.0 	2!*+1 	3g  hygiene	43 	524 	624 	7 	8	978	:9	;:	<;	= 	>=8	?>	@?	A@	Bg  and	Cg  expr	Dg  rest	Eg  rest*	F#CDE$ 	G!!!!! 	Hf  l-1706b9545eb5b006-22	If  l-1706b9545eb5b006-23	Jf  l-1706b9545eb5b006-24	Kf  l-1706b9545eb5b006-25	Lf  l-1706b9545eb5b006-26	MHIJKL 	N"FGM 	O!N+1 	PBO4 	QO4 	R8	SR	TS	UT	V7 	WV 	X= 	YX 	Z= 	[V	\[	]\	^X	_^	`_	a#C$ 	b!!! 	cf  l-1706b9545eb5b006-6e	df  l-1706b9545eb5b006-6f	ef  l-1706b9545eb5b006-70	fcde 	g"abf 	h!g+1 	iBh4 	jh4 	k=	lk	ml	n8	on	po	qg  syntax-violation	rf  
Bad clause	sq 	tq 	uf  -source expression failed to match any pattern	vg  identifier?	wg  var	x#w$ 	yf  l-1706b9545eb5b006-7b	zf  l-1706b9545eb5b006-7c	{f  l-1706b9545eb5b006-7d	|yz{ 	}"xb| 	~!}+1 	B~4  ~4  g  let #wC$  !!!!  f  l-1706b9545eb5b006-65 f  l-1706b9545eb5b006-66 f  l-1706b9545eb5b006-67 f  l-1706b9545eb5b006-68   "  !+1  4  B4  4  #wDE$  f  l-1706b9545eb5b006-37 f  l-1706b9545eb5b006-38 f  l-1706b9545eb5b006-39 f  l-1706b9545eb5b006-3a f  l-1706b9545eb5b006-3b   "G  !+1  B4  4  #wCDE$  !!!!!!  f  l-1706b9545eb5b006-15 f  l-1706b9545eb5b006-16 f  l-1706b9545eb5b006-17 f  l-1706b9545eb5b006-18 f  l-1706b9545eb5b006-19 f  l-1706b9545eb5b006-1a   "  !+1  4  B4  4  g  each-any   g  t-1706b9545eb5b006-92   g  m-1706b9545eb5b006-93      f  l-1706b9545eb5b006-96   "  g  c $  f  l-1706b9545eb5b006-8e f  l-1706b9545eb5b006-8f   "&  f  l-1706b9545eb5b006-8b   "-.  !++  4  g  cond-expand-provide g  current-module g  srfi-2  C 5      hX  t   ]4	
5 4 >  "  G   456    h   C   ]C     ;       g  	orig-form
		 g  body		  			   C<APQ h   z   ]  Cr       g  	orig-form
		 g  expr		 g  rest			 g  rest*			 g  body			  			   CUWY      h   C   ]C   ;       g  	orig-form
		 g  expr		  			   CZ]`ij       h   U   ] C M       g  	orig-form
		 g  expr		 g  body			  			   Cmpqr     h      ] 6         g  	orig-form
		 g  
bad-clause		 g  rest			 g  body			  g  filenamef  ice-9/and-let-star.scm		@			@	#		@	 			   Ctuv        h      ]6}       g  	orig-form
		 g  var		 g  body			  g  filenamef  ice-9/and-let-star.scm		;	 			   C   h   T   ] C L       g  	orig-form
		 g  var		 g  body			  			   Cv      h      ]6       g  	orig-form
		 g  var		 g  expr			 g  body			  g  filenamef  ice-9/and-let-star.scm		5	 			   C       h    f   ]    C  ^       g  	orig-form
		 g  var		 g  expr			 g  body			  			   Cv    h   s   ]6k       g  	orig-form
		 g  var		  g  filenamef  ice-9/and-let-star.scm		0	 			   C   h   B   ]C   :       g  	orig-form
		 g  var		  			   Cv        h      ]6}       g  	orig-form
		 g  var		 g  expr			  g  filenamef  ice-9/and-let-star.scm		+	 			   C h   T   ]C   L       g  	orig-form
		 g  var		 g  expr			  			   Cv      h      ]6       g  	orig-form
		 g  var		 g  rest			 g  rest*			 g  body			  g  filenamef  ice-9/and-let-star.scm		&	 			   C      h   y   ]  Cq       g  	orig-form
		 g  var		 g  rest			 g  rest*			 g  body			  			   Cv h      ]6       g  	orig-form
		 g  var		 g  expr			 g  rest			 g  rest*			 g  body			  g  filenamef  ice-9/and-let-star.scm		 	 			   C  h(      ]     C        g  	orig-form
		' g  var		' g  expr			' g  rest			' g  rest*			' g  body			'  		'	   C   h  '  ]Y4 5$  @4 5" K4 5$  @4 5" 4 5"  4 	5$  
@4 5"  4 5"  e4 5		$  	@4 5
"   4 5$  @ 6
$  4
?$  
@""$  4?$  @""|$  4?$  @"R"N$  4?$  @""	$  4?$  @""$  4?$  @""            g  form
	 g  tmp	 g  tmp		" g  tmp		1s g  tmp		Hs g  tmp		WT g  tmp		f5 g  tmp		}5 g  tmp	  g  tmp		   g  tmp	
   g  tmp	    g  filenamef  ice-9/and-let-star.scm
		 	   C5R4  h   ;   ]L  C  3       g  c
		 g  body		  			   Ctu      h(   l   ]	4 5$   O @ 6 d       g  form
		' g  tmp		'  g  filenamef  ice-9/and-let-star.scm
	C	 		'   C5Ri4i5 6l       g  m
		(  g  filenamef  ice-9/and-let-star.scm		
N	H	V	H	&X	H
 	X
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                           ccache/ice-9/debug.go                                                                               0000644                 00000001022 15154557173 0010305 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4      h/      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  debug	 		g  filenameS	
f  ice-9/debug.scm	g  set-current-module	 	 	g  issue-deprecation-warning	f  ?(ice-9 debug) is deprecated. Use (system vm trace) for tracing.C 5    h0   `   ]4	
5 4 >  "  G   i6    X       g  m
		$  g  filenamef  ice-9/debug.scm		
	*		,	
 		,
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                               ccache/ice-9/lineio.go                                                                              0000644                 00000005306 15154557173 0010507 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0
      ] $ 4  hQ      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  lineio	 		g  filenameS	
f  ice-9/lineio.scm	g  importsS	g  rdelim	 	 	 	g  exportsS	g  unread-string	g  read-string	g  lineio-port?	g  make-line-buffering-input-port	 	g  set-current-module	 	 	g  object-property	g  make-soft-port	g  
string-ref	g  string-length	g  	substring	g  	read-char	g  
close-port	 f  r	!g  set-object-property!	"g  	read-line	#g  concatC 5  h  t   ]4	
5 4 >  "  G       h      ]45 6        g  str
		 g  line-buffering-input-port		  g  filenamef  ice-9/lineio.scm
	8
		9				9	.		9			9	 			  g  nameg  unread-string CR        h      ]4 56           g  line-buffering-input-port
		  g  filenamef  ice-9/lineio.scm
	<
		=				=	.		=			=	 		  g  nameg  read-string CR   h      ]4 5C         g  port
		  g  filenamef  ice-9/lineio.scm
	@
		A				A	"		A			A			A	 		  g  nameg  lineio-port? CR        h@      ]M$  14M
5 4M5$  	MN"  M4M5 CL 6        g  c
		9  g  filenamef  ice-9/lineio.scm
	T			U				W			W	*		W			W			X	 		X	/		X	 		X		!	X		$	Y	)	&	Y		-	Z	-	2	Z	8	5	Z	-	6	Z		?	V	 		?
  g  nameg  getc C      h   g   ] L 6_       g  filenamef  ice-9/lineio.scm
	]			]	% 		
  g  nameg  propogate-close C !     h       ]
4 5$  	 M N CC             g  str
		  g  filenamef  ice-9/lineio.scm
	a			b	$		b			b			c	1		c	# 		  g  nameg  unread-string C"#       h       ]M(  L 6M MN C          g  answer
		  g  filenamef  ice-9/lineio.scm
	e			f			l	4		l			h	'		h			i	)		i	 			
  g  nameg  read-string C 
    h`     ]H4 O  O  54O >  "  G  4	 O >  "  G  C       g  underlying-port
		_ g  buffers		_ g  self		"	_  g  filenamef  ice-9/lineio.scm
	K
		O			L			_			_		 	_	F	"	_		"	L		%	n		+	n		7	n		@	o		F	o		T	o	 		_  g  nameg  make-line-buffering-input-port CRC  l       g  m
		,  g  filenamef  ice-9/lineio.scm		
	8
	<
	@
	K
 	
   C6                                                                                                                                                                                                                                                                                                                           ccache/ice-9/history.go                                                                             0000644                 00000005362 15154557173 0010733 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0
      ] + 4   hI      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  history	 		g  filenameS	
f  ice-9/history.scm	g  exportsS	g  value-history-enabled?	g  enable-value-history!	g  disable-value-history!	g  clear-value-history!	 	g  set-current-module	 	 	g  value-history	 	g  *value-history-enabled?*	g  module-use!	g  current-module	g  resolve-interface	g  use-value-history	g  resolve-module	g  unspecified?	g  string->symbol	g  simple-format	f  $~A	 f  ~A = 	!g  module-define!	"g  module-export!	#g  save-value-history	$g  	add-hook!	%g  before-eval-hook	&g  before-print-hook	'g  remove-hook!	(g  hash-clear!	)g  module-obarray	*g  module-public-interfaceC 5  hH     ]4	
5 4 >  "  G   4i>  "  G  R  h   f   ] C   ^       g  filenamef  ice-9/history.scm
	
 		
  g  nameg  value-history-enabled? CR   h      ]45 456             g  x
		  g  filenamef  ice-9/history.scm
	
				
					"						 		  g  nameg  use-value-history CR
4i5H  !"    hp     ]4 5$  CM44554>  "  G  4L  >  "  G  4L  >  "  G  NC          g  v
		m g  c		m g  s		#	m  g  filenamef  ice-9/history.scm
	$			%			%			&			&	
		'			'	$		'	6	!	'	$	#	'		#	&	
	&	(		+	(		2	(		;	)		Q	*		Z	*	$	_	*		k	+	 		m   C O  #R$%&#     h@      ] 45 $  C4>  "  G  4>  "  G   C             g  filenamef  ice-9/history.scm
	-
		.			.			0		"	1		8	2	 		:
  g  nameg  enable-value-history! CR'%&#      h@      ] 45 $  -4>  "  G  4>  "  G   CC             g  filenamef  ice-9/history.scm
	4
		5			5			7		 	8		6	9	 		:
  g  nameg  disable-value-history! CR()* h8      ]45 44 5>  "  G  44 556             g  history
			2  g  filenamef  ice-9/history.scm
	;
		<			<	!			<				<			=			=			=		%	>		(	>	!	0	>		2	>	 		2
  g  nameg  clear-value-history! CRi6             g  m
		( g  count
6 g  history6  g  filenamef  ice-9/history.scm		
	)	
	/			4	
	@	
 	
	
	#		#	!	#		"	9	!
(	-
	4
=	;
C	@
 	C
   C6                                                                                                                                                                                                                                                                               ccache/ice-9/occam-channel.go                                                                       0000644                 00000071021 15154557173 0011715 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0q      ] 4     h-      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  occam-channel	 		g  filenameS	
f  ice-9/occam-channel.scm	g  importsS	g  oop	g  goops	 	 	g  threads	 	 	 	g  exportsS	g  alt	g  oc:lock	g  	oc:unlock	g  oc:consequence	g  oc:immediate-dispatch	g  oc:late-dispatch	g  oc:first-channel	g  oc:set-handshake-channel	g  oc:unset-handshake-channel	g  make-channel	g  ?	 g  !	!g  
make-timer	"g  handshake-channel	#g  mutex	$g  sender-waiting?	%g  immediate-receive	&g  late-receive	' !"#$%& 	(g  set-current-module	)( 	*( 	+g  no-data	,+ 	-g  receiver-waiting	.- 	/g  toplevel-define!	0/ 	1/ 	2g  	<channel>	3g  
make-class	4g  nameS	5g  defined?	65 	75 	8g  is-a?	98 	:8 	;g  <class>	<; 	=; 	>g  memq	?g  <object>	@? 	A? 	Bg  class-precedence-list	CB 	DB 	Eg  class-redefinition	FE 	GE 	Hg  
<accessor>	IH 	JH 	Kg  ensure-accessor	LK 	MK 	Ng  data	Og  cv	Pg  <data-channel>	Qg  accessorS	Rg  
init-valueS	Sg  	init-formS	Tg  make-condition-variable	UT 	Vg  
init-thunkS	Wg  
make-mutex	XW 	Yg  
initialize	Zg  make	[Z 	\Z 	]g  	<generic>	^] 	_] 	`g  add-method!	a` 	b` 	cg  <method>	dc 	ec 	fg  specializersS	gg  <top>	hg 	ig 	jg  formalsS	kg  ch	lg  initargs	mkl 	ng  bodyS	og  next-method	po 	qg  set!	r"k 	sqrk 	tps 	ug  make-procedureS	vg  setter	wv 	xv 	yg  	procedureS	zZP 	{z 	|k 	}g  not	~g  eq?	Nk  ~+  }    g  receiver-waiting? ~-    g  signal-condition-variable Ok    g  let g  res     q+        g  
lock-mutex #k    g  cond k  g  unlock-mutex   g  	scm-error g  quote g  
misc-error     f  *another process is already receiving on ~A g  list k      $k  %k    g  else q-  g  wait-condition-variable   &k              g  *unspecified*  k    g  x k  #r    q  Or           f  (another process is already sending on ~A           g  port g  <port-channel> g  init-keywordS g  portS g  <port>   Z    g  read k      g  write     g  <timer-channel> g  	the-timer g  timer-cv g  timer-mutex g  timeofday->us g  us->timeofday g  gettimeofday       g  	<integer> g  t k            g  make-syntax-transformer     g  macro g  $sc-dispatch     g  any g  free-id g  syntax-object g  top   g  ribcage     g  m-17d5859fdf6989b4-ca     f  l-17d5859fdf6989b4-cc       g  hygiene         g  each-any   g  dummyg  formk  f  l-17d5859fdf6989b4-cff  l-17d5859fdf6989b4-d0f  l-17d5859fdf6989b4-d1	 
	 
  #   g  expk  f  l-17d5859fdf6989b4-d6f  l-17d5859fdf6989b4-d7f  l-17d5859fdf6989b4-d8f  l-17d5859fdf6989b4-d9    #   f  l-17d5859fdf6989b4-df f  l-17d5859fdf6989b4-e0!f  l-17d5859fdf6989b4-e1" ! #" $# %$ &g  syntax-violation'& (& )f  -source expression failed to match any pattern*g  m-17d5859fdf6989b4-e5+* ,+ -f  l-17d5859fdf6989b4-e7.- /,. 0/ 10 21 32 4354 6+ 7f  l-17d5859fdf6989b4-ea8f  l-17d5859fdf6989b4-eb9f  l-17d5859fdf6989b4-ec:789 ;6: <;/ =< >#< ?4@? A+ Bf  l-17d5859fdf6989b4-f1Cf  l-17d5859fdf6989b4-f2Df  l-17d5859fdf6989b4-f3Ef  l-17d5859fdf6989b4-f4FBCDE GAF HG/ IH J#H Kf  l-17d5859fdf6989b4-faLf  l-17d5859fdf6989b4-fbMf  l-17d5859fdf6989b4-fcNKLM O6N PO/ QP R Sg  =>Tg  m-17d5859fdf6989b4-100UT VU Wf  l-17d5859fdf6989b4-102XW YVX ZY [SZ \[ ] ^]_^`\_ ag  lambdabg  e1cg  e2dNabc eU ff  l-17d5859fdf6989b4-10agf  l-17d5859fdf6989b4-10bhf  l-17d5859fdf6989b4-10cif  l-17d5859fdf6989b4-10djf  l-17d5859fdf6989b4-10ekf  l-17d5859fdf6989b4-10flfghijk mdel nmY on pqprg  beginsNbc tU uf  l-17d5859fdf6989b4-118vf  l-17d5859fdf6989b4-119wf  l-17d5859fdf6989b4-11axf  l-17d5859fdf6989b4-11byuvwx zsty {zY |r{ }g  m-17d5859fdf6989b4-121~} ~ f  l-17d5859fdf6989b4-123       kb ~ f  l-17d5859fdf6989b4-126f  l-17d5859fdf6989b4-127f  l-17d5859fdf6989b4-128   $  %  g  andkb ~ f  l-17d5859fdf6989b4-12ef  l-17d5859fdf6989b4-12ff  l-17d5859fdf6989b4-130f  l-17d5859fdf6989b4-131    $  % g  m-17d5859fdf6989b4-13f  f  l-17d5859fdf6989b4-141        f  l-17d5859fdf6989b4-144f  l-17d5859fdf6989b4-145f  l-17d5859fdf6989b4-146   $  &   f  l-17d5859fdf6989b4-14cf  l-17d5859fdf6989b4-14df  l-17d5859fdf6989b4-14ef  l-17d5859fdf6989b4-14f    $  & b f  l-17d5859fdf6989b4-156f  l-17d5859fdf6989b4-157f  l-17d5859fdf6989b4-158     g  m-17d5859fdf6989b4-15c  f  l-17d5859fdf6989b4-15e      ܌یߌg  first-channelg  c1g  c2  f  l-17d5859fdf6989b4-175f  l-17d5859fdf6989b4-176f  l-17d5859fdf6989b4-177    g  m-17d5859fdf6989b4-17c  f  l-17d5859fdf6989b4-17e       g  	handshakekb  f  l-17d5859fdf6989b4-181f  l-17d5859fdf6989b4-182f  l-17d5859fdf6989b4-183f  l-17d5859fdf6989b4-184     q "  kb  	f  l-17d5859fdf6989b4-18a
f  l-17d5859fdf6989b4-18bf  l-17d5859fdf6989b4-18cf  l-17d5859fdf6989b4-18df  l-17d5859fdf6989b4-18e	
    q "  b f  l-17d5859fdf6989b4-195f  l-17d5859fdf6989b4-196f  l-17d5859fdf6989b4-197f  l-17d5859fdf6989b4-198    g  m-17d5859fdf6989b4-19d   !f  l-17d5859fdf6989b4-19f"! # " $# %$ &% '& (')( * +f  l-17d5859fdf6989b4-1a2,f  l-17d5859fdf6989b4-1a3-f  l-17d5859fdf6989b4-1a4.+,- /*. 0/# 1q0 2"0 3(43 5 6f  l-17d5859fdf6989b4-1a97f  l-17d5859fdf6989b4-1aa8f  l-17d5859fdf6989b4-1ab9f  l-17d5859fdf6989b4-1ac:6789 ;5: <;# =< >q< ?"< @f  l-17d5859fdf6989b4-1b2Af  l-17d5859fdf6989b4-1b3Bf  l-17d5859fdf6989b4-1b4C@AB D*C ED# FE Gg  _HG I Jf  l-17d5859fdf6989b4-1bdKJ LIK Mg  else-clause?NM O Pf  l-17d5859fdf6989b4-1baQP RNOQ Sf  l-17d5859fdf6989b4-1b9TS UIT VLRU WV XW YXZGY [G\ ] ^f  l-17d5859fdf6989b4-1c6_f  l-17d5859fdf6989b4-1c7`^_ a\]` baLRU cGb df  l-17d5859fdf6989b4-1d9ef  l-17d5859fdf6989b4-1dafde g\]f hgRU irh jh kg  appendlk mk ng  mapon pn qh rh sh th uh vkh wh xh yv zh {Oh |{v }#h ~}v z|~ h h h r f  l-17d5859fdf6989b4-1d1f  l-17d5859fdf6989b4-1d2 \] RU r        C 5     h?    ]4	
'5 4* >  "  G   ,+R.-R"  '41243i    425>  "  tG  "  m4725$  ^4:2i=5$  G4>iA4D2i55$  )4G2i43i    425>  "  G  "  "|"  "t"  "l47"5  $  "  4:"iJ5 $  141"4M47"5$  "i"  "5>  "  G  "   47N5  $  "  4:NiJ5 $  141N4M47N5$  Ni"  N5>  "  G  "   47O5  $  "  4:OiJ5 $  141O4M47O5$  Oi"  O5>  "  G  "   47#5  $  "  4:#iJ5 $  141#4M47#5$  #i"  #5>  "  G  "   " 241P43i2i "Q"i NQNiR+i OQOiSUVT h   K   ] 6   C       g  filenamef  ice-9/occam-channel.scm		-	  		
   C #Q#iSXVW      h   K   ] 6   C       g  filenamef  ice-9/occam-channel.scm		.	& 		
   C  4P5>  " G  " |47P5$ m4:Pi=5$ V4>iA4DPi55$ 84GPi43i2i "Q"i NQNiR+i OQOiSUVT     h   K   ] 6   C       g  filenamef  ice-9/occam-channel.scm		-	  		
   C #Q#iSXVW      h   K   ] 6   C       g  filenamef  ice-9/occam-channel.scm		.	& 		
   C  4P5>  "  G  "  "b"  "Z"  "R47Y5  $  "  Yi $  !41Y4\_4Y5>  "  G  "   4bYi4\efPii jmntux"        h(   x   ]4L  >  "  G  45  6     p       g  ch
		# g  initargs		#  g  filenamef  ice-9/occam-channel.scm
	0
	#	2	 		#	   C     h   h   ] O C      `       g  real-next-method
		
  g  filenamef  ice-9/occam-channel.scm
	0
 		
   Cy5>  "  G  475  $  "  i $  !414\_45>  "  G  "   4bi4\efjn{uyZP h   Q   ] 6I       g  filenamef  ice-9/occam-channel.scm
	4
		5	 		
   C5>  "  G  47$5  $  "  $i $  !41$4\_4$5>  "  G  "   4b$i4\efPi j|nuyN+    h   r   ]4 5C  j       g  ch
		  g  filenamef  ice-9/occam-channel.scm
	7
		8			8			8	 		   C5>  "  G  475  $  "  i $  !414\_45>  "  G  "   4bi4\efPi j|nuyN-   h   j   ]4 5C   b       g  ch
		  g  filenamef  ice-9/occam-channel.scm
	:
		;			;	 		   C5>  "  G  47%5  $  "  %i $  !41%4\_4%5>  "  G  "   4b%i4\efPi j|nuyONx+     h@      ]	44 5>  "  G  4 5445 >  "  G  C         g  ch
		> g  res	 	>  g  filenamef  ice-9/occam-channel.scm
	=
		>			>			>			?		 	?		#	@	 		>   C5>  "  G  47&5  $  "  &i $  !41&4\_4&5>  "  G  "   4b&i4\efPi j|nuyNx+ h(      ]	4 5445 >  "  G  C z       g  ch
		' g  res			'  g  filenamef  ice-9/occam-channel.scm
	C
		D				D			E	 		'   C5>  "  G  475  $  "  i $  !414\_45>  "  G  "   4bi4\efPi j|nuy#$%xN-O&       h   O  ]	44 5>  "  G  4 5$  ,44 5>  "  G  4  5"  T4	 5$  4
 5"  >445 >  "  G  44 54 5>  "  G  4 544 5>  "  G  CG      g  ch
	  g  res    g  filenamef  ice-9/occam-channel.scm
	H
		I			I			I			J		$	J		%	K		(	K	"	3	K		<	L		@	L		B	L	+	D	M		I	N		L	L		Q	O		[	J		\	P		g	R	 	S	 	S	- 	S	5 	S	 	T	 	J	 	U	 	U	 	U	 	    C5>  "  G  47 5  $  "   i $  !41 4\_4 5>  "  G  "   4b i4\efPi j|nuy         h   b   ] 6       Z       g  ch
			  g  filenamef  ice-9/occam-channel.scm
	X
			Y	 			   C5>  "  G  47 5  $  "   i $  !41 4\_4 5>  "  G  "   4b i4\efPigi jnuy#"xNO$      h     ]444 55>  "  G  4 5$  9445 >  "  G  444 55>  "  G  "  ~4	 5$  <4
44 55>  "  G  4  >  "  G  "  7445 >  "  G  44 54 5>  "  G  
44 556      g  ch
	  g  x	   g  filenamef  ice-9/occam-channel.scm
	[
		\			\				\			\			\			]			)	]		*	^			C	_			F	_	$	I	_	(	Q	_	$	V	_			c	`			m	]		n	a			q	a		t	a		|	a	 	a		 	b		 	b	 	b	  	b	# 	c	 	b		 	e		 	f		 	f	" 	f	* 	f		 	g	 	g	 	g	 	g	 %	 	   C5>  "  G  475  $  "  4:iJ5 $  1414M475$  i"  5>  "  G  "   475$  4:i=5$  4>iA4Di55$  <4Gi43i2i Qi  45>  "  G  "  64143i2i Qi  45>  "  G  "  64143i2i Qi  45>  "  G  "  64143i2i Qi  45>  "  G  475  $  "  i $  !414\_45>  "  G  "   4bi4\efi jnuyZ        h   d   ] 6    \       g  port
		  g  filenamef  ice-9/occam-channel.scm
	n
		o	 		   C5>  "  G  475  $  "  i $  !414\_45>  "  G  "   4bi4\efi j|nuy h   j   ]4 56   b       g  ch
		  g  filenamef  ice-9/occam-channel.scm
	q
		r			r	 		   C5>  "  G  47 5  $  "   i $  !41 4\_4 5>  "  G  "   4b i4\efi j|nuy   h   j   ]4 56   b       g  ch
		  g  filenamef  ice-9/occam-channel.scm
	t
		u				u	 		   C5>  "  G  "  +4143i2i   45>  "  xG  "  q475$  b4:i=5$  K4>iA4Di55$  -4Gi43i2i   45>  "  G  "  "t"  "l"  "d4Zii5R4Ti5 R4Wi5 R       h   `   ] C   X       g  filenamef  ice-9/occam-channel.scm
	~
 		
  g  nameg  
make-timer C!R   h      ]     B@  C           g  t
		  g  filenamef  ice-9/occam-channel.scm
 
	 		 		 		 	 		  g  nameg  timeofday->us CR   h       ]      B@      B@C           g  n
		  g  filenamef  ice-9/occam-channel.scm
 
	 		 		 	 		  g  nameg  us->timeofday CR475  $  "  i $  !414\_45>  "  G  "   4bi4\efi j|nuy  h   m   ]45 6     e       g  ch
		  g  filenamef  ice-9/occam-channel.scm
 
	 		 	 		   C5>  "  G  475  $  "  i $  !414\_45>  "  G  "   4bi4\efii jnuy    h8      ]4>  "  G  445>  "  G  6          g  ch
		5 g  t		5  g  filenamef  ice-9/occam-channel.scm
 
	 		 		 	0	' 		5 	 		5	   C5>  "  G  4   h   O   ]  C G       g  dummy
		 g  ch		 g  form			  			   C    h   `   ]  C X       g  dummy
		 g  exp		 g  ch			 g  form			  			   C%      h   P   ]C   H       g  dummy
		 g  exp		 g  form			  			   C() 
      hP   $  ]4 5$  @4 5$  @4 5$  @	 6      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  ice-9/occam-channel.scm
 	 		P  g  
macro-typeg  syntax-rulesg  patternsg  ?g  ch g  formg  ...  g  expg  ?g  ch g  formg  ...  g  expg  formg  ...    C5R45=>        h   O   ]  C G       g  dummy
		 g  ch		 g  form			  			   C@IJ    h   `   ]  C X       g  dummy
		 g  exp		 g  ch			 g  form			  			   CQ      h   P   ]C   H       g  dummy
		 g  exp		 g  form			  			   C() 
      hP   $  ]4 5$  @4 5$  @4 5$  @	 6      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  ice-9/occam-channel.scm
 	 		P  g  
macro-typeg  syntax-rulesg  patternsg  ?g  ch g  formg  ...  g  expg  ?g  ch g  formg  ...  g  expg  formg  ...    C5R4Rh   ?   ]C   7       g  dummy
		 g  data		  			   C`o       h      ]  C  z       g  dummy
		 g  data		 g  lambda			 g  x			 g  e1			 g  e2			  			   Cq|    h   _   ]C  W       g  dummy
		 g  data		 g  e1			 g  e2			  			   C() 
       hP     ]4 5$  @4 5$  @4 5$  @	 6      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  ice-9/occam-channel.scm
 	 		P  g  
macro-typeg  syntax-rulesg  patternsg  data g  datag  =>g  lambdag  x g  e1g  e2g  ...  g  datag  e1g  e2g  ...   C5R4    h    M   ]   C      E       g  dummy
		 g  ch		 g  e1			  			   C        h(   ^   ]    C       V       g  dummy
		! g  exp		! g  ch			! g  e1			!  		!	   C     h   N   ]CF       g  dummy
		 g  exp		 g  e1			  			   C() 
hP     ]4 5$  @4 5$  @4 5$  @	 6      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  ice-9/occam-channel.scm
 	 		P  g  
macro-typeg  syntax-rulesg  patternsg  ?g  ch g  e1g  ...  g  expg  ?g  ch g  e1g  ...  g  expg  e1g  ...    C5R4   h    M   ]   C      E       g  dummy
		 g  ch		 g  e1			  			   C        h(   ^   ]    C       V       g  dummy
		! g  exp		! g  ch			! g  e1			!  		!	   C        h   N   ]C   F       g  dummy
		 g  exp		 g  e1			  			   C() 
hP     ]4 5$  @4 5$  @4 5$  @	 6      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  ice-9/occam-channel.scm
 	 		P  g  
macro-typeg  syntax-rulesg  patternsg  ?g  ch g  e1g  ...  g  expg  ?g  ch g  e1g  ...  g  expg  e1g  ...    C5R4      h   ]   ]C   U       g  dummy
		 g  ch		 g  e1			 g  c2			  			   C      h   n   ]C   f       g  dummy
		 g  exp		 g  ch			 g  e1			 g  c2			  			   Cp        h   M   ]CE       g  dummy
		 g  c1		 g  c2			  			   C() 
 hP   4  ]4 5$  @4 5$  @4 5$  @	 6,      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  ice-9/occam-channel.scm
 	 		P  g  
macro-typeg  syntax-rulesg  patternsg  ?g  ch g  e1g  ... g  c2g  ... g  expg  ?g  ch g  e1g  ... g  c2g  ... g  c1g  c2g  ...   C5R4        h   d   ]  C       \       g  dummy
		 g  ch		 g  e1			 g  	handshake			  			   C    h   u   ]   Cm       g  dummy
		 g  exp		 g  ch			 g  e1			 g  	handshake			  			   C h   e   ]C   ]       g  dummy
		 g  exp		 g  e1			 g  	handshake			  			   C() 
 hP   E  ]4 5$  @4 5$  @4 5$  @	 6=      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  ice-9/occam-channel.scm
 	 		P  g  
macro-typeg  syntax-rulesg  patternsg  ?g  ch g  e1g  ... g  	handshake g  expg  ?g  ch g  e1g  ... g  	handshake g  expg  e1g  ... g  	handshake   C5R4)12       h   M   ]  C       E       g  dummy
		 g  ch		 g  e1			  			   C4=>?   h   ^   ]   CV       g  dummy
		 g  exp		 g  ch			 g  e1			  			   CF        h   N   ]C   F       g  dummy
		 g  exp		 g  e1			  			   C() 
hP     ]4 5$  @4 5$  @4 5$  @	 6      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  ice-9/occam-channel.scm
 	 		P  g  
macro-typeg  syntax-rulesg  patternsg  ?g  ch g  e1g  ...  g  expg  ?g  ch g  e1g  ...  g  expg  e1g  ...    C5R4H     h      ] C           		
   CZ  h   :   ]C    2       g  e1
		 g  e2		  			   C[c    h   m   ]L 6     e       g  c1
		 g  c2		  g  filenamef  ice-9/occam-channel.scm	 	 			   C() 
 hX      ]4 5$  @4 5$  @4 5$  L O @	 6          g  x
		U g  tmp		U g  tmp		"	U g  tmp		9	U  g  filenamef  ice-9/occam-channel.scm
 	 		U  g  nameg  else-clause? C[ijmpj h   @   ]  C      8       g  tmp-17d5859fdf6989b4-1e3
		
  		
   Cqrstt     h   @   ]  C      8       g  tmp-17d5859fdf6989b4-1e1
		
  		
   Cuvwxyxy       h   @   ] C     8       g  tmp-17d5859fdf6989b4-1e0
		  		   C   h   @   ]  C      8       g  tmp-17d5859fdf6989b4-1df
		
  		
   C      h   @   ]  C      8       g  tmp-17d5859fdf6989b4-1de
		
  		
   C      h   @   ]  C      8       g  tmp-17d5859fdf6989b4-1e2
		
  		
   C  h   =   ]  445	  44
5    445  445  45 55  5    4455 5C 5       g  c1
	  g  c2	   	 	   C()   h   m   ]LL 6e       g  c1
		 g  c2		  g  filenamef  ice-9/occam-channel.scm	 	 			   Cmp       h   @   ]  C      8       g  tmp-17d5859fdf6989b4-1d7
		
  		
   C     h   @   ]  C      8       g  tmp-17d5859fdf6989b4-1d5
		
  		
   C      h   @   ]  C      8       g  tmp-17d5859fdf6989b4-1d6
		
  		
   C  hX   :   ]  445	  4
5    4455 5C 2       g  c1
		W g  c2		W  		W	   C 	  hh      ]O Q 4 5"   4 5$  @ 6$  4 O ?$  @""           g  x
		d g  else-clause?	
	d g  tmp			d g  tmp		'	>  g  filenamef  ice-9/occam-channel.scm
 	 		d   C5RC         g  m
		, g  t
   g  t
/K g  t
 g  t
 g  t
 g  t
 g  t
x g  t
 g  t
		 g  t


 g  t
. g  t
 g  t
 g  t
 g  t
bw g  t
cx g  t
av g  t
"7 g  t
$9  g  filenamef  ice-9/occam-channel.scm		
	.	%		1	%
	3	&		6	&
	;	(
 	*
	0
	4
q	7
z	:
	z	=

	C
	H
	X
	[
	k
[	n
\	q
Z	t
^	w
	y		y
	{		{
	|		|
	~
[ 
 
 
 
 !	?
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                ccache/ice-9/weak-vector.go                                                                         0000644                 00000001541 15154557173 0011454 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0I      ]  4 hx      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  weak-vector	 		g  filenameS	
f  ice-9/weak-vector.scm	g  exportsS	g  make-weak-vector	g  list->weak-vector	g  weak-vector?	g  weak-vector-length	g  weak-vector-ref	g  weak-vector-set!	g  make-weak-key-alist-vector	g  make-weak-value-alist-vector	g  make-doubly-weak-alist-vector	g  weak-key-alist-vector?	g  weak-value-alist-vector?	g  doubly-weak-alist-vector?	 	g  set-current-module	 	 	g  %init-weaks-builtinsC 5   h0   _   ]4	
5 4 >  "  G   i6   W       g  m
		(  g  filenamef  ice-9/weak-vector.scm		
	.	
 		.
   C6                                                                                                                                                                ccache/ice-9/poll.go                                                                                0000644                 00000101713 15154557173 0010175 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] 4  h{A      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  poll	 		g  filenameS	
f  ice-9/poll.scm	g  importsS	g  srfi	g  srfi-9	 	 	g  gnu	 	 	g  rnrs	g  bytevectors	 	 	 	g  exportsS	g  make-empty-poll-set	g  	poll-set?	g  poll-set-nfds	g  poll-set-find-port	g  poll-set-port	g  poll-set-events	g  set-poll-set-events!	 g  poll-set-revents	!g  set-poll-set-revents!	"g  poll-set-add!	#g  poll-set-remove!	$ !"# 	%g  set-current-module	&% 	'% 	(g  load-extension	)g  string-append	*f  	libguile-	+g  effective-version	,f  scm_init_poll	-g  %sizeof-struct-pollfd	.g  error	/f  Unexpected struct pollfd size	0g  defined?	1g  POLLIN	2g  call-with-deferred-observers	32 	42 	5g  module-export!	65 	75 	8g  current-module	98 	:8 	;1 	<g  POLLPRI	=< 	>g  POLLOUT	?> 	@g  	POLLRDHUP	A@ 	Bg  POLLERR	CB 	Dg  POLLHUP	ED 	Fg  POLLNVAL	GF 	Hg  
<poll-set>	Ig  %make-poll-set-procedure	Jg  make-syntax-transformer	KJ 	LJ 	Mg  make-poll-set	Ng  macro	Og  $sc-dispatch	PO 	QO 	Rg  _	Sg  any	TRSSS 	Ug  syntax-object	Vg  lambda	Wg  m-c625576-d	Xg  top	YWX 	Zg  ribcage	[g  t-c625576-a	\g  t-c625576-b	]g  t-c625576-c	^[\] 	_YYY 	`f  l-c625576-12	af  l-c625576-13	bf  l-c625576-14	c`ab 	dZ^_c 	eZ 	fg  x	gf 	hY 	if  l-c625576-f	ji 	kZghj 	lg  shift	mg  	proc-name	ng  args	omn 	pX 	qpp 	rf  l-1e8ba8b5a-60	sf  l-1e8ba8b5a-61	trs 	uZoqt 	vg  key	wg  value	xg  name	yg  formals	zg  body	{vwxyz 	|ppppp 	}f  l-1e8ba8b5a-53	~f  l-1e8ba8b5a-54	f  l-1e8ba8b5a-55 f  l-1e8ba8b5a-56 f  l-1e8ba8b5a-57 }~  Z{|  g  make-procedure-name   p  f  l-1e8ba8b5a-43   Z  p  f  l-1e8ba8b5a-42   Zg  Ydekleeeeu  g  hygiene   UV  g  pollfds pdek    U  g  nfds U  g  ports U    g  make-struct g  m-c625576-8 X  g  t-1e8ba8b5a-133 g  t-1e8ba8b5a-132 g  t-1e8ba8b5a-131   g  m-1e8ba8b5a-134 X    f  l-1e8ba8b5a-138 f  l-1e8ba8b5a-139 f  l-1e8ba8b5a-13a   Z  g  	ctor-args   f  l-1e8ba8b5a-120   Z  g  ctor g  field   f  l-1e8ba8b5a-11c f  l-1e8ba8b5a-11d   Zq  g  form g  	type-name g  constructor-spec g  field-names   pppp  f  l-1e8ba8b5a-111 f  l-1e8ba8b5a-112 f  l-1e8ba8b5a-113 f  l-1e8ba8b5a-114   Z  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers   pppppppp  f  l-1e8ba8b5a-e9 f  l-1e8ba8b5a-e7 f  l-1e8ba8b5a-e5 f  l-1e8ba8b5a-e3 f  l-1e8ba8b5a-e1 f  l-1e8ba8b5a-df f  l-1e8ba8b5a-dd f  l-1e8ba8b5a-db   Z  f  l-1e8ba8b5a-da   Zg  dekleeeee  U  UH  U
      g  each-any Rߌ g  syntax-violation     f  Wrong number of arguments g  identifier?     pek  UI      f  -source expression failed to match any pattern g  record-type-vtable     g  pwpwpw g  default-record-printer       g  set-struct-vtable-name!     g  vtable-offset-user     g  %poll-set?-procedure RS  g  m-c625576-1e X  g  t-c625576-1d   f  l-c625576-23 Z  f  l-c625576-20 Zg eleeeeu 	UV 
g  objg  t-1e8ba8b5a-224g  t-1e8ba8b5a-21eg  t-1e8ba8b5a-21fg  t-1e8ba8b5a-220g  t-1e8ba8b5a-223g  t-1e8ba8b5a-222g  t-1e8ba8b5a-221 g  m-1e8ba8b5a-225X  f  l-1e8ba8b5a-229f  l-1e8ba8b5a-22af  l-1e8ba8b5a-22bf  l-1e8ba8b5a-22cf  l-1e8ba8b5a-22df  l-1e8ba8b5a-22ef  l-1e8ba8b5a-22f Z g  	copier-id  !f  l-1e8ba8b5a-21c"! #Z " $g  	ctor-name%$ &f  l-1e8ba8b5a-214'& (Z%' ) *f  l-1e8ba8b5a-212+* ,Z)+ -g  layout.- /f  l-1e8ba8b5a-2100/ 1Z.0 2g  
immutable?32 4f  l-1e8ba8b5a-20e54 6Z35 7g  field-count87 9f  l-1e8ba8b5a-20c:9 ;Z8: <g  
getter-ids=< >f  l-1e8ba8b5a-209?> @Z=? Ag  	field-idsBA Cf  l-1e8ba8b5a-206DC EZBD Fg  predicate-nameGg  
field-specH2FG Ipppppp Jf  l-1e8ba8b5a-1f9Kf  l-1e8ba8b5a-1faLf  l-1e8ba8b5a-1fbMf  l-1e8ba8b5a-1fcNf  l-1e8ba8b5a-1fdOf  l-1e8ba8b5a-1fePJKLMNO QZHIP Releeeee#e(e,e1e6e;e@eEQ SU
R TS Ug  andVUUR Wg  struct?XUWR YXS Zg  eq?[UZR \g  struct-vtable]U\R ^]S _pe `UH_ a[^` bVYa c	Tb dpe eUd fg  throw-bad-structgf hf ig  pset-pollfdsjg  %pset-pollfds-procedurekg  free-idlg  
%%on-errormg  m-c625576-2anmX on pf  l-c625576-2cqp rZgoq snerleeeeu tUls ukt vuS wg  %%typexg  t-1e8ba8b5a-14byg  t-1e8ba8b5a-14czg  t-1e8ba8b5a-14d{g  t-1e8ba8b5a-14e|g  t-1e8ba8b5a-14f}g  t-1e8ba8b5a-150~g  t-1e8ba8b5a-151xyz{|}~ g  m-1e8ba8b5a-152X  f  l-1e8ba8b5a-156f  l-1e8ba8b5a-157f  l-1e8ba8b5a-158f  l-1e8ba8b5a-159f  l-1e8ba8b5a-15af  l-1e8ba8b5a-15bf  l-1e8ba8b5a-15c Z g  getterg  index f  l-1e8ba8b5a-149f  l-1e8ba8b5a-14a Zq < ppp f  l-1e8ba8b5a-144f  l-1e8ba8b5a-145f  l-1e8ba8b5a-146 Z erleeeee Uw k RvS g  ckg  errg  s nn f  l-c625576-2ff  l-c625576-30 Z nerleeeeu U g  quoteU per UH   g  %%indexU k RvS f  l-c625576-34f  l-c625576-35 Z nerleeeeu U U er U
   g  %%copierU k RvS f  l-c625576-39f  l-c625576-3a Z nerleeeeu U U g  %%<poll-set>-set-fieldsper U   g  t-c625576-29 f  l-c625576-3e Zo nerleeeeu UV erleeeee U  g  ifU UZ U\  per UH  g  
struct-refU er U
  Uf U Ui     per Uj g  %poll-set-nfds-procedureg  m-c625576-45X  f  l-c625576-47 Zg eleeeeu Ul k S eleeeee Uw k RS  f  l-c625576-4af  l-c625576-4b  Z  eleeeeu U U pe UH   	U 
k	 R
S f  l-c625576-4ff  l-c625576-50 Z eleeeeu U U e U   U k RS f  l-c625576-54f  l-c625576-55 Z eleeeeu U  U !pe "U! # " $# %g  t-c625576-44&% 'f  l-c625576-59(' )Z&( *)eleeeeu +UV* ,)eleeeee -U, .- /U, 0UZ, 1U\, 21- 3p)e 4UH3 5024 6U, 7)e 8U7 96-8 :Uf, ;U, <U3 =;< >:-= ?/59> @+.? Ape BUA Cg  
pset-portsDg  %pset-ports-procedureEg  m-c625576-60FEX GF Hf  l-c625576-62IH JZgGI KFeJleeeeu LUlK MkL NMS OeJleeeee PUwO QkP RRNQS SFF Tf  l-c625576-65Uf  l-c625576-66VTU WZSV XFWeJleeeeu YUX ZUX [pWeJ \UH[ ]Z\ ^] _UO `k_ aRN`S bf  l-c625576-6acf  l-c625576-6bdbc eZSd fFeeJleeeeu gUf hUf ieeJ jU	i khj lk mUO nkm oRNnS pf  l-c625576-6fqf  l-c625576-70rpq sZSr tFseJleeeeu uUt vUt wpseJ xUw yvx zy {g  t-c625576-5f|{ }f  l-c625576-74~} Z|G~ FeJleeeeu UV eJleeeee U  U UZ U\  peJ UH  U eJ U	  Uf U UC     peJ UD g  eachSS  SSSg  %%set-fieldsg  dummyg  check?g  expr g  m-c625576-7bX  f  l-c625576-80f  l-c625576-81f  l-c625576-82f  l-c625576-83f  l-c625576-84 Z  f  l-c625576-7d Zg g  t-1e8ba8b5a-16ag  t-1e8ba8b5a-16cg  t-1e8ba8b5a-16b g  m-1e8ba8b5a-16dX  f  l-1e8ba8b5a-171f  l-1e8ba8b5a-172f  l-1e8ba8b5a-173 Z f  l-1e8ba8b5a-167f  l-1e8ba8b5a-168f  l-1e8ba8b5a-169 Z eleeee U pe UH Ui U UC  g  map  g  listg  set-pset-pollfds!g  %set-pset-pollfds!-procedureRSS g  m-c625576-8fX g  t-c625576-8dg  t-c625576-8e  f  l-c625576-94f  l-c625576-95 Z  f  l-c625576-91 Zg eleeeeu UV g  t-1e8ba8b5a-18cg  t-1e8ba8b5a-18d g  m-1e8ba8b5a-18eX  f  l-1e8ba8b5a-192f  l-1e8ba8b5a-193 Z g  setterx f  l-1e8ba8b5a-186f  l-1e8ba8b5a-187f  l-1e8ba8b5a-188 Z G f  l-1e8ba8b5a-17df  l-1e8ba8b5a-17e Zq g  field-specs f  l-1e8ba8b5a-179f  l-1e8ba8b5a-17a Zq eleee U  g  valU   U UZ U\  pe UH 	 
g  struct-set!U
 e U
  Uf U U   	  pe U g  set-pset-nfds!g  %set-pset-nfds!-procedureg  m-c625576-9fX g  t-c625576-9dg  t-c625576-9e   f  l-c625576-a4!f  l-c625576-a5" ! #Z" $ %f  l-c625576-a1&% 'Zg$& (#e'leeeeu )UV( *#e'leee +U* ,U * -+, .U* /UZ* 0U\* 10+ 2p#e' 3UH2 4/13 5U
* 6#e' 7U6 85+7, 9Uf* :U* ;U2 <:; =9+< >.48= ?)-> @pe' AU@ Bg  set-pset-ports!Cg  %set-pset-ports!-procedureDg  m-c625576-afEDX Fg  t-c625576-adGg  t-c625576-aeHFG IEE Jf  l-c625576-b4Kf  l-c625576-b5LJK MZHIL NE Of  l-c625576-b1PO QZgNP REMeQleeeeu SUVR TMeQleee UUT VU T WUV XUT YUZT ZU\T [ZU \pMeQ ]UH\ ^Y[] _U
T `MeQ aU	` b_UaV cUfT dUT eUB\ fde gcUf hX^bg iSWh jpeQ kUCj lg  pollfd-offsetmg  *ng  non pg  m-c625576-dcqpX rqp sf  l-c625576-e1tf  l-c625576-e2ust vZoru wq xf  l-c625576-deyx zZgwy {pvez |Um{ }U	{ ~} g  make-bytevectorg  make-vectorg  vector-lengthg  	pset-sizeg  bytevector-copy!g  vector-move-left!g  ensure-pset-size!f  poll set index out of boundsg  integer?g  
port->fdesg  port?g  release-port-handleg  primitive-pollC 5h(<  a  ]4	
$5 4' >  "  G   4(i4)i*4+i5 5,>  "  G  -i	$  "  4.i/-i>  "  G  40i15$  ~447:;       h   A   ] 45 6   9       g  filenamef  ice-9/poll.scm
	,	 		
   C>  "  G  "   40i<5$  {447:=    h   A   ] 45 6   9       g  filenamef  ice-9/poll.scm
	/	 		
   C>  "  G  "   40i>5$  {447:?    h   A   ] 45 6   9       g  filenamef  ice-9/poll.scm
	2	 		
   C>  "  G  "   40i@5$  {447:A    h   A   ] 45 6   9       g  filenamef  ice-9/poll.scm
	5	 		
   C>  "  G  "   40iB5$  {447:C    h   A   ] 45 6   9       g  filenamef  ice-9/poll.scm
	8	 		
   C>  "  G  "   40iD5$  {447:E    h   A   ] 45 6   9       g  filenamef  ice-9/poll.scm
	;	 		
   C>  "  G  "   40iF5$  {447:G    h   A   ] 45 6   9       g  filenamef  ice-9/poll.scm
	>	 		
   C>  "  G  "   H        h      ]  C         g  pollfds
		 g  nfds		 g  ports			  g  filenamef  ice-9/poll.scm
	A
 			  g  nameg  %make-poll-set-procedure CIR4LMNQT   h   e   ]  C  ]       g  t-c625576-a
		 g  t-c625576-b		 g  t-c625576-c			  			   CM       h   Q   ]L 6    I       g  a
		  g  filenamef  ice-9/poll.scm		A
 		   CR       h   A   ] L 69       g  filenamef  ice-9/poll.scm		A
 		
   C h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  z       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/poll.scm
	A
 		n   C5MRH  4 H>  "  G   	Ii  HRH   h   s   ] $   CC      k       g  obj
		  g  filenamef  ice-9/poll.scm
	A
 		  g  nameg  %poll-set?-procedure CR4LNQc       h   4   ]  C      ,       g  t-c625576-1d
		
  		
   C        h   Q   ]L 6    I       g  a
		  g  filenamef  ice-9/poll.scm		A
 		   CR       h   A   ] L 69       g  filenamef  ice-9/poll.scm		A
 		
   Ce        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  z       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/poll.scm
	A
 		n   C5RHhi     h   t   ] &   
C 6l       g  s
		  g  filenamef  ice-9/poll.scm
	A
 		  g  nameg  %pset-pollfds-procedure CjR4LiNQ        h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   4   ]  C      ,       g  t-c625576-29
		
  		
   Ci       h   Q   ]L 6    I       g  a
		  g  filenamef  ice-9/poll.scm		A
 		   CR       h   A   ] L 69       g  filenamef  ice-9/poll.scm		A
 		
   C        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/poll.scm
	A
 	    C5iRHh h   u   ] &   C 6m       g  s
		  g  filenamef  ice-9/poll.scm
	A
 		  g  nameg  %poll-set-nfds-procedure CR4LNQ        h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C$ h   :   ]C     2       g  err
		 g  s		  			   C@     h   4   ]  C      ,       g  t-c625576-44
		
  		
   C        h   Q   ]L 6    I       g  a
		  g  filenamef  ice-9/poll.scm		A
 		   CR       h   A   ] L 69       g  filenamef  ice-9/poll.scm		A
 		
   CB        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/poll.scm
	A
 	    C5RHhC h    r   ] &   	C 6       j       g  s
		  g  filenamef  ice-9/poll.scm
	A
 		  g  nameg  %pset-ports-procedure CDR4LCNQRY^  h   :   ]C     2       g  err
		 g  s		  			   Cagl h   :   ]C     2       g  err
		 g  s		  			   Couz h   :   ]C     2       g  err
		 g  s		  			   C     h   4   ]  C      ,       g  t-c625576-5f
		
  		
   CC       h   Q   ]L 6    I       g  a
		  g  filenamef  ice-9/poll.scm		A
 		   CR       h   A   ] L 69       g  filenamef  ice-9/poll.scm		A
 		
   C        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/poll.scm
	A
 	    C5CR4LNQ   h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/poll.scm
	A
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5RHh  h       ] &   
C 6             g  s
		 g  val		  g  filenamef  ice-9/poll.scm
	A
 			  g  nameg  %set-pset-pollfds!-procedure CR4LNQ     h   N   ]  C    F       g  t-c625576-8d
		 g  t-c625576-8e		  			   C     h   Q   ]L 6    I       g  a
		  g  filenamef  ice-9/poll.scm		A
 		   CR       h   A   ] L 69       g  filenamef  ice-9/poll.scm		A
 		
   C        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  z       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/poll.scm
	A
 		n   C5RHh    h       ] &   C 6             g  s
		 g  val		  g  filenamef  ice-9/poll.scm
	A
 			  g  nameg  %set-pset-nfds!-procedure CR4LNQ?        h   N   ]  C    F       g  t-c625576-9d
		 g  t-c625576-9e		  			   C     h   Q   ]L 6    I       g  a
		  g  filenamef  ice-9/poll.scm		A
 		   CR       h   A   ] L 69       g  filenamef  ice-9/poll.scm		A
 		
   CA        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  z       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/poll.scm
	A
 		n   C5RHhB    h       ] &   	C 6            g  s
		 g  val		  g  filenamef  ice-9/poll.scm
	A
 			  g  nameg  %set-pset-ports!-procedure CCR4LBNQi       h   N   ]  C    F       g  t-c625576-ad
		 g  t-c625576-ae		  			   CB     h   Q   ]L 6    I       g  a
		  g  filenamef  ice-9/poll.scm		A
 		   CR       h   A   ] L 69       g  filenamef  ice-9/poll.scm		A
 		
   Ck        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  z       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/poll.scm
	A
 		n   C5BR4LlNQ|~        h   <   ]C     4       g  dummy
		 g  n		  			   C     h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/poll.scm
	I
 		"  g  
macro-typeg  syntax-rulesg  patternsg  n   C5lRH        h8      -  . , 3  #  	 4 	
54 5
 C       g  pre-allocated
		8 g  pollfds	)	8 g  ports		)	8  g  filenamef  ice-9/poll.scm
	L
		M			M	"	!	M		"	O		)	M	 		8
  g  nameg  make-empty-poll-set CRHhC  h(   x   ] &  	 	"  	4 56       p       g  set
		!  g  filenamef  ice-9/poll.scm
	Q
		R		!	R	 		!  g  nameg  	pset-size CRHhiCB      h    ]:4 5$  "  $  	" &   
"  	4 5 &   "  	4 5 &  	 	"  	4 54	
5454	

	>  "  G  4


>  "  G   &   
"  4 >  "  G   &   	C 6"C        g  set
	 g  size	 g  prev			 g  new		 g  old-pollfds	  g  nfds	  g  	old-ports	  g  new-pollfds	  g  	new-ports	   	g  filenamef  ice-9/poll.scm
	T
		U				U			V			V			W			X		!	X	
	&	Y		,	Y		/	Z	!	I	[		c	\		|	]	! 	]	2 	]	! 	^	 	Z	 	_	 	`	" 	_	 	a	 	b	 	c		W	 		  g  nameg  ensure-pset-size! CRHhC     hh      ]
"  T &   "  	4 5$  1 &  	 	"  	4 5$  C"C
"              g  set
		a g  port		a g  i			Z  g  filenamef  ice-9/poll.scm
	e
		f			g		#	g		'	g		*	h	 	E	h		H	h		L	h		R	j		X	j		Z	f	 		a	  g  nameg  poll-set-find-port CRHhC.        hP      ] &   "  	4 5$   &  	 	"  	4 5C 6           g  set
		L g  idx		L  g  filenamef  ice-9/poll.scm
	m
		n			n		#	n		&	o		A	o		F	p		L	p	 			L	  g  nameg  poll-set-port CRHhi.     hX      ] &   "  	4 5$  $ &   
"  	4 5		C 6              g  set
		Q g  idx		Q  g  filenamef  ice-9/poll.scm
	r
		s			s		#	s		&	t	!	B	t	7	E	t	4	F	t		K	u		Q	u	 		Q	  g  nameg  poll-set-events CRHhi.   hX      ] &   "  	4 5$  ' &   
"  	4 5		C 6           g  set
		T g  idx		T g  events			T  g  filenamef  ice-9/poll.scm
	w
		x			x		#	x		&	y	"	B	y	8	E	y	5	H	y		N	{		T	{	 		T	  g  nameg  set-poll-set-events! CRHhi.  hX      ] &   "  	4 5$  $ &   
"  	4 5		C 6              g  set
		Q g  idx		Q  g  filenamef  ice-9/poll.scm
	}
		~			~		#	~		&		!	B		7	E		4	F			K 		Q 	 		Q	  g  nameg  poll-set-revents C RHhi.        hX      ] &   "  	4 5$  ' &   
"  	4 5		C 6           g  set
		T g  idx		T g  revents			T  g  filenamef  ice-9/poll.scm
 
	 		 		# 		& 	"	B 	8	E 	5	H 		N 		T 	 		T	  g  nameg  set-poll-set-revents! C!RHhiC      h    ]# &   "  	4 5	45$  "  4545$  4>  "  G  "   4 >  "  G   &   
"  	4 	5 &   
"  	4 	5	 &   
"  	4 	5	
 &  	 	"  	4 
5 &   C 6          g  set
	 g  
fd-or-port	 g  events		 g  idx		 g  off		# g  fd		= g  val	   g  filenamef  ice-9/poll.scm
 
	 		 		# 		# 		& 		0 		7 		= 		@ 		J 		K 		a 		h 		m 		x 	   	  	   	3  	  	   	3  	  	  	  	  	 		  g  nameg  poll-set-add! C"RHh.Ci    h  "  ]" &   "  	4 5$  "  4 >  "  G   &   "  	4 5	 &  	 	"  	4 54 &  	 	"  	4 5 &  	 	"  	4 5>  "  G   &  	 	"  	4 54 &   
"  	4 	5	 &   
"  	4 	5		>  "  G   &   
"  	4 	5	
 &   "  4 
>  "  G  C            g  set
	 g  idx	 g  nfds		z g  off		z g  port		z g  val	j  g  filenamef  ice-9/poll.scm
 
	 		 		# 		( 		, 		5 		@ 		\ 		_ 		z 		z 	  	  	  	(  	  	  	  	"  	  	  	 	8 	) 	1 	4 	=7 	.8 	= 	H 	 b 	Be 	3g 	j 	j 	 %		  g  nameg  poll-set-remove! C#RHhiC       hp      - . , 3 #  	 &   
"  	4 5 &   "  	4 5 &  	 	"  	4 56            g  poll-set
		k g  timeout		k  g  filenamef  ice-9/poll.scm
 
	 		5 		O 		k 	 		k  g  nameg  poll CRC Y      g  m
		, g  rtd
  g  filenamef  ice-9/poll.scm		
	-	%		2	%		8	%	!	9	%	-	A	%		C	&		H	%		W	(			[	(
	`	)		f	)		o	)		x	+		~	+	 	+	 	+
 	,		.			.		.		.
	/		1		1		1		1
	2		4		4		4		4
 	5		7		7		7		7
	8	#	:	)	:	+	:	/	:
0	;		=		=		=		=
	>		A
'	L
(	Q
+	T
-e	e
.	m
/	r
1+	w
2m	}
3 
6 
: 
<% 
 >	<'
   C6                                                      ccache/ice-9/rdelim.go                                                                              0000644                 00000017417 15154557173 0010512 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] h 4      h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  rdelim	 		g  filenameS	
f  ice-9/rdelim.scm	g  exportsS	g  	read-line	g  
read-line!	g  read-delimited	g  read-delimited!	g  read-string	g  read-string!	g  %read-delimited!	g  
%read-line	g  
write-line	 		g  set-current-module	 	 	g  %init-rdelim-builtins	g  current-input-port	f  
	g  eof-object?	g  trim	g  string-length	g  peek	 g  split	!g  concat	"g  string-set!	#g  error	$f  unexpected handle-delim value: 	%g  make-string	&g  string-concatenate-reverse	'g  	substring	(g  string-append	)g  string	*g  make-syntax-transformer	+* 	,* 	-g  	check-arg	.g  macro	/g  $sc-dispatch	0/ 	1/ 	2g  any	3g  each-any	423	524	625	7g  syntax-object	8g  unless	9g  top	:9 	;g  ribcage	<g  dummy	=g  exp	>g  message	?g  arg	@<=>? 	Ag  m-1eeb5757c-50	BA9 	CB::: 	Df  l-1eeb5757c-55	Ef  l-1eeb5757c-56	Ff  l-1eeb5757c-57	Gf  l-1eeb5757c-58	HDEFG 	I;@CH 	J; 	Kg  x	LK 	MB 	Nf  l-1eeb5757c-52	ON 	P;LMO 	Q:IJP 	Rg  hygiene	SR 	T78QS 	U7#QS 	Vg  syntax-violation	WV 	XV 	Yf  -source expression failed to match any pattern	Zg  integer?	[g  exact?	\g  index?	]g  string?	^f  not a string	_f  	bad index	`f  start beyond end	af  end beyond string length	bg  	read-char	cg  list->string	dg  reverse!	eg  reverse	fg  char?	gg  unread-charC 5h      ]4	
5 4 >  "  G   4i>   "  G    h`   $  - . , 3 #  4 5"  $  CC
$  45$  C""           g  string
		[ g  port		[ g  rv		"	[ g  
terminator		'	[ g  nchars		,	[  g  filenamef  ice-9/rdelim.scm
	&
		)			(	 	"	)		"	)		'	-		'	)		,	.		,	)		8	/		A	/		E	/		F	0		P	/	 		[  g  nameg  
read-line! CR !"#$       h   :  - . , 3 	#  45 #  #  
#  	454 5$  45"  $  *
$  &  CC&  CC$  "  $  C$  4	>  "  G  C$  C
6     2      g  delims
	  g  buf	  g  port		  g  handle-delim		  g  start		  g  end		  g  rv		P  g  
terminator		U  g  nchars		Z   	g  filenamef  ice-9/rdelim.scm
	5
		6	 	!	6	D	3	7	)	<	8		F	:	6	G	:	$	H	:		P	8		P	8		U	>		U	8		Z	?		Z	8		b	@		c	A		n	@		r	@		u	B		z	B		~	C	% 	C	 	D	 	F	% 	F	 	G	 	J	 	L	 	L	( 	L	 	M	 	J	 	N	 	O	 	O	 $	 		  g  nameg  read-delimited! CR%&'!() #$   h     - . , 3 #  45 #  "  454 5		
$  "  i44
	55$  4	5$  C
456$  "  $  C$  C64	5$  

$  &  CC"o"k4
	5
	"
	d"       g  delims
	 g  port	 g  handle-delim		 g  
substrings		' g  total-chars		' g  buf-size		' g  buf		. g  rv		A g  
terminator		F g  nchars			K g  	new-total	
	R g  joined		p   g  filenamef  ice-9/rdelim.scm
	R
		R	1	!	S	'	'	T		(	W		.	W		1	X		;	Z	8	<	Z	&	=	Z	!	A	X		A	W		F	\		F	W		K	]		K	W		R	^		R	W		Z	_		_	k		b	l		n	l		p	k		p	j		{	m	
	|	o	 	o	 	q	' 	q	 	m	
 	s	 	t	 	t	 	_	 	e	 	_	 	e	& 	e	 	f	 	f	 	g	 	b	 	b		d		b		T		T		T	 1		  g  nameg  read-delimited CR4,-.16TU        h   d   ] C      \       g  dummy
		 g  exp		 g  message			 g  arg			  			   CXY     h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/rdelim.scm
	w
 		"  g  
macro-typeg  syntax-rulesg  patternsg  expg  messageg  argg  ...   C5-RZ[        h(      ]4 5$  4 5$   
CCC              g  n
		!  g  filenamef  ice-9/rdelim.scm
	{
		|			|			|			|			|	 		!  g  nameg  index? C\R]#^\_`ab"    h8    - . , 3 #  45 #  
#  	4 54 5$  "  4 >  "  G  45$  "  4>  "  G  45$  "  4>  "  G  $  "  4>  "  G  4 5$  "  4	>  "  G  "  H$  94
545$  C4 >  "  G  "C"       g  buf
	7 g  port	7 g  start		7 g  end		7 g  n	 / g  c	 )  g  filenamef  ice-9/rdelim.scm
	~
				) 	&	2 		< 		E 		L 		U 		_ 		h 		o 		x 	  	  	  	  	  	  	  	  	  	  	  	*  	  	  	  	  	  	  	 	
	 	 	# 	) 	. 	/ 	 &	7	  g  nameg  read-string!g  documentationf NRead all of the characters out of PORT and write them to BUF.
Returns the number of characters read.

This function only reads out characters from PORT if it will be able to
write them to BUF.  That is to say, if BUF is smaller than the number of
available characters, then BUF will be filled, and characters will be
left in the port. CRbcde  h     *    N. +   E3  #  45  "  *4 545$  456""]""  D4 545$  "  $  456"
"      g  port
		T g  chars	#	M g  char		*	M g  port
	V  g  count	V  g  chars		Z  g  total		Z  g  char		a  g  t		j	  	g  filenamef  ice-9/rdelim.scm
 		 		# 		$ 		* 		- 		7 		: 		B 		G 		M 		M 		N 		T 		V 		Z 		[ 		a 		d 		j 		| 	#  	  	  	  	  	$  	  	  	  	 		T
 	V 	  g  nameg  read-stringg  documentationf  Read all of the characters out of PORT and return them as a string.
If the COUNT argument is present, treat it as a limit to the number of
characters to read.  By default, there is no limit. CR !]f()g#$        h     -  . , 3  #  45  #  4 5$  C$  C$  )45$  45$  4	56CC
$  &45$  4 >  "  G  "   C6       g  port
	  g  handle-delim	  g  
line/delim		*  g  line		/  g  delim		4   g  filenamef  ice-9/rdelim.scm
 
	 	%	! 	"	$ 		* 		/ 		/ 		4 		4 		? 		X 		b 		c 	(	m 		r 	(	z 	  	  	  	  	  	  	 	 
	  g  nameg  	read-line CRC             g  m
		(  g  filenamef  ice-9/rdelim.scm		
	)	$
	&
5	5
	|	R
	{
	~
 
 
 
	
   C6                                                                                                                                                                                                                                                  ccache/ice-9/hash-table.go                                                                          0000644                 00000007662 15154557173 0011247 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] c 4   h       ] g  guile	 	g  define-module*	 	 	g  ice-9	g  
hash-table	 		g  filenameS	
f  ice-9/hash-table.scm	g  exportsS	g  alist->hash-table	g  alist->hashq-table	g  alist->hashv-table	g  alist->hashx-table	 	g  set-current-module	 	 	g  make-syntax-transformer	 	 	g  define-alist-converter	g  macro	g  $sc-dispatch	 	 	g  any	 	g  syntax-object	g  define	 g  top	!  	"g  ribcage	#g  dummy	$g  name	%g  hash-set-proc	&#$% 	'g  m-3144cc814ae864-1	('  	)(!! 	*f  l-3144cc814ae864-6	+f  l-3144cc814ae864-7	,f  l-3144cc814ae864-8	-*+, 	."&)- 	/" 	0g  x	10 	2( 	3f  l-3144cc814ae864-3	43 	5"124 	6!./5 	7g  hygiene	87 	968 	:g  alist	;:68 	<; 	=f   Convert ALIST into a hash table.	>=68 	?g  let	@?68 	Ag  table	BA68 	Cg  make-hash-table	DC68 	ED 	FBE 	GF 	Hg  for-each	IH68 	Jg  lambda	KJ68 	Lg  pair	ML68 	NM 	Og  car	PO68 	QPM 	Rg  cdr	SR68 	TSM 	UBQT 	Vg  reverse	WV68 	XW; 	YX 	ZB 	[g  syntax-violation	\[ 	][ 	^f  -source expression failed to match any pattern	_g  	hash-set!	`g  
hashq-set!	ag  
hashv-set!	bg  
hashx-set!C 5   hx  x   ]4	
5 4 >  "  G   49<>@GIKNUYZ  h0   Z   ]	 
 C      R       g  dummy
		* g  name		* g  hash-set-proc			*  		*	   C]^       h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/hash-table.scm
	
 		"  g  
macro-typeg  syntax-rulesg  patternsg  nameg  hash-set-proc   C5RCH_        h   Y   ]L   6  Q       g  pair
		  g  filenamef  ice-9/hash-table.scm
	!
 		   CV  h0      ]	45 4O 4 5>  "  G  C             g  alist
		* g  table		*  g  filenamef  ice-9/hash-table.scm
	!
 		*  g  nameg  alist->hash-tableg  documentationf   Convert ALIST into a hash table. CRCH`  h   Y   ]L   6  Q       g  pair
		  g  filenamef  ice-9/hash-table.scm
	"
 		   CV  h0      ]	45 4O 4 5>  "  G  C             g  alist
		* g  table		*  g  filenamef  ice-9/hash-table.scm
	"
 		*  g  nameg  alist->hashq-tableg  documentationf   Convert ALIST into a hash table. CRCHa h   Y   ]L   6  Q       g  pair
		  g  filenamef  ice-9/hash-table.scm
	#
 		   CV  h0      ]	45 4O 4 5>  "  G  C             g  alist
		* g  table		*  g  filenamef  ice-9/hash-table.scm
	#
 		*  g  nameg  alist->hashv-tableg  documentationf   Convert ALIST into a hash table. CRCHb h   r   ]LLL   6      j       g  pair
		  g  filenamef  ice-9/hash-table.scm
	)			*	-		*	8		*	 		   CV h0   5  ]45 4 O 45>  "  G  C  -      g  hash
		. g  assoc		. g  alist			. g  table			.  g  filenamef  ice-9/hash-table.scm
	%
		(			(		
	)			+		#	)	 		.	  g  nameg  alist->hashx-tableg  documentationf  FConvert ALIST into a hash table with custom HASH and ASSOC
procedures. CRC      p       g  m
		(  g  filenamef  ice-9/hash-table.scm		
[	!
	"
\	#
p	%
 	r
   C6                                                                               ccache/ice-9/slib.go                                                                                0000644                 00000001522 15154557173 0010155 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0:      ]  4      h      ] g  assq-ref	g  %guile-build-info	g  datadir	g  string-append	f  /slib/guile.init	g  file-exists?	g  guile	 		g  load-in-vicinity	
	 		 	f  ice-9	f  
/usr/share	g  load-from-path	f  slib/guile.initC 5    h   P  ]4ii5 4i 54i5$  4>  "  G  "     $   C4i5 4i 5$  4 >  "  G  "     $   Ci6H      g  dir
		K g  init		H g  t
	K  g  init
	a  g  t
    g  filenamef  ice-9/slib.scm
	
						,												1										+			,			K			W			]			_		1	a			a			d			p			q		 		 	 	 	 	 	 
   C6                                                                                                                                                                               ccache/ice-9/mapping.go                                                                             0000644                 00000017603 15154557173 0010666 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0k      ] V 4        h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  mapping	 		g  filenameS	
f  ice-9/mapping.scm	g  importsS	g  poe	 	 	 	g  exportsS	g  mapping-hooks-type	g  make-mapping-hooks	g  mapping-hooks?	g  mapping-hooks-get-handle	g  mapping-hooks-create-handle	g  mapping-hooks-remove	g  mapping-type	g  make-mapping	g  mapping?	g  mapping-hooks	g  mapping-data	g  set-mapping-hooks!	g  set-mapping-data!	g  mapping-get-handle	g  mapping-create-handle!	 g  mapping-remove!	!g  mapping-ref	"g  mapping-set!	#g  hash-table-mapping-hooks	$g  make-hash-table-mapping	%g  hash-table-mapping	& !"#$% 	'g  set-current-module	(' 	)' 	*g  issue-deprecation-warning	+f  H(ice-9 mapping) is deprecated.  Use srfi-69 or rnrs hash tables instead.	,g  make-record-type	-g  
get-handle	.g  create-handle	/g  remove	0-./ 	1g  perfect-funcq	2g  record-constructor	3g  record-predicate	4g  record-accessor	5g  hooks	6g  data	756 	8g  record-modifier	9g  hashq	:g  assq	;g  hashq-get-handle	<g  hashq-create-handle!	=g  hashq-remove!	>g  hashv	?g  assv	@g  hashv-get-handle	Ag  hashv-create-handle!	Bg  hashv-remove!	Cg  hash	Dg  assoc	Eg  hash-get-handle	Fg  hash-create-handle!	Gg  hash-remove!	Hg  hashx-get-handle	Ig  hashx-create-handle!	Jg  hashx-remove!	Kg  	hash-procS	LK	Mg  
assoc-procS	NM		Og  table-constructorS	PO		QLNP 	Rg  assq-ref	Sg  error	Tf  6Hash-procedure specified with no known assoc function.	Ug  make-vectorC 5       h  I  ]4	
&5 4) >  "  G   4*i+>  "  G  4,i05R41i	42ii55R43ii5R44ii-5R44ii.5R44ii/5R4,i75R42ii5R43ii5R44ii55R44ii65R48ii55R48ii65R   h      ]44 55 6           g  map
		 g  key		  g  filenamef  ice-9/mapping.scm
	5
		6			6			6			6	 			  g  nameg  mapping-get-handle CR        h      ]44 55 6         g  map
		 g  key		 g  init			  g  filenamef  ice-9/mapping.scm
	7
		8			8	 		8			8	 			  g  nameg  mapping-create-handle! CR  h      ]44 55 6           g  map
		 g  key		  g  filenamef  ice-9/mapping.scm
	9
		:			:			:			:	 			  g  nameg  mapping-remove! C R     h0      - . , 3 #  4 5$  CC          g  map
		- g  key		- g  dflt			- g  t			-  g  filenamef  ice-9/mapping.scm
	<
		>			=	 		-	  g  nameg  mapping-ref C!R       h      ]4 5C              g  map
		 g  key		 g  val			  g  filenamef  ice-9/mapping.scm
	A
		B			B	 			  g  nameg  mapping-set! C"R41i	9:;       h   y   - 1 3 L 4 5@  q       g  1st
			 g  rest			  g  filenamef  ice-9/mapping.scm
	G			G	>		G	2 			
   C<       h   y   - 1 3 L 4 5@  q       g  1st
			 g  rest			  g  filenamef  ice-9/mapping.scm
	G			G	>		G	2 			
   C=       h   y   - 1 3 L 4 5@  q       g  1st
			 g  rest			  g  filenamef  ice-9/mapping.scm
	G			G	>		G	2 			
   C>?@   h   y   - 1 3 L 4 5@  q       g  1st
			 g  rest			  g  filenamef  ice-9/mapping.scm
	G			G	>		G	2 			
   CA       h   y   - 1 3 L 4 5@  q       g  1st
			 g  rest			  g  filenamef  ice-9/mapping.scm
	G			G	>		G	2 			
   CB       h   y   - 1 3 L 4 5@  q       g  1st
			 g  rest			  g  filenamef  ice-9/mapping.scm
	G			G	>		G	2 			
   CCDE   h   y   - 1 3 L 4 5@  q       g  1st
			 g  rest			  g  filenamef  ice-9/mapping.scm
	G			G	>		G	2 			
   CF       h   y   - 1 3 L 4 5@  q       g  1st
			 g  rest			  g  filenamef  ice-9/mapping.scm
	G			G	>		G	2 			
   CG       h   y   - 1 3 L 4 5@  q       g  1st
			 g  rest			  g  filenamef  ice-9/mapping.scm
	G			G	>		G	2 			
   CH        h   q   ]LL  6  i       g  table
		 g  key		  g  filenamef  ice-9/mapping.scm
	[	.		\	0 			   C  h    y   - 1 3 L LO 4 5@   q       g  1st
			 g  rest			  g  filenamef  ice-9/mapping.scm
	G			G	>		G	2 			
   CI        h      ]LL  6{       g  table
		 g  key		 g  init			  g  filenamef  ice-9/mapping.scm
	^	.		_	0 			   C        h    y   - 1 3 L LO 4 5@   q       g  1st
			 g  rest			  g  filenamef  ice-9/mapping.scm
	G			G	>		G	2 			
   CJ        h   q   ]LL  6  i       g  table
		 g  key		  g  filenamef  ice-9/mapping.scm
	a	.		b	0 			   C  h    y   - 1 3 L LO 4 5@   q       g  1st
			 g  rest			  g  filenamef  ice-9/mapping.scm
	G			G	>		G	2 			
   C    h     ]   $  .O O 	O 6
 $  .O O O 6 $  .O O O 6 O  O  O 6        g  	hash-proc
	  g  
assoc-proc	  g  procs			  g  proc			) g  proc		+	7 g  proc		9	E g  proc		Y	e g  proc		g	s g  proc		u  g  proc	   g  proc	   g  proc	    g  filenamef  ice-9/mapping.scm
	J				K	"			K			M	'		M			L			N	-	+	O	-	9	P	-	G	N		P	Q	'	Q	Q		U	L		Y	R	-	g	S	-	u	T	- 	R	 	U	' 	U	 	L	 	V	- 	W	- 	X	- 	V	 	Z	 	 	   C5#R#      h      ]45 6              g  table
		 g  	hash-proc		 g  
assoc-proc			  g  filenamef  ice-9/mapping.scm
	d
		e			e	 			  g  nameg  make-hash-table-mapping C$RQCR9:>?DS%TU      h   f   ] 6       ^       g  len
			  g  filenamef  ice-9/mapping.scm
	r			r	=			r	, 			   C$     h   b  -  /    0   3  #  	G #  #  74 5$  "  4	
5#  4 56   Z      g  size
		} g  	hash-proc		} g  
assoc-proc			} g  table-constructor			} g  t		F	b  g  filenamef  ice-9/mapping.scm
	g
	.	j	"	5	j	,	F	j	"	F	j		U	n	"	Y	n	)	[	o	)	_	n	"	q	s		}	s	 		}
g  	hash-procSg  
assoc-procS	g  table-constructorS	   g  nameg  hash-table-mapping C%RC A      g  m
		,  g  filenamef  ice-9/mapping.scm		
	-	
	3	 	8	
	A	"		G	"	-	I	"	<	K	"		N	"
	O	'		V	'	-	b	'		e	'
	f	(		s	(
	t	)	!	~	)	E 	)	! 	)
 	*	$ 	*	H 	*	$ 	*
 	+	 	+	A 	+	 	+
 	-	 	-	' 	-	0 	-	 	-
 	.	 	.
 	/	 	/
 	0	 	0	4 	0	 	0
 	1	 	1	3 	1	 	1
 	2	 	2	9 	2	 	2
 	3		3	8
	3		3
	5
	7
	9
	<
c	A
d	I	"	F
	d
	g
 >	
   C6                                                                                                                              ccache/ice-9/rw.go                                                                                  0000644                 00000001010 15154557173 0007644 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4   h-      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  rw	 		g  filenameS	
f  ice-9/rw.scm	g  exportsS	g  read-string!/partial	g  write-string/partial	 	g  set-current-module	 	 	g  %init-rw-builtinsC 5      h0   V   ]4	
5 4 >  "  G   i6   N       g  m
		(  g  filenamef  ice-9/rw.scm		
	.	
 		.
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                         ccache/ice-9/posix.go                                                                               0000644                 00000016366 15154557173 0010402 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] 1 4     ha      ] g  stat:dev	g  stat:ino	g  	stat:mode	g  
stat:nlink	g  stat:uid	g  stat:gid	g  	stat:rdev	g  	stat:size		g  
stat:atime	
g  
stat:mtime	g  
stat:ctime	g  stat:blksize	g  stat:blocks	g  stat:atimensec	g  stat:mtimensec	g  stat:ctimensec	g  	stat:type	g  
stat:perms	g  passwd:name	g  passwd:passwd	g  
passwd:uid	g  
passwd:gid	g  passwd:gecos	g  
passwd:dir	g  passwd:shell	g  
group:name	g  group:passwd	g  	group:gid	g  	group:mem	g  utsname:sysname	g  utsname:nodename	 g  utsname:release	!g  utsname:version	"g  utsname:machine	#g  getpw	$g  getpwent	%g  setpw	&g  setpwent	'g  endpwent	(g  getpwnam	)g  getpwuid	*g  getgr	+g  getgrent	,g  setgr	-g  setgrent	.g  endgrent	/g  getgrnam	0g  getgrgidC 5  h    ]     h   n   ] 
C f       g  f
		  g  filenamef  ice-9/posix.scm
	
			 		  g  nameg  stat:dev CR     h   n   ] C f       g  f
		  g  filenamef  ice-9/posix.scm
	
			 		  g  nameg  stat:ino CR     h   o   ] 	Cg       g  f
		  g  filenamef  ice-9/posix.scm
	
			 		  g  nameg  	stat:mode CR    h   p   ] 	Ch       g  f
		  g  filenamef  ice-9/posix.scm
	
			 		  g  nameg  
stat:nlink CR   h   n   ] 	Cf       g  f
		  g  filenamef  ice-9/posix.scm
	
			 		  g  nameg  stat:uid CR     h   n   ] 	Cf       g  f
		  g  filenamef  ice-9/posix.scm
	
			 		  g  nameg  stat:gid CR     h   o   ] 	Cg       g  f
		  g  filenamef  ice-9/posix.scm
	
			 		  g  nameg  	stat:rdev CR    h   o   ] 	Cg       g  f
		  g  filenamef  ice-9/posix.scm
	
			 		  g  nameg  	stat:size CR    h   p   ] 	Ch       g  f
		  g  filenamef  ice-9/posix.scm
	
			 		  g  nameg  
stat:atime C	R   h   p   ] 		Ch       g  f
		  g  filenamef  ice-9/posix.scm
	
			 		  g  nameg  
stat:mtime C
R   h   p   ] 	
Ch       g  f
		  g  filenamef  ice-9/posix.scm
	 
		 	 		  g  nameg  
stat:ctime CR   h   r   ] 	Cj       g  f
		  g  filenamef  ice-9/posix.scm
	!
		!	 		  g  nameg  stat:blksize CR h   q   ] 	Ci       g  f
		  g  filenamef  ice-9/posix.scm
	"
		"	 		  g  nameg  stat:blocks CR  h   t   ] 	Cl       g  f
		  g  filenamef  ice-9/posix.scm
	#
		#	 		  g  nameg  stat:atimensec CR       h   t   ] 	Cl       g  f
		  g  filenamef  ice-9/posix.scm
	$
		$	 		  g  nameg  stat:mtimensec CR       h   t   ] 	Cl       g  f
		  g  filenamef  ice-9/posix.scm
	%
		%	 		  g  nameg  stat:ctimensec CR       h   o   ] 	Cg       g  f
		  g  filenamef  ice-9/posix.scm
	(
		(	 		  g  nameg  	stat:type CR    h   p   ] 	Ch       g  f
		  g  filenamef  ice-9/posix.scm
	)
		)	 		  g  nameg  
stat:perms CR   h   s   ] 
C k       g  obj
		  g  filenamef  ice-9/posix.scm
	+
		+	 		  g  nameg  passwd:name CRh   u   ] C m       g  obj
		  g  filenamef  ice-9/posix.scm
	,
		,	 		  g  nameg  passwd:passwd CR      h   r   ] 	Cj       g  obj
		  g  filenamef  ice-9/posix.scm
	-
		-	 		  g  nameg  
passwd:uid CR h   r   ] 	Cj       g  obj
		  g  filenamef  ice-9/posix.scm
	.
		.	 		  g  nameg  
passwd:gid CR h   t   ] 	Cl       g  obj
		  g  filenamef  ice-9/posix.scm
	/
		/	 		  g  nameg  passwd:gecos CR       h   r   ] 	Cj       g  obj
		  g  filenamef  ice-9/posix.scm
	0
		0	 		  g  nameg  
passwd:dir CR h   t   ] 	Cl       g  obj
		  g  filenamef  ice-9/posix.scm
	1
		1	 		  g  nameg  passwd:shell CR       h   r   ] 
C j       g  obj
		  g  filenamef  ice-9/posix.scm
	3
		3	 		  g  nameg  
group:name CR h   t   ] C l       g  obj
		  g  filenamef  ice-9/posix.scm
	4
		4	 		  g  nameg  group:passwd CR       h   q   ] 	Ci       g  obj
		  g  filenamef  ice-9/posix.scm
	5
		5	 		  g  nameg  	group:gid CR  h   q   ] 	Ci       g  obj
		  g  filenamef  ice-9/posix.scm
	6
		6	 		  g  nameg  	group:mem CR  h   w   ] 
C o       g  obj
		  g  filenamef  ice-9/posix.scm
	8
		8	 		  g  nameg  utsname:sysname CR    h   x   ] C p       g  obj
		  g  filenamef  ice-9/posix.scm
	9
		9	 		  g  nameg  utsname:nodename CR   h   w   ] 	Co       g  obj
		  g  filenamef  ice-9/posix.scm
	:
		:	 		  g  nameg  utsname:release C R    h   w   ] 	Co       g  obj
		  g  filenamef  ice-9/posix.scm
	;
		;	 		  g  nameg  utsname:version C!R    h   w   ] 	Co       g  obj
		  g  filenamef  ice-9/posix.scm
	<
		<	 		  g  nameg  utsname:machine C"R#        h   ^   ] 6   V       g  filenamef  ice-9/posix.scm
	>
		>	 		
  g  nameg  getpwent C$R% h   ^   ] 6 V       g  filenamef  ice-9/posix.scm
	?
		?	 		
  g  nameg  setpwent C&R% h   ^   ] 6   V       g  filenamef  ice-9/posix.scm
	@
		@	 		
  g  nameg  endpwent C'R# h   q   ] 6i       g  name
		  g  filenamef  ice-9/posix.scm
	B
		B	 		  g  nameg  getpwnam C(R#      h   p   ] 6h       g  uid
		  g  filenamef  ice-9/posix.scm
	C
		C	 		  g  nameg  getpwuid C)R*       h   ^   ] 6   V       g  filenamef  ice-9/posix.scm
	E
		E	 		
  g  nameg  getgrent C+R, h   ^   ] 6 V       g  filenamef  ice-9/posix.scm
	F
		F	 		
  g  nameg  setgrent C-R, h   ^   ] 6   V       g  filenamef  ice-9/posix.scm
	G
		G	 		
  g  nameg  endgrent C.R* h   q   ] 6i       g  name
		  g  filenamef  ice-9/posix.scm
	I
		I	 		  g  nameg  getgrnam C/R*      h   o   ] 6g       g  id
		  g  filenamef  ice-9/posix.scm
	J
		J	 		  g  nameg  getgrgid C0RC          g  filenamef  ice-9/posix.scm 	
	
	
#	
	
1	
	
B	
	
S	
	 
e	!
	"
w	#
	$
	%
	"	(
		)

6	+

	,
M	-
	.
_	/
	0
w	1
	3
	4
	5
	6
2	8
	9
R	:
	;
r	<
	>
i	?
	@
l	B
	C
y	E
	F
i	G
	I
	J
 -	
   C6                                                                                                                                                                                                                                                                           ccache/ice-9/unicode.go                                                                             0000644                 00000001246 15154557173 0010655 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4       h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  unicode	 		g  filenameS	
f  ice-9/unicode.scm	g  exportsS	g  formal-name->char	g  char->formal-name	 	g  set-current-module	 	 	g  load-extension	g  string-append	f  	libguile-	g  effective-version	f  scm_init_unicodeC 5      h@      ]4	
5 4 >  "  G   i4i4i5 56|       g  m
		(  g  filenamef  ice-9/unicode.scm		
	-			3		!	4		-	<			>			@		 		@
   C6                                                                                                                                                                                                                                                                                                                                                           ccache/ice-9/pretty-print.go                                                                        0000644                 00000056136 15154557173 0011720 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0F\      ]  4       h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  pretty-print	 		g  filenameS	
f  ice-9/pretty-print.scm	g  importsS	g  match	 	 	g  srfi	g  srfi-1	 	 	g  rnrs	g  bytevectors	 	 	 	g  exportsS	g  truncated-print	 	g  set-current-module	 	 	g  make-string	g  genwrite:newline-str	 g  string-length	!f  (	"g  fold	#f   	$f  )	%g  object->string	&g  display	'g  write	(g  quote	)f  '	*g  
quasiquote	+f  `	,g  unquote	-f  ,	.g  unquote-splicing	/f  ,@	0f          	1g  	substring	2g  min	3g  generic-write	4f   	5g  reverse-string-append	6g  vector->list	7f  #	8g  symbol->string	9f  .	:g  lambda	;g  lambda*	<g  let*	=g  letrec	>g  define	?g  define*	@g  define-public	Ag  define-syntax	Bg  
let-syntax	Cg  letrec-syntax	Dg  with-syntax	Eg  if	Fg  set!	Gg  cond	Hg  case	Ig  and	Jg  or	Kg  let	Lg  begin	Mg  do	Ng  syntax-rules	Og  syntax-case	Pg  string-set!	Qg  
string-ref	Rg  portS	SR		Tg  widthS	UT		Vg  max-expr-widthS	WV		Xg  display?S	YX		Zg  per-line-prefixS	[Z		\SUWY[ 	]g  current-output-port	^X		_g  breadth-first?S	`_		aSU^` 	bg  %default-port-encoding	cg  port-encoding	dg  catch	eg  encoding-error	fg  !%default-port-conversion-strategy	gg  error	hg  with-output-to-string	ik  &   	jf  ...	kg  max	lg  floor	mf  expected a positive width	ng  length	og  cdr	pf  #(	qg  vector-length	rg  
vector-ref	sg  identity	tg  bytevector?	ug  format	vf  #~a(	wg  
array-type	xg  array-length	yg  	array-ref	zf  . 	{g  string-prefix?	|g  string-suffix?	}f  ~a~a~a~a	~f  #<	f  > ~ p$ !$ f  "    g  with-output-to-portC 5hR     ]4	
5 4 >  "  G   4i
5R         h(      ]$  4L  5$  4 5CCC             g  str
		" g  col		"  g  filenamef  ice-9/pretty-print.scm
	9			:				:			:			:	!		:	 		"	  g  nameg  out C!"#        h(      ]L $  4L 5$  "  "  6        g  i
		' g  col		'  g  filenamef  ice-9/pretty-print.scm
	G			:			:			H	%		:			:			:	!		:		'	H	 
		'	   C$%&' ()*+,-./ hX    ]""   $    $  V4L$  4L5$  "  "  54LLO 5$  4L5$  CCC4 L $  "  5$  4L5$  45CCC4 L $  "  5$  4L5$  45CCC $ j  	&  $  (  yL	$  
"  .$  "  $  "  $  "  $  4L5$  45"  "  6""|&  $  (  yL	$  
"  .$  "  $  "  $  "  $  4L5$  45"  "  6""&  $  (  yL	$  
"  .$  "  $  "  $  "  $  4L5$  45"  "  6"R"N&  $  (  yL	$  
"  .$  "  $  "  $  "  $  4L5$  45"  "  6""""       g  obj
	W g  col	W g  w		  g  x		  g  col		D	t g  col		X	t g  str	   g  str	   g  w	 S g  x	 S g  w	 g  head	V g  str	V g  w	 g  head	 g  str	 g  w	: g  head	B g  str	 g  w	G g  head	 g  str	E  g  filenamef  ice-9/pretty-print.scm
	=			?			E		)	:		*	:		.	E	$	0	:		4	:		7	:	!	8	:		D	E		D	E			G	G		X	F		`	:		a	:		e	F		g	:		k	:		n	:	!	o	:		u	K			K	" 	K	 	K		 	:	 	:	 	:	 	:	! 	:	 	K	 	K	" 	K	 	K		 	:	 	:	 	:	 	:	! 	:	 	?		2		2		3	!	4	.	3	0	5	=	3	?	6	L	3	N	7	V	A	^	:	_	:	i	:	l	:	!s	:		A			?		2		2		3		4		3		5		3		6		3		7		A		:		:	 	:		:	!
	:		A			?	B	2	B	2	M	3	O	4	\	3	^	5	k	3	m	6	z	3	|	7		A		:		:		:		:	!	:		A			?		2		2		3		4		3		5		3		6		3		7		A	#	:	$	:	.	:	1	:	!8	:	G	A		K	?	 q	W	  g  nameg  loop C  h       ]
O LLL Q  6       g  obj
		  g  col		  g  loop			   g  filenamef  ice-9/pretty-print.scm
	<			=	 		 	  g  nameg  wr C01         hp   >  ]
 
$  b 	$  - 	$  4L 5$  		"  "   "4
 5$  4L 5$  45CCCC 6      g  n
		o g  col		o g  str		J	l  g  filenamef  ice-9/pretty-print.scm
	O			P	
	
	P			Q			Q			R			:			:		#	R		%	:		)	:		-	:	!	.	:		@	R	
	A	S		E	S		J	S		J	S	
	R	:		S	:		]	:		`	:	!	g	:	 		o	  g  nameg  spaces C   hh     ]
$  ^ $  J4L5$  45"  $  #4LL 5$  
4L 5$  L 
6CCCL 6C      g  to
		h g  col		h g  str			2  g  filenamef  ice-9/pretty-print.scm
	V			W			X			X			Y			:		 	:		#	:	!	*	:		6	Y		7	:		A	Y		C	:	!	J	:		N	:		U	[		b	\		f	\	 		h	  g  nameg  indent C234     h       ] MNM 4 5N M 
C             g  str
		  g  filenamef  ice-9/pretty-print.scm
	c			d				d			e	!		e			e			f	 		   C5 67! 
       h     ], $  "   $  4LL5HH4 LLO >  "  G  J
$  )4J5$  4L5$  45CCC $  
 64 5$  4L5$  "  "  $  4L	5$  "  "  LL6L  6       g  obj
	  g  col	  g  extra		  g  pp-pair		  g  result		&  g  left		&  g  str		[	} g  l	   g  col	   g  col	    
g  filenamef  ice-9/pretty-print.scm
	^			_				_	
	
	_			_			_			`			a			a		!	a		"	a		&	a		&	`		+	b	
	6	b	8	D	b	
	P	g		T	g	
	U	h		[	h		c	:		d	:		n	:		q	:	!	x	:	 	i	 	i	 	j	 	k	 	:	 	:	 	k	/ 	:	 	:	 	:	! 	:	 	k	 	:	 	:	  	 	:	 	:	 	:	! 	:	  	  	 	l	 0	 	  g  nameg  pr C(*,.)+-/ 8!     h  x  ]  $  "  !$  "  $  "  $  $  "  "  $  {L  $  "  .$  "  $  "  $  "  $  4L5$  4	5"  "  L6 $  |4L 5$  
 64	4
55	$  L L64L $  4L5$  "  "  5$  L L6C$  4L5$  "  "  L L6p      g  expr
	 g  col	 g  extra		 g  head			Z g  tail			Z g  head		g  g  str	   g  head	  g  proc	 a g  col*	Ga g  col	  g  filenamef  ice-9/pretty-print.scm
	n			)			)			)			*		B	(		F	(		I	(	/	J	(	(	^	o		c	/		g	2		g	2		r	3		t	4	 	3	 	5	 	3	 	6	 	3	 	7	 	q	 	:	 	:	 	:	 	:	! 	:	 	p	 	t	 	t	 	u	 	u	
 	v	 	v	 	w	 	x	 	y		y	&
	y		y		y	 	{	! 	& 	,	:	-	:	1 	&3	:	7	:	:	:	!;	:	G 	G 	O 	T 	Y 	&_ 	g	:	h	:	l 	n	:	r	:	u	:	!v	:	 	 	 C		  g  nameg  pp-expr C$9        h   /  ]%"  $  |$  4(  "  
4L4L55"(  4L 5$  CCL4L4L4L4L55556C "p  '      g  l
	  g  col1	  g  col2		  g  extra		  g  pp-item		  g  l		  g  col		  g  rest			G g  extra		&	G  	g  filenamef  ice-9/pretty-print.scm
 		 		 		 		 		 	 	 		 	#	! 	4	& 		+ 		0 	"	1 	*	? 		G 		M 		N	:		R 		T	:		X	:		[	:	!	\	:		c 		d 		i 		n 	*	r 	/	s 	3	} 	*	 	  	  	  	  	 #	 	  g  nameg  pp-down C!# h  P  ]?"  m"  	

	"  Y$  K$  @(  "  
4L4L
	55

	"  """  c"  L 	6$  G$  <(  "  
4L4L
	55	"  """  L 	6  4L$  4L5$  "  "  5	"  			
	"$  U$  J
4L
	$  4L5$  	"  "  5	
	"u""       H      g  expr
	 g  col	 g  extra		 g  named?		 g  pp-1		 g  pp-2		 g  pp-3		 g  rest			s g  col1			s g  col2				s g  col3	
		s g  val1		.	k g  rest		3	k g  extra		C	k g  rest		w  g  col1		w  g  col2			w  g  col3	
	w  g  val1	   g  rest	   g  extra	   g  rest	   g  col1	   g  col2		   g  head	  g  rest	  g  col*		 g  name	
J g  rest	O g  col**	w  g  filenamef  ice-9/pretty-print.scm
 		 		 	
	 		' 		+ 		. 		. 	
	3 		3 	
	; 		> 	)	C 	
	J 		O 	&	] 		k 		w 	  	  	  	  	  	  	
  	  	
  	  	)  	
  	  	&  	  	  	  	  	  	  	  	  		:		:	 	!	:		:		:	!	:	 	 	) 	. 	2: 	
: 	C 	G 	J 	J 	
O 	O 	
R 	\	:	]	:	a 	&c	:	g	:	j	:	!k	:	w 	w 	
 	 	5 	 I		  g  nameg  
pp-general C!  h8      ]$  4L 5$  "  "  L L6              g  l
		1 g  col		1 g  extra			1 g  col		!	1  g  filenamef  ice-9/pretty-print.scm
 			:				:		 			:			:			:	!		:		! 		1 	 		1	  g  nameg  pp-expr-list C   h      ]L LL 6             g  expr
		 g  col		 g  extra			  g  filenamef  ice-9/pretty-print.scm
 		 	 			  g  nameg  	pp-LAMBDA C!  hH   (  ]4L  $  4L5$  "  "  5$  L L6C            g  expr
		C g  col		C g  extra			C g  col*		)	C  g  filenamef  ice-9/pretty-print.scm
 		 		 			:			:		 	&		:			:			:	!		:		) 		) 		1 		6 		; 	&	A 	 		C	  g  nameg  pp-COND C      h      ]L LLL 6            g  expr
		 g  col		 g  extra			  g  filenamef  ice-9/pretty-print.scm
 		 	 			  g  nameg  pp-DO C:;<=>?@ABCDEF       h      ]L L L 6             g  expr
		 g  col		 g  extra			  g  filenamef  ice-9/pretty-print.scm
 		 	 			  g  nameg  pp-IF CGH      h      ]L LL 6             g  expr
		 g  col		 g  extra			  g  filenamef  ice-9/pretty-print.scm
 		 	 			  g  nameg  pp-CASE CIJ!        hH   '  ]4L  $  4L5$  "  "  5$  L L6C           g  expr
		C g  col		C g  extra			C g  col*		)	C  g  filenamef  ice-9/pretty-print.scm
 		 		 			:			:		 	&		:			:			:	!		:		) 		) 		1 		6 		; 	&	A 	 		C	  g  nameg  pp-AND CK     h0     ] $  "  L LL 6             g  expr
		* g  col		* g  extra			* g  rest			* g  named?			*  g  filenamef  ice-9/pretty-print.scm
 		 		 		
 		 		 	0	 	'	 		* 	 
		*	  g  nameg  pp-LET CL  h      ]L L 6              g  expr
		 g  col		 g  extra			  g  filenamef  ice-9/pretty-print.scm
 		 	 			  g  nameg  pp-BEGIN CMNO h      ]L LL 6             g  expr
		 g  col		 g  extra			  g  filenamef  ice-9/pretty-print.scm
 		 	 			  g  nameg  pp-SYNTAX-CASE C        hX  z   ] $  "   $  "  u $  "  g $  "  Y $  "  K $  "  = $  "  / $  "  ! 	$  "   
$  "   $  LC $  "   $  
L LO C $  LC $  LL LO C $  "   $  LLLL O C $  L LLO C $  
L LO C $  LC $  LC $  L LLO CCr       g  head
	X  g  filenamef  ice-9/pretty-print.scm
 		 	 	X  g  nameg  style C   h    ]ZO O O O O O O O 		O 

O O 	LQ LLQ LLLLLQ LLQ LL Q LLQ LQ Q 	LLQ 
Q LL
	Q  
6       |      g  obj
	 g  col	 g  spaces	  g  indent	  g  pr	  g  pp-expr	  g  pp-down	  g  
pp-general	  g  pp-expr-list	  g  	pp-LAMBDA		  g  pp-COND	
  g  pp-DO	  g  style	   g  filenamef  ice-9/pretty-print.scm
	M	 	 		  g  nameg  pp C      h   r  ]O O O Q Q Q 45$  
45"   $  44 
5>  "  G  "  4 
>  "  G  C     j      g  obj
	  g  display?	  g  width		  g  max-expr-width		  g  per-line-prefix		  g  output		  g  out		"  g  wr		"  g  pp		"   	g  filenamef  ice-9/pretty-print.scm
	$
	B	:		L	:		N	:	!	U	:		` 		a 		f 		r 		 	 	 	  g  nameg  generic-write C3R PQ      h     ]* $  n 454L  5"  7$  +445>  "  G  "C
45"6         g  l
		} g  i		} g  str			w g  len			w g  result		$	w g  j		*	a g  k		*	a  g  filenamef  ice-9/pretty-print.scm
																		(	"	0	$		$		*		/		3	
	4			;		$	H			S
		V
		^
		a		c	"	l		o		w		}	 		}	  g  nameg  rev-string-append C        h      ]	O Q  
6         g  l
		 g  rev-string-append	
	  g  filenamef  ice-9/pretty-print.scm
 
		 		  g  nameg  reverse-string-append C5R\]43 &  h   c   ]4 L >  "  G  C[       g  s
		  g  filenamef  ice-9/pretty-print.scm
$		$	 		   C  h     - /   0   3 #  #  $  "  45 #  	O#  	2#  #   45O 6             g  obj
		y g  port*		y g  port			y g  width			y g  max-expr-width			y g  display?			y g  per-line-prefix			y  g  filenamef  ice-9/pretty-print.scm

	(		/	'	Z	(	e!		l!		y 	 		yg  portS	g  widthS	g  max-expr-widthS	g  display?S	g  per-line-prefixS	   g  nameg  pretty-printg  documentationf Pretty-print OBJ on PORT, which is a keyword argument defaulting to
the current output port.  Formatting can be controlled by a number of
keyword arguments: Each line in the output is preceded by the string
PER-LINE-PREFIX, which is empty by default.  The output lines will be
at most WIDTH characters wide; the default is 79.  If DISPLAY? is
true, display rather than write representation will be used.

Instead of with a keyword argument, you can also specify the output
port directly after OBJ, like (pretty-print OBJ PORT). CRa]bcdefgh&i        h   \   ] 6T       g  filenamef  ice-9/pretty-print.scm
E		@		F	 		
   C h   \   ] Y4>  ZCZF  T       g  filenamef  ice-9/pretty-print.scm
B	
	C	=		D	 		
   Cj      h   x   - 1 3 C    p       g  key
			 g  args			  g  filenamef  ice-9/pretty-print.scm
G	
	H	 			
   C &bchkl     h8      ] L4LLL5L $  44LLL55"  LL6            g  filenamef  ice-9/pretty-print.scm
\		]	$	^	$	_	(	`	1	!`	A	"`	8	$`	1	%`	-	'_	(	0a	1	1a	(	3]	 		3
   C      h   o  ]%"  
$  4 >  "  G  "   $  C"  iL$  M64L5Y4LLL O 5Z4>  "  G  4545"e$  >
$  "  $  L 45
$  "  6"O"K 
"
    g      g  x
	  g  width	  g  len		  g  ref		  g  next		  g  x		  g  width		  g  i		  g  t		)  g  str		n  g  t	    g  filenamef  ice-9/pretty-print.scm
L		M		
P		P	
	Q		)S		)R	
	=V		>V		BR	
	HW		KZ	9	T[		nY		qb	 c	 c	 c	& c	 c	; c	 R	
 T	 T	 R	
 T	$ T	  T	. T	 U	 U	! U	 U	1 U	 M	 $	 	  g  nameg  print-sequence Cgm&!n    h   r   ] C  j       g  x
		 g  i		  g  filenamef  ice-9/pretty-print.scm
			* 			   Co$7pqrstuvwxyzhl  h(      ] LLL $  4L		5"  L	6          g  filenamef  ice-9/pretty-print.scm
p		q	"	r	"	s	&	s	0	s	-	s	&	#t	&	%q	 
		%
   C# &'  h   e   ] L$  L 6L 6    ]       g  filenamef  ice-9/pretty-print.scm
			#		0		< 		
   C{|}1      h  K  ]"
$  6 $  L	L$  :4>  "  G  4L  	4 5>  "  G  6	6 $  L	L$  :4
>  "  G  4L  	4 5>  "  G  6	64 5$  Q		$  B44 5>  "  G  4L  	4 5>  "  G  6	6 $  	L$  4>  "  G  	"  $  		"  $  -4>  "  G  4L	>  "  dG  "  ]4LLO 54>  "  G  4>  "  G  45"p "a6	64 LO 54>  "  G  45$  "  "  (  	"  "  	"45$  {45$  h45$  V4545L$  5444545L5M5"  "u"q"m"i"Q6 C      g  x
	 g  width	 g  width	> g  x	D g  width	D g  str	 g  str	  g  fixes	.  g  filenamef  ice-9/pretty-print.scm
			
	
					
		
			 		!		%	
	&		*		/		8		A		B	*	Q		]		_		c		e		h	
	l		s		t		x	
	y		}	 	 	 	 	* 	 	 	 	 	 	
 	 	 	
 	 	 	 	 	 	 	* 						
	"	#	'	
(	,	1	>	>	Dg	Gj	Kj	Pj	 Uj	Yi	
Zk	^k	ck	ll	ul	zl	o	o	u	v	v	v	w	w	w	%w	w	g						 	
		 	$	.{	4	
6	A	G	G	
H	M	!R	V	
W	\	!a	e	f	o	s	v	{	'~			'								#	2	#	(	7	(				{	{	{		 		  g  nameg  print C h   S   ] LLL 6      K       g  filenamef  ice-9/pretty-print.scm
		
	
 		

   C  h   :  - /   0   3 
#  #  $  "  45 #  	O#  #  45YH45K4	J5
O O 		Q 	Q 	4 	O >  ZCZF     2      g  x
	  g  port*	  g  port		  g  width		  g  display?		  g  breadth-first?		  g  ellipsis		]  g  ellipsis-width		s  g  print-sequence	   g  print		    
g  filenamef  ice-9/pretty-print.scm
)
	(+	 	/+	*	T;	(	`A		dA		jA		mJ		sJ	 	 	 g  portS	g  widthS	g  display?S	g  breadth-first?S	   g  nameg  truncated-printg  documentationf APrint @var{x}, truncating the output, if necessary, to make it fit
into @var{width} characters. By default, @var{x} will be printed using
@code{write}, though that behavior can be overriden via the
@var{display?} keyword argument.

The default behaviour is to print depth-first, meaning that the entire
remaining width will be available to each sub-expression of @var{x} --
e.g., if @var{x} is a vector, each member of @var{x}. One can attempt to
"ration" the available width, trying to allocate it equally to each
sub-expression, via the @var{breadth-first?} keyword argument. CRC        g  m
		,  g  filenamef  ice-9/pretty-print.scm		
	-	"		9	"
3	$
7 
;
R)
 	R
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                   ccache/ice-9/curried-definitions.go                                                                 0000644                 00000013403 15154557173 0013173 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4      h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  curried-definitions	 		g  filenameS	
f  ice-9/curried-definitions.scm	g  replacementsS	g  cdefine	g  define		g  cdefine*	g  define*		g  define-public	g  define*-public	 	g  set-current-module	 	 	g  make-syntax-transformer	 	 	g  macro	g  $sc-dispatch	 	 	g  any	 	!g  each-any	"!	# "	$#	%g  syntax-object	&g  top	'& 	(g  ribcage	)g  dummy	*g  head	+g  rest	,g  body	-g  body*	.)*+,- 	/g  m-17381246c69178d0-0	0/& 	10'''' 	2f  l-17381246c69178d0-5	3f  l-17381246c69178d0-6	4f  l-17381246c69178d0-7	5f  l-17381246c69178d0-8	6f  l-17381246c69178d0-9	723456 	8(.17 	9( 	:g  x	;: 	<0 	=f  l-17381246c69178d0-2	>= 	?(;<> 	@'89? 	Ag  hygiene	BA 	C%@B 	Dg  lambda	E%D@B 	F 	Gg  name	Hg  val	I)GH 	J0'' 	Kf  l-17381246c69178d0-11	Lf  l-17381246c69178d0-12	Mf  l-17381246c69178d0-13	NKLM 	O(IJN 	P'O9? 	Q%PB 	Rg  syntax-violation	SR 	TR 	Uf  -source expression failed to match any pattern	Vg  m-17381246c69178d0-17	WV& 	XW'''' 	Yf  l-17381246c69178d0-1c	Zf  l-17381246c69178d0-1d	[f  l-17381246c69178d0-1e	\f  l-17381246c69178d0-1f	]f  l-17381246c69178d0-20	^YZ[\] 	_(.X^ 	`W 	af  l-17381246c69178d0-19	ba 	c(;`b 	d'_9c 	e%dB 	fg  lambda*	g%fdB 	hW'' 	if  l-17381246c69178d0-28	jf  l-17381246c69178d0-29	kf  l-17381246c69178d0-2a	lijk 	m(Ihl 	n'm9c 	o%nB 	pg  m-17381246c69178d0-2e	qp& 	rq'''' 	sf  l-17381246c69178d0-33	tf  l-17381246c69178d0-34	uf  l-17381246c69178d0-35	vf  l-17381246c69178d0-36	wf  l-17381246c69178d0-37	xstuvw 	y(.rx 	zq 	{f  l-17381246c69178d0-30	|{ 	}(;z| 	~'y9} 	%~B  %D~B  g  begin q''  f  l-17381246c69178d0-3f f  l-17381246c69178d0-40 f  l-17381246c69178d0-41   (I  '9}  %B  %B  g  export %B  g  m-17381246c69178d0-45 &  ''''  f  l-17381246c69178d0-4a f  l-17381246c69178d0-4b f  l-17381246c69178d0-4c f  l-17381246c69178d0-4d f  l-17381246c69178d0-4e   (.    f  l-17381246c69178d0-47   (;  '9  %B  %fB  ''  f  l-17381246c69178d0-56 f  l-17381246c69178d0-57 f  l-17381246c69178d0-58   (I  '9  %B  %B  %B C 5    h	  a   ]4	
5 4 >  "  G   4$CE    h   v   ] C   n       g  dummy
		 g  head		 g  rest			 g  body			 g  body*			  			   CFQ  h   P   ] C    H       g  dummy
		 g  name		 g  val			  			   CTU h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  ice-9/curried-definitions.scm
		 		9  g  
macro-typeg  syntax-rulesg  patternsg  headg  restg  bodyg  body*g  ... g  nameg  val   C5R4$eg  h   v   ] C   n       g  dummy
		 g  head		 g  rest			 g  body			 g  body*			  			   CFo  h   P   ] C    H       g  dummy
		 g  name		 g  val			  			   CTU h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  ice-9/curried-definitions.scm
		 		9  g  
macro-typeg  syntax-rulesg  patternsg  headg  restg  bodyg  body*g  ... g  nameg  val   C5R4$  h   v   ] C   n       g  dummy
		 g  head		 g  rest			 g  body			 g  body*			  			   CF      h   P   ]   CH       g  dummy
		 g  name		 g  val			  			   CTU h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  ice-9/curried-definitions.scm
	'	 		9  g  
macro-typeg  syntax-rulesg  patternsg  headg  restg  bodyg  body*g  ... g  nameg  val   C5R4$  h   v   ] C   n       g  dummy
		 g  head		 g  rest			 g  body			 g  body*			  			   CF      h   P   ]   CH       g  dummy
		 g  name		 g  val			  			   CTU h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  ice-9/curried-definitions.scm
	1	 		9  g  
macro-typeg  syntax-rulesg  patternsg  headg  restg  bodyg  body*g  ... g  nameg  val   C5RC    Y       g  m
		(  g  filenamef  ice-9/curried-definitions.scm		
 		
   C6                                                                                                                                                                                                                                                              ccache/ice-9/r4rs.go                                                                                0000644                 00000026604 15154557173 0010126 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0l-      ] ' 4       ho      ] g  apply:nconc2last	g  apply	g  call-with-current-continuation	g  call-with-values	g  dynamic-wind	f  r	g  	OPEN_READ	f  w		g  
OPEN_WRITE	
f  r+	g  	OPEN_BOTH	f  	/dev/null	g  *null-device*	g  	open-file	g  open-input-file	g  open-output-file	g  open-io-file	g  close-input-port	g  call-with-input-file	g  close-output-port	g  call-with-output-file	g  set-current-input-port	g  with-input-from-port	g  set-current-output-port	g  with-output-to-port	g  set-current-error-port	g  with-error-to-port	g  with-input-from-file	g  with-output-to-file	g  with-error-to-file	g  call-with-input-string	 g  with-input-from-string	!g  call-with-output-string	"g  with-output-to-string	#g  with-error-to-string	$f   	%g  	read-char	&g  the-eof-objectC 5    hh(  B  ]         h      - 1 3  45@           g  fun
			 g  args			  g  filenamef  ice-9/r4rs.scm
	!
		"			"	 			
  g  nameg  apply CR    h      ] B   ~       g  proc
		  g  filenamef  ice-9/r4rs.scm
	#
		$	 		  g  nameg  call-with-current-continuation CR     h      ]4 >   6<        g  producer
		 g  consumer		  g  filenamef  ice-9/r4rs.scm
	%
		&	 			  g  nameg  call-with-values CR hH   }  ] 4 >   "  G  V4>   X4>   "  G  CX4>   "  G  F     u      g  in
		C g  thunk		C g  out			C  g  filenamef  ice-9/r4rs.scm
	'
		Y			Y		!	Y	 		C	  g  nameg  dynamic-windg  documentationf All three arguments must be 0-argument procedures.
Guard @var{in} is called, then @var{thunk}, then
guard @var{out}.

If, any time during the execution of @var{thunk}, the
continuation of the @code{dynamic_wind} expression is escaped
non-locally, @var{out} is called.  If the continuation of
the dynamic-wind is re-entered, @var{in} is called.  Thus
@var{in} and @var{out} may be called any number of
times.
@lisp
 (define x 'normal-binding)
@result{} x
 (define a-cont
   (call-with-current-continuation
     (lambda (escape)
       (let ((old-x x))
         (dynamic-wind
           ;; in-guard:
           ;;
           (lambda () (set! x 'special-binding))

           ;; thunk
           ;;
           (lambda () (display x) (newline)
                   (call-with-current-continuation escape)
                   (display x) (newline)
                   x)

           ;; out-guard:
           ;;
           (lambda () (set! x old-x)))))))

;; Prints:
special-binding
;; Evaluates to:
@result{} a-cont
x
@result{} normal-binding
 (a-cont #f)
;; Prints:
special-binding
;; Evaluates to:
@result{} a-cont  ;; the value of the (define a-cont...)
x
@result{} normal-binding
a-cont
@result{} special-binding
@end lisp CRR	R
RR    h   2  ] 6      *      g  str
		
  g  filenamef  ice-9/r4rs.scm
	t
	
	x	 		
  g  nameg  open-input-fileg  documentationf  Takes a string naming an existing file and returns an input port
capable of delivering characters from the file.  If the file
cannot be opened, an error is signalled. CR	   h     ] 6            g  str
		
  g  filenamef  ice-9/r4rs.scm
	z
	
		 		
  g  nameg  open-output-fileg  documentationf Takes a string naming an output file to be created and returns an
output port capable of writing characters to a new file by that
name.  If the file cannot be opened, an error is signalled.  If a
file with the given name already exists, the effect is unspecified. CR h      ] 6             g  str
		
  g  filenamef  ice-9/r4rs.scm
 
	
 	 		
  g  nameg  open-io-fileg  documentationf  2Open file with name STR for both input and output. CR        h8   8  ]4 54>  G4>  "  G  E       0      g  str
		1 g  proc		1 g  p				1 g  vals			1  g  filenamef  ice-9/r4rs.scm
 
	 			 		 		 		 		1 	 		1	  g  nameg  call-with-input-fileg  documentationf EPROC should be a procedure of one argument, and STR should be a
string naming a file.  The file must
already exist. These procedures call PROC
with one argument: the port obtained by opening the named file for
input or output.  If the file cannot be opened, an error is
signalled.  If the procedure returns, then the port is closed
automatically and the values yielded by the procedure are returned.
If the procedure does not return, then the port will not be closed
automatically unless it is possible to prove that the port will
never again be used for a read or write operation. CR     h8   V  ]4 54>  G4>  "  G  E       N      g  str
		1 g  proc		1 g  p				1 g  vals			1  g  filenamef  ice-9/r4rs.scm
 
	 			 		 		 		 		1 	 		1	  g  nameg  call-with-output-fileg  documentationf bPROC should be a procedure of one argument, and STR should be a
string naming a file.  The behaviour is unspecified if the file 
already exists. These procedures call PROC
with one argument: the port obtained by opening the named file for
input or output.  If the file cannot be opened, an error is
signalled.  If the procedure returns, then the port is closed
automatically and the values yielded by the procedure are returned.
If the procedure does not return, then the port will not be closed
automatically unless it is possible to prove that the port will
never again be used for a read or write operation. CR        h   i   ] 4M 5N C   a       g  filenamef  ice-9/r4rs.scm
 		 	)	 	 		
  g  nameg  swaports C    hX      ]
 H O  Q 4>   "  G  V4>   X4>   "  G  CX4>   "  G  F           g  port
		T g  thunk		T g  swaports			T  g  filenamef  ice-9/r4rs.scm
 
	 		 	 		T	  g  nameg  with-input-from-port CR      h   i   ] 4M 5N C   a       g  filenamef  ice-9/r4rs.scm
 		 	)	 	 		
  g  nameg  swaports C    hX      ]
 H O  Q 4>   "  G  V4>   X4>   "  G  CX4>   "  G  F           g  port
		T g  thunk		T g  swaports			T  g  filenamef  ice-9/r4rs.scm
 
	 		 	 		T	  g  nameg  with-output-to-port CR       h   i   ] 4M 5N C   a       g  filenamef  ice-9/r4rs.scm
 		 	)	 	 		
  g  nameg  swaports C    hX      ]
 H O  Q 4>   "  G  V4>   X4>   "  G  CX4>   "  G  F           g  port
		T g  thunk		T g  swaports			T  g  filenamef  ice-9/r4rs.scm
 
	 		 	 		T	  g  nameg  with-error-to-port CR      h   [   ] L 6      S       g  p
		
  g  filenamef  ice-9/r4rs.scm
 		
 	 		
   C  h     ] O 6       g  file
		 g  thunk		  g  filenamef  ice-9/r4rs.scm
 
	 	 			  g  nameg  with-input-from-fileg  documentationf THUNK must be a procedure of no arguments, and FILE must be a
string naming a file.  The file must already exist. The file is opened for
input, an input port connected to it is made
the default value returned by `current-input-port', 
and the THUNK is called with no arguments.
When the THUNK returns, the port is closed and the previous
default is restored.  Returns the values yielded by THUNK.  If an
escape procedure is used to escape from the continuation of these
procedures, their behavior is implementation dependent. CR        h   [   ] L 6      S       g  p
		
  g  filenamef  ice-9/r4rs.scm
 		
 	 		
   C  h     ] O 6       g  file
		 g  thunk		  g  filenamef  ice-9/r4rs.scm
 
	 	 			  g  nameg  with-output-to-fileg  documentationf *THUNK must be a procedure of no arguments, and FILE must be a
string naming a file.  The effect is unspecified if the file already exists. 
The file is opened for output, an output port connected to it is made
the default value returned by `current-output-port', 
and the THUNK is called with no arguments.
When the THUNK returns, the port is closed and the previous
default is restored.  Returns the values yielded by THUNK.  If an
escape procedure is used to escape from the continuation of these
procedures, their behavior is implementation dependent. CR    h   [   ] L 6      S       g  p
		
  g  filenamef  ice-9/r4rs.scm
 		
 	 		
   C  h     ] O 6       g  file
		 g  thunk		  g  filenamef  ice-9/r4rs.scm
 
	 	 			  g  nameg  with-error-to-fileg  documentationf )THUNK must be a procedure of no arguments, and FILE must be a
string naming a file.  The effect is unspecified if the file already exists. 
The file is opened for output, an output port connected to it is made
the default value returned by `current-error-port', 
and the THUNK is called with no arguments.
When the THUNK returns, the port is closed and the previous
default is restored.  Returns the values yielded by THUNK.  If an
escape procedure is used to escape from the continuation of these
procedures, their behavior is implementation dependent. CR      h   [   ] L 6      S       g  p
		
  g  filenamef  ice-9/r4rs.scm
 		
 	 		
   C  h   #  ] O 6       g  string
		 g  thunk		  g  filenamef  ice-9/r4rs.scm
 
	 	 			  g  nameg  with-input-from-stringg  documentationf xTHUNK must be a procedure of no arguments.
The test of STRING  is opened for
input, an input port connected to it is made, 
and the THUNK is called with no arguments.
When the THUNK returns, the port is closed.
Returns the values yielded by THUNK.  If an
escape procedure is used to escape from the continuation of these
procedures, their behavior is implementation dependent. C R! h   [   ] L 6      S       g  p
		
  g  filenamef  ice-9/r4rs.scm
 		
 	 		
   C  h      ] O 6          g  thunk
		  g  filenamef  ice-9/r4rs.scm
 
	 	 		  g  nameg  with-output-to-stringg  documentationf  /Calls THUNK and returns its output as a string. C"R!       h   [   ] L 6      S       g  p
		
  g  filenamef  ice-9/r4rs.scm
 		
 	 		
   C  h      ] O 6          g  thunk
		  g  filenamef  ice-9/r4rs.scm
 
	 	 		  g  nameg  with-error-to-stringg  documentationf  5Calls THUNK and returns its error output as a string. C#R4i$%      h   [   ] 6S       g  p
		  g  filenamef  ice-9/r4rs.scm
 	2	 	> 		   C5&RC      :      g  filenamef  ice-9/r4rs.scm 	!
Y	#
	%
	'
	n		n
	o		o
	p		p
	r		r
	M	t
	z
 
s 
 
 
j 
 
g 
 
"I 
% 
&p 
' 
' 	' 	/(] 	(` 
 	(b
   C6                                                                                                                             ccache/ice-9/local-eval.go                                                                          0000644                 00000117401 15154557173 0011247 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]x 4      hLW      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  
local-eval	 		g  filenameS	
f  ice-9/local-eval.scm	g  importsS	g  format	 	 	g  srfi	g  srfi-9	 	 	g  gnu	 	 	g  system	g  base	g  compile	 	 	g  syntax	 	 	 	g  exportsS	 g  the-environment	!g  local-compile	" ! 	#g  set-current-module	$# 	%# 	&g  lexical-environment-type	'g  #%make-lexical-environment-procedure	(g  make-syntax-transformer	)( 	*( 	+g  make-lexical-environment	,g  macro	-g  $sc-dispatch	.- 	/- 	0g  _	1g  any	201111 	3g  syntax-object	4g  lambda	5g  m-3348ed57c594e3-7	6g  top	756 	8g  ribcage	9g  t-3348ed57c594e3-3	:g  t-3348ed57c594e3-4	;g  t-3348ed57c594e3-5	<g  t-3348ed57c594e3-6	=9:;< 	>7777 	?f  l-3348ed57c594e3-c	@f  l-3348ed57c594e3-d	Af  l-3348ed57c594e3-e	Bf  l-3348ed57c594e3-f	C?@AB 	D8=>C 	E8 	Fg  x	GF 	H7 	If  l-3348ed57c594e3-9	JI 	K8GHJ 	Lg  shift	Mg  	proc-name	Ng  args	OMN 	P6 	QPP 	Rf  l-1e8ba8b5a-60	Sf  l-1e8ba8b5a-61	TRS 	U8OQT 	Vg  key	Wg  value	Xg  name	Yg  formals	Zg  body	[VWXYZ 	\PPPPP 	]f  l-1e8ba8b5a-53	^f  l-1e8ba8b5a-54	_f  l-1e8ba8b5a-55	`f  l-1e8ba8b5a-56	af  l-1e8ba8b5a-57	b]^_`a 	c8[\b 	dg  make-procedure-name	ed 	fP 	gf  l-1e8ba8b5a-43	hg 	i8efh 	jP 	kf  l-1e8ba8b5a-42	lk 	m8Gjl 	n7DEKLEEEEUcim 	og  hygiene	po 	q34np 	rg  scope	sPDEK 	to 	u3rst 	vg  wrapper	w3vst 	xg  boxes	y3xst 	zg  patterns	{3zst 	|uwy{ 	}g  make-struct	~g  m-3348ed57c594e3-1	~6  g  t-1e8ba8b5a-133 g  t-1e8ba8b5a-132 g  t-1e8ba8b5a-131   g  m-1e8ba8b5a-134 6    f  l-1e8ba8b5a-138 f  l-1e8ba8b5a-139 f  l-1e8ba8b5a-13a   8  g  	ctor-args   f  l-1e8ba8b5a-120   8j  g  ctor g  field   f  l-1e8ba8b5a-11c f  l-1e8ba8b5a-11d   8Q  g  form g  	type-name g  constructor-spec g  field-names   PPPP  f  l-1e8ba8b5a-111 f  l-1e8ba8b5a-112 f  l-1e8ba8b5a-113 f  l-1e8ba8b5a-114   8  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers   PPPPPPPP  f  l-1e8ba8b5a-e9 f  l-1e8ba8b5a-e7 f  l-1e8ba8b5a-e5 f  l-1e8ba8b5a-e3 f  l-1e8ba8b5a-e1 f  l-1e8ba8b5a-df f  l-1e8ba8b5a-dd f  l-1e8ba8b5a-db   8  f  l-1e8ba8b5a-da   8Gj  DEKLEEEEE  3}p  3&st  3
p  uwy{  q|  g  each-any 0 g  syntax-violation     f  Wrong number of arguments g  identifier?     PEK  3't      f  -source expression failed to match any pattern g  record-type-vtable     g  pwpwpwpw g  default-record-printer     rvxz  g  set-struct-vtable-name!     g  vtable-offset-user     g  %lexical-environment?-procedure g  lexical-environment? 01  g  m-3348ed57c594e3-1a 6  g  t-3348ed57c594e3-19     f  l-3348ed57c594e3-1f   8  f  l-3348ed57c594e3-1c   8G  ELEEEEUcim  34p  g  obj g  t-1e8ba8b5a-224 g  t-1e8ba8b5a-21e g  t-1e8ba8b5a-21f g  t-1e8ba8b5a-220 g  t-1e8ba8b5a-223 g  t-1e8ba8b5a-222 g  t-1e8ba8b5a-221   g  m-1e8ba8b5a-225 6    f  l-1e8ba8b5a-229 f  l-1e8ba8b5a-22a f  l-1e8ba8b5a-22b f  l-1e8ba8b5a-22c f  l-1e8ba8b5a-22d f  l-1e8ba8b5a-22e f  l-1e8ba8b5a-22f  8  g  	copier-id f  l-1e8ba8b5a-21c 8j g  	ctor-name 	f  l-1e8ba8b5a-214
	 8j
  f  l-1e8ba8b5a-212 8j g  layout f  l-1e8ba8b5a-210 8j g  
immutable? f  l-1e8ba8b5a-20e 8j g  field-count f  l-1e8ba8b5a-20c 8j g  
getter-ids  !f  l-1e8ba8b5a-209"! #8 j" $g  	field-ids%$ &f  l-1e8ba8b5a-206'& (8%j' )g  predicate-name*g  
field-spec+)* ,PPPPPP -f  l-1e8ba8b5a-1f9.f  l-1e8ba8b5a-1fa/f  l-1e8ba8b5a-1fb0f  l-1e8ba8b5a-1fc1f  l-1e8ba8b5a-1fd2f  l-1e8ba8b5a-1fe3-./012 48+,3 5ELEEEEEEEEEEE#E(4 635p 76 8g  and9385p :g  struct?;3:5p <;6 =g  eq?>3=5p ?g  struct-vtable@3?5p A@6 BPE C3&Bt D>AC E9<D F7E GPE H3Gt Ig  throw-bad-structJI KI Lg  lexenv-scopeMg  %lexenv-scope-procedureNg  free-idOg  
%%on-errorPg  m-3348ed57c594e3-26QP6 RQ Sf  l-3348ed57c594e3-28TS U8GRT VQEULEEEEUcim W3OVp XNW YX1 Zg  %%type[g  t-1e8ba8b5a-14b\g  t-1e8ba8b5a-14c]g  t-1e8ba8b5a-14d^g  t-1e8ba8b5a-14e_g  t-1e8ba8b5a-14f`g  t-1e8ba8b5a-150ag  t-1e8ba8b5a-151b[\]^_`a cg  m-1e8ba8b5a-152dc6 eddddddd ff  l-1e8ba8b5a-156gf  l-1e8ba8b5a-157hf  l-1e8ba8b5a-158if  l-1e8ba8b5a-159jf  l-1e8ba8b5a-15akf  l-1e8ba8b5a-15blf  l-1e8ba8b5a-15cmfghijkl n8bem og  getterpg  indexqop rf  l-1e8ba8b5a-149sf  l-1e8ba8b5a-14atrs u8qQt v wPPP xf  l-1e8ba8b5a-144yf  l-1e8ba8b5a-145zf  l-1e8ba8b5a-146{xyz |8vw{ }EULEnEEEuE| ~3Z}p N~ 0Y1 g  ckg  errg  s QQ f  l-3348ed57c594e3-2bf  l-3348ed57c594e3-2c 8 QEULEEEEUcim 3p g  quote3p PEU 3&t   g  %%index3}p N 0Y1 f  l-3348ed57c594e3-30f  l-3348ed57c594e3-31 8 QEULEEEEUcim 3p 3p EU 3
t   g  %%copier3}p N 0Y1 f  l-3348ed57c594e3-35f  l-3348ed57c594e3-36 8 QEULEEEEUcim 3p 3p g  %%%lexical-environment-type-set-fieldsPEU 3t   g  t-3348ed57c594e3-25 f  l-3348ed57c594e3-3a 8R QEULEEEEUcim 34p EULEnEEEuE| 3p  g  if3p 3=p 3?p  PEU 3&t  g  
struct-ref3p EU 3
t  3Ip 3p 3Lt     PEU 3Mt g  lexenv-wrapperg  %lexenv-wrapper-procedureg  m-3348ed57c594e3-416  f  l-3348ed57c594e3-43 8G ELEEEEUcim 3Op N 1 ELEnEEEuE| 3Zp N 01  f  l-3348ed57c594e3-46f  l-3348ed57c594e3-47 8 ELEEEEUcim 3p 3p PE 3&t   3p N 01 f  l-3348ed57c594e3-4bf  l-3348ed57c594e3-4c 8 ELEEEEUcim 3p 3p E 3t   3p N 01 f  l-3348ed57c594e3-50f  l-3348ed57c594e3-51  8  ELEEEEUcim 3p 3p PE 3t   	g  t-3348ed57c594e3-40
	 f  l-3348ed57c594e3-55 8
 ELEEEEUcim 34p ELEnEEEuE| 3p  3p 3=p 3?p  PE 3&t  3p E 3t  3Ip 3p  3t !  "! #" $# %PE &3%t 'g  lexenv-boxes(g  %lexenv-boxes-procedure)g  m-3348ed57c594e3-5c*)6 +* ,f  l-3348ed57c594e3-5e-, .8G+- /*E.LEEEEUcim 03O/p 1N0 211 3E.LEnEEEuE| 43Z3p 5N4 60251 7** 8f  l-3348ed57c594e3-619f  l-3348ed57c594e3-62:89 ;87: <*;E.LEEEEUcim =3<p >3<p ?P;E. @3&?t A>@ BA C33p DNC E02D1 Ff  l-3348ed57c594e3-66Gf  l-3348ed57c594e3-67HFG I87H J*IE.LEEEEUcim K3Jp L3Jp MIE. N3	Mt OLN PO Q33p RNQ S02R1 Tf  l-3348ed57c594e3-6bUf  l-3348ed57c594e3-6cVTU W87V X*WE.LEEEEUcim Y3Xp Z3Xp [PWE. \3[t ]Z\ ^] _g  t-3348ed57c594e3-5b`_ af  l-3348ed57c594e3-70ba c8`+b d*cE.LEEEEUcim e34dp fcE.LEnEEEuE| g3fp hg i3fp j3=fp k3?fp lkg mPcE. n3&mt ojln p3fp qcE. r3	qt spgr t3Ifp u3fp v3'mt wuv xtgw yiosx zehy {PE. |3({t }g  lexenv-patterns~g  %lexenv-patterns-procedureg  m-3348ed57c594e3-776  f  l-3348ed57c594e3-79 8G ELEEEEUcim 3Op N 1 ELEnEEEuE| 3Zp N 01  f  l-3348ed57c594e3-7cf  l-3348ed57c594e3-7d 8 ELEEEEUcim 3p 3p PE 3&t   3p N 01 f  l-3348ed57c594e3-81f  l-3348ed57c594e3-82 8 ELEEEEUcim 3p 3p E 3	t   3p N 01 f  l-3348ed57c594e3-86f  l-3348ed57c594e3-87 8 ELEEEEUcim 3p 3p PE 3t   g  t-3348ed57c594e3-76 f  l-3348ed57c594e3-8b 8 ELEEEEUcim 34p ELEnEEEuE| 3p  3p 3=p 3?p  PE 3&t  3p E 3	t  3Ip 3p 3}t     PE 3~t g  each11  1Ռ1֌1׌g  %%set-fieldsg  dummyg  check?g  expro g  m-3348ed57c594e3-926  f  l-3348ed57c594e3-97f  l-3348ed57c594e3-98f  l-3348ed57c594e3-99f  l-3348ed57c594e3-9af  l-3348ed57c594e3-9b 8  f  l-3348ed57c594e3-94 8G g  t-1e8ba8b5a-16ag  t-1e8ba8b5a-16cg  t-1e8ba8b5a-16b g  m-1e8ba8b5a-16d6  f  l-1e8ba8b5a-171f  l-1e8ba8b5a-172f  l-1e8ba8b5a-173 8 f  l-1e8ba8b5a-167f  l-1e8ba8b5a-168f  l-1e8ba8b5a-169 8vw ELEEEE 3p PE  3&t 3Lt 3t 3't 3}t  g  map  	g  list
g  set-record-type-printer!f  '#<lexical-environment ~S (~S bindings)>g  syntax-moduleg  lengthg  syntax-object-ofg  datum->syntaxg  t-3348ed57c594e3-cd g  m-3348ed57c594e3-ce6  f  l-3348ed57c594e3-d1 8 f  l-3348ed57c594e3-cb 8Gj  f  l-3348ed57c594e3-c8 8j PEE  3t !g  make-box"g  case-lambda#g  v$# %g  m-3348ed57c594e3-d4&%6 '&P (f  l-3348ed57c594e3-d9)f  l-3348ed57c594e3-da*() +8$'* ,& -f  l-3348ed57c594e3-d6.- /8G,. 0P+E/ 13"0t 23F0t 32 4g  set!5340t 6g  set-procedure-property!7g  identifier-syntax-box8g  make-transformer-from-box9g  identifier-syntax-from-box:g  box;: <g  m-3348ed57c594e3-e2=<6 >=P ?f  l-3348ed57c594e3-e7@f  l-3348ed57c594e3-e8A?@ B8;>A C= Df  l-3348ed57c594e3-e4ED F8GCE GPBEF H38Gt I3Gt Jg  identifier-syntaxK3JGt Lg  idM3LGt N34Gt O3FGt PNMO QO Rg  make-variable-transformerSf  1unsupported binding captured by (the-environment)Tg  unsupported-bindingUg  ...Vg  t-3348ed57c594e3-f9WV Xg  m-3348ed57c594e3-faYX6 ZY [f  l-3348ed57c594e3-fd\[ ]8WZ\ ^g  loop_g  n`^_ af  l-3348ed57c594e3-f3bf  l-3348ed57c594e3-f4cf  l-3348ed57c594e3-f5dabc e8`wd fg  lvlgLf hf  l-3348ed57c594e3-f1if  l-3348ed57c594e3-f2jhi k8gQj lPE]EeEk m3Ult nm og  within-nested-ellipsespg  syntax-local-bindingqg  lexicalrg  or-mapsg  bound-identifier=?tg  hereug  mktmpvu wf  l-3348ed57c594e3-101xw y8vfx zg  ids{z |f  l-3348ed57c594e3-100}| ~8{j} PEy~ 3tt g  gensymf  t g  t-3348ed57c594e3-11f g  m-3348ed57c594e3-1206  f  l-3348ed57c594e3-123 8 g  t f  l-3348ed57c594e3-11d 8j V g  m-3348ed57c594e3-1186  f  l-3348ed57c594e3-119 8 g  typeg  val f  l-3348ed57c594e3-116f  l-3348ed57c594e3-117 8Q Lz f  l-3348ed57c594e3-110f  l-3348ed57c594e3-111 8Q g  lpg  captureg  wrapperszYz f  l-3348ed57c594e3-103f  l-3348ed57c594e3-104f  l-3348ed57c594e3-105f  l-3348ed57c594e3-106f  l-3348ed57c594e3-107f  l-3348ed57c594e3-108 8, PEEEEEEEEy~ 3!t 111 g  
let-syntaxg  t-3348ed57c594e3-128g  t-3348ed57c594e3-127g  t-3348ed57c594e3-129 g  m-3348ed57c594e3-12a6  f  l-3348ed57c594e3-12ef  l-3348ed57c594e3-12ff  l-3348ed57c594e3-130 8 f  l-3348ed57c594e3-126 8Gj PEEEEEEEEEEEy~ 3t 39t g  displaced-lexicalg  procedure-propertyg  t-3348ed57c594e3-139g  t-3348ed57c594e3-138g  t-3348ed57c594e3-13a g  m-3348ed57c594e3-13b6  f  l-3348ed57c594e3-13ff  l-3348ed57c594e3-140f  l-3348ed57c594e3-141 8 f  l-3348ed57c594e3-137 8Gj g  b f  l-3348ed57c594e3-134 8j PEEEEEEEEEEEy~ 3t 39t g  t-3348ed57c594e3-148g  t-3348ed57c594e3-147g  t-3348ed57c594e3-149 g  m-3348ed57c594e3-14a6  f  l-3348ed57c594e3-14ef  l-3348ed57c594e3-14ff  l-3348ed57c594e3-150 8 f  l-3348ed57c594e3-146 8Gj PEEEEEEEEEEEy~ 3t 3Tt 3t g  pattern-variablef  p g  with-syntaxg  t-3348ed57c594e3-15bg  t-3348ed57c594e3-15ag  t-3348ed57c594e3-15c g  m-3348ed57c594e3-15d6  f  l-3348ed57c594e3-161f  l-3348ed57c594e3-162f  l-3348ed57c594e3-163 8  f  l-3348ed57c594e3-159  8Gj g  nested f  l-3348ed57c594e3-154f  l-3348ed57c594e3-155 8Q 	PEEEEEEEEEEEy~ 
3	t 3	t PEEEEEEEy~ 3tt g  syntax->datumg  ellipsisg  with-ellipsisg  t-3348ed57c594e3-16ag  t-3348ed57c594e3-169 g  m-3348ed57c594e3-16b6  f  l-3348ed57c594e3-16ff  l-3348ed57c594e3-170 8 f  l-3348ed57c594e3-168 8Gj PEEEEEEEEEEy~ 3t  g  error!f  what"g  analyze-identifiers#1 $g   syntax-locally-bound-identifiers%g  begin&g  wrap-expression'& (f  l-3348ed57c594e3-186)( *8'f) +Yz ,f  l-3348ed57c594e3-182-f  l-3348ed57c594e3-183.f  l-3348ed57c594e3-184/f  l-3348ed57c594e3-1850,-./ 18+0 2 r 3f  l-3348ed57c594e3-17a4f  l-3348ed57c594e3-17b534 682Q5 7f  l-3348ed57c594e3-17487 98Gj8 :P**16E9 ;3%:t <3:t =g  exp>3=:t ?;<> @ A@1 Bg  fCg  cDg  pnameEg  plvlFg  pformalGg  wrappedHBCDEFG If  l-3348ed57c594e3-193Jf  l-3348ed57c594e3-194Kf  l-3348ed57c594e3-195Lf  l-3348ed57c594e3-196Mf  l-3348ed57c594e3-197Nf  l-3348ed57c594e3-198OIJKLMN P8H,O QPEP**16E9 	R3+Qt S3Qt T34Qt U3=Qt V3Qt WUU X3	Qt Y3Qt Zg  module?[f  invalid lexical environment\g  resolve-module]g  
env-module^g  	env-boxes_g  t-3348ed57c594e3-1d7`_ ag  m-3348ed57c594e3-1d8ba6 cb df  l-3348ed57c594e3-1dbed f8`ce gg  ehFg if  l-3348ed57c594e3-1bejf  l-3348ed57c594e3-1bfkij l8hQk mPEfEEl n34mt o3mt pg  
local-wrapqg  evalrg  optsSsr	ts ug  envSvg  fromSwg  schemeC 5       h0B     ]4	
"5 4% >  "  G   &      h      ]  C       g  scope
		 g  wrapper		 g  boxes			 g  patterns			  g  filenamef  ice-9/local-eval.scm
	
 			  g  nameg  #%make-lexical-environment-procedure C'R4*+,/2   h      ]  C       g  t-3348ed57c594e3-3
		 g  t-3348ed57c594e3-4		 g  t-3348ed57c594e3-5			 g  t-3348ed57c594e3-6			  			   C+  h   W   ]L 6    O       g  a
		  g  filenamef  ice-9/local-eval.scm		
 		   C0 h   G   ] L 6?       g  filenamef  ice-9/local-eval.scm		
 		
   C   h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/local-eval.scm
	
 		n   C5+R&֨  4 &>  "  G   	ܖ'i  &R&     h      ] $   CC      |       g  obj
		  g  filenamef  ice-9/local-eval.scm
	
 		  g  nameg  %lexical-environment?-procedure CR4*,/F      h   ;   ]  C      3       g  t-3348ed57c594e3-19
		
  		
   C h   W   ]L 6    O       g  a
		  g  filenamef  ice-9/local-eval.scm		
 		   C0 h   G   ] L 6?       g  filenamef  ice-9/local-eval.scm		
 		
   CH  h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/local-eval.scm
	
 		n   C5R&KL       h   z   ] &   
C 6r       g  s
		  g  filenamef  ice-9/local-eval.scm
	
 		  g  nameg  %lexenv-scope-procedure CMR4*L,/  h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   ;   ]  C      3       g  t-3348ed57c594e3-25
		
  		
   CL        h   W   ]L 6    O       g  a
		  g  filenamef  ice-9/local-eval.scm		
 		   C0 h   G   ] L 6?       g  filenamef  ice-9/local-eval.scm		
 		
   C  h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/local-eval.scm
	
 	    C5LR&K  h   |   ] &   C 6t       g  s
		  g  filenamef  ice-9/local-eval.scm
	
 		  g  nameg  %lexenv-wrapper-procedure CR4*,/        h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C$     h   ;   ]  C      3       g  t-3348ed57c594e3-40
		
  		
   C        h   W   ]L 6    O       g  a
		  g  filenamef  ice-9/local-eval.scm		
 		   C0 h   G   ] L 6?       g  filenamef  ice-9/local-eval.scm		
 		
   C&  h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/local-eval.scm
	
 	    C5R&K'  h    z   ] &   	C 6       r       g  s
		  g  filenamef  ice-9/local-eval.scm
	
 		  g  nameg  %lexenv-boxes-procedure C(R4*',/6=B  h   :   ]C     2       g  err
		 g  s		  			   CEKP h   :   ]C     2       g  err
		 g  s		  			   CSY^ h   :   ]C     2       g  err
		 g  s		  			   Cz     h   ;   ]  C      3       g  t-3348ed57c594e3-5b
		
  		
   C'        h   W   ]L 6    O       g  a
		  g  filenamef  ice-9/local-eval.scm		
 		   C0 h   G   ] L 6?       g  filenamef  ice-9/local-eval.scm		
 		
   C|  h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/local-eval.scm
	
 	    C5'R&K}  h    }   ] &   	C 6       u       g  s
		  g  filenamef  ice-9/local-eval.scm
	
 		  g  nameg  %lexenv-patterns-procedure C~R4*},/       h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   ;   ]  C      3       g  t-3348ed57c594e3-76
		
  		
   C}        h   W   ]L 6    O       g  a
		  g  filenamef  ice-9/local-eval.scm		
 		   C0 h   G   ] L 6?       g  filenamef  ice-9/local-eval.scm		
 		
   C  h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/local-eval.scm
	
 	    C5}R4*,/ 	     h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/local-eval.scm
	
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R4
i&i&KL'} 
hp      ]4 &   
"  	4 554 &  	 	"  	4 554 &  	 	"  	4 	556             g  e
		j g  port		j  g  filenamef  ice-9/local-eval.scm
	$		%				&			&		'	&		(	'		-	'		G	'		H	'	(	M	'	0	g	'	(	h	'		j	%	 		j	   C>  "  G  4*,/     h   p   ]	4  5 C   h       g  x
		 g  tmp		  g  filenamef  ice-9/local-eval.scm		,			,	 		   C h(   j   ]	4 5$  @ 6      b       g  form
		" g  tmp		"  g  filenamef  ice-9/local-eval.scm
	*	 		"   C5R4*!,/135     h    <   ]   C     4       g  dummy
		 g  v		  			   C     h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/local-eval.scm
	.
 		"  g  
macro-typeg  syntax-rulesg  patternsg  v   C5!R67    h       ]4 >  "  G  C            g  id
		 g  trans		  g  filenamef  ice-9/local-eval.scm
	3
		4				4	!		4	 			  g  nameg  make-transformer-from-box C8R4*9,/HIKMPQ        h(   >   ]      C6       g  dummy
		( g  box		(  		(	   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/local-eval.scm
	7
 		"  g  
macro-typeg  syntax-rulesg  patternsg  box   C59RRS     h   o   ] 6    g       g  x
		  g  filenamef  ice-9/local-eval.scm
	?			A			B			@	 		   C      h      ]6y       g  name
		  g  filenamef  ice-9/local-eval.scm
	=
		>	 		  g  nameg  unsupported-binding CTRn    h0      ]"  
$  C" "          g  id
		- g  lvl		- g  s			! g  n			!  g  filenamef  ice-9/local-eval.scm
	E
		F				G			G			I	 	!	I		!	F	 		-	  g  nameg  within-nested-ellipses CoRpqrs h   a   ] L 6      Y       g  x
		
  g  filenamef  ice-9/local-eval.scm
 		
 	' 		
   C/        h       ]     C       x       g  t-3348ed57c594e3-128
		 g  t-3348ed57c594e3-127		 g  t-3348ed57c594e3-129			  			   C h0      ]L L  45$  @6   z       g  x
		- g  tmp		- g  tmp			-  g  filenamef  ice-9/local-eval.scm
 		 	" 		-   C,7/   h       ]     C       x       g  t-3348ed57c594e3-139
		 g  t-3348ed57c594e3-138		 g  t-3348ed57c594e3-13a			  			   C h0      ]L L  45$  @6   z       g  x
		- g  tmp		- g  tmp			-  g  filenamef  ice-9/local-eval.scm
 		 	" 		-   C/   h       ]      C  x       g  t-3348ed57c594e3-148
		 g  t-3348ed57c594e3-147		 g  t-3348ed57c594e3-149			  			   C h0      ]L L   45$  @6   z       g  x
		- g  tmp		- g  tmp			-  g  filenamef  ice-9/local-eval.scm
 		 	" 		-   Co/
     h       ]     C       x       g  t-3348ed57c594e3-15b
		 g  t-3348ed57c594e3-15a		 g  t-3348ed57c594e3-15c			  			   C h0      ]L L  45$  @6   z       g  x
		- g  tmp		- g  tmp			-  g  filenamef  ice-9/local-eval.scm
 		 	 		-   C/        h   ^   ]  C    V       g  t-3348ed57c594e3-16a
		 g  t-3348ed57c594e3-169		  			   C   h0      ]L   45$  @6     z       g  x
		+ g  tmp			+ g  tmp			+  g  filenamef  ice-9/local-eval.scm
 			 	 		+   C !     h    ]5 (  
D  4>  G $  g4O 5$   "4455		 	
	O  "d$   "C$  Y45		$  (			O  "O  "$  U445545
		
O 4455	  "$   O  "Z6            g  ids
	 g  capture	 g  formals		 g  wrappers		 g  patterns		 g  id		 g  ids		 g  type		' g  val		' g  t			o  g  b		 ! g  t		B g  nested	
B  g  filenamef  ice-9/local-eval.scm
 		 		 		 		 	 	 		 	%	* 		7 		8 		I 		a 		b 		g 		k 	"	m 		o 		o 		} 	  	  	  	  	  	  	  	  	0  	  	  	  	  	.  	 	 	! 	* 	+ 	0 	*4 	26 	*8 	9 	@ 	8B 	B 	X 	Y 	!^ 	7f 	!i 	!n 	q 	 	 	 	 	 	 	 <		  g  nameg  lp C      h       ]	O Q  6              g  ids
		 g  lp	
	  g  filenamef  ice-9/local-eval.scm
	~
	
 		 		 	,	 	;	 	J	 	 		  g  nameg  analyze-identifiers C"R4* ,/#h   7   ]   C      /       g  the-environment
		
  		
   C"$     h0      ]"  (  C45" L "         g  x
		. g  x		" g  wrappers			"  g  filenamef  ice-9/local-eval.scm
 		 		 		 		 		 		 	*	" 		" 	 
		.  g  nameg  wrap-expression C?/ARSTUVW	XXYS       h      ]    C~       g  tmp-3348ed57c594e3-1a5
		 g  tmp-3348ed57c594e3-1a4		 g  tmp-3348ed57c594e3-1a3			  			   C       hP      ]L  45     		4
5 C        g  f
		O g  c		O g  pname			O g  plvl			O g  pformal			O g  wrapped			O  		O	   C 
 hh   <  ]:445>  G O Q 45 45$  O @	6       4      g  the-environment
		a g  scope		a g  capture			a g  formals			a g  wrappers			a g  patterns			a g  wrap-expression		%	a g  tmp		:	a g  tmp		E	a  	g  filenamef  ice-9/local-eval.scm	 		 		 		 		1 	"	: 	 		a	   C     h@   y   ]4 5$  @4 5$  @ 6       q       g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  ice-9/local-eval.scm
 	 		9   C5 RZ [&\     hH      ]"  4 5$   C 6 $   &  4 
56""              g  e
		A  g  filenamef  ice-9/local-eval.scm
 
	 		 		 		 			 		 		# 		& 		/ 	-	5 	<	7 	-	9 	 		A  g  nameg  
env-module C]RZ [&   h@      ]"  4 5$  C 6 $   &   	C""              g  e
		9  g  filenamef  ice-9/local-eval.scm
 
	 		 		 		 		 			 		 		" 		% 		0 	 		9  g  nameg  	env-boxes C^RZno [&o   h(      ]   456            g  l
		# g  name		# g  lvl			# g  scope			#  g  filenamef  ice-9/local-eval.scm
 		 		 		 		 		 	,	# 	 		#   C 
 h`     ]"  45$    C6$  *&  4
 54		5@""             g  x
		Y g  e		Y  g  filenamef  ice-9/local-eval.scm
 
	 		 		  		$ 			$ 		' 		+ 		. 		8 		9 		? 		C 		D 		M 		O 		Q 	 		Y	  g  nameg  
local-wrap CpRqp]^       h      ]44 545545@      g  x
		  g  e		   g  filenamef  ice-9/local-eval.scm
 
	 			 		 	 	 			 			  	 		 	  g  nameg  
local-evalg  documentationf  GEvaluate the expression @var{x} within the lexical environment @var{e}. CRtpu]vwr^ 
      hH   U  - /   0   3 #  44 54554	5@    M      g  x
		D g  e		D g  opts			D  g  filenamef  ice-9/local-eval.scm
 
	 	(	 			  		+ 	)	5 		; 			< 			D 	 
		D	
g  optsS	   g  nameg  local-compileg  documentationf  SCompile and evaluate the expression @var{x} within the lexical
environment @var{e}. C!RC             g  m
		, g  rtd
:  g  filenamef  ice-9/local-eval.scm		
	
		"
"	3
$	=
%	E
41	~
;N 
<s 
?	 
@[ 
B( 
 	B*
   C6                                                                                                                                                                                                                                                                ccache/ice-9/networking.go                                                                          0000644                 00000021403 15154557173 0011413 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0"      ] 9 4     hh      ] g  gethost	g  gethostbyaddr	g  gethostbyname	g  getnet	g  getnetbyaddr	g  getnetbyname	g  getproto	g  getprotobyname		g  getprotobynumber	
g  getserv	g  getservbyname	g  getservbyport	g  sethost	g  
sethostent	g  setnet	g  	setnetent	g  setproto	g  setprotoent	g  setserv	g  
setservent	g  
gethostent	g  	getnetent	g  getprotoent	g  
getservent	g  
endhostent	g  	endnetent	g  endprotoent	g  
endservent	g  hostent:name	g  hostent:aliases	g  hostent:addrtype	 g  hostent:length	!g  hostent:addr-list	"g  netent:name	#g  netent:aliases	$g  netent:addrtype	%g  
netent:net	&g  protoent:name	'g  protoent:aliases	(g  protoent:proto	)g  servent:name	*g  servent:aliases	+g  servent:port	,g  servent:proto	-g  sockaddr:fam	.g  sockaddr:path	/g  sockaddr:addr	0g  sockaddr:port	1g  sockaddr:flowinfo	2g  sockaddr:scopeid	3g  addrinfo:flags	4g  addrinfo:fam	5g  addrinfo:socktype	6g  addrinfo:protocol	7g  addrinfo:addr	8g  addrinfo:canonnameC 5   h`    ]         h   {   ] 6s       g  addr
		  g  filenamef  ice-9/networking.scm
	
			 		  g  nameg  gethostbyaddr CR    h   {   ] 6s       g  name
		  g  filenamef  ice-9/networking.scm
	
			 		  g  nameg  gethostbyname CR    h   z   ] 6r       g  addr
		  g  filenamef  ice-9/networking.scm
	
			 		  g  nameg  getnetbyaddr CR     h   z   ] 6r       g  name
		  g  filenamef  ice-9/networking.scm
	
			 		  g  nameg  getnetbyname CR     h   |   ] 6t       g  name
		  g  filenamef  ice-9/networking.scm
	
			 		  g  nameg  getprotobyname CR   h   ~   ] 6v       g  addr
		  g  filenamef  ice-9/networking.scm
	
			  		  g  nameg  getprotobynumber C	R
 h      ] 6             g  name
		
 g  proto		
  g  filenamef  ice-9/networking.scm
	
	
		# 		
	  g  nameg  getservbyname CR
 h      ] 6             g  port
		
 g  proto		
  g  filenamef  ice-9/networking.scm
	 
	
	 	# 		
	  g  nameg  getservbyport CR h       -  1  3  $   66           g  stayopen
			  g  filenamef  ice-9/networking.scm
	"
		#			#			$			$			%	 			


  g  nameg  
sethostent CR h       -  1  3  $   66           g  stayopen
			  g  filenamef  ice-9/networking.scm
	&
		'			'			(			(			)	 			


  g  nameg  	setnetent CR  h       -  1  3  $   66           g  stayopen
			  g  filenamef  ice-9/networking.scm
	*
		+			+			,			,			-	 			


  g  nameg  setprotoent CR        h       -  1  3  $   66           g  stayopen
			  g  filenamef  ice-9/networking.scm
	.
		/			/			0			0			1	 			


  g  nameg  
setservent CR h   e   ] 6   ]       g  filenamef  ice-9/networking.scm
	3
		3	 		
  g  nameg  
gethostent CR  h   d   ] 6   \       g  filenamef  ice-9/networking.scm
	4
		4	 		
  g  nameg  	getnetent CR   h   f   ] 6   ^       g  filenamef  ice-9/networking.scm
	5
		5	 		
  g  nameg  getprotoent CR
 h   e   ] 6   ]       g  filenamef  ice-9/networking.scm
	6
		6	 		
  g  nameg  
getservent CR  h   e   ] 6   ]       g  filenamef  ice-9/networking.scm
	8
		8	 		
  g  nameg  
endhostent CR  h   d   ] 6   \       g  filenamef  ice-9/networking.scm
	9
		9	 		
  g  nameg  	endnetent CR   h   f   ] 6   ^       g  filenamef  ice-9/networking.scm
	:
		:	 		
  g  nameg  endprotoent CR h   e   ] 6   ]       g  filenamef  ice-9/networking.scm
	;
		;	 		
  g  nameg  
endservent CR      h   y   ] 
C q       g  obj
		  g  filenamef  ice-9/networking.scm
	=
		=	 		  g  nameg  hostent:name CR  h   |   ] C t       g  obj
		  g  filenamef  ice-9/networking.scm
	>
		>	 		  g  nameg  hostent:aliases CR       h   }   ] 	Cu       g  obj
		  g  filenamef  ice-9/networking.scm
	?
		?	 		  g  nameg  hostent:addrtype CR      h   {   ] 	Cs       g  obj
		  g  filenamef  ice-9/networking.scm
	@
		@	 		  g  nameg  hostent:length C Rh   ~   ] 	Cv       g  obj
		  g  filenamef  ice-9/networking.scm
	A
		A	  		  g  nameg  hostent:addr-list C!R     h   x   ] 
C p       g  obj
		  g  filenamef  ice-9/networking.scm
	C
		C	 		  g  nameg  netent:name C"R   h   {   ] C s       g  obj
		  g  filenamef  ice-9/networking.scm
	D
		D	 		  g  nameg  netent:aliases C#Rh   |   ] 	Ct       g  obj
		  g  filenamef  ice-9/networking.scm
	E
		E	 		  g  nameg  netent:addrtype C$R       h   w   ] 	Co       g  obj
		  g  filenamef  ice-9/networking.scm
	F
		F	 		  g  nameg  
netent:net C%R    h   z   ] 
C r       g  obj
		  g  filenamef  ice-9/networking.scm
	H
		H	 		  g  nameg  protoent:name C&R h   }   ] C u       g  obj
		  g  filenamef  ice-9/networking.scm
	I
		I	 		  g  nameg  protoent:aliases C'R      h   {   ] 	Cs       g  obj
		  g  filenamef  ice-9/networking.scm
	J
		J	 		  g  nameg  protoent:proto C(Rh   y   ] 
C q       g  obj
		  g  filenamef  ice-9/networking.scm
	L
		L	 		  g  nameg  servent:name C)R  h   |   ] C t       g  obj
		  g  filenamef  ice-9/networking.scm
	M
		M	 		  g  nameg  servent:aliases C*R       h   y   ] 	Cq       g  obj
		  g  filenamef  ice-9/networking.scm
	N
		N	 		  g  nameg  servent:port C+R  h   z   ] 	Cr       g  obj
		  g  filenamef  ice-9/networking.scm
	O
		O	 		  g  nameg  servent:proto C,R h   y   ] 
C q       g  obj
		  g  filenamef  ice-9/networking.scm
	Q
		Q	 		  g  nameg  sockaddr:fam C-R  h   z   ] C r       g  obj
		  g  filenamef  ice-9/networking.scm
	R
		R	 		  g  nameg  sockaddr:path C.R h   z   ] C r       g  obj
		  g  filenamef  ice-9/networking.scm
	S
		S	 		  g  nameg  sockaddr:addr C/R h   z   ] 	Cr       g  obj
		  g  filenamef  ice-9/networking.scm
	T
		T	 		  g  nameg  sockaddr:port C0R h   ~   ] 	Cv       g  obj
		  g  filenamef  ice-9/networking.scm
	U
		U	  		  g  nameg  sockaddr:flowinfo C1R     h   }   ] 	Cu       g  obj
		  g  filenamef  ice-9/networking.scm
	V
		V	 		  g  nameg  sockaddr:scopeid C2R      h   {   ] 
C s       g  obj
		  g  filenamef  ice-9/networking.scm
	X
		X	 		  g  nameg  addrinfo:flags C3Rh   y   ] C q       g  obj
		  g  filenamef  ice-9/networking.scm
	Y
		Y	 		  g  nameg  addrinfo:fam C4R  h   ~   ] 	Cv       g  obj
		  g  filenamef  ice-9/networking.scm
	Z
		Z	  		  g  nameg  addrinfo:socktype C5R     h   ~   ] 	Cv       g  obj
		  g  filenamef  ice-9/networking.scm
	[
		[	  		  g  nameg  addrinfo:protocol C6R     h   z   ] 	Cr       g  obj
		  g  filenamef  ice-9/networking.scm
	\
		\	 		  g  nameg  addrinfo:addr C7R h      ] 	Cw       g  obj
		  g  filenamef  ice-9/networking.scm
	]
		]	! 		  g  nameg  addrinfo:canonname C8RC          g  filenamef  ice-9/networking.scm 	
6	
	
e	
	
	
I	
	 
	"
	&
j	*
A	.
	3
	?	4
		5

@	6

	8
?	9
	:
@	;
	=
g	>
 	?
	@
)	A
	C
N	D
	E
r	F
	H
	I
.	J
	L
O	M
	N
u	O
	Q
	R
%	S
	T
I	U
	V
v	X
	Y
	Z
1	[
	\
Z	]
 1	\
   C6                                                                                                                                                                                                                                                              ccache/ice-9/q.go                                                                                   0000644                 00000006304 15154557173 0007467 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] " 4    h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  q	 		g  filenameS	
f  ice-9/q.scm	g  exportsS	g  sync-q!	g  make-q	g  q?	g  q-empty?	g  q-empty-check	g  q-front	g  q-rear	g  	q-remove!	g  q-push!	g  enq!	g  q-pop!	g  deq!	g  q-length	 	g  set-current-module	 	 	g  	last-pair	g  throw	g  q-empty	 g  delq!	!g  lengthC 5    h	     ]4	
5 4 >  "  G     h       ]  $  4 5"   C          g  q
		  g  filenamef  ice-9/q.scm
	E
		F			F			F			F	"		F	-		F	"		F	 			  g  nameg  sync-q! CR  h   `   ] C  X       g  filenamef  ice-9/q.scm
	M
		M			M	 		
  g  nameg  make-q CR       h0      ] $  # $   4 5C (   CCC         g  obj
		.  g  filenamef  ice-9/q.scm
	U
		V				V			W			W			W			X			X			X	%		X			X		!	Y		%	Y		(	Z		)	Z	 		.  g  nameg  q? CR     h   t   ] C l       g  obj
		  g  filenamef  ice-9/q.scm
	^
		^			^	 		  g  nameg  q-empty? CR       h      ]4 5$   6C        g  q
		  g  filenamef  ice-9/q.scm
	b
		b			b			b	2		b	+ 		  g  nameg  q-empty-check CR        h    q   ]4 >  "  G   C       i       g  q
		  g  filenamef  ice-9/q.scm
	f
		f			f	& 		  g  nameg  q-front CR      h    p   ]4 >  "  G   C       h       g  q
		  g  filenamef  ice-9/q.scm
	j
		j			j	% 		  g  nameg  q-rear CR      h      ] 4 5 6          g  q
		 g  obj		  g  filenamef  ice-9/q.scm
	n
		o			o			o			o			p	 			  g  nameg  	q-remove! CR       h0      ]   $  "    C           g  q
		, g  obj		, g  h			) g  t			&  g  filenamef  ice-9/q.scm
	t
		u			u			u			v			w			w		#	w	 			,	  g  nameg  q-push! CR   h0      ]
  (  	 "     C             g  q
		* g  obj		* g  h			'  g  filenamef  ice-9/q.scm
	|
		}			}			~			~					 		 		$ 	 
		*	  g  nameg  enq! CR      h8      ]4 >  "  G    (   "    C         g  q
		6 g  it		6 g  next			6  g  filenamef  ice-9/q.scm
 
	 		 		 		 		& 		* 		3 	 			6  g  nameg  q-pop! CRiR!       h   u   ] 6       m       g  q
			  g  filenamef  ice-9/q.scm
 
	 			 	 			  g  nameg  q-length CRC             g  m
		(  g  filenamef  ice-9/q.scm		:
 	E
k	M
	U
	^
	b
t	f
	j
	n
	t
	|
	 
	 
	 
 		
   C6                                                                                                                                                                                                                                                                                                                             ccache/ice-9/runq.go                                                                                0000644                 00000014710 15154557173 0010214 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] 4 4  h9      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  runq	 		g  filenameS	
f  ice-9/runq.scm	g  importsS	g  q	 	 	 	g  exportsS	g  runq-control	g  make-void-runq	g  make-fair-runq	g  make-exclusive-runq	g  make-subordinate-runq-to	g  strip-sequence	g  fair-strip-subtask	 	g  set-current-module	 	 	g  add!	g  for-each	g  enq!	g  *unspecified*	 g  enqueue!	!g  push!	"g  q-push!	#g  empty?	$g  q-empty?	%g  length	&g  q-length	'g  kill!	(g  make-q	)g  throw	*g  not-understood	+g  catch	,g  warn	-g  
runq-strip	.g  	run-strip	/g  apply-to-args	0g  deq!	1g  
procedure?	2g  suspend	3g  applyC 5  h     ]4	
5 4 >  "  G    h   Y   ]M  6      Q       g  t
		
  g  filenamef  ice-9/runq.scm
	I	*	
	I	6 		
   C      h   Y   ]M  6      Q       g  t
		
  g  filenamef  ice-9/runq.scm
	J	*	
	J	6 		
   C!"       h   Y   ]M  6      Q       g  t
		
  g  filenamef  ice-9/runq.scm
	K	*	
	K	6 		
   C#$%&'()*    h   ,  - 1 3  H $  4 O >  "  G  C$  4 O >  "  G  C$  4 O >  "  G  C	$  
J 6$  J 6$  	45 K C6  $      g  q
	  g  msg	  g  args		   g  filenamef  ice-9/runq.scm
	G
		H			I	 	1	I	H	;	H		<	J	 	V	J	H	`	H		a	K	 	{	K	K 	H	 	L	  	H	 	M	  	H	 	N	( 	N	  	O	' 	O	  		 	
	  g  nameg  runq-control CR+,-      h(   m   -  1  3 4L  >  "  G  C       e       g  ign
			!  g  filenamef  ice-9/runq.scm
	Q	*	
	Q	6		Q	<		Q	6 			!


   C        h   r   ]  O 6j       g  thunk
		  g  filenamef  ice-9/runq.scm
	Q
		Q	 		  g  nameg  	run-strip C.R/% h   n   - 1 3  $  
CC  f       g  msg
			 g  args			  g  filenamef  ice-9/runq.scm
	]	
		^	 			
   C       h    f   -  1  3  $   6C       ^       g  opts
			  g  filenamef  ice-9/runq.scm
	Z			[			\	 			


   C       h   [   ] C   S       g  filenamef  ice-9/runq.scm
	Y
 		
  g  nameg  make-void-runq CR$01. h   l  -  1  3  $  M @4M5$  C4M545$  .45$  4M>  "  G  "   "  V$  O45$  4M>  "  G  "   (  "  4M>  "  G  "   L C d      g  ctl
		  g  
next-strip	+  g  k		?	b g  k		u   g  filenamef  ice-9/runq.scm
	p			q			r			s		"	s		%	t	)	+	t		.	v		8	u		9	v	A	?	v	8	G	w	:	H	w	A	i	x		m	u		n	x	7	s	x	B	u	x	7	u	x	.	}	y	0	~	y	7 	z	> 	z	. 	{	2 	{	: 	{	2 		 


  g  nameg  self C(       h(      ]H O  Q 45 K C         g  q
		& g  self		& g  q			#  g  filenamef  ice-9/runq.scm
	m
		n			n	 		&
  g  nameg  make-fair-runq CR$01." h     -  1  3  $  M @4M5$  C4M545$  .45$  4M>  "  G  "   "  V$  O45$  4M>  "  G  "   (  "  4M>  "  G  "   L C ~      g  ctl
		  g  
next-strip	+  g  k		?	b g  k		u   g  filenamef  ice-9/runq.scm
 		 		 		 		" 		% 	)	+ 		. 		8 		9 	A	? 	8	G 	:	H 	A	i 		m 		n 	7	s 	B	u 	7	u 	.	} 	0	~ 	7  	>  	.  	2  	=  	2 		 


  g  nameg  self C(     h(      ]H O  Q 45 K C         g  q
		& g  self		& g  q			#  g  filenamef  ice-9/runq.scm
 
	 		 	 		&
  g  nameg  make-exclusive-runq CR#% hH      ]4L5$  L C"  # 
$  C4L>   "  G    "4L5 "        g  n
		:  g  filenamef  ice-9/runq.scm
 		 		 	 		 		 		 		 		 		 		" 		4 	1	: 		; 		? 	(	A 		G 	 		G
   C2#     h   g  -  1  3  $  U $  LC4L ?L$  "  4L5$  LL4LL>  "  G  "   C4L5 4L >  "  G  C_      g  ctl
		  g  key		d g  answer		*	d g  answer	i   g  filenamef  ice-9/runq.scm
 		 		 		 		! 	0	$ 	>	* 	0	/ 	@	3 	6	9 	V	= 	b	? 	V	@ 	Q	D 	2	I 	8	J 	8	N 	G	U 	8	e 	"	i 		l 		p 		u 	 		 


  g  nameg  self C      h0      ]O O  Q C           g  superior-runq
		, g  
basic-runq		, g  	runq-task			, g  self			,  g  filenamef  ice-9/runq.scm
 
	 		 		 		 	 		,	  g  nameg  make-subordinate-runq-to CR h   ]   ] LL L6    U       g  filenamef  ice-9/runq.scm
 			 	-	
 	"	 	 		
   C h   T   ] LL 6       L       g  filenamef  ice-9/runq.scm
 		 	"		 	 			
   C h0      ]	 (  C4 5 $   L O C L O C         g  st
		. g  then		.  g  filenamef  ice-9/runq.scm
 		 		 		 		 		 		 	 		.  g  nameg  loop C  h       ]O   Q   M N 6        g  loop
	
	 g  a		  g  filenamef  ice-9/runq.scm
 		
 		 		 	%	 	 		
   C      h   s   -  1  3  H  O C   k       g  strips
		  g  filenamef  ice-9/runq.scm
 
 			


  g  nameg  strip-sequence CR3        h0      -  1  3 45 4 >  "  G  C              g  initial-strips
			) g  st		)  g  filenamef  ice-9/runq.scm
 
	
 		 		 		 		 	 			)


  g  nameg  fair-strip-subtask CRC       g  m
		,  g  filenamef  ice-9/runq.scm		0
	G
	Q
	Y
		m
 
Z 
~ 
 
 
	
   C6                                                         ccache/ice-9/scm-style-repl.go                                                                      0000644                 00000024671 15154557173 0012116 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0)      ] n 4        h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  scm-style-repl	 		g  filenameS	
f  ice-9/scm-style-repl.scm	g  importsS	g  
save-stack	 	 	 	g  exportsS	g  scm-repl-silent	g  scm-repl-print-unspecified	g  scm-repl-verbose	g  scm-repl-prompt	 	g  replacementsS	g  assert-repl-silence	g  assert-repl-print-unspecified	g  assert-repl-verbosity	g  default-pre-unwind-handler	g  	bad-throw	g  error-catching-loop	g  error-catching-repl	g  handle-system-error	 		 g  set-current-module	!  	"  	#f  guile> 	$g  symbol-property	%g  throw-handler-default	&g  error	'f  unhandled-exception:	(g  throw	)g  has-shown-debugger-hint?	*g  catch	+g  call-with-unblocked-asyncs	,g  quit	-g  switch-repl	.g  abort	/g  run-hook	0g  
abort-hook	1g  force-output	2g  current-output-port	3g  display	4f  ABORT: 	5g  current-error-port	6g  write	7g  newline	8g  memq	9g  	backtrace	:g  debug-options-interface	;g  stack?	<g  the-last-stack	=f  OType "(backtrace)" to get more information or "(debug)" to enter the debugger.
	>g  primitive-exit	?g  stack-saved?	@g  length	Ag  restore-signals	Bg  ensure-batch-mode!	Cg  batch-mode?	Dg  call-with-blocked-asyncs	Eg  for-each	Ff  ;;; 	Gg  inexact->exact	Hg  get-internal-run-time	Ig  internal-time-units-per-second	Jf  	  msec  (	Kg  gc-run-time	Lf   msec in gc)
	Mg  string?	Ng  thunk?	Of  > 	Pf   	Qg  repl-reader	Rg  eof-object?	Sg  after-read-hook	Tf  ;;; EOF -- quitting	Ug  before-print-hook	Vg  unspecified?	Wg  after-print-hook	Xf   ;;; QUIT executed, repl exitting	Yg  	peek-char	Zg  char=?	[g  	read-char	\g  before-eval-hook	]g  %start-stack	^] 	_] 	`g  
repl-stack	ag  primitive-eval	bg  after-eval-hook	cg  wrong-type-arg	dg  out-of-range	eg  list-ref	fg  before-backtrace-hook	gf  Backtrace:
	hg  display-backtrace	ig  after-backtrace-hook	jg  before-error-hook	kg  apply	lg  display-error	mg  after-error-hookC 5  hP     ]4	
5	 4" >  "  G   R      h      ]  Cz       g  v
		  g  filenamef  ice-9/scm-style-repl.scm
	'
		'	  		  g  nameg  assert-repl-silence CRR h      ]  C       g  v
		  g  filenamef  ice-9/scm-style-repl.scm
	*
		*	* 		  g  nameg  assert-repl-print-unspecified CRR       h      ]  C|       g  v
		  g  filenamef  ice-9/scm-style-repl.scm
	-
		-	" 		  g  nameg  assert-repl-verbosity CR#R$%&'        h@      - 1 3 4 5$  4 ?"  $  C @          g  key
			= g  args			= g  default			= g  t		(	=  g  filenamef  ice-9/scm-style-repl.scm
	9
	
	:			:	&		:			:			;			;		(	;		7	<		=	<	 			=
  g  nameg  	bad-throw CR(    h(      - 1 3 4	>  "  G   @            g  key
			# g  args			#  g  filenamef  ice-9/scm-style-repl.scm
	@
	
	B		#	C	 			#
  g  nameg  default-pre-unwind-handler CR)R*+  h8      ]4M>   "  G  N"  4L 5  "4L 5  "C              g  v
		$  g  filenamef  ice-9/scm-style-repl.scm
	R			S			Y			Z			[	!	$	[		$	Z		%	Z	'	/	Z	 
		1
   C  h   S   ] L LO 6 K       g  filenamef  ice-9/scm-style-repl.scm
	P			Q	 		
   C,-(./01234567)89:;<=>?    h     ] 4>  "  G  445 >  "  G  445 >  "  G  4L45 >  "  G  4	45 >  "  G  M $  x
$  "  445 5$  "  4[5$  34	45 >  "  G  445 >  "  G   
"   445 >  "  G  "  4>  "  G   Cy      g  filenamef  ice-9/scm-style-repl.scm
	k			l			m			m	)	!	m		*	n		.	n	$	/	n	/	8	n		A	o		F	o	'	O	o		X	p		[	p	$	d	p		r	q		x	s	%	~	u	+ 	u	1 	v	1 	u	+ 	s	% 	w	& 	s	! 	y	' 	y	0 	y	' 	z	' 	{	( 	|	( 	z	' 	}	' 	~	! 	~	/ 	~	!  	!  	 &	 
   C@     h    y   ] 4L5	$  L L@L L@q       g  filenamef  ice-9/scm-style-repl.scm
 		 	%	 	"	 		 	"	  	" 		 
   C    hH      - 1 3  $  NC $  @ $  
L O C O C         g  key
			F g  args			F  g  filenamef  ice-9/scm-style-repl.scm
	^			_			a		!	_		%	e	&	)	e		2	_	 			F
   C   h8      ]	 H 4L  O LLO 5$  H "MC            g  first
		3 g  next	 	3  g  filenamef  ice-9/scm-style-repl.scm
	L			N		 	M		( 		0 	 		3  g  nameg  loop CA       h   }   ] N 6        u       g  filenamef  ice-9/scm-style-repl.scm
 		 			 	 			
  g  nameg  ensure-batch-mode! CB       h   m   ] M C  e       g  filenamef  ice-9/scm-style-repl.scm
 		 	! 		
  g  nameg  batch-mode? CCD    h   L   ] C    D       g  filenamef  ice-9/scm-style-repl.scm
 	 		
   C h   U   ] L 6M       g  filenamef  ice-9/scm-style-repl.scm
 		 	 		
   C        h@      ]HHO  Q O  O  O 6            g  thunk
		; g  status		; g  interactive			; g  loop			;  g  filenamef  ice-9/scm-style-repl.scm
	I
		J		' 		0 		; 	 		;  g  nameg  error-catching-loop CRE     h       ]4L4L5 >  G L  6          g  
the-values
		  g  filenamef  ice-9/scm-style-repl.scm
 		 	"	 	%	 	"	 		 	 		
   C   h      ] O 6              g  r
		 g  e		 g  p			  g  filenamef  ice-9/scm-style-repl.scm
 
	 	 			  g  nameg  error-catching-repl CR3FGHIJKL 	     hx   <  ] 4>  "  G  4445 M5>  "  G  4>  "  G  4445 M 5>  "  G  6    4      g  filenamef  ice-9/scm-style-repl.scm
 		 		 	#	 		 		 	#	 	2	% 	/	( 	,	) 	$	+ 	#	0 		9 		= 	#	B 		K 		N 	$	T 	3	[ 	0	^ 	-	_ 	%	a 	$	f 		r 	#	t 	 		t
  g  nameg  repl-report CMNOPQR/SKH73T,        h     ]45$  "  "45$  	45 "  $  "   4 5  4 5$  "  4L>   "  G  4	>  "  G  4 5$  _4
5 N45 N $  64>   "  G  4>  "  G  4>   "  G  "   4
>  "  G  "    C             g  prompt
	5	A g  val
	A   g  filenamef  ice-9/scm-style-repl.scm
 		 	0	 	)	 	0	 	)	 	0	- 	)	/ 	@	5 	5	5 		8 		A 		D 		N 		S 		c 		u 		 	  	9  	'  	6  	'  	  	"  	"  	+  	"  	"  	 	 
  g  nameg  -read C/UV67W1    h      ]	$  C4 >  "  G  $  "  4 5$  &4 >  "  G  4>   "  G  "   4 >  "  G  	$  4L >   "  G  "   
6            g  result
	  g  t	 	8  g  filenamef  ice-9/scm-style-repl.scm
 		 		 		  	,	. 	5	5 	0	< 	(	= 	.	O 	.	c 		| 		} 	!  	 	    C3X7YRZ[      hh     ]45  4 5$  C4  5$  "  	4 	5$  4>   "  G  "4 
5$  6 C      g  ch
		h g  t		h g  t	$	=  g  filenamef  ice-9/scm-style-repl.scm
 		 		 		
 		 		 		$ 		2 	*	A 		B 		U 		V 		b 		f 	 		h
  g  nameg  consume-trailing-whitespace CKH/\_`a     h   U   ] L 6M       g  filenamef  ice-9/scm-style-repl.scm
 		 	, 		
   Cb 	     hP      ]	45 N45 N 4 >  "  G  4 O 54 >  "  G  C            g  sourc
		K g  val	2	K  g  filenamef  ice-9/scm-style-repl.scm
 		 	9		 	'	
 	6	 	'	 		% 		) 	,	2 		2 		5 	 		K  g  nameg  -eval C h     ]@HH O O O "  ?$  64>  "  G  4>   "  G  4>   "  G  "   CO  Q  Q Q Q K K4	
 O 5"o      g  start-gc-rt
	  g  start-rt	  g  args		'	f g  repl-report		n  g  -read		n  g  -print		n  g  consume-trailing-whitespace		n  g  start-gc-rt	   g  start-rt	   g  status	    
g  filenamef  ice-9/scm-style-repl.scm
 
	 		' 		- 		. 		2 	#	7 		@ 		P 		n 	  	  	 	 	 
  g  nameg  scm-style-repl CR5;<89:cde/f73ghijklm1(.    h0    - 1 3 45 4[5$  "  445 5$   &  "   $  4		5"  4
>  "  G  4>  "  G  4>  "  G  4[>  "  G  4>  "  G  4
>  "  G  "   4
>  "  G  4[>  "  G  4
>  "  G  4>  "  G   6       g  key
		/ g  args		/ g  cep		/ g  t		  g  
highlights		Y   g  filenamef  ice-9/scm-style-repl.scm

	
										&		*		+		1		5		9		.	=		!	>		%	F
	.	G
	%	K			L	!	Y	!	Y			\		n	 	 	 	 	 	 	 	 			+	/	 #		/
  g  nameg  handle-system-error CRC       g  m
		0  g  filenamef  ice-9/scm-style-repl.scm		
	4	&
 	'
 	)
	*
	,
'	-
)	/	,	/
|	9
a	@
e	G
:	I
 
 
N
 	P
   C6                                                                        ccache/ice-9/string-fun.go                                                                          0000644                 00000020622 15154557173 0011322 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0z!      ] - 4 h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  
string-fun	 		g  filenameS	
f  ice-9/string-fun.scm	g  exportsS	g  split-after-char	g  split-before-char	g  split-discarding-char	g  split-after-char-last	g  split-before-char-last	g  split-discarding-char-last	g  split-before-predicate	g  split-after-predicate	g  split-discarding-predicate	g  separate-fields-discarding-char	g  separate-fields-after-char	g  separate-fields-before-char	g  string-prefix-predicate	g  string-prefix=?	g  sans-surrounding-whitespace	g  sans-trailing-whitespace	g  sans-leading-whitespace	g  sans-final-newline	g  has-trailing-newline?	 	 g  set-current-module	!  	"  	#g  string-index	$g  string-length	%g  	substring	&f   	'g  string-rindex	(g  
string-ref	)g  reverse	*g  string=?	+g  char-whitespace?	,g  char=?C 5    h     ]4	
5 4" >  "  G   #$%      h@      ]4 5$  "  454
5456          g  char
		= g  str		= g  ret			= g  t			$ g  end		$	=  g  filenamef  ice-9/string-fun.scm
	a
		c			b			d		$	b		)	e			3	f			=	e	 			=	  g  nameg  split-after-char CR#$%   h@      ]4 5$  "  454
5456           g  char
		< g  str		< g  ret			< g  t			# g  end		#	<  g  filenamef  ice-9/string-fun.scm
	h
		i			i			j		#	i		(	k			2	l			<	k	 			<	  g  nameg  split-before-char CR#%&  h8      ]4 5$  4
54566            g  char
		3 g  str		3 g  ret			3 g  end			3  g  filenamef  ice-9/string-fun.scm
	n
		o			o			p			r		 	s		'	s		)	s		+	r		1	q		3	q	 		3	  g  nameg  split-discarding-char CR'%       h8      ]4 5$  "  
4
5456        g  char
		7 g  str		7 g  ret			7 g  t			 g  end			7  g  filenamef  ice-9/string-fun.scm
	u
		w			v			v		#	y			-	z			7	y	 		7	  g  nameg  split-after-char-last CR'%        h8      ]4 5$  "  
4
5456         g  char
		6 g  str		6 g  ret			6 g  t			 g  end			6  g  filenamef  ice-9/string-fun.scm
	|
		}			}			}		"	~			,				6	~	 		6	  g  nameg  split-before-char-last CR'%&     h8     ]4 5$  4
54566           g  char
		3 g  str		3 g  ret			3 g  end			3  g  filenamef  ice-9/string-fun.scm
 
	 		 		 		 		  		' 		) 		+ 		1 		3 	 		3	  g  nameg  split-discarding-char-last CR$&(%   hX   >  ]"  H45$  64 455$  4
5456"
"   6      g  pred
		U g  str		U g  ret			U g  n			N  g  filenamef  ice-9/string-fun.scm
 
	 			 		 		 		 	1	 	(	 		  		* 		. 		1 	-	; 	-	E 	(	H 	.	N 	(	N 	 		U	  g  nameg  split-before-predicate CR$&(%   hX   a  ]"  J45$  64 455$  4
5456"
" Y      g  pred
		W g  str		W g  ret			W g  n			P  g  filenamef  ice-9/string-fun.scm
 
	 			 		 		 		 	1	 	(	 		  		* 		. 		1 	-	9 	>	; 	-	< 	-	C 	<	E 	-	G 	(	J 	.	P 	(	P 	 		W	  g  nameg  split-after-predicate CR$&(%        hX   T  ]"  I45$  64 455$  4
5456"
"  L      g  pred
		V g  str		V g  ret			V g  n			O  g  filenamef  ice-9/string-fun.scm
 
	 			 		 		 		 	1	 	(	 		  		* 		. 		1 	-	; 	-	B 	<	D 	-	F 	(	I 	.	O 	(	O 	 		V	  g  nameg  split-discarding-predicate CR'% hP   O  ]"  84 5$  454
5"@"       G      g  ch
		I g  str		I g  ret			I g  fields			> g  str			> g  t			>  g  filenamef  ice-9/string-fun.scm
 
	 		 		 		 	!	 	0	! 	!	$ 		% 		6 		> 		> 		? 		I 	 		I	  g  nameg  separate-fields-discarding-char CR)#%    hX   e  ]"  A4 5$   4
545"4?"  "6  ]      g  ch
		V g  str		V g  ret			V g  fields			I g  str			I g  t			I  g  filenamef  ice-9/string-fun.scm
 
	 			 		 		 	"	" 	3	$ 	"	' 		( 		/ 	*	1 		9 		: 		I 		J 		T 		V 	 		V	  g  nameg  separate-fields-after-char CR'%        hH   9  ]"  74 5$  454
5"@"1      g  ch
		H g  str		H g  ret			H g  fields			= g  str			= g  t			=  g  filenamef  ice-9/string-fun.scm
 
	 		 		 		 	!	# 		$ 		5 		= 		= 		> 		H 	 		H	  g  nameg  separate-fields-before-char CR$%   h0      ]4 545$  L  4
4 556C           g  prefix
		, g  str		,  g  filenamef  ice-9/string-fun.scm
 		 		
 	$	 			 		 		  	(	( 		* 		 
		,	   C       h      ] O C      w       g  pred?
		
  g  filenamef  ice-9/string-fun.scm
 
 		
  g  nameg  string-prefix-predicate CR4i*i5R$+(&%  h     ]
4 5HH"  9"  1J4 5$  44 J55$  	JK""  "  """  4"  ,
J$   44 J55$  	JK""  "  ""JJ$  C JJ6             g  s
	  g  st	
  g  end		
   g  filenamef  ice-9/string-fun.scm
 
	 		
 		 		 		  		$ 		% 		( 	"	2 		6 		9 		; 		? 		S 		[ 		_ 		` 		c 	"	j 	0	l 	"	n 		r 		u 		w 		{ 	  	  	  	  	 	   g  nameg  sans-surrounding-whitespace CR$+(&%   h`   .  ]	4 5H"  4"  ,
J$   44 J55$  	JK""  "  ""J
$  C 
J6     &      g  s
		[ g  end			[  g  filenamef  ice-9/string-fun.scm
 
	 			 		 		 		 		 		 	"	& 	0	( 	"	* 		. 		1 		3 		7 		K 		O 		Q 		[ 	 		[  g  nameg  sans-trailing-whitespace CR$+(&% h`   4  ]
4 5H"  4"  ,J$  44 J55$  	JK""  "  ""J$  C J6,      g  s
		` g  st	
	` g  end		
	`  g  filenamef  ice-9/string-fun.scm
 
	 		
 		 		 		 		 		  		# 	"	- 		1 		4 		6 		: 		O 		S 		U 		` 	 		`  g  nameg  sans-leading-whitespace CR$,(%     h@      ]
4 5$   C4
4 4 555$   
4 56 C         g  str
		>  g  filenamef  ice-9/string-fun.scm
 
	 			 		 		 		 		 	%	$ 	!	& 		( 		, 		2 		9 		; 	 		>  g  nameg  sans-final-newline CR$,(      h(      ]
4 5$  
4 4 556C         g  str
		&  g  filenamef  ice-9/string-fun.scm

												(	 		$	"			$		 
		&  g  nameg  has-trailing-newline? CRC       g  m
		(  g  filenamef  ice-9/string-fun.scm		
s	a
	h
		n
H	u
	|
 
	 
l 
7 
 
 
\ 
 
 	 
w 
! 
 
 

 	 
   C6                                                                                                               ccache/ice-9/eval.go                                                                                0000644                 00000032642 15154557173 0010162 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.05      ] ' 4       h      ] g  unbound-arg	g  set-procedure-property!	g  arglist	g  _	g  set-procedure-minimum-arity!	g  	scm-error	g  wrong-number-of-args	f  eval		f  Wrong number of arguments	
g  keyword?	g  max	g  keyword-argument-error	f  Invalid keyword	g  assq	g  	list-set!	f  Unrecognized keyword	g  	list-tail	g  memoized-expression-typecode	g  memoized-expression-data	g  list-ref	g  reverse	g  	variable?	g  memoize-variable-access!	g  	last-pair	g  current-module	g  the-root-module	g  documentation	g  
procedure?	g  procedure-property	g  name	g  define!	 g  map	!g  error	"f  what	#g  memoize-expression	$g  macroexpanded?	%g  module-transformer	&g  primitive-evalC 5   hx1     ]  	
  hP    -  1  3 " ,
$  4(  L $  M @6"L$ Q" 9
$  S(  "  45$  !4L5""" LL	LL	L$  "  

"  "(  "  #45"
	""  $  L""  
L$  	"  "" $  "   L$  	" 6$  w45$  g4		5$  4
>  "  G  "  '$  "  4 >  "  G  "Z"a"]"  C$  445L&  4L5"   "LL6
""L $  -$  "45$  "  L$  M @"."*"&LL""  
$  7L$  LL6(  LL6L $  M @6(  !4L5""LL"kL
L	 "             g  %args
		I g  env	9 g  nreq*		9 g  args		9 g  env		S g  nopt*		S g  args		S g  inits		S g  aok	 U g  kw		 U g  kw-base	
 U g  imax	   g  kw	   g  imax	U g  i		( g  env		( g  env	CU g  args	IM g  kw-pair	 g  v	 g  i	> g  inits	> g  tail	6 g  env	% g  nopt	% g  args	% g  inits	%  g  filenamef  ice-9/eval.scm
											!		'		+	"	-	"	/	)	0	"	3		6		9		<		?		I		O		S,		W3		[0		a4		b4		g4	,	l4	6	n4	,	r4		s5	%	x5	+	|5	%	5	 6	 6	/ 5	 7	% 7	 8	 8	* 8	5 7	 @	# @	 A	" @	 B	' B	4 B	' @	 C	$ D	& F	. F	3 F	. G	. F	* C	$ C	3C	$@		I	#O	)O	%P	-P	4"P	)(I	#0L	15M	5CI	#C@	IS	LT	$PT	Zd	#]f	+cf	'gg	2ih	2kh	9li	2oi	<ri	6tg	'tT	wT	8xT	1|T	}U	$U	.U	$T	V	.V	4V	.W	(V	X	!Z	%[	8[	0Z	%]	%^	)_	*`	*`	1a	*a	4a	.^	)b	%b	!n	#p	)p	%q	5q	)r	4r	+t	9t	?!u	?#t	9$s	/+v	/.v	66v	+>x	)>n	#Cn	/Mn	#MS	U0	^:	 b:	c:	2h:	<j:	2n:	v;	z:	>	,						(	 	!	!"	!#	%$	0%	0%	7&	0$	%'	(	'(	-(	'(	!)	!)	0
(	*	'*	!+	!+	++	6%*	%	9		 		I


   C       hh    , 3 H" m" R
$  
(  "  $  $  "  "  $  "  
$  
"  $  "  8$  .$  $  	"  "  $  "  "  $  
"4
" 4	$  "  $  "  $  "   >  "  G  4	>  "  G  "  
"	C$  	


(  "  

$  
$  
"  "  $  "  
$  "  $  	"  $  
"  4L 	5
	"  KL L O 	"             g  env
	a g  body	a g  nreq		a g  rest?		a g  nopt		a g  kw		a g  inits		a g  alt		a g  alt-proc		a g  proc			z g  alt	
	c g  nreq		c g  nopt		c g  rest?		c g  spec		 g  nreq*		   g  rest?*		2  g  tail		S  g  nopt*		c  g  alt*		v  g  t		}  g  body		9 g  spec	
6 g  nreq	3 g  rest	0 g  tail	- g  nopt	* g  kw	' g  inits	$ g  alt	!  g  filenamef  ice-9/eval.scm
 		 		 		 	
	 		 		  		  		% 	(	) 		1 	7	2 		7 	'	8 	 	< 		? 	:	A 	3	E 		H 	G	S 		[ 		^ 	%	c 		k 		n 	%	v 		} 		} 	  	  	  	 	! 	- 	! 	,  	 	 	 	
 	. 	/ 	6 	?" 	/% 	70 	/2 	:: 	)? 	H 	c 	 	 	 	 	 	 	 	 	% 	 	4 	 	& 	 	 	9 	2 	 	F 	 	 	# 	 	 	" 	 	 	$ 	1 	 	 	# 	
 	a	 V	a	  g  nameg  make-general-closure CO      h   B   ] LLL 6      :       g  filenamef  ice-9/eval.scm
	 		

   C    h   R   ]LL L 6   J       g  a
		  g  filenamef  ice-9/eval.scm
	 		   C    h   a   ]LL L 6Y       g  a
		 g  b		  g  filenamef  ice-9/eval.scm
	 			   C     h   p   ]LL L 6     h       g  a
		 g  b		 g  c			  g  filenamef  ice-9/eval.scm
	 			   C      h      ]LL L 6  w       g  a
		 g  b		 g  c			 g  d			  g  filenamef  ice-9/eval.scm
	 			   C       h       ]LL L 6              g  a
		 g  b		 g  c			 g  d			 g  e			  g  filenamef  ice-9/eval.scm
	 			   Ch       ]LL L 6           g  a
		 g  b		 g  c			 g  d			 g  e			 g  f			  g  filenamef  ice-9/eval.scm
	 			   C h       ]LL L 6        g  a
		 g  b		 g  c			 g  d			 g  e			 g  f			 g  g			  g  filenamef  ice-9/eval.scm
	 			   C	        h     - 1 3 "  O

$  LL (  	"  456(  6	

	" LL	
	"       g  a
		  g  b		  g  c			  g  d			  g  e			  g  f			  g  g			  g  h			  g  more			  g  new-env				\ g  nreq	
		\ g  args			\  g  filenamef  ice-9/eval.scm
	 		 	
	   C    h   [   ]L L 6      S       g  x
		
  g  filenamef  ice-9/eval.scm
		
	) 		
   C   h   [   ]L L 6      S       g  x
		
  g  filenamef  ice-9/eval.scm
		
	' 		
   C   h0      ] (  LLL6 Y4L  >  ZCZF             g  fluids
		* g  vals		*  g  filenamef  ice-9/eval.scm
							 		-					!	$	&	 
		*	  g  nameg  lp C      h   C   ] LLL 6      ;       g  filenamef  ice-9/eval.scm	
	 		

   C!" !     hx  
  ]J4 54 5	&  6	&  4L 5
$  6 $  4L 56	$  4L 54L 56	$  %4L 54L 54L 564L 54L 54L 54L 5"  )	(  4
5"  '	4L 	5

	"
	"@	&  _45$  "  L4 $  45"  (  	45 "  $  "  45 $  	"  5C&  94L 5$   "< "0	&  C	&  m"  *(   "4L 5"(  	45 "  $  "  45 $  	"  "	& 		(  (  	45 "  $  "  45 $  	"  

$  

L O "  $  
L O "  	$  
L O "  	$  
L O "  m	$  
L O "  U	$  
L O "  =	$  
L O "  %	$  
L O "  L 
O 
"  |	(  ?4L(  	45 "  $  "  45 $  	"  	
5"  64L(  	45 "  $  "  45 $  	"  	?
$  4
>  "  G  "   
C
&  N"  4(   "4L >  "  G  ""	&  4L 56	
&  %4L 544L 5>   6<	&  '4L 54L 5@	&  45$  "  4 5C	&  a4L 545$  +45$  "  4>  "  G  "   4>  "  G  C	&  s4L 545$  "  L4 $  45"  (  	45 "  $  "  45 $  	"  5C	&  o4L 54L 5		4>   "  G  V4L >  X4	>   "  G  CX4	>   "  G  F	&  V4L O 54L O 5	O 

L Q 

	6	&  I4L 5U   4L O >   XCXFG4L 5@		&  
4L 5B	&  /4L 545$  "  4 5C  6    
      g  exp
	t g  env	t g  tag		t g  data		t g  f		2+ g  xb		2+ g  nargs		<+ g  args		<+ g  proc		I+ g  exps		  g  args	
  g  env	^ g  test	 g  xb	 g  
consequent	 g  	alternate	 g  inits	R g  body	R g  inits	 g  new-env	 g  body	` g  xb	` g  	docstring	j g  xb	j g  nreq	t g  tail		t g  e	
y g  proc	
 g  first	+s g  rest	+s g  first	3g g  rest	3g g  n	 g  x	 g  val	 g  producer	 g  consumer	 g  f	 g  xb	 g  args	 g  name	' g  x	' g  x	4 g  
var-or-sym	 g  x	 g  env	 g  in	t g  xb	t g  exp	t g  out	t g  pre	+t g  post		+t g  fluids	 g  xb	 g  vals	 g  exp	 g  fluids	 g  vals		 g  lp	
 g  tag	# g  xb	# g  exp	# g  handler	# g  args	# g  x	Cl g  var-or-spec	Cl  Bg  filenamef  ice-9/eval.scm
{		|		$~			,|		A		I			S	3|	4	>	
E	L	9P	(Q	>X	9^	(			|						|														%	)R		Z|	~		7					.	3	3			4						+	%|	3		9	E	F	\	_	 g	g		{|					|							|					|				
			!|	,	4		7	A	B	(H	>J	(N	S	Y	*`	m	|		
		
		9	(	>	9	(			|		#	+		E	"R		||								|					+|	,	5		=|	H	
Q	[	
b	j		p|	 	t	  g  nameg  eval CO  Q Q #$%      h0      ]L 44 5$   "  4445 5 556           g  exp
		,  g  filenamef  ice-9/eval.scm
													!	#		'		)		*		,	 		,  g  documentationf  )Evaluate @var{exp} in the current module. CO  &RC              g  unbound-arg
	1l g  make-general-closure01i g  eval	01i  g  filenamef  ice-9/eval.scm	 		 	1o 
 	1q
   C6                                                                                               ccache/ice-9/futures.go                                                                             0000644                 00000127425 15154557173 0010734 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]w 4       hS      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  futures	 		g  filenameS	
f  ice-9/futures.scm	g  importsS	g  srfi	g  srfi-1	 	 	g  srfi-9	 	 	g  gnu	 	 	g  srfi-11	 	 	g  q	 	 	g  match	 	 	g  control	  	!  	"! 	#g  exportsS	$g  future	%g  make-future	&g  future?	'g  touch	($%&' 	)g  set-current-module	*) 	+) 	,g  <future>	-g  %%make-future-procedure	.g  make-syntax-transformer	/. 	0. 	1g  %make-future	2g  macro	3g  $sc-dispatch	43 	53 	6g  _	7g  any	867777 	9g  syntax-object	:g  lambda	;g  m-3eebb96279-7	<g  top	=;< 	>g  ribcage	?g  t-3eebb96279-3	@g  t-3eebb96279-4	Ag  t-3eebb96279-5	Bg  t-3eebb96279-6	C?@AB 	D==== 	Ef  l-3eebb96279-c	Ff  l-3eebb96279-d	Gf  l-3eebb96279-e	Hf  l-3eebb96279-f	IEFGH 	J>CDI 	K> 	Lg  x	ML 	N= 	Of  l-3eebb96279-9	PO 	Q>MNP 	Rg  shift	Sg  	proc-name	Tg  args	UST 	V< 	WVV 	Xf  l-1e8ba8b5a-60	Yf  l-1e8ba8b5a-61	ZXY 	[>UWZ 	\g  key	]g  value	^g  name	_g  formals	`g  body	a\]^_` 	bVVVVV 	cf  l-1e8ba8b5a-53	df  l-1e8ba8b5a-54	ef  l-1e8ba8b5a-55	ff  l-1e8ba8b5a-56	gf  l-1e8ba8b5a-57	hcdefg 	i>abh 	jg  make-procedure-name	kj 	lV 	mf  l-1e8ba8b5a-43	nm 	o>kln 	pV 	qf  l-1e8ba8b5a-42	rq 	s>Mpr 	t=JKQRKKKK[ios 	ug  hygiene	vu 	w9:tv 	xg  thunk	yVJKQ 	zu 	{9xyz 	|g  state	}9|yz 	~g  mutex	9~yz  g  
completion 9yz  {}  g  make-struct g  m-3eebb96279-1 <  g  t-1e8ba8b5a-133 g  t-1e8ba8b5a-132 g  t-1e8ba8b5a-131   g  m-1e8ba8b5a-134 <    f  l-1e8ba8b5a-138 f  l-1e8ba8b5a-139 f  l-1e8ba8b5a-13a   >  g  	ctor-args   f  l-1e8ba8b5a-120   >p  g  ctor g  field   f  l-1e8ba8b5a-11c f  l-1e8ba8b5a-11d   >W  g  form g  	type-name g  constructor-spec g  field-names   VVVV  f  l-1e8ba8b5a-111 f  l-1e8ba8b5a-112 f  l-1e8ba8b5a-113 f  l-1e8ba8b5a-114   >  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers   VVVVVVVV  f  l-1e8ba8b5a-e9 f  l-1e8ba8b5a-e7 f  l-1e8ba8b5a-e5 f  l-1e8ba8b5a-e3 f  l-1e8ba8b5a-e1 f  l-1e8ba8b5a-df f  l-1e8ba8b5a-dd f  l-1e8ba8b5a-db   >  f  l-1e8ba8b5a-da   >Mp  JKQRKKKKK  9v  9,yz  9
v  JKQ  9z  {}  w  g  each-any 6Ɍ g  syntax-violation     f  Wrong number of arguments g  identifier?     VKQ  9-z      f  -source expression failed to match any pattern g  record-type-vtable     g  
pwpwpwpwpw g  default-record-printer     g  result x|~  g  set-struct-vtable-name!     g  vtable-offset-user     g  %future?-procedure 67  g  m-3eebb96279-1a <  g  t-3eebb96279-19     f  l-3eebb96279-1f   >  f  l-3eebb96279-1c   >M  KRKKKK[ios  9:v  g  obj g  t-1e8ba8b5a-224 g  t-1e8ba8b5a-21e g  t-1e8ba8b5a-21f g  t-1e8ba8b5a-220 g  t-1e8ba8b5a-223 g  t-1e8ba8b5a-222 g  t-1e8ba8b5a-221   g  m-1e8ba8b5a-225 <   f  l-1e8ba8b5a-229f  l-1e8ba8b5a-22af  l-1e8ba8b5a-22bf  l-1e8ba8b5a-22cf  l-1e8ba8b5a-22df  l-1e8ba8b5a-22ef  l-1e8ba8b5a-22f 	>  
g  	copier-id
 f  l-1e8ba8b5a-21c >p g  	ctor-name f  l-1e8ba8b5a-214 >p  f  l-1e8ba8b5a-212 >p g  layout f  l-1e8ba8b5a-210 >p g  
immutable? f  l-1e8ba8b5a-20e  !>p  "g  field-count#" $f  l-1e8ba8b5a-20c%$ &>#p% 'g  
getter-ids(' )f  l-1e8ba8b5a-209*) +>(p* ,g  	field-ids-, .f  l-1e8ba8b5a-206/. 0>-p/ 1g  predicate-name2g  
field-spec312 4VVVVVV 5f  l-1e8ba8b5a-1f96f  l-1e8ba8b5a-1fa7f  l-1e8ba8b5a-1fb8f  l-1e8ba8b5a-1fc9f  l-1e8ba8b5a-1fd:f  l-1e8ba8b5a-1fe;56789: <>34; =KRK	KKKKKKKK!K&K+K0< >9=v ?> @g  andA9@=v Bg  struct?C9B=v DC> Eg  eq?F9E=v Gg  struct-vtableH9G=v IH> JVK K9,Jz LFIK MADL N?M OVK P9Oz Qg  throw-bad-structRQ SQ Tg  future-thunkUg  %future-thunk-procedureVg  free-idWg  
%%on-errorXg  m-3eebb96279-26YX< ZY [f  l-3eebb96279-28\[ ]>MZ\ ^YK]RKKKK[ios _9W^v `V_ a`7 bg  %%typecg  t-1e8ba8b5a-14bdg  t-1e8ba8b5a-14ceg  t-1e8ba8b5a-14dfg  t-1e8ba8b5a-14egg  t-1e8ba8b5a-14fhg  t-1e8ba8b5a-150ig  t-1e8ba8b5a-151jcdefghi kg  m-1e8ba8b5a-152lk< mlllllll nf  l-1e8ba8b5a-156of  l-1e8ba8b5a-157pf  l-1e8ba8b5a-158qf  l-1e8ba8b5a-159rf  l-1e8ba8b5a-15asf  l-1e8ba8b5a-15btf  l-1e8ba8b5a-15cunopqrst v>jmu wg  getterxg  indexywx zf  l-1e8ba8b5a-149{f  l-1e8ba8b5a-14a|z{ }>yW| ~'
 VVV f  l-1e8ba8b5a-144f  l-1e8ba8b5a-145f  l-1e8ba8b5a-146 >~ K]RKvKKK}K 9bv V 6a7 g  ckg  errg  s YY f  l-3eebb96279-2bf  l-3eebb96279-2c > YK]RKKKK[ios 9v g  quote9v VK] 9,z   g  %%index9v V 6a7 f  l-3eebb96279-30f  l-3eebb96279-31 > YK]RKKKK[ios 9v 9v K] 9
z   g  %%copier9v V 6a7 f  l-3eebb96279-35f  l-3eebb96279-36 > YK]RKKKK[ios 9v 9v g  %%<future>-set-fieldsVK] 9z   g  t-3eebb96279-25 f  l-3eebb96279-3a >Z YK]RKKKK[ios 9:v K]RKvKKK}K 9v  g  if9v 9Ev 9Gv  VK] 9,z  g  
struct-ref9v K] 9
z  9Qv 9v 9Tz     VK] 9Uz g  future-stateg  %future-state-procedureg  m-3eebb96279-41<  f  l-3eebb96279-43 >M KRKKKK[ios 9Wv V 7 KRKvKKK}K 9bv V 67  f  l-3eebb96279-46f  l-3eebb96279-47 > KRKKKK[ios 9v 9v VK 9,z   9v V 67 f  l-3eebb96279-4bf  l-3eebb96279-4c > KRKKKK[ios 9v 9v K  9z    9v V 67 f  l-3eebb96279-50f  l-3eebb96279-51 	> 
	KRKKKK[ios 9
v 9
v V	K 9z   g  t-3eebb96279-40 f  l-3eebb96279-55 > KRKKKK[ios 9:v KRKvKKK}K 9v  9v 9Ev 9Gv  VK  9,z !  "9v #K $9#z %"$ &9Qv '9v (9z )'( *&) +!%* ,+ -VK .9-z /g  future-result0g  %future-result-procedure1g  m-3eebb96279-5c21< 32 4f  l-3eebb96279-5e54 6>M35 72K6RKKKK[ios 89W7v 9V8 :97 ;K6RKvKKK}K <9b;v =V< >6:=7 ?22 @f  l-3eebb96279-61Af  l-3eebb96279-62B@A C>?B D2CK6RKKKK[ios E9Dv F9Dv GVCK6 H9,Gz IFH JI K9;v LVK M6:L7 Nf  l-3eebb96279-66Of  l-3eebb96279-67PNO Q>?P R2QK6RKKKK[ios S9Rv T9Rv UQK6 V9	Uz WTV XW Y9;v ZVY [6:Z7 \f  l-3eebb96279-6b]f  l-3eebb96279-6c^\] _>?^ `2_K6RKKKK[ios a9`v b9`v cV_K6 d9cz ebd fe gg  t-3eebb96279-5bhg if  l-3eebb96279-70ji k>h3j l2kK6RKKKK[ios m9:lv nkK6RKvKKK}K o9nv po q9nv r9Env s9Gnv tso uVkK6 v9,uz wrtv x9nv ykK6 z9	yz {xoz |9Qnv }9nv ~9/uz }~ |o qw{ mp VK6 90z g  future-mutexg  %future-mutex-procedureg  m-3eebb96279-77<  f  l-3eebb96279-79 >M KRKKKK[ios 9Wv V 7 KRKvKKK}K 9bv V 67  f  l-3eebb96279-7cf  l-3eebb96279-7d > KRKKKK[ios 9v 9v VK 9,z   9v V 67 f  l-3eebb96279-81f  l-3eebb96279-82 > KRKKKK[ios 9v 9v K 9	z   9v V 67 f  l-3eebb96279-86f  l-3eebb96279-87 > KRKKKK[ios 9v 9v VK 9z   g  t-3eebb96279-76 f  l-3eebb96279-8b > KRKKKK[ios 9:v KRKvKKK}K 9v  9v 9Ev 9Gv  VK 9,z  9v K 9	z  9Qv 9v 9z     VK 9z g  future-completiong  %future-completion-procedureg  m-3eebb96279-92<  f  l-3eebb96279-94 >M KRKKKK[ios 9Wv V 7 KRKvKKK}K 9bv V 67  f  l-3eebb96279-97f  l-3eebb96279-98 > KRKKKK[ios 9v 9v VK 9,z   9v V 67 f  l-3eebb96279-9cf  l-3eebb96279-9d > KRKKKK[ios 9v  9v K 9	z    9v V 67 f  l-3eebb96279-a1	f  l-3eebb96279-a2
	 >
 KRKKKK[ios 9v 9v VK 9z   g  t-3eebb96279-91 f  l-3eebb96279-a6 > KRKKKK[ios 9:v KRKvKKK}K 9v  9v 9Ev 9Gv   !VK "9,!z # " $9v %K &9	%z '$& (9Qv )9v *9!z +)* ,(+ -#', .- /VK 09/z 1g  each277 312 4735746757g  %%set-fields8g  dummy9g  check?:g  expr;89w: <g  m-3eebb96279-ad=<< >= ?f  l-3eebb96279-b2@f  l-3eebb96279-b3Af  l-3eebb96279-b4Bf  l-3eebb96279-b5Cf  l-3eebb96279-b6D?@ABC E>;>D F= Gf  l-3eebb96279-afHG I>MFH Jg  t-1e8ba8b5a-16aKg  t-1e8ba8b5a-16cLg  t-1e8ba8b5a-16bMJKL Ng  m-1e8ba8b5a-16dON< POOO Qf  l-1e8ba8b5a-171Rf  l-1e8ba8b5a-172Sf  l-1e8ba8b5a-173TQRS U>MPT Vf  l-1e8ba8b5a-167Wf  l-1e8ba8b5a-168Xf  l-1e8ba8b5a-169YVWX Z>~Y [EKIRKUKKKZ \97[v ]VEKI ^9,]z _9T]z `9]z a9/]z b9]z c9]z d_`abc eg  mapfe ge hg  listig  set-future-thunk!jg  %set-future-thunk!-procedurek677 lg  m-3eebb96279-c1ml< ng  t-3eebb96279-bfog  t-3eebb96279-c0pno qmm rf  l-3eebb96279-c6sf  l-3eebb96279-c7trs u>pqt vm wf  l-3eebb96279-c3xw y>Mvx zmuKyRKKKK[ios {9:zv |g  t-1e8ba8b5a-18c}g  t-1e8ba8b5a-18d~|} g  m-1e8ba8b5a-18e<  f  l-1e8ba8b5a-192f  l-1e8ba8b5a-193 >~ g  setter^w f  l-1e8ba8b5a-186f  l-1e8ba8b5a-187f  l-1e8ba8b5a-188 > 2x f  l-1e8ba8b5a-17df  l-1e8ba8b5a-17e >W g  field-specs f  l-1e8ba8b5a-179f  l-1e8ba8b5a-17a >W uKyRKKK 9v g  val9v  9v 9Ev 9Gv  VuKy 9,z  g  struct-set!9v uKy 9
z  9Qv 9v 9iz    { VKy 9jz g  set-future-state!g  %set-future-state!-procedureg  m-3eebb96279-d1< g  t-3eebb96279-cfg  t-3eebb96279-d0  f  l-3eebb96279-d6f  l-3eebb96279-d7 >  f  l-3eebb96279-d3 >M KRKKKK[ios 9:v KRKKK 9v 9v  9v 9Ev 9Gv  VK 9,z  9v K 9z  9Qv 9v 9z     VK 9z g  set-future-result!g  %set-future-result!-procedureg  m-3eebb96279-e1< g  t-3eebb96279-dfg  t-3eebb96279-e0  f  l-3eebb96279-e6f  l-3eebb96279-e7 >  f  l-3eebb96279-e3 >M KRKKKK[ios 9:v KRKKK 9v 9v  9v 9Ev 9Gv  VK 9,z  9v K 9	z  9Qv 9v 9z       VK 9z g  set-record-type-printer!g  simple-formatf  #<future ~a ~a ~s>	g  number->string
g  object-addressg  create-workers!g  
make-mutexg  make-condition-variableg  queuedg  register-future!g  make-qg  %futuresg  %futures-mutexg  %futures-availableg  %futures-waitingg  make-parameterg  %nesting-levelg  %max-nesting-levelg  
with-mutex7Ɍ77g  letg  mg  e0g  e1 8 !g  m-3eebb96279-12b"!< #"VVV $f  l-3eebb96279-130%f  l-3eebb96279-131&f  l-3eebb96279-132'f  l-3eebb96279-133($%&' )> #( *" +f  l-3eebb96279-12d,+ ->M*, .V)K- /9.z 09L.z 1g  dynamic-wind291.z 39:.z 4g  
lock-mutex594.z 650 736 8g  begin998.z :g  unlock-mutex;9:.z <;0 =3< >= ?g  make-prompt-tag@g  %future-promptAg  enq!Bg  signal-condition-variableCg  let/ecDg  catchEg  
parameter?FE GE Hg  	scm-errorIg  wrong-type-argJf  parameterizeKf  Not a parameter: ~SLg  doneMg  
alist-consNg  abort-to-promptOg  throwPg  process-future!Qg  q-empty?Rg  deq!Sg  startedTg  notify-completionUg  process-one-futureVg  wait-condition-variableWg  process-futuresXg  broadcast-condition-variableYg  	partitionZg  error[Z \Z ]f  no matching pattern^g  for-each_g  	provided?`g  threadsag  current-processor-countbg  %worker-countcg  %workersdg  unfoldeg  call-with-new-threadfg  1+gg  %create-workers!h8` ig  m-3eebb96279-259ji< kjV lf  l-3eebb96279-25emf  l-3eebb96279-25fnlm o>hkn pj qf  l-3eebb96279-25brq s>Mpr tVoKs u9%tz v9:tz C 5      hHU    ]4	
"#(5 4+ >  "  G   ,      h      ]  C              g  thunk
		 g  state		 g  mutex			 g  
completion			  g  filenamef  ice-9/futures.scm
	0
 			  g  nameg  %%make-future-procedure C-R401258  h      ]  C       g  t-3eebb96279-3
		 g  t-3eebb96279-4		 g  t-3eebb96279-5			 g  t-3eebb96279-6			  			   C1  h   T   ]L 6    L       g  a
		  g  filenamef  ice-9/futures.scm		0
 		   C6    h   D   ] L 6<       g  filenamef  ice-9/futures.scm		0
 		
   C      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/futures.scm
	0
 		n   C51R,ߨ  4 ,>  "  G   	-i  ,R,        h   t   ] $   CC      l       g  obj
		  g  filenamef  ice-9/futures.scm
	0
 		  g  nameg  %future?-procedure CR40&25N      h   7   ]  C      /       g  t-3eebb96279-19
		
  		
   C&     h   T   ]L 6    L       g  a
		  g  filenamef  ice-9/futures.scm		0
 		   C6    h   D   ] L 6<       g  filenamef  ice-9/futures.scm		0
 		
   CP     h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/futures.scm
	0
 		n   C5&R,ST  h   w   ] &   
C 6o       g  s
		  g  filenamef  ice-9/futures.scm
	0
 		  g  nameg  %future-thunk-procedure CUR40T25     h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   7   ]  C      /       g  t-3eebb96279-25
		
  		
   CT    h   T   ]L 6    L       g  a
		  g  filenamef  ice-9/futures.scm		0
 		   C6    h   D   ] L 6<       g  filenamef  ice-9/futures.scm		0
 		
   C     h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/futures.scm
	0
 	    C5TR,S     h   w   ] &   C 6o       g  s
		  g  filenamef  ice-9/futures.scm
	0
 		  g  nameg  %future-state-procedure CR4025     h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C,     h   7   ]  C      /       g  t-3eebb96279-40
		
  		
   C    h   T   ]L 6    L       g  a
		  g  filenamef  ice-9/futures.scm		0
 		   C6    h   D   ] L 6<       g  filenamef  ice-9/futures.scm		0
 		
   C.     h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/futures.scm
	0
 	    C5R,S/     h    x   ] &   	C 6       p       g  s
		  g  filenamef  ice-9/futures.scm
	0
 		  g  nameg  %future-result-procedure C0R40/25>EJ    h   :   ]C     2       g  err
		 g  s		  			   CMSX h   :   ]C     2       g  err
		 g  s		  			   C[af h   :   ]C     2       g  err
		 g  s		  			   C     h   7   ]  C      /       g  t-3eebb96279-5b
		
  		
   C/    h   T   ]L 6    L       g  a
		  g  filenamef  ice-9/futures.scm		0
 		   C6    h   D   ] L 6<       g  filenamef  ice-9/futures.scm		0
 		
   C     h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/futures.scm
	0
 	    C5/R,S     h    w   ] &   	C 6       o       g  s
		  g  filenamef  ice-9/futures.scm
	0
 		  g  nameg  %future-mutex-procedure CR4025     h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   7   ]  C      /       g  t-3eebb96279-76
		
  		
   C    h   T   ]L 6    L       g  a
		  g  filenamef  ice-9/futures.scm		0
 		   C6    h   D   ] L 6<       g  filenamef  ice-9/futures.scm		0
 		
   C     h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/futures.scm
	0
 	    C5R,S     h    |   ] &   	C 6       t       g  s
		  g  filenamef  ice-9/futures.scm
	0
 		  g  nameg  %future-completion-procedure CR4025        h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C.     h   7   ]  C      /       g  t-3eebb96279-91
		
  		
   C    h   T   ]L 6    L       g  a
		  g  filenamef  ice-9/futures.scm		0
 		   C6    h   D   ] L 6<       g  filenamef  ice-9/futures.scm		0
 		
   C0     h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/futures.scm
	0
 	    C5R40256\^dgh        h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/futures.scm
	0
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R,Si       h       ] &   
C 6             g  s
		 g  val		  g  filenamef  ice-9/futures.scm
	0
 			  g  nameg  %set-future-thunk!-procedure CjR40i25k  h   T   ]  C    L       g  t-3eebb96279-bf
		 g  t-3eebb96279-c0		  			   Ci       h   T   ]L 6    L       g  a
		  g  filenamef  ice-9/futures.scm		0
 		   C6    h   D   ] L 6<       g  filenamef  ice-9/futures.scm		0
 		
   C     h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/futures.scm
	0
 		n   C5iR,S h       ] &   C 6             g  s
		 g  val		  g  filenamef  ice-9/futures.scm
	0
 			  g  nameg  %set-future-state!-procedure CR4025k  h   T   ]  C    L       g  t-3eebb96279-cf
		 g  t-3eebb96279-d0		  			   C       h   T   ]L 6    L       g  a
		  g  filenamef  ice-9/futures.scm		0
 		   C6    h   D   ] L 6<       g  filenamef  ice-9/futures.scm		0
 		
   C     h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/futures.scm
	0
 		n   C5R,S h       ] &   	C 6            g  s
		 g  val		  g  filenamef  ice-9/futures.scm
	0
 			  g  nameg  %set-future-result!-procedure CR4025k h   T   ]  C    L       g  t-3eebb96279-df
		 g  t-3eebb96279-e0		  			   C       h   T   ]L 6    L       g  a
		  g  filenamef  ice-9/futures.scm		0
 		   C6    h   D   ] L 6<       g  filenamef  ice-9/futures.scm		0
 		
   C     h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  }       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/futures.scm
	0
 		n   C5R4i,i	
,ST 	       hP      ]44 5	5 &   "  	4 5 &   
"  	4 56           g  future
		L g  port		L  g  filenamef  ice-9/futures.scm
	;		<				=			=	"		=			>		3	?		L	<	 			L	   C>  "  G  ,    hP     ]4>   "  G  45 45   4>  "  G  C           g  thunk
		K g  mutex		4 g  
completion			4 g  future	4	K  g  filenamef  ice-9/futures.scm
	A
		E			G			G	+		F		&	F	$	.	F		4	F		7	H	 
		K  g  nameg  make-futureg  documentationf  Return a new future for THUNK.  Execution may start at any point
concurrently, or it can start at the time when the returned future is
touched. C%R4i5 R4i5 R4i5 RR4i
5R R4025/02739>        h0   \   ]    C       T       g  dummy
		) g  m		) g  e0			) g  e1			)  		)	   C     h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/futures.scm
	d
 		"  g  
macro-typeg  syntax-rulesg  patternsg  mg  e0g  e1g  ...   C5R4?i5 @R4AB: h@      ]4>  "  G  4 >  "  G  4>  "  G  6       g  future
		@  g  filenamef  ice-9/futures.scm
	r
		t			u		)	v		@	w	 		@  g  nameg  register-future! CRCD@GHIJK,ST 
     hp      ] 4 5$  "  4  >  "  G   4 	45 5Y4L &  L 
"  	4L 	5>   ZCZF              g  t-3eebb96279-16a
		i  g  filenamef  ice-9/futures.scm	 	(	< 	<	A 	8	C 	(	F 	* 		i
   C4     h   E   ] L 6=       g  filenamef  ice-9/futures.scm
 	 		
   C:    h   E   ] L 6=       g  filenamef  ice-9/futures.scm
 	 		
   C,S4    h   E   ] L 6=       g  filenamef  ice-9/futures.scm
 	 		
   C:    h   E   ] L 6=       g  filenamef  ice-9/futures.scm
 	 		
   Ci4   h   E   ] L 6=       g  filenamef  ice-9/futures.scm
 	 		
   C:    h   E   ] L 6=       g  filenamef  ice-9/futures.scm
 	 		
   CLABMN      h   N   ] L E  F       g  filenamef  ice-9/futures.scm
 	"	 	$ 		
   C       h    ] U   4LO >   X" G  O O 4O >   "  G  VL&  	L	"  	4L5	O 
O 4	O >   "  G  VL&  L
 "  4L>  "  G  L&  L"  4L>  "  G  X4
O >   "  G  &  		"  	45O O 4O >   "  G  V&  "  	45&  *4L>  "  G  4>  "  G  "  4L5 X4O >   "  G  4L >  X4O >   "  G  "  G  O C            g  cont
	 g  future-to-wait	 g  x		% g  x		f  g  x	 g  results
  g  filenamef  ice-9/futures.scm
 			 		% 		N 		f 	  	  	  	,  	  	  	 	8 	; 	!V 	W 	k 	 	 	 			 	 	 	
   CO    h   N   ] L @F       g  filenamef  ice-9/futures.scm
 		 	  		
   C       h   Z   -  1  3  O C       R       g  args
			  g  filenamef  ice-9/futures.scm
 	 			


   C,S   h`     ] U  D4 O 5 &   	"  4 >  "  G  XCXFGE       g  future
		_ g  tag		_ g  val		!	O g  _		T	_ g  results		T	_  g  filenamef  ice-9/futures.scm
	y
				 		! 		W		 		_  g  nameg  process-future!g  documentationf *Process FUTURE.  When FUTURE completes, return #t and update its
result; otherwise, when FUTURE touches a nested future that has not
completed yet, then suspend it and return #f.  Suspending a future
consists in capturing its continuation, marking it as `queued', and
adding it to the waiter queue. CPRQR4,SLS:P4     h   E   ] L 6=       g  filenamef  ice-9/futures.scm
 	 		
   C:    h   E   ] L 6=       g  filenamef  ice-9/futures.scm
 	 		
   C4    h   E   ] L 6=       g  filenamef  ice-9/futures.scm
 	 		
   C:    h   E   ] L 6=       g  filenamef  ice-9/futures.scm
 	 		
   CT     h    ](45  $   C45 4 &  	 	"  	4 5>  "  G   &   "  	4 5	$  "  
$   &  	 	"  	4 564 &  	 	"  	4 5>  "  G  4>  "  G  4 &  	 	"  	4 5>  "  G   &   "  	4 5& B &   
"  4 >  "  G  4 &  	 	"  	4 5>  "  G  4 5$  O O 4O >   "  G  V &  	 	"  	4 5O O 4O >   "  G  V &   	"  4 >  "  G  4 >  "  G  X4O >   "  G  X4O >   "  G  "   "  +4 &  	 	"  	4 5>  "  G  6         g  t
		 g  future
	 g  key	b g  done?	|` g  x	Y g  x	@  g  filenamef  ice-9/futures.scm
 
	 			 		 		 		 		# 		@ 		K 		b 	  	  	  	  	  	  	  	  	  	 	 	*" 	% 	0 	+1 	K 	P 	m 	v 	| 	 	 	 	# 	 	 	3 	 	) 	B 	e 	j 	 	 	 -	
  g  nameg  process-one-futureg  documentationf  9Attempt to pick one future from the queue and process it. CUR4QVU      hX      ] 4>  "  G  "  745$  4>  "  G  "   4>   "  G  ""            g  filenamef  ice-9/futures.scm
 
	 		 		 	
	# 		$ 		< 		O 		O 	 
		S
  g  nameg  process-futuresg  documentationf  ,Continuously process futures from the queue. CWRX,SY\]       h(   x   ]	 $    L C4 56    p       g  expr
		% g  w		  g  filenamef  ice-9/futures.scm
 		 		 	 		%   C^A\]        h(   x   ]	 $    64 56  p       g  expr
		' g  x		  g  filenamef  ice-9/futures.scm
 		 		 	 		'   C 
    hX   0  ]4 &  	 	"  	4 5>  "  G  4 O >  G  	6      (      g  future
		R g  waiting	?	R g  	remaining		?	R  g  filenamef  ice-9/futures.scm
 
	 		 	 	% 		. 		B 		J 		R 	 			R  g  nameg  notify-completiong  documentationf  9Notify futures and callers waiting that FUTURE completed. CTR4Q:,S4    h   E   ] L 6=       g  filenamef  ice-9/futures.scm
 	
 		
   C:    h   E   ] L 6=       g  filenamef  ice-9/futures.scm
 	
 		
   CLVU h      ]4>  "  G  45$  4>  "  G  L &  	L 	"  	4L 5 	 O 
 O 4	 O >   "  G  VL &  L "  	4L 5&  "  >4L &  	L 	"  	4L 5L &  	L 	"  	4L 5>  X4
 O >   "  G  CX4
 O >   "  G  F4>   "  G  6              g  x
	L  g  filenamef  ice-9/futures.scm
 		 		 		 		  	
	4 		L 	
	t 		w 	  	  	  	'  	'  	  	
 	
 	
 	
  g  nameg  work C4,SL:S@/  hp  	  ]O  Q " <4 &  	 	"  	4 5>  "  G   &   "  	4 5$  /4 &  	 	"  	4 5>  "  G  "  	$  X4 &  	 	"  	4 5>  "  G  4
5 
$   WG  "  t4>   "  G  " 4 &  	 	"  	4 5>  "  G  4
5 $   WG  "  4>   "  G  "" &  	 	"  	4 56       g  future
	p g  work	
p g  key		XO  g  filenamef  ice-9/futures.scm
 
	 		 		 		6 		A 	
	X 		d 		i 	  	  	  	  	  	  	  	  	  	 	 	 	 			&	*	1	9	L	O 	V		  	p  g  nameg  touchg  documentationf  >Return the result of FUTURE, computing it if not already done. C'R4_i`5$  4ai5 "  
bRcR4   h   E   ] L 6=       g  filenamef  ice-9/futures.scm
	 		
   C:    h   E   ] L 6=       g  filenamef  ice-9/futures.scm
	 		
   Ccdb      h   ^   ] CV       g  i
		  g  filenamef  ice-9/futures.scm
'		'	 		   CeW        h   ^   ]6V       g  i
		  g  filenamef  ice-9/futures.scm
(		(	 		   Cf     h   a   ] C    Y       g  filenamef  ice-9/futures.scm
+	 		
  g  nameg  create-workers! C hx      ]  O  O 4 O >   "  G  V(  4
5 	 
"  X4 O >   "  G  CX4 O >   "  G  F         g  x
		v  g  filenamef  ice-9/futures.scm

			0%		1'		>&		B+		J	 		v
  g  nameg  %create-workers! CgRg      h   j   ] 6   b       g  filenamef  ice-9/futures.scm
.		.	 		
  g  nameg  create-workers! CR40$252uv   h   ?   ]  C7       g  dummy
		 g  body		  			   C  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/futures.scm
5
 		"  g  documentationf  Return a new future for BODY.g  
macro-typeg  syntax-rulesg  patternsg  body   C5$RC       g  m
		, g  rtd
  g  filenamef  ice-9/futures.scm		
	0
+	9
/$	A
/%	R	/0	R
/1	U	/<	U
/=	V	/H	V
/I	Y	/M	Y
/N	]	/Z	]
/a	b
1	o	1	l
2	r
='	y
DI 
E 
H 
O 
O	O	O	O	O		O	O
O	O
S;
S-
 #	UG
   C6                                                                                                                                                                                                                                            ccache/ice-9/psyntax-pp.go                                                                          0000644                 00000576507 15154557173 0011373 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0/     ] 4 hZw      ] g  primitive-eval	g  current-module	g  warn	f  0module system is booted, we should have a module	g  module-variable	g  resolve-module	g  macro?	g  
macro-type		g  macro-binding	
g  %expanded-vtables	g  assq	g  name	g  public	g  private	g  module-name	g  bare	g  hygiene	g  syntax-violation	f  bad module kind	g  for-each	g  lexical	g  macro	g  ellipsis	g  module-define!	g  make-syntax-transformer	g  vector-length	g  syntax-object	g  symbol->string	g  module-gensym	f  l	g  list->vector	 g  make-vector	!g  append	"g  ribcage	#g  shift	$g  list-ref	%g  id-var-name	&f  
invalid id	'g  supports-source-properties?	(g  set-source-properties!	)g  source-properties	*g  
begin-form	+g  $sc-dispatch	,g  _	-, 	.g  apply	/g  any	0g  each-any	1/0	2,1	3f  -source expression failed to match any pattern	4g  local-syntax-form	5g  eval-when-form	601	7,6	8g  e	9g  memq	:g  eval	;g  expand	<g  c&e	=: 	>g  load	?g  compile	@?> 	Ag  c	B> 	Cg  define-syntax-form	Dg  define-syntax-parameter-form	Eg  guile	FE 	Gg  define-form	Hg  global	IH 	Jg  displaced-lexical	KJ 	Lg  core	Mg  
module-ref	Ng  module-local-variable	Og  module-add!	Pg  make-undefined-variable	Qg  	variable?	Rf  identifier out of context	Sf  "cannot define keyword at top level	Tg  
procedure?	U 	Vg  	eval-when	Wf  invalid situation	Xg  lexical-call	Yg  global-call	Zg  	core-form	[g  local-syntax	\g  begin	]g  define	^,// 	_//	`_1	a,`	b,/ 	cg  if	dg  top	ed 	f 	ge 	hf  l-bde397a-100e	ih 	j"fgi 	k" 	lg  key	ml 	ng  m-bde397a-fde	ond 	po 	qf  l-bde397a-fdf	rq 	s"mpr 	tg  ftype	ug  fval	vg  fform	wg  fe	xg  fw	yg  fs	zg  fmod	{tuvwxyz 	|eeeeeee 	}f  l-bde397a-fd7	~f  l-bde397a-fd8	f  l-bde397a-fd9 f  l-bde397a-fda f  l-bde397a-fdb f  l-bde397a-fdc f  l-bde397a-fdd }~  "{|  g  first   f  l-bde397a-fce   "g  g  r g  w g  s g  rib g  mod g  for-car? 8  f  l-bde397a-fb6 f  l-bde397a-fb7 f  l-bde397a-fb8 f  l-bde397a-fb9 f  l-bde397a-fba f  l-bde397a-fbb f  l-bde397a-fbc   "|  g  lambda-var-list g  gen-var g  strip g  expand-lambda-case g  lambda*-formals g  expand-simple-lambda g  lambda-formals g  	ellipsis? g  expand-void g  eval-local-transformer g  expand-local-syntax g  expand-body g  expand-macro g  expand-application g  expand-expr g  syntax-type g  parse-when-list g  expand-install-global g  expand-top-sequence g  expand-sequence g  source-wrap g  wrap g  bound-id-member? g  distinct-bound-ids? g  valid-bound-ids? g  
bound-id=? g  	free-id=? g  with-transformer-environment g  transformer-environment g  resolve-identifier g  locally-bound-identifiers g  same-marks? g  
join-marks g  
join-wraps g  smart-append g  make-binding-wrap g  extend-ribcage! g  make-empty-ribcage g  new-mark g  	anti-mark g  the-anti-mark g  top-marked? g  top-wrap g  
empty-wrap g  set-ribcage-labels! g  set-ribcage-marks! g  set-ribcage-symnames! g  ribcage-labels g  ribcage-marks g  ribcage-symnames g  ribcage? g  make-ribcage g  
gen-labels g  	gen-label g  
wrap-subst g  
wrap-marks g  	make-wrap g  id-sym-name&marks g  id-sym-name g  id? g  nonsymbol-id? g  global-extend g  lookup g  macros-only-env g  extend-var-env g  
extend-env g  null-env g  binding-value g  binding-type g  make-binding g  	arg-check g  source-annotation g  	no-source g  set-syntax-object-module! g  set-syntax-object-wrap! g  set-syntax-object-expression! g  syntax-object-module g  syntax-object-wrap g  syntax-object-expression g  syntax-object? g  make-syntax-object g  build-lexical-var g  build-letrec g  build-named-let g  	build-let g  build-sequence g  
build-data g  build-primref g  build-lambda-case g  build-case-lambda g  build-simple-lambda g  build-global-definition g  build-global-assignment g  build-global-reference g  analyze-variable g  build-lexical-assignment g  build-lexical-reference g  build-dynlet g  build-conditional g  build-application g  
build-void g  maybe-name-value!g  decorate-sourceg  get-global-definition-hookg  put-global-definition-hookg  
session-idg  local-eval-hookg  top-level-eval-hookg  fx<g  fx=	g  fx-
g  fx+g  set-lambda-meta!g  lambda-metag  lambda?g  make-dynletg  make-letrecg  make-letg  make-lambda-caseg  make-lambdag  make-sequenceg  make-applicationg  make-conditionalg  make-toplevel-defineg  make-toplevel-setg  make-toplevel-refg  make-module-setg  make-module-refg  make-lexical-setg  make-lexical-refg  make-primitive-refg  
make-constg  	make-void ;% 	
 !eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee "f  l-bde397a-b9e#f  l-bde397a-b9c$f  l-bde397a-b9a%f  l-bde397a-b98&f  l-bde397a-b96'f  l-bde397a-b94(f  l-bde397a-b92)f  l-bde397a-b90*f  l-bde397a-b8e+f  l-bde397a-b8c,f  l-bde397a-b8a-f  l-bde397a-b88.f  l-bde397a-b86/f  l-bde397a-b840f  l-bde397a-b821f  l-bde397a-b802f  l-bde397a-b7e3f  l-bde397a-b7c4f  l-bde397a-b7a5f  l-bde397a-b786f  l-bde397a-b767f  l-bde397a-b748f  l-bde397a-b729f  l-bde397a-b70:f  l-bde397a-b6e;f  l-bde397a-b6c<f  l-bde397a-b6a=f  l-bde397a-b68>f  l-bde397a-b66?f  l-bde397a-b64@f  l-bde397a-b62Af  l-bde397a-b60Bf  l-bde397a-b5eCf  l-bde397a-b5cDf  l-bde397a-b5aEf  l-bde397a-b58Ff  l-bde397a-b56Gf  l-bde397a-b54Hf  l-bde397a-b52If  l-bde397a-b4aJf  l-bde397a-b41Kf  l-bde397a-b3eLf  l-bde397a-b30Mf  l-bde397a-b26Nf  l-bde397a-b17Of  l-bde397a-b09Pf  l-bde397a-b07Qf  l-bde397a-b05Rf  l-bde397a-b03Sf  l-bde397a-b01Tf  l-bde397a-affUf  l-bde397a-afdVf  l-bde397a-afbWf  l-bde397a-af9Xf  l-bde397a-af6Yf  l-bde397a-af4Zf  l-bde397a-ae6[f  l-bde397a-ad8\f  l-bde397a-aca]f  l-bde397a-ac8^f  l-bde397a-abe_f  l-bde397a-abb`f  l-bde397a-ab9af  l-bde397a-ab7bf  l-bde397a-ab5cf  l-bde397a-ab3df  l-bde397a-ab1ef  l-bde397a-aafff  l-bde397a-aa1gf  l-bde397a-a97hf  l-bde397a-a8cif  l-bde397a-a75jf  l-bde397a-a67kf  l-bde397a-a64lf  l-bde397a-a56mf  l-bde397a-a54nf  l-bde397a-a52of  l-bde397a-a50pf  l-bde397a-a4eqf  l-bde397a-a4crf  l-bde397a-a4asf  l-bde397a-a48tf  l-bde397a-a46uf  l-bde397a-a39vf  l-bde397a-a36wf  l-bde397a-a34xf  l-bde397a-a32yf  l-bde397a-a30zf  l-bde397a-a2e{f  l-bde397a-a2c|f  l-bde397a-a2a}f  l-bde397a-a28~f  l-bde397a-a26f  l-bde397a-a24f  l-bde397a-a22f  l-bde397a-a20f  l-bde397a-a1ef  l-bde397a-a1cf  l-bde397a-a1af  l-bde397a-a18f  l-bde397a-a16f  l-bde397a-a14f  l-bde397a-a12f  l-bde397a-a10f  l-bde397a-a0ef  l-bde397a-a0cf  l-bde397a-a0af  l-bde397a-a08f  l-bde397a-a06f  l-bde397a-a04f  l-bde397a-9f6f  l-bde397a-9e8f  l-bde397a-9daf  l-bde397a-9ccf  l-bde397a-9caf  l-bde397a-9c8f  l-bde397a-9c6f  l-bde397a-9c3f  l-bde397a-9c1f  l-bde397a-9bff  l-bde397a-9bdf  l-bde397a-9bbf  l-bde397a-9b9f  l-bde397a-9b7f  l-bde397a-9b5f  l-bde397a-9b3f  l-bde397a-9b1f  l-bde397a-9aff  l-bde397a-9adf  l-bde397a-9abf  l-bde397a-9a9f  l-bde397a-9a7f  l-bde397a-9a5f  l-bde397a-9a3f  l-bde397a-9a1"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~ " ! g  define-structureg  define-expansion-accessorsg  define-expansion-constructors eee f  l-bde397a-967f  l-bde397a-92ff  l-bde397a-8fd " ejkskkkkk E c   g  lambdag  argsg  e1g  e2 eeee f  l-bde397a-1001f  l-bde397a-1002f  l-bde397a-1003f  l-bde397a-1004 " ekskkkkk  g  define-syntaxg  define-syntax-parameterg  callg  self-evaluating?g  constantg  otherg  syntax->datumg  include-deprecated-featuresg  issue-deprecation-warningf  ASequences of zero expressions are deprecated.  Use *unspecified*.f  sequence of zero expressionsf  Ddefinition in expression context, where definitions are not allowed,g  syntaxf  1reference to pattern variable outside syntax formf  )reference to identifier outside its scopef  unexpected syntaxg  mapf  &encountered raw symbol in macro outputf  mf  placeholderg  placeholder f  no expressions in bodyf  nonprocedure transformer,0f  -invalid or duplicate identifier in definitiong  reverseg  each//  1,挤f  duplicate bound keywordf  bad local syntax definitiong   $sc-ellipsis g  ...g  b f  l-bde397a-116a "g g  n f  l-bde397a-1167 "g g  id f  l-bde397a-1165 "g 8 eee f  l-bde397a-115ff  l-bde397a-1160f  l-bde397a-1161  "  ekkkkkk  f  invalid argument listf  %duplicate identifier in argument listg  lambda*g  restSg  keyS	g  optionalS
/f  invalid optional argument listg  a ee f  l-bde397a-11f4f  l-bde397a-11f5 " g  reqg  ropt f  l-bde397a-11eaf  l-bde397a-11ebf  l-bde397a-11ec " g  checkg  restg  optl eeeee  f  l-bde397a-11b4!f  l-bde397a-11b2"f  l-bde397a-11b0#f  l-bde397a-11ae$f  l-bde397a-11ac% !"#$ &"% 'g  	orig-args(' )f  l-bde397a-11ab*) +"(g* ,ek&+ -, .- //// 0//1/ 2f  invalid keyword argument list3g  allow-other-keysS4g  keyword?5g  symbol->keyword6g  k76 8f  l-bde397a-123398 :"7g9 ;f  l-bde397a-122d<f  l-bde397a-122e=;< >"= ?g  rkey@? Af  l-bde397a-1222Bf  l-bde397a-1223Cf  l-bde397a-1224Df  l-bde397a-1225EABCD F"@E Gek:>kF&+ 
HG IH Jf  invalid rest argumentKg  carLg  cadrM/1Ng  vectorO_ PNO QP1Rg  consSg  string?Tg  documentationUM VMUWg  vector->listXg  syntax-session-idYg  
make-fluidZg  error[f  9called outside the dynamic extent of a syntax transformer\g  letrec-syntax]g  
let-syntax^g  syntax-parameterize_f  
bad syntax`g  quoteag  refbf  misplaced ellipsisc/_dg  listeN1 f` gf  extra ellipsishg  	primitiveih! jf  missing ellipsiskg  tmplg  cdrmg  and-mapnf  how did we get hereof  bad `syntax' formp,Mqf  
bad lambdarf  bad lambda*sg  case-lambdat,Uu/Uv,uwf  bad case-lambdaxg  case-lambda*yf  bad case-lambda*zg  with-ellipsis{g  let|f  duplicate bound variable}/挤~,}f  bad letg  letrecf  
bad letrecg  letrec*f  bad letrec*g  set!,1/ g  setterg  m-bde397a-16acd  f  l-bde397a-16ad "m g  typeg  valueg  formformg  eeg  wwg  ssg  modmod f  l-bde397a-16a5f  l-bde397a-16a6f  l-bde397a-16a7f  l-bde397a-16a8f  l-bde397a-16a9f  l-bde397a-16aaf  l-bde397a-16ab "| g  headg  tailg  val f  l-bde397a-1696f  l-bde397a-1697f  l-bde397a-1698 " 8 eeeee f  l-bde397a-1677f  l-bde397a-1678f  l-bde397a-1679f  l-bde397a-167af  l-bde397a-167b " ekkkk  f  bad set!g  procedure-propertyg  variable-transformerf  not a variable transformerg  @,0/ e  f  l-bde397a-16d4f  l-bde397a-16d5 " 8 f  l-bde397a-16c8f  l-bde397a-16c9f  l-bde397a-16ca " ek  g  @@g  free-idg  
remodulate f  l-bde397a-16e0 " f  l-bde397a-16ddf  l-bde397a-16def  l-bde397a-16df " e   ,0/ g  exp f  l-bde397a-1709f  l-bde397a-170a " e  f  l-bde397a-16fdf  l-bde397a-16fe " e  ,/// g  with-fluidsg  syntax-caseg  pg  ids f  l-bde397a-1776f  l-bde397a-1777f  l-bde397a-1778 " g  cvtg  	v-reverseg  cvt* f  l-bde397a-1755f  l-bde397a-1753f  l-bde397a-1751 " g  patterng  keys f  l-bde397a-174ef  l-bde397a-174ff  l-bde397a-1750 "  g  gen-syntax-caseg  
gen-clauseg  build-dispatch-callg  convert-pattern  eeee f  l-bde397a-1749f  l-bde397a-1747f  l-bde397a-1745	f  l-bde397a-1743
	 "
 ek , N0 g  atomg  each+ f  duplicate pattern variableg  pat f  l-bde397a-1812f  l-bde397a-1813 " g  xg  clauses f  l-bde397a-1807f  l-bde397a-1808f  l-bde397a-1809f  l-bde397a-180a f  l-bde397a-180b!  ""! #ek" $# %,# &f  invalid clause'00(/'),(*f  invalid literals list+g  macroexpand,g  identifier?-g  datum->syntax.g  syntax-source/g  generate-temporaries0f  invalid argument1f  t2g  free-identifier=?3g  bound-identifier=?4g  throw5g  syntax-error6g  syntax-local-binding7g  assq-ref8f  unexpected id-var-name9g  pattern-variable:g   syntax-locally-bound-identifiers;g  define!<g  syntax-module=g  with-syntax>1?,>@ Af  l-bde397a-196aBf  l-bde397a-196bCAB D"@C E Ff  l-bde397a-1967GF H"EgG IeDkH J{I K LK1M,LNg  outOg  inPNO Qf  l-bde397a-1970Rf  l-bde397a-1971Sf  l-bde397a-1972Tf  l-bde397a-1973UQRST V"PU WeVkH XW Y{W Zf  l-bde397a-197a[f  l-bde397a-197b\f  l-bde397a-197c]f  l-bde397a-197d^Z[\] _"P^ `e_kH a` bd` c{` dg  messageeg  argfde gf  l-bde397a-19a3hf  l-bde397a-19a4igh j"fi kf  l-bde397a-1986lk m"Egl nejkm o5n pn qp rg  string-joinsg  object->stringtg  syntax-rulesug  clausevu wf  l-bde397a-19afxw y"vgx zg  expand-syntax-rules{g  expand-clause|z{ }ee ~f  l-bde397a-19acf  l-bde397a-19aa~ "|} g  xx f  l-bde397a-19a9 "g eky 5  1_ _/ g  dummyg  keywordg  template f  l-bde397a-19c4f  l-bde397a-19c5f  l-bde397a-19c6 " eky   de f  l-bde397a-19baf  l-bde397a-19bbf  l-bde397a-19bcf  l-bde397a-19bd " eky   5  000 g  	docstring6u eeeeee f  l-bde397a-19d5f  l-bde397a-19d6f  l-bde397a-19d7f  l-bde397a-19d8f  l-bde397a-19d9f  l-bde397a-19da " g  dotsg  
docstrings f  l-bde397a-19cef  l-bde397a-19cff  l-bde397a-19d0f  l-bde397a-19d1 " ekkkk 	    t g  patterns   f  l-bde397a-19e7 "g g  form f  l-bde397a-19e3 "g ekkkkkk z 0,ό/0ь,Ҍ/ό,Ԍ/Ҍ,֌g  define-syntax-rule,_/  f  l-bde397a-1a50f  l-bde397a-1a51f  l-bde397a-1a52 " f  l-bde397a-1a4d "Eg ek  t , ,_//  f  l-bde397a-1a5ff  l-bde397a-1a60f  l-bde397a-1a61f  l-bde397a-1a62 " ek  t , g  let*g  fg  bindings f  l-bde397a-1a80f  l-bde397a-1a81 " g  v f  l-bde397a-1a76f  l-bde397a-1a77f  l-bde397a-1a78 f  l-bde397a-1a79f  l-bde397a-1a7a  " f  l-bde397a-1a68 "Eg ekk { 	g  body
g  binding	
 f  l-bde397a-1a8af  l-bde397a-1a8b " ekkk { g  
quasiquoteg  unquoteg  lev f  l-bde397a-1a9ef  l-bde397a-1a9f " g  emitg  quasivectorg  
quasilist*g  quasiappendg  	quasiconsg  vquasi g  quasi!  "eeeeeee #f  l-bde397a-1a9a$f  l-bde397a-1a98%f  l-bde397a-1a96&f  l-bde397a-1a94'f  l-bde397a-1a92(f  l-bde397a-1a90)f  l-bde397a-1a8e*#$%&'() +"!"* ,ek+ -, .- /./ 0f  value1 2f  l-bde397a-1aa232 4"1g3 5e4k+ 605 7f  quote875 95 :89 ;, <; =</ >f  l-bde397a-1aa5?> @"1g? Ae@k+ B7A CA DBC Eg  qFE Gf  l-bde397a-1aa8Hf  l-bde397a-1aa9IGH J"FI KeJk+ LK ML NM0Of  l-bde397a-1aaePO Q"1gP ReQJk+ S0R T7R UR VTU Wg  unquote-splicingXWK YX ZY0[f  l-bde397a-1ab3\[ ]"1g\ ^e]Jk+ _0^ `7^ aW^ b`a c7 dc0 ef  l-bde397a-1b0efe g"Egf hf  l-bde397a-1b0bih j"Egi kegkj+ l7k mg  ynm of  l-bde397a-1b23po q"ngp rm6 sf  l-bde397a-1b11tf  l-bde397a-1b12uf  l-bde397a-1b13vstu w"rv xeqkwkj+ y7x zf  list{z |{0}f  list*~} /1 ~f  list->vectorg  t-bde397a-1b34 g  m-bde397a-1b35d  f  l-bde397a-1b38 " g  else f  l-bde397a-1b32 "g ekkwkj+ 	 f  vectorg  t-bde397a-1b19 g  m-bde397a-1b1ad  f  l-bde397a-1b1e " g  ls f  l-bde397a-1b18 "g ekkkkkj+ 
 f  l-bde397a-1abb "1g ek+ 7 f  l-bde397a-1ac3f  l-bde397a-1ac4 "F f  l-bde397a-1abff  l-bde397a-1ac0 " ek+   0f  l-bde397a-1ac9 "1g ek+ 0 7   W  0f  l-bde397a-1ace "1g ek+ 0 7 W  ek+ 7  c/ g  dx f  l-bde397a-1ae4 "g g  dy f  l-bde397a-1ae0 "g m f  l-bde397a-1adaf  l-bde397a-1adb " f  l-bde397a-1ad5f  l-bde397a-1ad6 " ekkk+ 	7 ekkk+ z } {/g  stuff f  l-bde397a-1ae7 "g ekkk+ z ~/f  l-bde397a-1aea "g ekkk+ } ekkk+ } c f  l-bde397a-1aeef  l-bde397a-1aef " ek+ 7  f  appendf  l-bde397a-1af6 "1g ekk+  0/  m f  l-bde397a-1afdf  l-bde397a-1afe "  ekk+  f  l-bde397a-1b3e 	"Eg 
f  l-bde397a-1b3b
 "Eg e	k+ ` g  t-bde397a-1b43 g  m-bde397a-1b44d  f  l-bde397a-1b48 " f  l-bde397a-1b41 "Eg ekk+ d g  t-bde397a-1b57g  t-bde397a-1b56 g  m-bde397a-1b58 d !   "f  l-bde397a-1b5c#f  l-bde397a-1b5d$"# %"!$ &g  x*'& (f  l-bde397a-1b51)f  l-bde397a-1b52*() +"'* ,f  l-bde397a-1b4d-f  l-bde397a-1b4e.,- /". 0ek%k+/k+ 	1R0 2 3204g  t-bde397a-1b6354 6g  m-bde397a-1b6476d 87 9f  l-bde397a-1b68:9 ;"58: <f  l-bde397a-1b61=< >"Eg= ?ek;>k+ @!? A BA0Cg  t-bde397a-1b6fDC Eg  m-bde397a-1b70FEd GF Hf  l-bde397a-1b74IH J"DGI Kf  l-bde397a-1b6dLK M"EgL NekJMk+ ONN P QP/ Rg  t-bde397a-1b7bSR Tg  m-bde397a-1b7cUTd VU Wf  l-bde397a-1b7fXW Y"SVX Zf  l-bde397a-1b79[Z \"Eg[ ]ekY\k+ ^] _0 `_/ ag  includebg  open-input-filecg  absolute-file-name?dg  in-vicinityef  Brelative file name only allowed when the include form is in a filefg  file-encodinggg  set-port-encoding!hf  UTF-8ig  eof-object?jg  close-input-portkg  readlg  filenamemg  dirnamen of  l-bde397a-1bbapo q"ngp rg  fnsr tf  l-bde397a-1bb5ut v"sgu w6l xf  l-bde397a-1bb1yf  l-bde397a-1bb2zxy {"wz |g  dir}| ~f  l-bde397a-1bab~ "}g g  file f  l-bde397a-1ba7 "g g  src f  l-bde397a-1ba5 "g g  	read-file f  l-bde397a-1b8c " f  l-bde397a-1b8b "Eg ekqkkv{kkkk \ g  include-from-pathg  %search-load-pathf  file not found in pathf  l-bde397a-1bc9 "sg f  l-bde397a-1bc5 "sg f  l-bde397a-1bc1f  l-bde397a-1bc2 "w f  l-bde397a-1bbe "Eg ekkkk 	a f  *expression not valid outside of quasiquoteg  set-procedure-property!f  $variable transformer not a procedureg  make-variable-transformerg  identifier-syntax8 f  l-bde397a-1bdd "g f  l-bde397a-1bda "g ek         ,    ,    ek   // / , g  exp1g  varg  exp2 f  l-bde397a-1becf  l-bde397a-1bedf  l-bde397a-1beef  l-bde397a-1beff  l-bde397a-1bf0 " ek       ܌       , g  define*g  b0g  b1 f  l-bde397a-1bfaf  l-bde397a-1bfbf  l-bde397a-1bfcf  l-bde397a-1bfd " f  l-bde397a-1bf7 "Eg ek ]   f  l-bde397a-1c08f  l-bde397a-1c09 " ek ] C 5 hj   ,  3 5HH       h      ] 6       g  x
		 g  mod		  g  filenamef  ice-9/psyntax.scm
			
 			  g  nameg  top-level-eval-hook C	 	  h     ]$  "  45 $  4 >  "  G  "   4$  45"  45  5$  8$  /45$  45$  4545CCCCC        g  symbol
	  g  module	  g  v		L  g  val		^   g  filenamef  ice-9/psyntax.scm
)		*		*	 	*	
	+		+		"+		/,		7,	$	8-	(	=-	8	?-	(	D.	(	L,		L,	
	T0		W0		[0		^1		^1		a2		k2		l2	%	v2		w3		~4	 3	 	 	  g  nameg  get-global-definition-hook C
       h@     ]$  4	&  &45$  C CCC       g  name
		? g  val		? g  meta			; g  v		2	;  g  filenamef  ice-9/psyntax.scm
<					=				>	
	?		 ?		$?		(?		,@	-	/@	&	2@		:	 		?	  g  nameg  maybe-name-value! C
    h      ]	  C              g  source
		 g  fun-exp		 g  arg-exps			  g  filenamef  ice-9/psyntax.scm
H		
	 			  g  nameg  build-application C  h     ] $    $  	6$   445 5$  66$  6$  7445 5$  "  4455$  	66	
66         g  mod
	  g  var	  g  modref-cont		  g  	bare-cont		  g  kind		  g  mod		   g  filenamef  ice-9/psyntax.scm
\		]		_		`		_	
	a		$b		-a		0c	.	3c	;	9c	.	:c	"	>c		De		Md		Va		\f		ea		hg	3	kg	@	qg	3	rg	'	vg		|h	"	h	3 h	" g	 i	 j	 k	) k	 ^	
 !	 	  g  nameg  analyze-variable C
   h0     ]	  
	  C             g  src
		) g  req		) g  rest			) g  vars			) g  meta			) g  exp			) g  body			)  g  filenamef  ice-9/psyntax.scm
		
			)	
				
	 		)	  g  nameg  build-simple-lambda C
  h       ](  C	  C             g  src
		 g  exps		  g  filenamef  ice-9/psyntax.scm
									
	 			  g  nameg  build-sequence C
  h     ]M	  
		 	 			$  B		&  2	
4
5$  "  
	
"   "   4L >  "  G    	 	  
	 
 

	 
 C            g  src
	  g  ids	  g  vars		  g  val-exps		  g  body-exp		  g  f		  g  f-name		  g  vars		  g  ids		  g  body			+	= g  proc			=  g  meta	
	V  g  v		q	} g  fun-exp	
   g  names	
   g  gensyms	   g  vals	   g  body	    g  filenamef  ice-9/psyntax.scm
												
		#	)	+
		+		2
		5	;	:
		=	
	B		F=		I		V>	
	Y?		]?		a?		e?		k@	-	n@	&	q@		y	 	 	 	 	$ 
	 	 
	 	 
	 $	 	  g  nameg  build-named-let CO 	
   h8      ](  C4L >  "  G  	  C         g  src
		6 g  	in-order?		6 g  ids			6 g  vars			6 g  val-exps			6 g  body-exp			6  g  filenamef  ice-9/psyntax.scm
						&
	 		6	  g  nameg  build-letrec CO 
       h   z   ] C r       g  x
		  g  filenamef  ice-9/psyntax.scm
	 		  g  nameg  syntax-object-expression C  h(      ] (  C   "          g  labels
		% g  bindings		% g  r			%  g  filenamef  ice-9/psyntax.scm
-		.		0		0	%	1	$	1	1	1		1		%0	 
		%	  g  nameg  
extend-env CO       h(      ] (  C   "       g  labels
		( g  vars		( g  r			(  g  filenamef  ice-9/psyntax.scm
5		6		8		8	)	9	(	9	C	9	L	9	5	9	"	9		(8	 		(	  g  nameg  extend-var-env CO   hH     ] (  C &  "  $  4L  5C  "            g  r
		C g  a		C g  t			*  g  filenamef  ice-9/psyntax.scm
?		@			A		B		B		C		C		.C		1D		6D	+	8D		9D		=E	#	CE	 		C  g  nameg  macros-only-env CO      h      ]45 4 56       g  type
		 g  sym		 g  val			  g  filenamef  ice-9/psyntax.scm
T		$		&		$	
 			  g  nameg  global-extend C       h8      ] $  C $  "4 5	$   
&   CCCC         g  x
		6  g  filenamef  ice-9/psyntax.scm
c		e	
		d				d				/f	 		6  g  nameg  id? C h       ] (  C44554L  5C       g  ls
		   g  filenamef  ice-9/psyntax.scm
												%								*				 		   g  nameg  
gen-labels CO  ! h     ] (  C "  L 	"  j$  ^45	$  H
&  6L 	(  "  	45	"  "  ""  ""  "G LL  "W           g  ids
	  g  i	  g  x		  g  m1		J	i g  m2		J	i g  symname	   g  marks	    g  filenamef  ice-9/psyntax.scm
					<		)	u		u		q		!		%q		&		Dt		I		Jt	(	Jt		T		[		or	 	 	 	 	! 	+ 	 	 	  g  nameg  f C"    h   x  ]+ (  C45454545O Q 4 
>  "  G   C     p      g  ids
		{ g  labels		{ g  w			{ g  labelvec			u g  n			r g  
symnamevec		.	o g  marksvec		.	o g  f		=	^  g  filenamef  ice-9/psyntax.scm
														!	$	(	?	.		=		`		x		y		z	 		{	  g  nameg  make-binding-wrap C!        h     ]  (  +(  C(  "  	45C(  "  	45(  "  	45C       y      g  w1
		y g  w2		y g  m1			y g  s1			y g  m2		!	; g  m2		@	Z g  m2		]	w  g  filenamef  ice-9/psyntax.scm
					'				
					!	$	!		)		0		<		@	 	@		H		O		]	 	]		e		l		x	 		y	  g  nameg  
join-wraps C   h8      ] &  C (  C(  C &    "C         g  x
		6 g  y		6  g  filenamef  ice-9/psyntax.scm
		
								"		&		)		,	&	4	 		6	  g  nameg  same-marks? CO #$  h    ]#(  D&    "$  m45"  Y$    ""  	" &  #4L	5$  	D""
""  a(    "A"  " &  +4L4	55$  4	5D""
"  
      g  sym
	 g  subst	 g  marks		 g  fst		 g  symnames		0 g  n		@  g  i		F  g  symnames	  g  i	   	g  filenamef  ice-9/psyntax.scm
	
														"	"	.	,		0		0		5		9		:		@		F		K		O		T	(	`		g		m		m		r			x		y
	 	 
	* 
	 		 	 	 	 	 	 	 	- 	! 	 	' 	 	 	 	  	  	( 	  	(  	 	 	 	 			 9		  g  nameg  search C%&!       h   R  ]:O L Q  $  4 5$  C C"  
 6 $  4 5	$  | 
&  n  	(  "  	454>  G $  C45$  CC"e"a"]     J      g  id
	  g  w	  g  search		  g  t		&	4 g  id		j  g  w1		j  g  m1		t  g  m2		t  g  marks	   g  new-id	   g  marks	   g  t	    g  filenamef  ice-9/psyntax.scm
			
					!	 	$	/	&		&	
	<	!	>	.	B		B		E		I		J		j	
	q	%	t	4	t		~	 	 	 	+ 	6 	+ 	 	 	 	( 	 	  	 	  g  nameg  id-var-name CO #        h8    ]B"  _(  C&  "	$  "  w"  "  ["  G(  "4L 				5"""  a45"  I$  "4L 				5"
" "         g  w
	5 g  mod	5 g  subst			e g  results			e g  fst			e g  symnames		2	e g  marks		2	e g  subst		i  g  symnames		i  g  marks		i  g  results		i  g  symnames		m  g  marks		m  g  results		m  g  w		   g  subst	 ) g  symnames	 ) g  marks	 ) g  results	 ) g  n	 ) g  i	  g  results	  g  w		   g  filenamef  ice-9/psyntax.scm
(		*	
	+		-		-		.		.		/		)/		-		20		92		=2		Q3		e4		i6	
	m7		s8		v9	 9	 :	 :	$ ;	 ;	! <	7 <	, <	! 	' 	 	 	  	 	 ;	 ;	 :	 7	 @	
 A	 A	 B	 C	 C	 D	 D	 E	 F	 F	# G	9 G	. G	#	'		
	 		F	F	E	B	,J	-J	5J	 A	5	  g  nameg  locally-bound-identifiers CO    h   ,  ]"  d(  "  a$  "  3$  +45	$  
&  	"  "  "  $  	""   "$  L  6C  $      g  ids
		~ g  ids		j g  x			X  g  filenamef  ice-9/psyntax.scm
												e	
	d		%		)d		*		Ff		\		_	"	e		j		v		|	 		~  g  nameg  valid-bound-ids? CO     h0      ]	"  "(  C4L 5$  C" "       g  ids
		0 g  ids		(  g  filenamef  ice-9/psyntax.scm
					
						*		4					"		(		(	 		0  g  nameg  distinct-bound-ids? CO         h   _  ]
(  C"  	 "   $  4 5	$  o 
&  ]$  N45	$  8
&  & &  4L 		5"  "  ""  ""  ""  "w"  "o"  "g$  C  "; W      g  x
	  g  list	  g  j		  g  t	    g  filenamef  ice-9/psyntax.scm
										|				#|		$		1|		5		f}		g		n		o		t		u		w	 	 	% 	 	 	  g  nameg  bound-id-member? CO   h   d  ]"   (   C  C"  R $  G4 5	$  5 
&  ' 4L  	5 	 C"""(  (   C""      \      g  x
	  g  w	  g  defmod		  g  
expression		S	e g  wrap		S	e g  module		S	e  g  filenamef  ice-9/psyntax.scm
								"		&		'		C		L		N		S		S	
	[		q		t		x		{	-		
 	 	  g  nameg  wrap CO '(      h@      ]L $  '4 5$  4 >  "  G  "   "    6              g  x
		9 g  w		9 g  s			9 g  defmod			9  g  filenamef  ice-9/psyntax.scm
		
8		8		8	
	9	
	9	 		9	  g  nameg  source-wrap CO )   h     ]D (  C 4L4$  ,45	$  
&  "  "  "  5$  "  >  G 
	4L	
5	
4L  5C             g  body
	  g  r	  g  w		  g  mod		  g  e		  g  props		R	e g  type		o  g  value		o  g  form		o  g  e		o  g  w			o  g  s	
	o  g  mod		o  g  first	    g  filenamef  ice-9/psyntax.scm
								3		+							"		#		R		R		W		[	
	n		r	 	 	 	, 	4 	, 	  	 	  g  nameg  dobody C       h0      ]LO L LQ 4 56            g  body
		+ g  r		+ g  w			+ g  s			+ g  mod			+ g  dobody			)  g  filenamef  ice-9/psyntax.scm
				+	 		+	  g  nameg  expand-sequence CO )*+-.      h      ] L C          		
   C2   h    g   ]L LLLLLLL 6       _       g  e1
		 g  e2		  g  filenamef  ice-9/psyntax.scm		 			   C34 h      ]L LLL 6         g  body
		 g  r		 g  w			 g  s			 g  mod			  g  filenamef  ice-9/psyntax.scm
	.		0 			   C5789:;<=>?@AB h    ]#4L L 5L	&  r45$  'LLLL45$  "  LL645$  .4LLLLL54>  "  G  "   LC45$  4	5$  "  /45$  "  L	&  45"  $  LLLL
LL6L	&  "  L	$  LLLLLL6LC4	5$  "  /45$  "  L	&  45"  $  -4LLLLL54>  "  G  LCLC          g  x
	 g  e1	 g  e2		 g  	when-list		 g  body		 g  x		p  g  t	   g  t	   g  t	1p g  t	Gm g  x	  g  filenamef  ice-9/psyntax.scm		-				'				$	!	*	%	$	)	 	4	.	8	4	<	.	@	*	B	G	H	L	J	*	P	$	Q	*	U	0	Y	*	]	&	^	+	j	K	l	N	p	+	p	*	s	
 	  	& 	  	 	( 	. 	( 	$ 	( 	. 	( 	$ 	4 	( 	: 	@ 	: 	  	5 	: 	$	(	$	9	<%	()	$-	*1	$1	 ?	$C	*G	$G	 X	0\	$]	6a	<e	6t	u	!	A	D	!	 	
 I		   CCDA9?><:F
GIKHLMNOPQ)
     h     ]84L LLL4L$  ,4L5	$  L
&  L"  L"  L"  L5  $   "   L>  G  4L L5   $  B 	&  2 45$  "  L "   "   		LL  C       g  props
	E	X g  type
	b  g  value	b  g  form		b  g  e		b  g  w		b  g  s		b  g  mod		b  g  exp
   g  meta   g  v	    g  filenamef  ice-9/psyntax.scm
:	$											E		E		J		N	
	a		e		t	 ;	& 	 =	 	 >	
 ?	 ?	 ?	 ?	 @	- @	& @	 	 
	 	 
   CJR'(S  h   N   ] LLLLLLLLL 6  F       g  filenamef  ice-9/psyntax.scm
K	&	L	( 		
   C 7      h`	    , 3  (  C 4L 4$  ,45	$  
&  "  "  "  5		$  	"  			$  	"  	>  G 
	$  k45$  4O > o"  A4	5$  #4
LO > ;"  4> *" %$  %4L	LO > " $  I45$  '4L	LL
O 
> "  4> " $  "  $ 4L	54L5$ 45$  4L4L 4$  ,45	$  
&  "  "  "  5$  "  >  G 4L554L>  "  G  45$  	"  "  45$  4L4L 4$  ,45	$  
&  "  "  "  5$  "  >  G 4L55"  " H$  4L4L 4$  ,45	$  
&  "  "  "  5$  "  >  G 4L554L>  "  G  " ~45$ o4L4L 4$  ,45	$  
&  "  "  "  5$  "  >  G 4L5445 5$  	 "  	    	 $  B	&  24 !5$  "  !"   "   		 >  "  G  "   " "$ +4L	54 5$  "  )$   4L5$  "  #"  $%$  "  !&$  "  $  "  '$ &  "  $  4(45 5$  "  45 $  4)45 5"   4*45 4+5 >  "  WG  "  P4,5$  A$  24-5$  ""  4.45 >  "  G  "  ""  ""   "   & 4L 4$  ,45	$  
&  "  "  "  5$  "  >  G 4L5$  B	&  24 !5$  "  !"   "   		 4/>  "  G  "  0L LO "  1$  R424L$  '43
5$  44
>  "  G  "   "   
54L	5>  "  N454L$  '43
5$  44
>  "  G  "   "   
54L	5>  Y"  T&  24L	
54/>  "  G  "  6
	LO 	G   "          g  body
		\ g  r		\ g  w			\ g  s			\ g  m			\ g  esew			\ g  mod			\ g  exps			\ g  e		  g  props			W	j g  t			j	} g  type	 	1 g  value		 	1 g  form	
 	1 g  e	 	1 g  w	 	1 g  s	 	1 g  mod	 	1 g  tmp	  g  tmp	  g  tmp	L g  n	 g  r	 g  props	( g  type	2m g  value	2m g  form	2m g  e	2m g  w	2m g  s	2m g  mod	2m g  e	o g  props		 g  type	N g  value	N g  form	N g  e	N g  w	N g  s	N g  mod	N g  props	 g  type	 g  value	 g  form	 g  e	 g  w	 g  s	 g  mod	 g  e	# g  props	z g  type	 g  value	 g  form	 g  e	 g  w	 g  s	 g  mod	 g  e	 g  fun-exp	2 g  arg-exps	2 g  exp	2 g  meta	Ku g  v	fr g  n	 g  t	 g  t	 g  type	 g  old	w g  props	CV g  type	` g  value	` g  form	` g  e	` g  w	` g  s	` g  mod	` g  exp	 g  meta	 g  v	 g  x	 g  x		 g  exps		2	\  Rg  filenamef  ice-9/psyntax.scm
			
		!							#		'		(		W		W		\		`	
	j	- 	 	 		C		"	<			"	(	"		+									
1	5	D	o	+o	"r	$	(	.	(	$	0	&	,	&	"	4									
		%	P	4S	.f	g	'l	u	z	~						
				'		 #	((	",	(0	"4	5	"8	A	F	J	K	z	z			
				#		!		3		
	e	#
		!e	#
	g	&
	f	
c		$
	2`	7	;=	>	K>	
N?	R?	V?	Z?	`@	-c@	&f@	n	
		"	#	##	N	
M	O	
M	P	P	
P	1Q	%	&#	&	?)	'M)	N*	,Q*	CY*	,])	"c+	'k)	"l,	-o,	>w,	-w,	"~3	(3	53	H3	(/	$/	-/	$0	-/	(1	21	:1	2/	(2	(2	82	K2	(6	+ 6	 	
				C	C	H	L	
_	c	r	7	-	=		>	
?	?	?	?	@	-@	&@		
	7	$	
,5	9&	:>	?>	3@	H8	I8	S8	
T9	
w	x@	0>	B	B	3	8	8	8	
9	
	D	0B	G	-G	"H	/H	&	
	1F	!	5		:O		\O	 		\	  g  nameg  scan C
T     h     ]/O L
L	LLLLLLLLL Q 4 >  G (  

 CL"  8	(  
"  7		45$  	45 "  

	"
	"6            g  body
	  g  r	  g  w		  g  s		  g  m		  g  esew		  g  mod		  g  scan		  g  exps		H  g  in			e  g  out	
	e  g  e		t   g  filenamef  ice-9/psyntax.scm
		1R		BR	8	GR		KQ		ST		W
		eX		kY		tZ	 	tZ		y[		z\	' \	# \	6 \	 [	 X	 X	) X	 V	 	 	  g  nameg  expand-top-sequence CO F
 	      h     ]445 5$  	 "  	     	 $  B	&  245$  "   "   "   		  C             g  name
	  g  e	  g  fun-exp		I	` g  arg-exps		I	` g  exp		`  g  meta		y  g  v	    g  filenamef  ice-9/psyntax.scm
_					!				3					
		e	#	
		*	!	,e	#	0
		Ag	&	D
		If	
	Ic			R
		``		e		i=		l		y>	
	|?	 ?	 ?	 ?	 @	- @	& @	 	 
	 !	 	  g  nameg  expand-install-global CU?>:;VW 	     hp   8  ]4L 5"  W(  C&  "  &  "  &  "  $  	" 6"0      g  e
		p g  	when-list		p g  result			p g  l			h g  t			N  g  filenamef  ice-9/psyntax.scm
k		m		m		n	
	o		q		q		Rq		Ur		[r		_s	&	as	1	ft	&	hs		hn	
 		p	  g  nameg  parse-when-list CO IKHUXYMLZ[4\*V5]+^ab3     h8      ] $  C $  "4 5	$   
&   CCCC  ~       g  name
		6  g  filenamef  ice-9/psyntax.scm	e	
		d				d				/f	 		6   CGU       h(   t   ]4L LL54LLLL5L LD    l       g  name
		$  g  filenamef  ice-9/psyntax.scm				+			$	 		$   CU  h8  .  ] $  "  3 $  +4 5	$   
&  	 "  "  "  $  L "  $  4L5"$  "  3$  +45	$  
&  	"  "  "  $  4L5"  o(  "  c"  	"  V$  <45	$  *
&  4L	5"4""""6C  &      g  name
	6 g  args	6 g  e1		6 g  e2		6 g  vars		K# g  ls		K# g  w		K#  g  filenamef  ice-9/psyntax.scm	e	
		d				d				2f		E		K=		N?		R>	
	U?		V?	/	[?	5	`?	/	c?	)	o?		re	
	vd		~	 d	 	 f	 >	
 @	 @	 >	
 H	 >	
 	 >	
 	E		E	C	#=	&=	"2=	4	 (	6	   CG'(U   hp      ]4L LL54LLLL54LLL5L $  '45$  4L >  "  G  "   "   L LD             g  name
		j g  args		j g  e1			j g  e2			j g  e		.	b  g  filenamef  ice-9/psyntax.scm				+				.	.		.		68		78		A8	
	B9	
	j	 		j	   C    h8      ] $  C $  "4 5	$   
&   CCCC         g  name
		6 g  val		6  g  filenamef  ice-9/psyntax.scm	e	
		d				d				/f	 		6	   CG   h   s   ] LLLL D      k       g  name
		 g  val		  g  filenamef  ice-9/psyntax.scm				 			   C  h8      ] $  C $  "4 5	$   
&   CCCC         g  name
		6 g  val		6  g  filenamef  ice-9/psyntax.scm	e	
		d				d				/f	 		6	   CC   h   s   ] LLLL D      k       g  name
		 g  val		  g  filenamef  ice-9/psyntax.scm				 			   C  h8      ] $  C $  "4 5	$   
&   CCCC         g  name
		6 g  val		6  g  filenamef  ice-9/psyntax.scm	e	
		d				d				/f	 		6	   CD   h   s   ] LLLL D      k       g  name
		 g  val		  g  filenamef  ice-9/psyntax.scm				 			   C) - h    ]o $  4L 545$  "  )$   4L5		$  	"  	"  		$  	  D	$  	  D	$  H$  	  D4L 5 "	  D $  4L>  G 
	$  	  D$  	
	   D$  14L	 5 "f$  <4	 >  G  "!$  	  D$  	  D$    D$    D$  4 5"  4 5"  D4 5"  	 6$  "4?$   LO @""$  +4L LLO ?$   LO @""$   4?$    O @"R"N!$  B4 5"  	 6$   4"?$  # O @""$$  B4 5"  	 6$   4%?$  & O @""'  D"  )4( 5$  )  D*  D $  4+ 5	$   

&   4L 	54,4+ 5	$   

&   "   "   5$  "  $  "   	$  "   "q"!""         g  e
	 g  r	 g  w		 g  s		 g  rib		 g  mod		 g  for-car?		 g  n		  g  t			X g  t			<	O g  b		X  g  type			]  g  first	  g  ftype	 g  fval		 g  fform	
 g  fe	 g  fw	 g  fs	 g  fmod	 g  e	 g  r	 g  w	 g  s	 g  mod	 g  tmp	U g  tmp	d g  tmp	s g  tmp	X g  tmp	j g  props	=P g  t	Pc g  t	j}  !g  filenamef  ice-9/psyntax.scm
			
				
			
	N	
	M		/O	
	3M		4P		<P	
	LP	1	UQ		X	
	]		]	
	h		m	&	y	 	 	 	 	 	  	 	  	. 	  	 	! 	 	
 	 	 	
		0	2	@	I	K	M	b	k	l	 			0										+	4	6	C	L				
		'												=	=	B	F	
P	j	j		
 Z		  g  nameg  syntax-type CO  )       h     ]<4L 4 $  ,4 5	$   
&   "   "   "   5$  "  >  G 
	L 	
6       g  e
	  g  r	  g  w		  g  mod		  g  props		E	X g  type		b  g  value		b  g  form		b  g  e		b  g  w		b  g  s			b  g  mod	
	b   g  filenamef  ice-9/psyntax.scm
												E		E		J		N	
	a		e	 	 	 	  g  nameg  expand CO !
LZM)XY
   h      ]	L   C     ~       g  mod
		 g  var		 g  public?			  g  filenamef  ice-9/psyntax.scm
q			
	 			   C
    h   `   ]	L   C X       g  var
		  g  filenamef  ice-9/psyntax.scm
s			
	 		   C'(UH
       h      ]	L   C     ~       g  mod
		 g  var		 g  public?			  g  filenamef  ice-9/psyntax.scm
q			
	 			   C
    h   `   ]	L   C X       g  var
		  g  filenamef  ice-9/psyntax.scm
s			
	 		   C*+2     h   g   ]L LLLL 6     _       g  e1
		 g  e2		  g  filenamef  ice-9/psyntax.scm	 	 			   C-
'( 	      hh      ] 45 $  4>  "  G  
 C4LL$  '4L5$  4LL>  "  G  "   "   LLL 56          g  filenamef  ice-9/psyntax.scm	"		"		$		%		$		!
		+'	'	,		48		58		?8	
	@9	
	c		e'	 		e
   C34579:
 h8      ]4L L 545$  LLLLL6
 C           g  x
		4 g  e1		4 g  e2			4 g  	when-list			4  g  filenamef  ice-9/psyntax.scm	.		.		/		/		/		/		+0		/
	 			4	   CGCDJ + h  5  , 3  $  	 C $  "   $  6 $  4>  G 
	4L	
4$  ,45	$  
&  "  "  "  5$  "  >  G 	 "	 	$  L 4$  ,45	$  
&  "  "  "  5		$  	"  	$  /45	$  
&  4
5"  "  "  
			
 	
6 $  L 4$  ,45	$  
&  "  "  "  5		$  	"  	$  ,45	$  
&  "  "  "  $  -45	$  
&  		"  "  "  
	4L
	O O 5	
6 $  M4L4L$  '45$  4>  "  G  "   "   55 C $  LO O 6 $  L 4L4$  ,45	$  
&  "  "  "  5		$  	"  	>  G 
	4L	
5	
6 $  Q45$  LO @45		$  LO 	@6 $  LL6 $  14 5$  !LLO @6 "$  "   #$  "   $$  ?%4L$  '45$  4>  "  G  "   "   56 &$  ?'4L$  '45$  4>  "  G  "   "   56 ($  ?)4L$  '45$  4>  "  G  "   "   56*4L$  '45$  4>  "  G  "   "   56 -      g  type
	 g  value	 g  form		 g  e		 g  r		 g  w		 g  s		 g  mod		 g  e		[  g  r			[  g  w	
	[  g  s		[  g  mod		[  g  props	   g  type	   g  value	   g  form	   g  e	   g  w	   g  s	   g  mod	   g  id	 g  props		GZ g  source		 g  name	
 g  x	 g  props		 g  source	 g  var		 g  mod	
 g  exp	 g  e	9 g  props		~ g  type		 g  value	
 g  form	 g  e	 g  w	 g  s	 g  mod	 g  tmp	? g  tmp		? g  tmp	l  +g  filenamef  ice-9/psyntax.scm
				
		'		C		L		M	(	^		i		r		w		{		|	 	 	 	 	
 	 	 		
	
					G	G	L	P	
]	a	'b	z	+	
					7	$								
	 	$!	U	$V		o				$	8	8	8	
9	
		$	
		+o	4	9	.9	&<	E	J	N	O	~	~			
					Z*	c	3	 	8	8	8	
9	
	3		6	 	8	8	8	
9	
>	@6	I	N9	 O	W8	X8	b8	
c9	
	9	;	%	8	8	8	
9	
	;	 |		  g  nameg  expand-expr CO 	"+1)  h   Q  ]94L LL4 $  ,4 5	$   
&   "   "   "   5$  "  L>  G L L6 I      g  e
	  g  props	E	X g  type	b  g  value		b  g  form		b  g  e		b  g  w		b  g  s		b  g  mod		b   	g  filenamef  ice-9/psyntax.scm
C	#											E		E		J		N	
	a		e	 	 	    C
  h0      ]
4LLLLL O 5	LL C              g  e0
		) g  e1		) g  arg-exps			)  g  filenamef  ice-9/psyntax.scm	C		B		
	 		)	   C3  h8      ]45$  LL  O @6            g  x
		3 g  e		3 g  r			3 g  w			3 g  s			3 g  mod			3 g  tmp			3  g  filenamef  ice-9/psyntax.scm
?	 		3	  g  nameg  expand-application CO #'( # 	h@    ]2 $  G4L 54L 5L$  '45$  4L>  "  G  "   "   C $ e"  w4 545L$  '45$  4L>  "  G  "   "   "  &$  C4L 5"
"4 5	$   
&   	"  l L$  '45$  4L>  "  G  "   "   L $  L "   	 C$  >&  2 L $  
L "   	 C"O"K"" $  IL4L$  '4L5$  4L>  "  G  "   "   LLL5 6L$  '4 5$  4 L>  "  G  "   "    C          g  x
	< g  m	< g  e			P g  n		b  g  e		k  g  v	   g  i	   g  w	  g  ms	  g  ss	  g  e	7 g  
expression	Yk g  wrap	Yk g  module	Yk g  
expression	 g  wrap	 g  module	 g  s	  g  filenamef  ice-9/psyntax.scm
i	
	j			j		
l		l	0	l		m		m	0	m		l		k		&8		'8		18	
	29	
	S		Wj		\		b		e	.	k		s8		t8		~8	
	9	
 	 	 	 	 	$ 	: 	$ 	 	 	 j	 	 p	 q	 q	3 q		z	8	8	8	
9	
<{	'B|	'F}	;I}	5J}	+P~	1S~	+T{	Y	Yy	a	kr	nr	 rr	ur	0zr	~	v	'v	0v	Bv	8v	Lv		t			j		(	6	%	8	8	8	
9	
		8	8	8	
9	
 Z	<	  g  nameg  rebuild-macro-output C      h   ^   ] LLLLLL 6      V       g  k
		  g  filenamef  ice-9/psyntax.scm
			# 		   C#'(    h     ]O LQ M O Y44 4L$  '45$  4>  "  G  "   "   5545>  ZCZF       g  p
	  g  e	  g  r		  g  w		  g  s		  g  rib		  g  mod		  g  rebuild-macro-output		  g  w		H   	g  filenamef  ice-9/psyntax.scm
g		7	
	:	 	@	'	A		C		F	 	G		H		H	#	K		S8		T8		^8	
	_9	
 	 	  	  	
 	 	  g  nameg  expand-macro CO $"U)GCDT*+       h(      ] (  LCL 4L LL54L 5C          g  forms
		%  g  filenamef  ice-9/psyntax.scm
	#		%		)		8		>		8		/		/	!	2	#	/	$	) 		%  g  nameg  f C    h8   n   ]	LO LLLL	L
Q 4 5LLLLLL 6f       g  e1
		8 g  f		*  g  filenamef  ice-9/psyntax.scm		#	8	 		8   C34   h(      ] (  LCL 4L LL54L 5C          g  forms
		%  g  filenamef  ice-9/psyntax.scm
	7		9		=		L		R		L		C		C	!	F	#	C	$	= 		%  g  nameg  f C    h8      ]LO LLQ 4 5LLLLLL 6       g  forms
		8 g  er		8 g  w			8 g  s			8 g  mod			8 g  f			*  g  filenamef  ice-9/psyntax.scm
	.		7	8	0 		8	   CU)        h     ]I  4L4$  ,45	$  
&  "  "  "  5$  "  L>  G 	L 	6             g  x
	  g  e	  g  r		  g  props		O	b g  type		l  g  value		l  g  form		l  g  e		l  g  w		l  g  s		l  g  mod			l   g  filenamef  ice-9/psyntax.scm
	2		<		D		4									 		O		O		T		X	
	k		o	 	 	    C'(
U)        h     ]I  4L4$  ,45	$  
&  "  "  "  5$  "  L>  G 	L 	6             g  x
	  g  e	  g  r		  g  props		O	b g  type		l  g  value		l  g  form		l  g  e		l  g  w		l  g  s		l  g  mod			l   g  filenamef  ice-9/psyntax.scm
	2		<		D		4									 		O		O		T		X	
	k		o	 	 	    CU)       h     ]I  4L4$  ,45	$  
&  "  "  "  5$  "  L>  G 	L 	6             g  x
	  g  e	  g  r		  g  props		O	b g  type		l  g  value		l  g  form		l  g  e		l  g  w		l  g  s		l  g  mod			l   g  filenamef  ice-9/psyntax.scm
	B		L		T		D									 		O		O		T		X	
	k		o	 	 	    C $     h  c
  ] (  	L6  4L 4$  ,45	$  
&  "  "  "  5		$  	"  	LL>  G 
		$  4L

544	
55$  ,45	$  
&  "  "  "  4	455LL	L	L	L	L	 4L
5 "	$  "  	$ e4L

544	
554L5LL	L	L	L	L	L4L 4L 4$  ,45	$  
&  "  "  "  5$  "  >  G 4L54545$  "  
45 L5  "		$  ;45$  !L
 LO @6	$  'L
L
 LO 	6(  h4LL O 4L
$  '45$  4>  "  G  "   "   5 5(  C	 C4L5$  "  4L>  "  G  L4LL544 55454!LL O 4554"LL O 4L
$  '45$  4>  "  G  "   "   5 5(  "  	 (  C4#L	>  "  G  	 C       [
      g  body
	 g  ids	 g  labels		 g  var-ids		 g  vars		 g  vals		 g  bindings		 g  e		 g  er		 g  props			`	s g  type			~ g  value	
	~ g  form		~ g  e		~ g  w		~ g  s		~ g  mod		~ g  id	 } g  label	 } g  id	   g  var	 } g  update	 g  update	' g  update	/; g  id	 g  label	 g  trans-r	 g  update	 g  update	 g  update	 g  props	GZ g  type	d g  value	d g  form	d g  e	d g  w	d g  s	d g  mod	d g  expanded	 g  p	 g  tmp	= g  exps	 g  exps	 g  ids	 g  vars	 g  val-exps	 g  body-exp	  /g  filenamef  ice-9/psyntax.scm
	
				%						*				!	'		,		0		1		`		`		e		i	
	}	! 	 	 	# 	 	 	% 	 	 	 	 7	 	 7	 8	
 	 							"			$	/	/	8	>	$C	$H	2M	$R	$U	C`	:c	4e	8h	*k	$}			#			%			(								"								'	3	G					G	G	L	P	
c	g	v		G	
(	)	)	
+	+	#+		9	3	3	'		"	-		m	s	t	-	8	8	8	
9	
		8	8	2	-				
		(		#	'	#	+	G	+	 	- 	6 	-	-$	-2	2:	-;	=K	S8	T8	^8	
_9	
		H		H	B	=	-			
				
	 		  g  nameg  parse Ch   g   ]L4L  LL5C       _       g  x
		  g  filenamef  ice-9/psyntax.scm
	!		5		- 		   C      hp     ]% O LLLLLLL LQ 4LO  56        g  body
		n g  
outer-form		n g  r			n g  w			n g  mod			n g  r			n g  ribcage			n g  w			n g  parse		3	n  	g  filenamef  ice-9/psyntax.scm
																			:		,					3	
	S		g		h	(	i		j	*	k	5	l	D	n	
 		n	  g  nameg  expand-body CO %+)   h     ]94L4L  LL$  L"  L4 $  ,4 5	$   
&   "   "   "   5$  "  L>  G 4LL5L5C    x      g  x
	  g  props	V	i g  type	s  g  value		s  g  form		s  g  e		s  g  w		s  g  s		s  g  mod		s   	g  filenamef  ice-9/psyntax.scm
	 		0		0				"			"		&		'		V		V		[		_	
	r		v	 	 	0 	" 	    C        hp   9  ]4L 5$  V4L 54L L5L4L
4L	L54LLLLLLO 5L5LL6L 6    1      g  id
		l g  val		l g  e1			l g  e2			l g  labels			c g  new-w		!	c g  trans-r		6	W  g  filenamef  ice-9/psyntax.scm										 	!		+		0	(	6		9		[		c		h	&	l	 		l	   C'(   h   -  ]45$  'LL LLLLLLO @4L $  '45$  4>  "  G  "   "   56       %      g  rec?
		y g  e		y g  r			y g  w			y g  s			y g  mod			y g  k			y g  tmp			y  g  filenamef  ice-9/psyntax.scm
		?#	"	@		H8		I8		S8	
	T9	
	w		y#	 
		y	  g  nameg  expand-local-syntax CO 	&T        h(      ]
4 545$  C6             g  expanded
		" g  mod		" g  p				"  g  filenamef  ice-9/psyntax.scm
'			
		(		)		)	
	+	#	"+	 		"	  g  nameg  eval-local-transformer C'UIK      h    ]# $ r4 5	$ b 
& V $ K 	 	 4L545$  "  )$   4L 5$  "  "  &  x"   C4 5	$  W 
&  I$  >45	$  ,
&   &  L 		6C"""""4 5	$   
&   "   "   4	5	$  
"  	&  4L 54L	5CCCCCC         g  e
	} g  r	} g  mod		} g  wrap		4	I g  module		4	I g  id		Iu g  n		Tu g  t		_  g  t		~  g  b	 u g  j	   g  filenamef  ice-9/psyntax.scm
2					3		
		_				&`		*		4:		:		<:	,	C		I:		L=		T:		WN	
	_M		qO	
	uM		vP		~P	
 P	1 Q	 :	 ?	 ?	) ?	 @	! @	 	 |	 	 |	 	 }	 	 					Ss	"U	_s	`t	it	-rt	 0	}	  g  nameg  	ellipsis? CO (+     h   O   ] L4L 56  G       g  filenamef  ice-9/psyntax.scm	H		H	 		
   C_       h8      ] $  C $  "4 5	$   
&   CCCC  {       g  r
		6  g  filenamef  ice-9/psyntax.scm	e	
		d				d				/f	 		6   C      h   _   ]L4L 5 6 W       g  r
		  g  filenamef  ice-9/psyntax.scm	L		L	 		   C h8      ] $  C $  "4 5	$   
&   CCCC         g  a
		6 g  b		6  g  filenamef  ice-9/psyntax.scm	e	
		d				d				/f	 		6	   C    h   n   ]L L 6   f       g  a
		 g  b		  g  filenamef  ice-9/psyntax.scm	J		J	 			   C       h      ]4 5$  LO @4 5"  +  4?$  LO @L 6$  4	?$  
L O @""        g  args
		 g  rreq		 g  tmp		
	 g  tmp		(	 g  tmp		3	Y  g  filenamef  ice-9/psyntax.scm
E		QN		SN	'	YN	 			  g  nameg  req C    h0      ]4L$  	 "   5$   DL 6         g  req
		. g  rest		.  g  filenamef  ice-9/psyntax.scm
O		Q		Q	!	Q	*	Q		P	
	$R		(T		*T	&	.T	 		.	  g  nameg  check C h0      ]O O  Q  L Q  6           g  	orig-args
		, g  req		, g  check			,  g  filenamef  ice-9/psyntax.scm
D		*V		,V	 		,  g  nameg  lambda-formals CO )!'(     h     , 	3 $  4 5"  	4L 	5
4L	5L45$  45"  
4L4L$  '4 5$  4 >  "  G  "   "    54L
54L	556      g  e
	  g  r	  g  w		  g  s		  g  mod		  g  req		  g  rest		  g  meta		  g  body		  g  ids			  g  vars	
	)  g  labels		2   g  filenamef  ice-9/psyntax.scm
Y		Z		Z		Z	)	Z		Z		![		)Z		,\		2Z		9_		G_	#	H_	-	Xa		]		e8		f8		p8	
	q9	
 	 b	 c	 a	 ]	
 	 		  g  nameg  expand-simple-lambda CO *+      h   a   ] L4L 56Y       g  filenamef  ice-9/psyntax.scm	k		k	#	k	*	k	 		
   C_  h8      ] $  C $  "4 5	$   
&   CCCC  {       g  r
		6  g  filenamef  ice-9/psyntax.scm	e	
		d				d				/f	 		6   C      h   q   ]L 4L 56       i       g  r
		  g  filenamef  ice-9/psyntax.scm	u		u	(	u	,	u	 		   C     h   n   ]4 5C   f       g  a
		 g  b		  g  filenamef  ice-9/psyntax.scm	r		r	 			   C   h      ]L4L 56       x       g  a
		 g  b		  g  filenamef  ice-9/psyntax.scm	s		s	&	s	*	s	 			   C      h   n   ]4 5C   f       g  a
		 g  b		  g  filenamef  ice-9/psyntax.scm	p		p	 			   C   h      ]L4L 56       x       g  a
		 g  b		  g  filenamef  ice-9/psyntax.scm	q		q	%	q	)	q	 			   C	      h   n   ]4 5C   f       g  a
		 g  b		  g  filenamef  ice-9/psyntax.scm	n		n	 			   C   h   w   ]L4L 56o       g  a
		 g  b		  g  filenamef  ice-9/psyntax.scm	o		o	%	o	 			   C h8      ] $  C $  "4 5	$   
&   CCCC         g  a
		6 g  b		6  g  filenamef  ice-9/psyntax.scm	e	
		d				d				/f	 		6	   C    h   n   ]L L 6   f       g  a
		 g  b		  g  filenamef  ice-9/psyntax.scm	m		m	 			   C       h     ]24 5$  LO @4 5"  4 5"  4 5"  `4 5"  +  4?$  LO @	L 6$  4
?$  LO @""$  4?$  LO @"~"z$  4?$  LO @"I"E$  4?$  L O @""         g  args
	 g  rreq	 g  tmp		
 g  tmp		( g  tmp		7  g  tmp		F  g  tmp		U  g  tmp		`   g  filenamef  ice-9/psyntax.scm
h		~w	 w	( w	 		  g  nameg  req C+        h   X   ] LL4L 56       P       g  filenamef  ice-9/psyntax.scm	{		{	*	{	 		
   C_
        h8      ] $  C $  "4 5	$   
&   CCCC  {       g  r
		6  g  filenamef  ice-9/psyntax.scm	e	
		d				d				/f	 		6   C      h   h   ]L L4L 56      `       g  r
		  g  filenamef  ice-9/psyntax.scm					,		 		   C      h   n   ]4 5C   f       g  a
		 g  b		  g  filenamef  ice-9/psyntax.scm				 			   C   h   w   ]LL4L 56      o       g  a
		 g  b		  g  filenamef  ice-9/psyntax.scm					*		 			   C       h   n   ]4 5C   f       g  a
		 g  b		  g  filenamef  ice-9/psyntax.scm				 			   C   h   w   ]LL4L 56      o       g  a
		 g  b		  g  filenamef  ice-9/psyntax.scm					)		 			   C h8      ] $  C $  "4 5	$   
&   CCCC         g  a
		6 g  init		6 g  b			6  g  filenamef  ice-9/psyntax.scm	e	
		d				d				/f	 		6	   C  h      ]LL  L 6    x       g  a
		 g  init		 g  b			  g  filenamef  ice-9/psyntax.scm				 			   C        h8      ] $  C $  "4 5	$   
&   CCCC         g  a
		6 g  b		6  g  filenamef  ice-9/psyntax.scm	e	
		d				d				/f	 		6	   C.       h   n   ]LL L 6      f       g  a
		 g  b		  g  filenamef  ice-9/psyntax.scm	}		}	 			   C       h0    ]34 5$  LO @4 5"  4 5"  4 5"  d4 5"  -  4?$  LO @	
L 6$  4?$  LO @""$  4?$  LO @"x"t$  4?$  L O @"A"=$  4?$  L O @"
"            g  args
	* g  req	* g  ropt		* g  tmp		
* g  tmp		** g  tmp		9 g  tmp		H  g  tmp		W  g  tmp		b   	g  filenamef  ice-9/psyntax.scm
x	 	 	( 	 	*	  g  nameg  opt C+     h   X   ] LLL4L 56    P       g  filenamef  ice-9/psyntax.scm		(				 		
   C_
01/       h8      ] $  C $  "4 5	$   
&   CCCC  {       g  r
		6  g  filenamef  ice-9/psyntax.scm	e	
		d				d				/f	 		6   C      h   h   ]L LL4L 56   `       g  r
		  g  filenamef  ice-9/psyntax.scm		*		!		 		   C2      h   n   ]4 5C   f       g  a
		 g  b		  g  filenamef  ice-9/psyntax.scm				 			   C   h   w   ]LLL4L 56   o       g  a
		 g  b		  g  filenamef  ice-9/psyntax.scm		(				 			   C3   hH      ]4 5&  4$  C$  "45	$  
&  CCCCC          g  aok
		E g  r		E  g  filenamef  ice-9/psyntax.scm		!			e	
	d				d		 		<f	 			E	   C   h   y   ]LLL4L 56   q       g  aok
		 g  r		  g  filenamef  ice-9/psyntax.scm		(				 			   C3  h       ]4 5&  45CC           g  aok
		 g  a		 g  b			  g  filenamef  ice-9/psyntax.scm		!				!		 			   C        h      ]LLL4L 56          g  aok
		 g  a		 g  b			  g  filenamef  ice-9/psyntax.scm		(				 			   C3      h   a   ]4 5C   Y       g  aok
		  g  filenamef  ice-9/psyntax.scm				 		   C        h   j   ]LLL4L 56    b       g  aok
		  g  filenamef  ice-9/psyntax.scm		(				 		   C4        hX      ] $  "  3 $  +4 5	$   
&  	 "  "  "  $  456C             g  a
		R g  init		R g  k			R g  b			R  g  filenamef  ice-9/psyntax.scm	e	
		d				d				2f		E		H	-	P	# 
		R	   Ch      ]LLL  L 6       g  a
		 g  init		 g  k			 g  b			  g  filenamef  ice-9/psyntax.scm				 			   C h8      ] $  C $  "4 5	$   
&   CCCC         g  a
		6 g  init		6 g  b			6  g  filenamef  ice-9/psyntax.scm	e	
		d				d				/f	 		6	   C5  h(      ]44 55LLL  L 6         g  a
		& g  init		& g  b			& g  tmp			&  g  filenamef  ice-9/psyntax.scm				/					$	 	&	 		&	   C   h8      ] $  C $  "4 5	$   
&   CCCC         g  a
		6 g  b		6  g  filenamef  ice-9/psyntax.scm	e	
		d				d				/f	 		6	   C5I h(      ]
44 55LLL L 6          g  a
		% g  b		% g  tmp			%  g  filenamef  ice-9/psyntax.scm				/					#	 	%	 		%	   C  h  c  ]L4 5$  LO @4 5" 4 5" L4 5" 4 5"  4 5	"  4 5
"  h4 5"  /  4	?$  
LO @L 6$   4?$  LO @""
$   4
?$  LO 
@"r"n	$   4	?$  LO 	@"9"5$   4?$  LO @" "$   4?$  L O @""$   4?$  L O @""$   4?$  L O @"U"Q       [      g  args
	 g  req	 g  opt		 g  rkey		 g  tmp		
 g  tmp		, g  tmp		; g  tmp		J g  tmp		Yc g  tmp			h9 g  tmp	
	w g  tmp	   g  tmp	    g  filenamef  ice-9/psyntax.scm
	 	 	( 	 		  g  nameg  key C    h8      ] $  C $  "4 5	$   
&   CCCC  {       g  r
		6  g  filenamef  ice-9/psyntax.scm	e	
		d				d				/f	 		6   C   h   V   ]LLL L 6  N       g  r
		  g  filenamef  ice-9/psyntax.scm		 		   CJ       h8      ]  4?$  LO @L  6              g  args
		1 g  req		1 g  opt			1 g  kw			1 g  tmp			1  g  filenamef  ice-9/psyntax.scm
		)		+	(	1	 		1	  g  nameg  rest C!KL  hX   G  ]4L4 45$  	 "  $  45"  55$  
 DL 6   ?      g  req
		U g  opt		U g  rest			U g  kw			U  g  filenamef  ice-9/psyntax.scm
									'		0	#	<	&		*		+	$	2	.	4	$	9	8	;		=		A	
	K		O		Q	'	U	 		U	  g  nameg  check C      hx      ])O O O O O  Q  Q  Q  Q  L Q  6           g  	orig-args
		t g  req	8	t g  opt		8	t g  key		8	t g  rest		8	t g  check		8	t  g  filenamef  ice-9/psyntax.scm
g		r		t	 		t  g  nameg  lambda*-formals CO +  hX   [  ]%4L 54L  54LL54L L5L4 5456
      S      g  req
		R g  opt		R g  rest			R g  kw			R g  body			R g  vars			R g  labels			R g  r*		,	R g  w*		,	R  	g  filenamef  ice-9/psyntax.scm
							
			"		,		3		D	*	O	?	P	C	R	 		R	  g  nameg  	parse-req C+)      h8    ]Z $  ,4 5	$   
&   "   "   "   44554L  54L L54L  L5LLLLLLL
4 5L	4LLL4$  ,45	$  
&  "  "  "  5$  "  L>  G 
	4L	L
5	
L6
        g  id
	6 g  i	6 g  id		7	H g  v		H6 g  l		T6 g  r**		d6 g  w**		t6 g  props	   g  type	 1 g  value	 1 g  form	 1 g  e		 1 g  w	
 1 g  s	 1 g  mod	 1  g  filenamef  ice-9/psyntax.scm				7		
		77		:8	
	H		K		R	%	T		T		W		`	-	d		d		g		n	.	t		t		}	  	7 	* 	$ 	 	 	 	 	 	 	 	 	
 	 		4	6	 %	6	   C3  hh  [  , 
3 $  J
4
5$  +LLLLLL	 LO @
6$  $  ,45	$  
&  "  "  "  
44	
55

4L
 54L
 54L 5L  $  4
5"  45$  "  
$  "  	6L  $  4
5"  $  "  $  "  	6      S      g  req
	b g  opt	b g  rest		b g  kw		b g  body		b g  vars		b g  r*		b g  w*		b g  out		b g  inits			b g  tmp	
		W g  tmp			W g  id	
   g  v	
  g  l	  g  r*	  g  w*	   g  filenamef  ice-9/psyntax.scm
						
					]	
	`		d7		e	 7	 8	
 	 	 	" 	 	 	 	) 	 	 	 	* 	 	 	  	 	, 	 	 	 	'				'		%	)	*	*9	=	@	%Q	U	X	%^	b	 1	b	
  g  nameg  	parse-opt C+/)      hH    ][$  ,45	$  
&  "  "  "  44554L  54L L54L L5LLLLLLLL
4 545 L	4LLL4$  ,45	$  
&  "  "  "  5$  "  L>  G 
	4L	
L5	
L6          g  k
	D g  id	D g  i		D g  id		7	H g  v		HD g  l		TD g  r**		dD g  w**		tD g  props	   g  type	? g  value	? g  form		? g  e	
? g  w	? g  s	? g  mod	?  g  filenamef  ice-9/psyntax.scm				7		
		77		:8	
	H		K		R	%	T		T		W		`	-	d		d		g		n	.	t		t	 	( 	6 	' 	' 	! 	 	 	 	 	 	 	 	 	 	
			B	D	 '	D	   C3        h     , 3 $  L45$  -LLLLLL
	 LO @6L  $  "  	$  4	5"  454
56
             g  req
	  g  opt	  g  rest		  g  kw		  g  body		  g  vars		  g  r*		  g  w*		  g  aok		  g  out			  g  inits	
	  g  tmp			Y g  tmp			Y  g  filenamef  ice-9/psyntax.scm
						
					g		o	$	s		v	;	}	1 	 	2 	B 	 	 	  g  nameg  parse-kw C+MQ!R h8      ]L	LLLLLLLL4L 44 5556
             g  k
		2 g  v		2 g  e1			2 g  e2			2  g  filenamef  ice-9/psyntax.scm				&	0		2	 		2	   C1'(      h`      ]LLLLL
L	L4L  4LL$  '4L5$  4LL>  "  G  "   "   LLL5LLL5D             g  e1
		Z g  e2		Z  g  filenamef  ice-9/psyntax.scm					!8		"8		,8	
	-9	
	P		X		Z	 
		Z	   C3S   h      ]4 56          g  	docstring
		 g  e1		 g  e2			  g  filenamef  ice-9/psyntax.scm		,		# 			   C!T     h0      ]L	LLLLLLLL4L 4 5 56
        g  	docstring
		/ g  e1		/ g  e2			/  g  filenamef  ice-9/psyntax.scm			 	!	!	'	(	!	-		/	 		/	   C  h   K  , 
3 45
"  o45$  	 LO 
@45$  'LLLLLL  	O @6
$  ,4	
?$  
	 LO 

@"_"[      C      g  req
	  g  opt	  g  rest		  g  kw		  g  body		  g  vars		  g  r*		  g  w*		  g  inits		  g  meta			  g  tmp	
	  g  tmp		  g  tmp		L   g  filenamef  ice-9/psyntax.scm
	 	 	
  g  nameg  
parse-body C+ h   O   ] D  G       g  filenamef  ice-9/psyntax.scm				 		
   CVh   t   ] C     l       g  tmp-bde397a-1382
		 g  tmp-bde397a-1381		 g  tmp-bde397a-1380			  			   C!
     h     ]v4L >  G 	4L 	>  G 
4LLLLLLL45>  G 4
5	L 
D       g  args
	  g  e1	  g  e2		  g  args*		  g  e1*		  g  e2*		  g  req		  g  opt		  g  rest		  g  kw			  g  meta	
	.  g  req		.  g  opt		.  g  rest		.  g  kw		.  g  inits		.  g  vars		.  g  body		.  g  meta*		c  g  else*		c   g  filenamef  ice-9/psyntax.scm		(				#	1		B
		f		k		x
	 	 
	 	   C3      h   n  ]7O O O 	O 
LLLLQ 	LLLLLQ 
LLLLL	Q 	L L 
Q 
45$  @45$   LO @	
6   f      g  e
	  g  r	  g  w		  g  s		  g  mod		  g  get-formals		  g  clauses		  g  	parse-req		<  g  	parse-opt		<  g  parse-kw			<  g  
parse-body	
	<  g  tmp	   g  tmp	    g  filenamef  ice-9/psyntax.scm
	 	 	  g  nameg  expand-lambda-case CO 	,9dW       h     ]!"   $  ;4L  54L  5"  C &   &   C"" $  K4 54L 5"  '(   C&  "6" C $  -4 5	$   
&  L  	6"9"5"1         g  x
	  g  a		H g  d			H g  old	V  g  new		a  g  l1		g  g  l2		g   g  filenamef  ice-9/psyntax.scm
			"				#		#		#		#	)	#	,	#	)	#		*&		+$		0$	"	4$		9$	2	=$		K'		O		P(		V(		Y)		a)		g+		m,		s.	#	v.	,	z.		}/	" /	+ /	 0	 +	 	 	 	 	 !	 &	   g  nameg  f C h0      ]
45$   CO L Q  6              g  x
		) g  w		) g  f			)  g  filenamef  ice-9/psyntax.scm
							 		)	  g  nameg  strip CO -      hH      ]	 $  ,4 5	$   
&   "   "   "   456           g  id
		D g  id	7	D  g  filenamef  ice-9/psyntax.scm
6					7		
		77		<8	
 		D  g  nameg  gen-var C.Q 	Q 
Q Q Q Q Q Q Q Q Q Q Q Q " Q "& Q -Q  $Q  " Q !#-&" Q "" Q #Q $&" Q % "'Q &Q (Q ).%Q *Q +%" .,Q ,-Q -4i4i5 X5/ h   W   ] L 6  O       g  filenamef  ice-9/psyntax.scm
	
	 		 	 		
   C/O /K 4YiZ[       h   g   ]6_       g  k
		  g  filenamef  ice-9/psyntax.scm
h		i		i		 		   C5K4i4i5 \4i\[5>  "  G  4i4i5 ]4i][5>  "  G  4L^+^_'(       h      ]L  6       g  var
		 g  val		 g  e1			 g  e2			  g  filenamef  ice-9/psyntax.scm	S	 			   C h   ^   ]L L 6      V       g  x
		
  g  filenamef  ice-9/psyntax.scm
T	*	
T	6 		
   CIKJ^R'( 
h   E  ]4L5$  "  )$   4L L5$  "  "  $  BL4LL$  '4 5$  4	 L>  "  G  "   "    LL56C  =      g  id
	  g  n	  g  t			F g  t		*	= g  key		G   g  filenamef  ice-9/psyntax.scm
V		N	
	M		O	
	!M		"P		*P	
	:P	1	CQ		GW	#	GW		VY	2	XZ	2	[		c8		d8		n8	
	o9	
 	 Y	  	 	   C'()   h   v  ]94L4L  LL4 $  ,4 5	$   
&   "   "   "   5$  "  L>  G 4LL5L5Cn      g  x
	  g  props	J	] g  type	g  g  value		g  g  form		g  g  e		g  g  w		g  g  s		g  g  mod		g   	g  filenamef  ice-9/psyntax.scm
e	#	f	3	g	3											J		J		O		S	
	f		j		y	 g	3 f	% 	    C       h   <  ]4LL O  54LLL	L
LLLO  >  "  G  L4LL$  '4L	5$  4L	L>  "  G  "   "   L	LL
54L4LL54LLL
LLO 5L5LL
6   4      g  var
	  g  val	  g  e1		  g  e2		  g  names		  g  trans-r	    g  filenamef  ice-9/psyntax.scm	T	%	T		U		C		K8		L8		V8	
	W9	
	z		{b	 d	+ d	 e	 b	 _	 	 	   C 
h      ]4 5"  @4L	$  '4 5$  4 >  "  G  "   "    56$  94L O ?$  %	LLLLLLLL L	O @""}           g  e
	  g  r	  g  w		  g  s		  g  mod		  g  tmp		   g  filenamef  ice-9/psyntax.scm
P		m	,	m	A			 8		!8		+8	
	,9	
	O		Qm	 	 	   C%'" O 
>  "  G  4i4i5 `4i`L+b
    h    x   ]	4L  L5L C       p       g  e
		 g  exp		  g  filenamef  ice-9/psyntax.scm	s	,	s		
	 		   C`_'( 	hh      ]4 5$  LO @4L $  '4 5$  4 >  "  G  "   "    56             g  e
		b g  r		b g  w			b g  s			b g  mod			b g  tmp			b  g  filenamef  ice-9/psyntax.scm
q		&t	,	(t	3	)		18		28		<8	
	=9	
	`		bt	 		b	   C-O 5>  "  G  4LUIKab`+c_`dR   h     ]*4LL LLLL >  G 4LLLLL >  G $  <&   "  &   "  	 "  $  "  	 D            g  x
	  g  y	  g  x		  g  maps		  g  y		3  g  maps		3  g  key		=   g  filenamef  ice-9/psyntax.scm		/		 		3	6	$	=		=		K	%	M	-	Q		S	 	V	*	Z	6	\	 	f	)	h	2	l	 	n	$	y	$ 	 	# 	/ 	# 	! 	7 	 	   CedN`       h`     ]4LL LLLL >  G &  
"  "&  45 "   D            g  e1
		Z g  e2		Z g  e			Z g  maps			Z  g  filenamef  ice-9/psyntax.scm		&		 	$	 	&	(	*		,	/	/	:	0	/	7	 	9	(	=		?	0	E	<	H	0	Q	 	Z	3 		Z	   C       h   w   ]LLL 6    o       g  x
		 g  dots		 g  y			  g  filenamef  ice-9/psyntax.scm		  			   C+_f!    h   h   ]L LL 6    `       g  dots
		 g  y		  g  filenamef  ice-9/psyntax.scm		% 			   Cg.i      hH   &  ]4L >  G (  
L 64L5 D          g  maps
		D g  x		D g  maps			D g  map-env		*	?  g  filenamef  ice-9/psyntax.scm
	(		9		B			<		9		*		9		.	!	D	#	L	'	2	*	I	*	:	.		1	5	<		B	:	D	2 		D   C       h   h   ]LLLL O 6     `       g  dots
		 g  y		  g  filenamef  ice-9/psyntax.scm		% 			   C     h     ]*4 5"  J4L L LLLL>  G 4>  G $  "  	 D$  )4LLLO ?$  LLLO @""        g  y
	  g  k	  g  tmp		  g  y		&	[ g  maps		&	[ g  x		8	[ g  maps		8	[  g  filenamef  ice-9/psyntax.scm
	 		6	)	'	.	:	;	+	C	'	D		H		P		[	/ 	 	  g  nameg  f Cg  h@     ]4LLLL LL>  G (  
L64L 5D      g  maps
		@ g  x		@ g  maps			@  g  filenamef  ice-9/psyntax.scm
	+		3		E		?		3		-	#	<	'	1	+	G	-	O	1	5	2	=	9	H	;	=	>	=	@	5 		@  g  nameg  k C        h@      ]O LL LLLLLQ LLLL LLO 6   ~       g  x
		= g  dots		= g  y			= g  f			=  g  filenamef  ice-9/psyntax.scm		  		=	   Ch   h   ]L LL 6    `       g  dots
		 g  e		  g  filenamef  ice-9/psyntax.scm		  			   C     h   u   ]C    m       g  e
		 g  r		 g  mod			  g  filenamef  ice-9/psyntax.scm
	; 			   C        h   h   ]LLLLL 6      `       g  dots
		 g  e		  g  filenamef  ice-9/psyntax.scm		  			   C     h    ]&$  "  3$  +45	$  
&  	"  "  "  $  4L545$  "  )$   4L5$  "  "  &  *4L >  G 	 	D45$  
	
 6 D45"  45"  W45$   L O @45		$   L O 	@ D$  /4O ?$  L  LO @"t"p$  +4O ?$   L O @"0",      g  src
	 g  e	 g  r		 g  maps		 g  	ellipsis?		 g  mod		 g  label		N  g  t		Y  g  t		x  g  b	   g  var.lev	   g  var	   g  maps		   g  tmp	  g  tmp	 g  tmp	b g  tmp		:b  g  filenamef  ice-9/psyntax.scm
z		e	
		d				d				2f		E{		F|	*	N|		QN	
	YM		kO	
	oM		pP		xP	
 P	1 Q	 	 	* 	; 	! 	: 	+ 	- 	: 	H 	- 	% 	B 	: 	) 	% 	; 	C 	) 	1 	)Y	*b	" )		  g  nameg  
gen-syntax CO /jk      hx     ]$
$  D(  
 64L  >  G 45$  D4455D             g  src
		q g  var		q g  level			q g  maps			q g  	outer-var		3	q g  
outer-maps		3	q g  b		D	q g  	inner-var		_	q  g  filenamef  ice-9/psyntax.scm
				
							3		;	 	!	!	0	*	A	-	O	2	0	6	!	;	.	B	>	D	.	D	%	L	'	O	3	S	+	T8	
	[	E	]8	
	_	+	h	A	k	A	l	;	o	5	q	- 		q	  g  nameg  gen-ref CO 0la  h   p   ]  C     h       g  x
		  g  filenamef  ice-9/psyntax.scm
	-		9		@	
	9 		   Cama9 h      ] &  
 L 6C z       g  x
		  g  filenamef  ice-9/psyntax.scm
			4		<		*		H		B 		   ChR       h   y   ]4 L 5C q       g  x
		  g  filenamef  ice-9/psyntax.scm
	,		=		C		=		8 		   C hx   t  ]4545 &  C4O  5$  ,  44	5
O  5C  C    l      g  e
		t g  map-env		t g  formals			t g  actuals			t g  r		P	\  g  filenamef  ice-9/psyntax.scm
			(		(				"		*	!		$		&		2		4		8		:		?	/	B		C	%	F	3	P	*	_	*	a	%	b		f	" 		t	  g  nameg  gen-map C1a
hF`Zn h(  u  ]) $    	 C$  2 445 5$  	 C	 C$    C$  L $  ;  4L  5	 
	 C	
 6445 5$  	 "  	 4L  5	 C   m      g  x
	% g  key	% g  name			* g  var			* g  name		7	e g  exp		r	 g  req	   g  vars	   g  exp	   g  body	   g  name	 	 g  fun-exp	% g  arg-exps	%  g  filenamef  ice-9/psyntax.scm
							L		U		"	!
		3		6	A	7	(	:		=	!	C		E	3	F		J		O
		^	!	d
		n		q	:	r	$	x
	 	 		' 		  		 
	? 
	K 
	X 
	_ 
	X 
	  
	 	) 
	 	 
	 
	T 
	 	' 	  	M 	4 	 	! 	 	3 	 	 
	 	!
	
	4	?	4	!
	 ;	%  g  nameg  regen CO 2/10Q /0Q 02Q 2'(+b   h(      ]4LL LLL>  G L 6            g  x
		# g  e		# g  maps			#  g  filenamef  ice-9/psyntax.scm		+		?		+			#	/ 		#   Co 	  hp     ]4L $  '4 5$  4 >  "  G  "   "    545$  LLLO @6          g  e
		l g  r		l g  w			l g  s			l g  mod			l g  e		:	l g  tmp		E	l  g  filenamef  ice-9/psyntax.scm
				8		8		8	
	9	
	:		:		f	0	h	8	l	 		l	   C/(2O /012>  "  G  4L+p+MQ!R        h(      ]L4L 44 5556             g  k
		" g  v		" g  e1			" g  e2			"  g  filenamef  ice-9/psyntax.scm	
(	%	(	2	 (	%	"'	! 		"	   CS      h      ]4 56          g  	docstring
		 g  e1		 g  e2			  g  filenamef  ice-9/psyntax.scm	!	@	!	7 			   C!T     h       ]L4L 4 5 56        g  	docstring
		 g  e1		 g  e2			  g  filenamef  ice-9/psyntax.scm	
#	%	$	-	%	3	$	-	#	%	"	! 			   C  hp      ]4 5"  44 5$  LO @LLLLLLLL  6	$  4?$  LO @""            g  body
		k g  meta		k g  tmp			k g  tmp			E  g  filenamef  ice-9/psyntax.scm
		E)	# 		k	  g  nameg  lp C hH      ]+4L >  G O 	L LLLLLQ 6        g  args
		G g  e1		G g  e2			G g  req			G g  opt			G g  rest			G g  kw			G g  lp		(	G  g  filenamef  ice-9/psyntax.scm		5			(		E	@	G	 		G	   Cq    h8      ]4 5$   LL O @ 6           g  e
		4 g  r		4 g  w			4 g  s			4 g  mod			4 g  tmp			4  g  filenamef  ice-9/psyntax.scm
		.*	,	0*	4	4*	 		4	   C)*O >  "  G  4L+p
 h8      ]4LLLLLLL   >  G 	L C       g  args
		8 g  e1		8 g  e2			8 g  meta		"	8 g  lcase		"	8  g  filenamef  ice-9/psyntax.scm	2		%0		.
	 		8	   Cr     h8      ]4 5$  L L O @ 6           g  e
		4 g  r		4 g  w			4 g  s			4 g  mod			4 g  tmp			4  g  filenamef  ice-9/psyntax.scm
-		.6	,	06	4	46	 		4	   C,+O >  "  G  4Ls+t h   t   ] C     l       g  tmp-bde397a-154d
		 g  tmp-bde397a-154c		 g  tmp-bde397a-154b			  			   C!
     hH     ]#4 54LLLLLLL >  G 45	L C       g  args
		H g  e1		H g  e2			H g  clauses			H g  meta*		(	H g  lcase		(	H g  meta		7	H  g  filenamef  ice-9/psyntax.scm	D		=		+;		0A	0	3D	"	7A	0	7A		>
	 			H	   CvswS      h      ]4 56          g  	docstring
		 g  args		 g  e1			 g  e2			  g  filenamef  ice-9/psyntax.scm	F	!	F	 			   CT   h   t   ] C     l       g  tmp-bde397a-1563
		 g  tmp-bde397a-1562		 g  tmp-bde397a-1561			  			   C!
     hX   7  ],4 5 454LLLLLLL >  G 45	L C/      g  	docstring
		X g  args		X g  e1			X g  e2			X g  meta			X g  clauses			X g  meta*		7	X g  lcase		7	X g  meta		G	X  	g  filenamef  ice-9/psyntax.scm	G	"	H	(	G	"	G		!=		:;		?A	0	GA		N
	 
		X	   C 
     hx      ]4 5$  L L O @4 5"  
 6$  &4?$  	L L O @""            g  e
		s g  r		s g  w			s g  s			s g  mod			s g  tmp			s g  tmp		3	s  g  filenamef  ice-9/psyntax.scm
9		=J	,	?J	9	CJ	 		s	   C,)O >  "  G  4Lx+th   t   ] C     l       g  tmp-bde397a-1583
		 g  tmp-bde397a-1582		 g  tmp-bde397a-1581			  			   C!
     hH     ]#4 54LLLLLLL >  G 45	L C       g  args
		H g  e1		H g  e2			H g  clauses			H g  meta*		(	H g  lcase		(	H g  meta		7	H  g  filenamef  ice-9/psyntax.scm	X		Q		+O		0U	0	3X	"	7U	0	7U		>
	 			H	   CvsyS      h      ]4 56          g  	docstring
		 g  args		 g  e1			 g  e2			  g  filenamef  ice-9/psyntax.scm	Z	!	Z	 			   CT   h   t   ] C     l       g  tmp-bde397a-1599
		 g  tmp-bde397a-1598		 g  tmp-bde397a-1597			  			   C!
     hX   7  ],4 5 454LLLLLLL >  G 45	L C/      g  	docstring
		X g  args		X g  e1			X g  e2			X g  meta			X g  clauses			X g  meta*		7	X g  lcase		7	X g  meta		G	X  	g  filenamef  ice-9/psyntax.scm	[	"	\	(	[	"	[		!Q		:O		?U	0	GU		N
	 
		X	   C 
     hx      ]4 5$  L L O @4 5"  
 6$  &4?$  	L L O @""            g  e
		s g  r		s g  w			s g  s			s g  mod			s g  tmp			s g  tmp		3	s  g  filenamef  ice-9/psyntax.scm
M		=^	,	?^	9	C^	 		s	   C,+O >  "  G  4Lz+pz_'(  h8      ] $  C $  "4 5	$   
&   CCCC         g  dots
		6 g  e1		6 g  e2			6  g  filenamef  ice-9/psyntax.scm	e	
		d				d				/f	 		6	   C'( 	    h   `  ]3 $  "   	 	  4455 4LL$  '4 5$  4 L>  "  G  "   "    LL5 4LL54L L5L4LL$  '4L5$  4LL>  "  G  "   "   LL5L6       X      g  dots
	  g  e1	  g  e2		  g  wrap			. g  module			. g  id		.  g  ids	   g  labels	   g  bindings	   g  nw	   g  nr	    g  filenamef  ice-9/psyntax.scm	e	&		e	"	f	&			g	&			!g	:	(		.e		5j	%	6		9		=	%	?		A		Dk	(	Fl	>	G		O8		P8		Z8	
	[9	
	~		l	0 l	* j	 m	& n	& m	 	 8	 8	 8	
 9	
 	 o	 %	 	   C 
    h      ]4 5"  @4L$  '4 5$  4 >  "  G  "   "    56$  *4?$  	L LL LO 	@""          g  e
	  g  r	  g  w		  g  s		  g  mod		  g  tmp		   g  filenamef  ice-9/psyntax.scm
a		p	,	p	;			 8		!8		+8	
	,9	
	O		Qp	 	 	   C%O >  "  G  4L{)   h   Q  ]94L LL4 $  ,4 5	$   
&   "   "   "   5$  "  L>  G L L6 I      g  x
	  g  props	E	X g  type	b  g  value		b  g  form		b  g  e		b  g  w		b  g  s		b  g  mod		b   	g  filenamef  ice-9/psyntax.scm
	1											E		E		J		N	
	a		e	 	 	    C{|    h     , 	3 4L5$  o4L54L5
	4L	54L	
545
4L LO 54L4L 556 6            g  e
	  g  r	  g  w		  g  s		  g  mod		  g  constructor		  g  ids		  g  vals		  g  exps		  g  labels			!  g  new-vars	
	!  g  nw		;  g  nr		;   g  filenamef  ice-9/psyntax.scm
u		v	 	v		x	)	y	+	!x		&z	'	1{	'	;z		D}	,	O	,	e	,	j	>	~	, |	 w	- w	2 w	 	 		  g  nameg  
expand-let CO 	/" %.Q /+~{'(m        hP      ] $  "  3 $  +4 5	$   
&  	 "  "  "  $  L 6C        g  f
		O g  id		O g  val			O g  e1			O g  e2			O  g  filenamef  ice-9/psyntax.scm	e	
		d				d				2f		E		M	) 			O	   Ch       ]LLLLLLL  6	         g  f
		 g  id		 g  val			 g  e1			 g  e2			  g  filenamef  ice-9/psyntax.scm		 			   Cm  h      ]L  6             g  id
		
 g  val		
 g  e1			
 g  e2			
  g  filenamef  ice-9/psyntax.scm	
	 		
	   C
       h8      ]4L >  "  G  (  C	  C           g  src
		4 g  ids		4 g  vars			4 g  val-exps			4 g  body-exp			4  g  filenamef  ice-9/psyntax.scm
						&
	 		4	  g  nameg  	build-let C      h       ]LLLLLLL O  6	       g  id
		  g  val		  g  e1			  g  e2			   g  filenamef  ice-9/psyntax.scm	 	 		 	   C     h     ]4 5"  4 5"  @4L$  '4 5$  4 >  "  G  "   "    56$  +4	LO ?$  
L  LO @""$  +4LO ?$  L LO @"K"G            g  e
	  g  r	  g  w		  g  s		  g  mod		  g  tmp		  g  tmp		   g  filenamef  ice-9/psyntax.scm
		$	.	&	3	'		/8		08		:8	
	;9	
	^		`	 	 	   C	/O />  "  G  4L+'(m    h      ]L  6             g  id
		
 g  val		
 g  e1			
 g  e2			
  g  filenamef  ice-9/psyntax.scm	
	 		
	   C       h   ^   ]L LLL 6  V       g  x
		  g  filenamef  ice-9/psyntax.scm
	5		A 		   C'(| 	  h     ]$4L 5$  4L 54L 54L L54L
L	5L L4 54LLO 54L4LL$  '4L5$  4LL>  "  G  "   "   LL5L56L6           g  id
	  g  val	  g  e1		  g  e2		  g  labels		  g  new-vars		  g  w		7  g  r		7   g  filenamef  ice-9/psyntax.scm		#				,		.			"	)	-	)	7	 	A	0	L	0	`	0	h		p8		q8		{8	
	|9	
 	 	0 	" 	0 	8 	 	 	   C 
h      ]4 5"  @4L$  '4 5$  4 >  "  G  "   "    56$  94L O ?$  %	LLL LLLLLL	O @""}           g  e
	  g  r	  g  w		  g  s		  g  mod		  g  tmp		   g  filenamef  ice-9/psyntax.scm
			,		4			 8		!8		+8	
	,9	
	O		Q	 	 	   C
!%.O 
>  "  G  4L+'(m       h      ]L  6             g  id
		
 g  val		
 g  e1			
 g  e2			
  g  filenamef  ice-9/psyntax.scm	
	 		
	   C       h   ^   ]L LLL 6  V       g  x
		  g  filenamef  ice-9/psyntax.scm
	5		A 		   C'(| 	  h     ]$4L 5$  4L 54L 54L L54L
L	5L L4 54LLO 54L4LL$  '4L5$  4LL>  "  G  "   "   LL5L56L6           g  id
	  g  val	  g  e1		  g  e2		  g  labels		  g  new-vars		  g  w		7  g  r		7   g  filenamef  ice-9/psyntax.scm		#				,		.			"	)	-	)	7	 	A	0	L	0	`	0	h		p8		q8		{8	
	|9	
 	 	0 	" 	0 	9 	 	 	   C 
h      ]4 5"  @4L$  '4 5$  4 >  "  G  "   "    56$  94L O ?$  %	LLL LLLLLL	O @""}           g  e
	  g  r	  g  w		  g  s		  g  mod		  g  tmp		   g  filenamef  ice-9/psyntax.scm
			,		5			 8		!8		+8	
	,9	
	O		Q	 	 	   C
!%.O 
>  "  G  4L+^UM)     h@      ] $  C $  %4 5	$   
&  	4L  5CCCC              g  e
		9  g  filenamef  ice-9/psyntax.scm	e	
		d				d				+f	&	2f	 		9   C

    h      ]	L L  C   ~       g  mod
		 g  var		 g  public?			  g  filenamef  ice-9/psyntax.scm
{			
	 			   C
    h   `   ]	L L  C       X       g  var
		  g  filenamef  ice-9/psyntax.scm
}			
	 		   C     hp     ]4 5L$  BL	&  2L45$  "  L"   "   L LLLO LLO 6         g  e
		n g  var			n g  meta		"	L g  v		=	I  g  filenamef  ice-9/psyntax.scm		E			*			=				">	
	%?		)?		-?		1?		7@	-	:@	&	=@		E		ny	 		n   C3)       h   Z  ]94L LL4 $  /4 5	$   
&  4L 5"   "   "   5$  "  L>  G L L6      R      g  e
	  g  props	H	[ g  type	e  g  value		e  g  form		e  g  e		e  g  w		e  g  s		e  g  mod		e   	g  filenamef  ice-9/psyntax.scm
	7											.		H		H		M		Q	
	d		h	 	 	    C!
       h   E  ]{4L LL>  G 	$  4LLL4$  /45	$  
&  4L5"  "  "  5

$  
"  
L>  G 
4L 
L5

4 LL>  G  4LO ?$  LL
O @	6
  
4L
LL4
$  /4
5	$  

&  4L
5"  
"  
"  
5$  "  L>  G 4L L5
4L LLLLLO 4 55
	L
 C =      g  head
	 g  tail	 g  val		 g  type		 g  value		 g  formform		 g  ee		 g  ww		 g  ss		 g  modmod			 g  props	
	v  g  type	
   g  value	   g  form	   g  e	   g  w	   g  s	   g  mod	   g  val	
   g  e	   g  r	   g  w	   g  s*	   g  mod	   g  tmp	   g  e	
' g  props	o g  type	 g  value	 g  form	 g  e	 g  w	 g  s	 g  mod	 g  fun-exp	
 g  arg-exps	  $g  filenamef  ice-9/psyntax.scm		'			0		1		:		?		C		D		\		v		v		{			
 	 	 	 	 	> 	!'	2*	3	8	<	=	U	o	o	t	x	
				2	
	 %		   C'(       h@      ] $  C $  %4 5	$   
&  	4L  5CCCC              g  id
		9 g  val		9  g  filenamef  ice-9/psyntax.scm	e	
		d				d				+f	&	2f	 		9	   CIK)
H
    h      ]	L L  C   ~       g  mod
		 g  var		 g  public?			  g  filenamef  ice-9/psyntax.scm
{			
	 			   C
    h   `   ]	L L  C       X       g  var
		  g  filenamef  ice-9/psyntax.scm
}			
	 		   CUJR'(        h    ]j4L  L
5 $  -4 5	$   
&  	 	"  L"  L"  L4L5$  "  )$   4L5$  "  "  $ 4 54LLL
4$  /45	$  
&  4L	5"  "  "  5$  "  L>  G 
	4L	L
5	
$  B		&  2	4
	5$  "  
	


	"   "   		L C$ 4LLL
4$  /45	$  
&  4L	5"  "  "  5$  "  L>  G 
	4L	L
5	
$  B		&  24
5$  "  
"   "   LLO LO 6$  45$  4LLLL
LL54LL4$  /45	$  
&  4L	5"  "  "  5$  "  L>  G 
	L	
L64LLL
L54L L
56$  4L L
L564LL$  '4L5$  4LL>  "  G  "   "   LL
L56        g  id
	 g  val	 g  n		A g  id-mod		A g  t		N  g  t		m  g  b	  g  key	  g  props	   g  type	A g  value	A g  form	A g  e		A g  w	
A g  s	A g  mod	A g  name	A g  var	A g  exp	A g  meta		^ g  v	
y g  props	 g  type	H g  value	H g  form	H g  e		H g  w	
H g  s	H g  mod	H g  exp	H g  meta	a g  v	| g  p	 g  e	d g  props	"5 g  type	?d g  value		?d g  form	
?d g  e	?d g  w	?d g  s	?d g  mod	?d  *g  filenamef  ice-9/psyntax.scm		!				&			A		FN	
	NM		`O	
	dM		eP		mP	
	}P	1 Q	 	 	" 	 	9 	9 	 	 	 	 	 	 	 	 	 	
				A	J	N=	Q	^>	
a?	e?	i?	m?	s@	-v@	&y@		
												
			H	M	Q=	T	a>	
d?	h?	l?	p?	v@	-y@	&|@		y			(		%	;	%	!	-	%						"	"	'	+	
>	B	d	h	7j	=k	7v	7	%		1	7	1		6	<	8	8	8	
9	
		$ s		   C h     ]4 5"  j4 5$  LL LLO @4L$  '4 5$  4	 >  "  G  "   "    56$  74
L O ?$  #LLLL LLL LO @"Y"U          g  e
	  g  r	  g  w		  g  s		  g  mod		  g  tmp		  g  tmp			{  g  filenamef  ice-9/psyntax.scm
		?	,	A	2	B		J8		K8		U8	
	V9	
	y		{	 	 	   C$" O >  "  G  4i4i5 4iM+3m     hH      ]4L  5$  4$  C$  "45	$  
&  CCCCC          g  mod
		E g  id		E  g  filenamef  ice-9/psyntax.scm					e	
	d				d		 		<f	 			E	   C    h    z   ]45L 4 5D      r       g  mod
		 g  id		  g  filenamef  ice-9/psyntax.scm		 		 		 			   C   hH      ]4 5"  	 6$  4L O ?$  O @""     |       g  e
		C g  r		C g  w			C g  tmp			C  g  filenamef  ice-9/psyntax.scm
	 		C	   CO 5>  "  G  4M      h     ] $  4L  54L  5C $  "  C4 545"  &$  C4L  5"
"4 5	$  . 
&   4L  5 	 C""} C      g  x
	  g  mod	  g  n		1	m g  v		:	m g  i		@	f g  
expression	   g  wrap	    g  filenamef  ice-9/psyntax.scm
					 					
		&			2			&			&			2			&			 	"		&			+		*	1		 	4		@	:		 	@		"	E		'	I		"	Q		5	X		A	\		5	]		$	`		,	f		"	m			n	 		! 	 		! 	 		  	 "	 	  g  nameg  
remodulate C+3m    h   i   ]L  6      a       g  mod
		
 g  exp		
  g  filenamef  ice-9/psyntax.scm	
		 		
	   C)       hp      ]4 54L5LL 4$  ,45	$  
&  "  "  "  5$  "  D           g  mod
		l g  exp		l g  mod			l g  props		U	h  g  filenamef  ice-9/psyntax.scm		 	#		 			!	"			!		%		&		U		U		Z		^	
	l	!	 		l	   Cm     hH      ]4L  5$  4$  C$  "45	$  
&  CCCCC          g  mod
		E g  id		E  g  filenamef  ice-9/psyntax.scm							e	
	d				d		 		<f	 			E	   C    h    z   ]45L 4 5D      r       g  mod
		 g  id		  g  filenamef  ice-9/psyntax.scm			 			 			 			   C   h      ]O Q 4 5"  E4 5"  	 6$  #4L O ?$  O @""$  4	L O ?$  
O @""           g  e
	  g  r	  g  w		  g  
remodulate		
  g  tmp		  g  tmp		'	c  g  filenamef  ice-9/psyntax.scm
	 	 	 	   CO >  "  G  4Lc+^)
   hX    ]:4L  LL4 $  ,4 5	$   
&   "   "   "   5$  "  L>  G 4LL54L LL4$  ,45	$  
&  "  "  "  5$  "  L>  G 4LL5
 	
L C       g  test
	W g  then	W g  props		E	X g  type		b  g  value		b  g  form		b  g  e		b  g  w		b  g  s		b  g  mod		b  g  props	   g  type	 8 g  value	 8 g  form	 8 g  e	 8 g  w	 8 g  s	 8 g  mod	 8 g  test-exp	@W g  then-exp	@W g  else-exp	@W  g  filenamef  ice-9/psyntax.scm											E		E		J		N	
	a		e		t	 	 	 	 	 	 	 	 	 	
 	 		<
	@	)	K
	 	W	   C)
   h    ];4L  LL4 $  ,4 5	$   
&   "   "   "   5$  "  L>  G 	4LL	5	4L LL4$  ,45	$  
&  "  "  "  5$  "  L>  G 	4LL	5	4L LL4$  ,45	$  
&  "  "  "  5$  "  L>  G 	4LL	5		
L C            g  test
	 g  then	 g  else		 g  props		E	X g  type		b  g  value		b  g  form		b  g  e		b  g  w		b  g  s		b  g  mod			b  g  props	   g  type	 8 g  value	 8 g  form	 8 g  e	 8 g  w	 8 g  s	 8 g  mod		 8 g  props	{ g  type	 g  value	 g  form	 g  e	 g  w	 g  s	 g  mod		 g  test-exp	 g  then-exp	 g  else-exp	  g  filenamef  ice-9/psyntax.scm											E		E		J		N	
	a		e		t	 	 	 	 	 	 	 	 	 	
 	 		9	B	G	K	L	{	{			
				/	
	 '		   C3  hX      ]4 5$  LL O @4 5$  LL O @ 6        g  e
		W g  r		W g  w			W g  s			W g  mod			W g  tmp			W g  tmp		1	W  g  filenamef  ice-9/psyntax.scm
	&	 		W	   C" O >  "  G  4i4i5 4iL+)  h   Q  ]94L LL4 $  ,4 5	$   
&   "   "   "   5$  "  L>  G L L6 I      g  x
	  g  props	E	X g  type	b  g  value		b  g  form		b  g  e		b  g  w		b  g  s		b  g  mod		b   	g  filenamef  ice-9/psyntax.scm
	;												E		E		J		N	
	a		e	 	 	    C)     h   Q  ]94L LL4 $  ,4 5	$   
&   "   "   "   5$  "  L>  G L L6 I      g  x
	  g  props	E	X g  type	b  g  value		b  g  form		b  g  e		b  g  w		b  g  s		b  g  mod		b   	g  filenamef  ice-9/psyntax.scm
	<												E		E		J		N	
	a		e	 	 	    C'(
      h   .  ]4LLLLLO  54LLLLLO 54L 4LL$  '4L5$  4LL>  "  G  "   "   LLL5LLL5	L C   &      g  fluid
	  g  val	  g  b		  g  b*		  g  fluids		v  g  vals		v  g  body		v   g  filenamef  ice-9/psyntax.scm		;			<		/	=		7		?8		@8		J8	
	K9	
	n		v	=		v	9	 
	 	 	   C3   h8      ]4 5$  L LLL O 	@ 6        g  e
		7 g  r		7 g  w			7 g  s			7 g  mod			7 g  tmp			7  g  filenamef  ice-9/psyntax.scm
	6	 		7	   C" %O 5>  "  G  4i4i5 \4i\\5>  "  G  4i4i5 ]4i]]5>  "  G  4i4i5 4i5>  "  G  4i4i5 4i5>  "  G  4i4i5 V4iVV5>  "  G  4L+_ h8      ]"4LLL>  G 4L  L>  G D        g  x
		7 g  y		7 g  y			7 g  ids			7 g  x		'	7 g  ids		'	7  g  filenamef  ice-9/psyntax.scm		T	0		S	 		W	4	*	V	%	3	Y	1	7	Y	) 		7	   C   h0      ]4 5$  LL O @L 6         g  p*
		. g  n		. g  ids			. g  tmp			.  g  filenamef  ice-9/psyntax.scm
	P		.	Z	" 		.	  g  nameg  cvt* C     h0      ]"  $  "D "        g  x
		/ g  r		$ g  x			$  g  filenamef  ice-9/psyntax.scm
	\			]				^	&		^			`	-		`	'		`	8		`	!	$	_	!	$	]		%	]	)	/	]	 		/  g  nameg  	v-reverse C/,U+c_h8      ]"4LLL >  G 4L L>  G D        g  x
		7 g  y		7 g  y			7 g  ids			7 g  x		'	7 g  ids		'	7  g  filenamef  ice-9/psyntax.scm			3			$			7	*		(	3		4	7		, 		7	   C    h   O   ] L D G       g  filenamef  ice-9/psyntax.scm			/			' 		
   CN       h(      ]4L LL >  G  D            g  x
		# g  p		# g  ids			#  g  filenamef  ice-9/psyntax.scm			3			$			F			>	#		6 		#   C  h   x   ]L 6p       g  x
		 g  dots		 g  ys			  g  filenamef  ice-9/psyntax.scm		u	$ 			   C hP   )  ]34LLL>  G 4L  L>  G 4L>  G  D!      g  x
		P g  dots		P g  ys			P g  ys			P g  ids			P g  x		(	P g  ids		(	P g  ys		:	P g  e		:	P  	g  filenamef  ice-9/psyntax.scm		w	3		v	$		z	7	 	z	G	'	z	7	+	y	(	0	}	;	=	|	,	C		8	P		0 		P	   C     h   h   ]L 6`       g  x
		 g  dots		  g  filenamef  ice-9/psyntax.scm		n	$ 			   C/0     h8      ]4L LL >  G &  "   D             g  x
		2 g  dots		2 g  p			2 g  ids			2  g  filenamef  ice-9/psyntax.scm		p	3	
	p	C		p	3		o	$		r	;	!	r	0	#	r	A	)	r	S	.	r	K	2	r	( 		2	   C    h    ]+ $  "  3 $  +4 5	$   
&  	 "  "  "  $  4L L5$    D"   D $  ,4 5	$   
&   "   "   "   45	$  "  &   4L 54L5&  D""4 	5"  4 
5"  m4 5$  L O @4 5$  O @4 5$  L O @4L 5 D$  '4LO ?$  L LLO @"f"b$  #4LO ?$  L O @"*"&             g  p
	 g  n	 g  ids		 g  tmp	  g  tmp	  g  tmp	k g  tmp	&k g  tmp	Bk  g  filenamef  ice-9/psyntax.scm
	c		e	
		d				d				2f		E	d		F	f	#	R	e	!	T	g	3	Y	g	+	]	g	#	c	k	+	h	k	6	k	k	0	m	k	#	m	e	!	p		ts		u	 s	" 	 	e	! t	 t	- s	 	i	+ 	i	#[		6\		<g		.k		& "		  g  nameg  cvt C h@      ]O O Q LLL Q  
6       g  pattern
		@ g  keys		@ g  	ellipsis?			@ g  cvt*			@ g  	v-reverse			@ g  cvt			@  g  filenamef  ice-9/psyntax.scm
	N		>		(	@		 		@	  g  nameg  convert-pattern CO /KlF
.      h      ] C     }       g  var
		 g  level		  g  filenamef  ice-9/psyntax.scm
		Y			i				q	
		[ 			   CU      h   &  ]4 54 >  "  G  4L54L5L 445 5$  	 "  	 4L4	54L4L4
4 5554L555 6       g  pvars
	  g  exp	  g  y		  g  r		  g  mod		  g  ids		  g  labels		1  g  new-vars		1   g  filenamef  ice-9/psyntax.scm
					$						=	"		)	)		E	1			9		<	!	B		D	3	E		I		N
		Q		I	T
		`	!	b		I	f
		g		6	k		U	w		y	x		K	}		S 		T 		Y 		T 		S 		S 		K 		6 		0 		 "	 	  g  nameg  build-dispatch-call CO 0   h   ^   ]L LL 6    V       g  e
		  g  filenamef  ice-9/psyntax.scm
		B			N 		   Cm     h   y   ]4L LL 5Cq       g  x
		  g  filenamef  ice-9/psyntax.scm
		-			>			I			>			9 		   CKk
+ h      ] L C          		
   C/Fd+b    h  H  , 3 4LLO >  G 	4LO 	5$ 4L4	55$ 4455
L  
 		
 4
5$  4O ?"  14L	5	 		
 4L	54L 5		
 		 
		 &  N445 5$  		 "  		   		 "  T445 5$  		 "  		  	  		  666      @      g  x
	 g  keys	 g  clauses		 g  r		 g  pat		 g  fender		 g  exp		 g  mod		 g  p		 g  pvars			 g  y	
	Y g  y		u g  tmp	   g  then-exp	   g  else-exp	   g  test-exp	  g  then-exp	  g  else-exp	  g  req	? g  vars	? g  exp	? g  body	%6 g  fun-exp	z g  arg-exps	z g  fun-exp	 g  arg-exps	  g  filenamef  ice-9/psyntax.scm
					(	!			&		$	;			<		$	?		9	I		$	M			N8	
	U		1	W8	
	Y			`		Y	c		S	h		b	m
		p		k	u
		u		I 		v 
	 		c 
	 		^ 		^ 		K 
			4
		)%
	%	,
	.		k3
	C		EG		:H	K	!Q	S	3T	X	]
	`		jc
	o	!q		ju
	z		Qz		>
			!		3		
			j
		!		j
			Q		>
			4		!		1		>				1		>		 M		  g  nameg  
gen-clause CO 1F
3+mU h      ]L$  ,4L5	$  L
&  L"  L"  L"  L $  ,4 5	$   
&   "   "   "   &  4L L54L  5"  C             g  x
	   g  filenamef  ice-9/psyntax.scm
		2				s		
		>s	"	?		ps		qt		zt	- t	 		> 	    C$U%,)  h    ]:"  L L	LLL L6 $  "  3 $  +4 5	$   
&  	 "  "  "  $ 4L O L5$ "  4455  $  ,4 5	$   
&   "   "   "   4455L4L4	 5  4L4L

 L54L  5L55L	 6 $  ,4 5	$   
&   "   "   "   45	$  "  &  4L 54L5&  4LL4$  ,45	$  
&  "  "  "  5$  "  L>  G L
L6"n"j""        g  pat
	 g  exp	 g  id	   g  labels	  g  var	  g  props	 g  type	 g  value	 g  form	 g  e	 g  w	 g  s	 g  mod	  g  filenamef  ice-9/psyntax.scm			7			$			 	e	
	!d		)		-d		.		Jf		]		 	^		)	n		2	p		)	t		$	y		|	 	% 	 	 		6 	 7	 	 7	 8	
 		( 		= 		N 		H 		h 		> 		> 		F 		f 		n 		X 		R		F		F		>		=		=		*		$	#s	$	_s	"a	k		$lt	ut	-s										
			 B		   C/   h      ]LLLLL L 6 ~       g  pat
		 g  fender		 g  exp			  g  filenamef  ice-9/psyntax.scm			3			  			   C&       h     ](  X445 5$  	 "  	     	 C45$  %	L LLLLLL LLO @4
5$   L O @6          g  x
	  g  keys	  g  clauses		  g  r		  g  mod		  g  fun-exp		N	` g  arg-exps		N	` g  tmp		c  g  tmp		n  g  tmp	    
g  filenamef  ice-9/psyntax.scm
										!				3					
		!		I	$
		0	!	2		I	6
		F		B	I
		N		0	N			W
		c		*	c		 		4 		A 		4 		" 	 	  g  nameg  gen-syntax-case CO 	2-Q /!.Q 002(/Q 11!" Q 2'(+)m  hX      ] $  "  3 $  +4 5	$   
&  	 "  "  "  $  4L  LL5CC           g  x
		T  g  filenamef  ice-9/psyntax.scm
		)	e	
		d				d				2f		E		5	F		G	Q		B 		T   Ck
U)*      h@  	  ]C4LLLO 5$ 4455  4L	 LL5	 
	 4L L4 $  ,4	 5	$   

&   "   "   "   5$  "  L>  G 
	4LL	
5	
 	L CL 6             g  val
	9 g  key	9 g  m		9 g  x		$/ g  req		J	~ g  vars		J	~ g  exp		J	~ g  body		d	u g  props	   g  type	  g  value	  g  form	  g  e	  g  w	  g  s		  g  mod	
  g  fun-exp	/ g  arg-exps	/  g  filenamef  ice-9/psyntax.scm			 				8	
	 		2	"8	
	$		 	(		Z	+		T	0		c	1		J	8
		;		t	@
		J		J	J		5	U
		\	)	d
		d		k
		m		l	r
			 	 	 	 	 	 	 	 	
 	 	 			5		"%
	3		25		?9		  )	9	   C3        hp      ]4L $  '4 5$  4 >  "  G  "   "    545$  LLLLO @6        g  e
		o g  r		o g  w			o g  s			o g  mod			o g  e		:	o g  tmp		E	o  g  filenamef  ice-9/psyntax.scm
					8		8		8	
	9	
	:		:		 			o	   C( "2O /012>  "  G  8=       h@      - . , 3 #  #  L   445 56         g  x
		> g  m		> g  esew			>  g  filenamef  ice-9/psyntax.scm

	
	
	$	
	.	'
		!	1

	'	2

	0	5

	=	;

	0	<

	!	>
		 		>	  g  nameg  macroexpand CO +i      h0      ] $  "4 5	$   
&   CCCC          g  x
		-  g  filenamef  ice-9/psyntax.scm

	
				_		
		&`	 		-  g  nameg  identifier? C,i    h       ] 	 	 C           g  id
		 g  datum		 g  wrap			 g  module			  g  filenamef  ice-9/psyntax.scm

	
			
			 			  g  nameg  datum->syntax C-iU h   x   ]L  6      p       g  x
		
  g  filenamef  ice-9/psyntax.scm

	
	

	 		
  g  nameg  syntax->datum C-O i)    hP      ]	4 $  ,4 5	$   
&   "   "   "   5$  CC             g  x
		J g  props	<	J  g  filenamef  ice-9/psyntax.scm

	
									<		<		A		E	
 
		J  g  nameg  syntax-source C.i/01    h   y   ]L45L 6       q       g  x
		  g  filenamef  ice-9/psyntax.scm

"		
#			
#	*	
#		
#	 		   C 	   hH      ]	 $  "  4 >  "  G  445 5L O  6              g  ls
		A g  mod	0	A  g  filenamef  ice-9/psyntax.scm

	
	
 		
 	 	
 		%
!		&
!	&	)
!	3	/
!	&	0
!		0
!		A
"	 		A  g  nameg  generate-temporaries CO /i20U   hX    ]"  4 >  "  OG  "  H $  =4 5	$  ' 
&   $  "  ""  ""  ""  ""  4>  "  OG  "  H$  =45	$  '
&  $  "  ""  ""  ""  " $  ,4 5	$   
&   "   "   "   $  ,45	$  
&  "  "  "  &  4L  54L 5CC            g  x
	R g  y	R  g  filenamef  ice-9/psyntax.scm

'	
	
(		
(	'	
(		#		'
(		(		5_		9		D`		H		m
)		q
)	'	s
)	 	 
)	 	 _	 	 `	 	 s	 	
s	"	<s	=t	Ft	-Ot	 	R	  g  nameg  free-identifier=? CO 2i30      hP    ]"  4 >  "  OG  "  H $  =4 5	$  ' 
&   $  "  ""  ""  ""  ""  4>  "  OG  "  H$  =45	$  '
&  $  "  ""  ""  ""  ""   C $  i4 5	$  W 
&  I$  >45	$  ,
&   &  L  		6C""""""          g  x
	L g  y	L  g  filenamef  ice-9/psyntax.scm

-	
	
.		
.	'	
.		#		'
.		(		5_		9		D`		H		m
/		q
/	'	s
/	 	 
/	 	 _	 	 `	 	 	 |	 	 |	 	 |	 	"}	)	*	/	0	2	 #	L	  g  nameg  bound-identifier=? CO 3iS045)U       hH  7  - . , 3 #   $  4 5$  "   "  $  "  4 >  "  G  45$  "  4>  "  G   4$  ,45	$  
	&  "  "  "  5$  "  $  "  M4$  ,45	$  
	&  "  "  "  5$  "  4L 
5$  4L 
5"  6/      g  who
	H g  message	H g  form		H g  subform		H g  props	   g  t	 ) g  props	&  g  filenamef  ice-9/psyntax.scm

3	
	
4	#	
4	/	&
4	#	'
4	/	.
4	;	3
4	'	7
4		@
5		B
4		R
6		e
6	'	g
6		z
7			 	 	 	 	 	 	 	
 
8	 	 	 	 					
*
:	8
;	9
;	 H
7	 $	H	  g  nameg  syntax-violation C-O i60IHS7KZ89J#      h8    ]6L L 	"  $  	"  "  6$  +&  $  
"  "  ""  "L 	4L5		$  $  -45	$  
&  		"  "  "  
4L	
5$  "  &  	
	"  "  
	"  "  4	5$  h$  -45	$  
&  		"  "  "  
4	5$  "  
	"  "  4		>  G 
$  
D$  D$  D$  D$  
D$  =						
		
 	
DD        g  e
	6 g  r	6 g  w		6 g  s		6 g  rib		6 g  mod		6 g  w			r g  ms			o g  s			o g  id		w g  w		w g  mod		w g  n		  g  mod	
  g  t	   g  b	  g  mod	
Q g  t	\o g  b	o g  type	6 g  value	6 g  mod	6 g  w		 g  
expression		/ g  wrap	
/ g  module	/  g  filenamef  ice-9/psyntax.scm

E					
P	 	
G		
G	*	
G		#
L	!	(
L	)	/
L		3
H		6
H		:
H		=
H	(	B
H		E
J		K
J	'	P
J	9	Q
J	/	X
J	B	Y
J		w		w
N		~Y	 Y	 [	
 Z	 	 \	 	 \	
 P	 P	 Q	 P	 R	 R	$ R	
 S	 S	T	T	'T	_	
Z		"`	#	Q`	
TV	\V	lW	oV	tX	wX	#X	
d	
d	d	

M	
T	
U	$
U	
T	
V	"
V	
T	
W	#
W	
T	
X	.
X	&
T	
Y	#
Y	7
Y	+
Y	
T	
[		
]	.	'			 			
\		1
[	3
_	6
_	 ]	6	   C     hx      ]"  4 >  "  OG  "  H $  =4 5	$  ' 
&   $  "  ""  ""  ""  "M [ LLO 6       g  id
		x  g  filenamef  ice-9/psyntax.scm

B		
C		
C	$	
C		#		'
C		(		5_		9		D`		H		xl	 		x  g  nameg  syntax-local-binding CO /:0      hx      ]"  4 >  "  OG  "  H $  =4 5	$  ' 
&   $  "  ""  ""  ""  "L  	 	6         g  id
		v  g  filenamef  ice-9/psyntax.scm

a		
b		
b	$	
b		#		'
b		(		5_		9		D`		H		v
c	 		v  g  nameg   syntax-locally-bound-identifiers CO 0Q /Q 04;i<<0     hp      ]"  4 >  "  OG  "  H $  =4 5	$  ' 
&   $  "  ""  ""  ""  " 	C        g  id
		o  g  filenamef  ice-9/psyntax.scm

>		
?		
?	$	
?		#		'
?		(		5_		9		D`		H		n
@	 		o  g  nameg  syntax-module C>  "  G  4;i6/>  "  G  4;i:0>  "  G  /0  h     ] $  74L 5$  4L 5$  CCC (  C $  ?4 5	$  / 
&  # 4L  	5 	 "xCCC      g  e
	  g  p	  g  w		  g  mod		  g  first			@ g  rest		.	>  g  filenamef  ice-9/psyntax.scm

		
			
	
	

		
	 	
	,	
		
		 
		!
		&
	+	.
		.
		6
		;
		F
	
	G
		K		O
	
	P		n
		w		y
		~	 
	 	 	  g  nameg  
match-each CO /  hx   S  ] $  &4L 5$  4L 5CC (  C $  84 5	$  ( 
&   4L  	5 "CCCK      g  e
		x g  w		x g  mod			x g  l			/  g  filenamef  ice-9/psyntax.scm

		
			
	
	

		
	%	
		
		
		
		#
	!	)
		,
		5
	
	6
		:		>
	
	?		[
		d		f
		r
	 		x	  g  nameg  match-each-any CO 0,/0N 
h     ]
 (  C &  C &  C $   4L  5 " &  C 
$    "$  ' 4L 4 	54L  	55 "i$  "  $  C	$    "8C          g  p
	  g  r	  g  key		P   g  filenamef  ice-9/psyntax.scm

		
	
	
		
	
	
		
	
	
		"
		&
		*
	
	-
	#	.
	+	3
	8	7
	+	?
		C
		G
	
	H
	$	K
		P
		P
		_
	#	i
		r
		v
	$	w
	$	z
	% 
	. 
	% 
	% 
	2 
	% 
	$ 
	 
	 
	% 
	 &	 	  g  nameg  match-empty CO 1Kl      h(      ] (  C4 54L 4 55C        g  r*
		' g  r		'  g  filenamef  ice-9/psyntax.scm

		
			
	
	
		
	!	
	*	%
	!	&
	 			'	  g  nameg  combine CO 20Kl       h(      ] (  LC4 54L 4 55C          g  l
		%  g  filenamef  ice-9/psyntax.scm

		
	'		
		
	&	
	2	
	;	#
	2	$
	  			%  g  nameg  collect C     h     ]" $  f4L >  G $  D(  '4L LL5$  DD4L L5DD"  L4L LLL5D $  84 5	$  & 
&   4L  	5 "D"""            g  e
	  g  w	  g  xr*			o g  y-pat			o g  r			o g  xr		;	S  g  filenamef  ice-9/psyntax.scm

	
	
			
		

	+	
	.	
	+	
		&
		,
		-
	$	2
	+	7
	;	;
	$	;
		C
		H
	(	N
	 	S
	 	T
		W
		X
		]
	"	`
	*	h
		j
		o
		t
		w
	  
	 
	 	 
	 	 
	 	 
	 
	 &	 	  g  nameg  f CUNW      hp  n  ]-(   (  CC$  ( $  L  4L  56C&  4L 5$  CC
$  ? (  
L64L 5$  O Q 6C$  t		O 	L	L Q 	4	 >  G $   (  (  
L6L6CC$   $  "  3 $  +4 5	$   
&  	 "  "  "  $  4L 5$  ,45	$  
&  "  "  "  $  ,45	$  
&  "  "  "  &  4L	54L	5"  $  CCC
$  4L 5$  CC$   $  L 4 56CC f      g  e
	o g  p	o g  w		o g  r		o g  mod		o g  l		U	e g  key		io g  l	   g  collect	   g  x-pat	   g  y-pat	   g  z-pat	   g  f		   g  xr*	 0 g  y-pat	 0 g  r	 0 g  i	 g  j	  g  filenamef  ice-9/psyntax.scm

		
	
	
		
		
	
	
		!
		&
	"	)
	*	,
		1
	$	4
	,	<
		@
		F
		J
	
	K
		U
		]
	0	b
	7	i
		i
		z
	 
	  
	 
	 
	* 
	 
	 
	 
	 
	 
	$ 
	5 
	F 
	 
	

	
	
	 
	)$
	,
	9
	<e	
@d	H	Ld	M	if	|
	}
	1
	@
	&	s		s	"	s	t	t	-t	
	/
	3
	#4
	4=
	A
	O
	R
	V
	Y
	c
	,k
	 L	o	  g  nameg  match* CO 	3,/        h   D  ]$  |&  C&  4L 5C"  L 6 $  =4 5	$  + 
&  L 4L  	5 	6"""C  <      g  e
	  g  p	  g  w		  g  r		  g  mod		   g  filenamef  ice-9/psyntax.scm

		
	
	
		
	
	
		
	
	
		)
		<		<
	
	?		C
	
	D		d		m		o		v		x 	 	 	  g  nameg  match CO 4/4Q /0Q 01Q 12Q 24/1-20Q 33Q 4/,U    hp     ]&    C&  C"  L  6 $  54 5	$  # 
&  L   	 	6"""             g  e
		j g  p		j  g  filenamef  ice-9/psyntax.scm
					

						
				'	,	*		*
		-		1
		2		W	1	\		^	 		j	  g  nameg  $sc-dispatch C3O +i/01234	
 !"#$%&'()*+,-. 4i=+?J     h   :   ] C   2       g  e1
		 g  e2		  			   CMXY h    [   ]   C      S       g  out
		 g  in		 g  e1			 g  e2			  			   Cabc     h    [   ]   C   S       g  out
		 g  in		 g  e1			 g  e2			  			   C3 
     hP      ]4 5$  @4 5$  @4 5$  @	 6       g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  ice-9/psyntax.scm
	 		P   C5=R4i5+a23S    h   v   ]4 56   n       g  message
		 g  arg		  g  filenamef  ice-9/psyntax.scm	0		0	 			   Coq        h   @   ] C  8       g  message
		 g  arg		  			   CS      h      ]456          g  keyword
		 g  operands		 g  message			 g  arg			  g  filenamef  ice-9/psyntax.scm	%		%	 			   Crs h   g   ]4 56   _       g  x
		  g  filenamef  ice-9/psyntax.scm
(	1	*	4	)	3 		   C      h8      ]4 54454554 5$  	 "  6       g  keyword
		8 g  operands		8 g  message			8 g  arg			8  g  filenamef  ice-9/psyntax.scm	&		'		'	,	(	,	'	&	!'		",		,,		8&	 
		8	   C 
    hh   v   ]4 5"  74 5"  	 6$  4?$  @""$  4?$  	@"" n       g  x
		g g  tmp		g g  tmp			H  g  filenamef  ice-9/psyntax.scm
 	 		g   C55R4it+      h   Z   ]  C      R       g  keyword
		 g  pattern		 g  template			  			   C3S        h      ]456          g  keyword
		 g  pattern		 g  message			 g  arg			  g  filenamef  ice-9/psyntax.scm	<		<		 			   C   h    j   ]  C  b       g  keyword
		 g  pattern		 g  message			 g  arg			  			   C 	  hP      ]4 5"   4 5$  @ 6$  4?$  @""       g  clause
		P g  tmp		P g  tmp			1  g  filenamef  ice-9/psyntax.scm
5	 		P  g  nameg  expand-clause C+! 	      h@      ]4   5L $  
L  CC           g  k
		< g  	docstring		< g  keyword			< g  pattern			< g  template			< g  clause			< g  tmp		'	<  g  filenamef  ice-9/psyntax.scm	'G		/N	
 		<	   C3      h@      ]4L 5 45$   O @6            g  dots
		; g  keys		; g  
docstrings			; g  clauses			; g  tmp			; g  tmp			;  g  filenamef  ice-9/psyntax.scm
A			F		B	 		;	  g  nameg  expand-syntax-rules C+  h   t   ]  C   l       g  tmp-bde397a-19fa
		 g  tmp-bde397a-19f9		 g  tmp-bde397a-19f8			  			   C h      ]L  456        g  k
		 g  keyword		 g  pattern			 g  template			  g  filenamef  ice-9/psyntax.scm	T	 			   C3,S        h       ]4 5$  456C             g  dots
		 g  k		 g  	docstring			 g  keyword			 g  pattern			 g  template			  g  filenamef  ice-9/psyntax.scm	\		\		\	*	\	! 			   Ch   t   ]  C   l       g  tmp-bde397a-1a4b
		 g  tmp-bde397a-1a4a		 g  tmp-bde397a-1a49			  			   C h       ]L   456           g  dots
		 g  k		 g  	docstring			 g  keyword			 g  pattern			 g  template			  g  filenamef  ice-9/psyntax.scm	]	 			   C,  h      ] 6       g  dots
		 g  k		 g  keyword			 g  pattern			 g  template			  g  filenamef  ice-9/psyntax.scm	Y	 			   C  h   t   ]  C   l       g  tmp-bde397a-1a2c
		 g  tmp-bde397a-1a2b		 g  tmp-bde397a-1a2a			  			   C h      ]L  456       g  dots
		 g  k		 g  keyword			 g  pattern			 g  template			  g  filenamef  ice-9/psyntax.scm	Z	 			   CS      h      ]456          g  k
		 g  	docstring		 g  keyword			 g  pattern			 g  template			  g  filenamef  ice-9/psyntax.scm	V		V	 			   C    h   t   ]  C   l       g  tmp-bde397a-1a13
		 g  tmp-bde397a-1a12		 g  tmp-bde397a-1a11			  			   C h       ]L   456            g  k
		 g  	docstring		 g  keyword			 g  pattern			 g  template			  g  filenamef  ice-9/psyntax.scm	W	 			   C        h      ]1O Q 4 5$  O @4 5"  o4 5"  <4 5"  		
 6$  4?$  O @""$  4?$  O @""$  4?$  O @"q"m              g  xx
	  g  expand-clause	  g  expand-syntax-rules		  g  tmp		  g  tmp		8  g  tmp		G  g  tmp		V   g  filenamef  ice-9/psyntax.scm
4	 	    C5tR4i+        h    W   ]    C      O       g  name
		 g  pattern		 g  template			  			   C3S        h      ]456          g  name
		 g  pattern		 g  	docstring			 g  template			  g  filenamef  ice-9/psyntax.scm	g		g	 			   C       h    n   ]    C    f       g  name
		 g  pattern		 g  	docstring			 g  template			  			   C 	      hP   v   ]4 5$  @4 5"  	 6$  4?$  @""n       g  x
		P g  tmp		P g  tmp		"	P  g  filenamef  ice-9/psyntax.scm
`	 		P   C5R4i+}3m,      h      ]6             g  let*
		
 g  x		
 g  v			
 g  e1			
 g  e2			
  g  filenamef  ice-9/psyntax.scm	
q	 		
	   C+        h   A   ]   C 9       g  body
		 g  binding		  			   C3        hH      ] (  LLC4L  5  45$  @6            g  bindings
		C g  tmp	!	C g  tmp		,	C  g  filenamef  ice-9/psyntax.scm
r		s			u	!	u	$	u	!	v	$	!u	 		C  g  nameg  f Cd      h(      ]O Q 456           g  let*
		$ g  x		$ g  v			$ g  e1			$ g  e2			$ g  f			$  g  filenamef  ice-9/psyntax.scm	r	 		$	   C       h@   e   ]	4 5"  	 6$  4?$  @""       ]       g  x
		9 g  tmp		9  g  filenamef  ice-9/psyntax.scm
n	 		9   C5R4i+/6:   h(      ]L
$    CL 4L  L56   {       g  p
		%  g  filenamef  ice-9/psyntax.scm	~		
~				,	!	9	#	,	%	 		%   C=D   h   q   ]L4L   L56   i       g  p
		  g  filenamef  ice-9/psyntax.scm		:		G		:		 		   C_+NS    h   8   ]  C      0       g  tmp-bde397a-1ab0
		
  		
   CV  h@      ]L
$  L4 54LLL56L 4L 4L L554LLL56         g  p
		>  g  filenamef  ice-9/psyntax.scm			
			0	 		#		(	0	/	A	1	0	3		4		>	 		>   CZ_  h   8   ]  C      0       g  tmp-bde397a-1ab5
		
  		
   Cb  h@      ]L
$  L4 54LLL56L 4L 4L L554LLL56         g  p
		>  g  filenamef  ice-9/psyntax.scm			
			1	 		#		(	9	/	J	1	9	3		4		>	 		>   C     h`      ]4 5$  LLLLO @4 5$  LL LLO @L4L L54LL56       g  p
		` g  q		` g  tmp			` g  tmp		/	`  g  filenamef  ice-9/psyntax.scm	M		V	)	`	 		`	   C+dl     h   )   ]4 5 C !       g  x
		  		   C+dy      h   8   ]  C      0       g  tmp-bde397a-1b25
		
  		
   C     h   V   ]L 4 56 N       g  y
		  g  filenamef  ice-9/psyntax.scm		  		   C|     h   V   ]L  6N       g  y
		  g  filenamef  ice-9/psyntax.scm		 		   C!        h   h   ]L4L  56 `       g  ls
		  g  filenamef  ice-9/psyntax.scm
	'		7		4 		   C     h   e   ]L L O 6       ]       g  y
		 g  z		  g  filenamef  ice-9/psyntax.scm		  			   C 	    h`      ]4 5$  O @4 5$  O @4 5$  LO @L  C       g  y
		` g  k		` g  tmp			` g  tmp		'	` g  tmp		C	`  g  filenamef  ice-9/psyntax.scm
		 		`	  g  nameg  f C+0       h   6   ] C.       g  t-bde397a-1b19
		  		   C3   h(   t   ]	4 5$  @ 6      l       g  ls
		" g  tmp		"  g  filenamef  ice-9/psyntax.scm
	 		"  g  nameg  k C h@      ]4L  L545$  @O Q 6           g  x
		< g  x		< g  tmp			< g  f		-	<  g  filenamef  ice-9/psyntax.scm					-		 		<   C    h      ]"4 5$  LLO @4 5$  LLO @4 5$  LLLLO @4 5$  	L O @
  C           g  p
	  g  lev	  g  tmp		  g  tmp		+  g  tmp		K  g  tmp		o   g  filenamef  ice-9/psyntax.scm
{	 	 	  g  nameg  quasi CO  +_+     h   8   ]  C      0       g  tmp-bde397a-1acb
		
  		
   C  h@      ]L
$  L4 54LLL56L 4L 4L L554LLL56         g  p
		>  g  filenamef  ice-9/psyntax.scm			
			0	 		#		(	0	/	A	1	0	3		4		>	 		>   C  h   8   ]  C      0       g  tmp-bde397a-1ad0
		
  		
   C  h@      ]L
$  L4 54LLL56L 4L 4L L554LLL56         g  p
		>  g  filenamef  ice-9/psyntax.scm			
			1	 		#		(		/	#	1		3		4		>	 		>   C     hh      ]4 5$  LLLLLO @4 5$  LLL LLO @L4L L54LL56           g  p
		d g  q		d g  tmp			d g  tmp		1	d  g  filenamef  ice-9/psyntax.scm	Q		Z	)	d	 		d	   C        h      ] C          		
   C3        hH      ]4 5$  LLLLL O @4 5$  @ 6        g  p
		G g  lev		G g  tmp			G g  tmp		0	G  g  filenamef  ice-9/psyntax.scm
	 		G	  g  nameg  vquasi CO +++  h   *   ] L  C   "       g  dx
		  		   C     h8   g   ]	4L 5$   O @ (  L  CL L C  _       g  dy
		6 g  tmp		6  g  filenamef  ice-9/psyntax.scm	$	 		6   C       h   -   ]L  C     %       g  stuff
		  		   C h   -   ]L  C     %       g  stuff
		  		   C 	    hh   k   ]45$   O @45$   O @45$   O @  C      c       g  x
		b g  y		b g  tmp			b g  tmp		)	b g  tmp		E	b  		b	   C3      h0      ]  45$  @6            g  x
		+ g  y		+ g  tmp				+ g  tmp			+  g  filenamef  ice-9/psyntax.scm
				 		+	  g  nameg  	quasicons C++0    h   )   ] C!       g  p
		  		   C3        h8   s   ]L (  CL (  L C4L 5  $   @L 6  k       g  tmp
		6  g  filenamef  ice-9/psyntax.scm										 		6
   C! h   8   ]4  5C      0       g  p
		 g  y		  			   C3 hP      ]45$   O @ (  C  45$  @6       g  x
		P g  y		P g  tmp			P g  tmp		.	P g  tmp		9	P  g  filenamef  ice-9/psyntax.scm
		$			.	 		P	  g  nameg  quasiappend C  h       ] (  LCL  4L 56             g  x
		  g  filenamef  ice-9/psyntax.scm
									"				 		  g  nameg  f C    h       ]
O L Q  6            g  x
		 g  y		 g  f			  g  filenamef  ice-9/psyntax.scm
			 			  g  nameg  
quasilist* CO +  h   )   ]  C      !       g  x
		
  		
   C|+0     h   6   ] C.       g  t-bde397a-1b43
		  		   C3   h0      ]4L  545$  @6   x       g  x
		- g  tmp		- g  tmp			-  g  filenamef  ice-9/psyntax.scm		#		 		-   C+1       h   R   ]  C    J       g  t-bde397a-1b57
		 g  t-bde397a-1b56		  			   C3       hH      ] (  LL64L 54L  5 45$  @6            g  x*
		C g  tmp	!	C g  tmp		,	C  g  filenamef  ice-9/psyntax.scm
														+		.		+	!	 		C  g  nameg  f C       h    t   ]
O L Q  6     l       g  x
		 g  y		 g  f			  g  filenamef  ice-9/psyntax.scm			 			   C3+0@  h   6   ] C.       g  t-bde397a-1b63
		  		   C3   h0      ]4L  545$  @6   x       g  x
		- g  tmp		- g  tmp			-  g  filenamef  ice-9/psyntax.scm		'		 		-   CB+0O      h   6   ] C.       g  t-bde397a-1b6f
		  		   C3   h0      ]4L  545$  @6   x       g  x
		- g  tmp		- g  tmp			-  g  filenamef  ice-9/psyntax.scm		'		 		-   CQ^      h   o   ]	4L  5 C     g       g  x
		 g  tmp			  g  filenamef  ice-9/psyntax.scm		.			 		   C`    h   )   ] C   !       g  x
		  		   C3        h      ]94 5$  @4 5$  L O @4 5$  L O @4 5$  	L O @4 
5$  L O @4 5$  L O @4 5$  @ 6          g  x
	  g  tmp	  g  tmp		"  g  tmp		>  g  tmp		Z  g  tmp		v  g  tmp	   g  tmp	    g  filenamef  ice-9/psyntax.scm
	 	   g  nameg  emit CO  Q   Q Q Q +bh   _   ]L4L  
56  W       g  e
		  g  filenamef  ice-9/psyntax.scm				 		   C3  h0   e   ]	4 5$  LL O @ 6       ]       g  x
		) g  tmp		)  g  filenamef  ice-9/psyntax.scm
	 		)   C O  5R4iabcdaefghijk-    h     ]#44 5$   "  $  4 5"  4L 55454$  "  	>  "  G  "  >4
5$  4>  "  G  64545"45"           g  fn
	  g  dir	  g  k		  g  p		6  g  enc		?  g  x		e  g  result		e   g  filenamef  ice-9/psyntax.scm
										*		.		0		4		6		6		9		?		B	
	L	 	T	(	Y	
	e	
	f		p		q	 	 	 	 	 	 	
 	 	 	
 	 	  g  nameg  	read-file C.7lSm++0        h   +   ] C#       g  exp
		  		   C3      h8      ]454L L545$  @6       g  k
		8 g  filename		8 g  fn				8 g  tmp			8 g  tmp		!	8  g  filenamef  ice-9/psyntax.scm								$		 		8	   C3        hp     ])O  Q 4 5$  45"  45$  45"  4 5$  	O @
 6        g  x
		n g  	read-file	
	n g  src			n g  file		,	n g  dir		E	n g  tmp		P	n  g  filenamef  ice-9/psyntax.scm
										%	(	'		,		/		9		:	$	E	 		n   C5aR4i+-       hH      ]45445$  "  4L 55 C              g  k
		A g  filename		A g  fn				A g  t			5 g  tmp		7	A  g  filenamef  ice-9/psyntax.scm	
			
					 			&	 	*	2	,	2	2	 	7		7		 		A	   C3   h(   e   ]	4 5$   O @ 6 ]       g  x
		' g  tmp		'  g  filenamef  ice-9/psyntax.scm
	 		'   C5R4i       h   p   ] 6    h       g  x
		  g  filenamef  ice-9/psyntax.scm
							 		   C5R4iWW    h   p   ] 6    h       g  x
		  g  filenamef  ice-9/psyntax.scm
							 		   C5WRT     h      ]L  6       g  x
		  g  filenamef  ice-9/psyntax.scm
!		#	 		  g  nameg  transg  
macro-typeg  variable-transformer CZ  h@      ]	4 5$  %O  Q 4>  "  G  C 6             g  proc
		: g  trans		2  g  filenamef  ice-9/psyntax.scm

	 		 		!		$		!$	'	'$		6&		:&	 
		:  g  nameg  make-variable-transformer CR4i+b    h8   )   ]   	 
    C       !       g  e
		1  		1   C3, h      ]4 5$  6C          g  id
		 g  exp1		 g  var			 g  val			 g  exp2			  g  filenamef  ice-9/psyntax.scm	5		5		5	 			   C    hX   p   ] 	   
	
   	   	     C h       g  id
		W g  exp1		W g  var			W g  val			W g  exp2			W  		W	   C 	    hP   w   ]4 5$  @4 5"  	 6$  4?$  @""o       g  xx
		P g  tmp		P g  tmp		"	P  g  filenamef  ice-9/psyntax.scm
)	 		P   C5R4i+a  h   \   ]  C   T       g  id
		 g  args		 g  b0			 g  b1			  			   C^3,       h   h   ] 6`       g  id
		 g  val		  g  filenamef  ice-9/psyntax.scm	C	 			   C h   ;   ]  C    3       g  id
		 g  val		  			   C 	 hP   v   ]4 5$  @4 5"  	 6$  4?$  @""n       g  x
		P g  tmp		P g  tmp		"	P  g  filenamef  ice-9/psyntax.scm
?	 		P   C5RC        g  
session-id
	      g  transformer-environment	      g  top-level-eval-hook	           g  get-global-definition-hook	           g  maybe-name-value!	           g  build-application	           g  analyze-variable	           g  build-simple-lambda	           g  build-sequence	           g  build-named-let		           g  build-letrec	
           g  syntax-object-expression	           g  
extend-env	           g  extend-var-env	           g  macros-only-env	           g  global-extend	           g  id?	           g  
gen-labels	           g  make-binding-wrap	           g  
join-wraps	           g  same-marks?	           g  id-var-name	           g  locally-bound-identifiers	           g  valid-bound-ids?	           g  distinct-bound-ids?	           g  bound-id-member?	           g  wrap	           g  source-wrap	           g  expand-sequence	           g  expand-top-sequence	           g  expand-install-global	           g  parse-when-list	           g  syntax-type	            g  expand	!           g  expand-expr	"           g  expand-application	#           g  expand-macro	$           g  expand-body	%           g  expand-local-syntax	&           g  eval-local-transformer	'           g  	ellipsis?	(           g  lambda-formals	)           g  expand-simple-lambda	*           g  lambda*-formals	+           g  expand-lambda-case	,           g  strip	-           g  gen-var	.           g  v	/           g  
gen-syntax	/     F     Id g  gen-ref	0     F     Id g  gen-map	1     F     Id g  regen	2     F     Id g  
expand-let	/     ik     p g  convert-pattern	/     r      g  build-dispatch-call	0     r      g  
gen-clause	1     r      g  gen-syntax-case	2     r      g  syntax-local-binding	/            g   syntax-locally-bound-identifiers	0            g  
match-each	/     l     O g  match-each-any	0     l     O g  match-empty	1     l     O g  combine	2     l     O g  match*	3     l     O g  match	4     l     O g  quasi
     W     Y g  vquasi     W     Y g  	quasicons	     W     Y g  quasiappend	     W     Y g  
quasilist*	     W     Y g  emit	     W     Y  Gg  filenamef  ice-9/psyntax.scm     	     	"     	3     	     	     g	     $	
     $	     L	!     &	     L	!     L	     &	     $	
     $	     M	!     &	     M	!     M	     &	     $	
     O	     O	     O	     '(O	     '1$	
     '6$	     '?p	     '@&	     'Gp	     'Ip	     )v&	     ){$	
     )w	     )w	     )w	     Iiw	     Ir	     Iv	     Iy	     O	     O,	     O,	     O,	     Q,	     Q8	     Q8	     Q8	     X$8	     X-L	     X1L	     X4L	     ^L	     ^`	     ^`	     ^`	     d`	     ds	     ds	     ds	     p#s	     p,	     p0	     p3	     u	     u	     u	     u	     { 	     {)	     {-	     {0	     ]	     f$	
     k$	     t	     u&	     |	     ~	     #&	     ($	
     1	     5	     8	     -	     6	%	     :	%	     <	%	     	%	     $	
     $	     	5	     &	     	5	     	5	     &	     $	
     $	     	@	     &	     	@	     	@	     	@	!     &	     $	
     $	     	B	     &	     	B	     	B	     	B	#     &	     $	
     $	     	D	"     &	     	D	"     	D	     	D	1     &	     $	
     $	     	E	,     &	     	E	,      	E	     !	E	E     #&	     ($	
     6$	     >	G	     ?&	     E	G	     G	G	     H	G	)     J&	     O$	
     X	I	     \	I	     _	I	     	I	     *
	     
	     
	     
	     
	     
	     
&	     
,	     
2	     
j	     
j	      H
j	      Q
k	      Y
k	      `
k	      i
l	      q
l	      x
l	     =	     d[
 	     j
   C6                                                                                                                                                                                          ccache/ice-9/list.go                                                                                0000644                 00000002644 15154557173 0010205 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4       hE      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  list	 		g  filenameS	
f  ice-9/list.scm	g  exportsS	g  rassoc	g  rassv	g  rassq	 	g  set-current-module	 	 	g  generic-rassoc	g  equal?	g  eqv?	g  eq?C 5      h  r   ]4	
5 4 >  "  G         h8      ]"  $(  C4 5$  C""             g  key
		2 g  alist		2 g  =			2 g  ls			*  g  filenamef  ice-9/list.scm
	
																			 			$			*			*		 		2	  g  nameg  generic-rassoc CR      h       - 1 3  (  "  6       g  key
			  g  alist			  g  =				   g  filenamef  ice-9/list.scm
	
						1	 		 			 	
	  g  nameg  rassoc CR   h      ] 6    w       g  key
		 g  alist		  g  filenamef  ice-9/list.scm
	
		 	 			  g  nameg  rassv CR      h      ] 6    w       g  key
		 g  alist		  g  filenamef  ice-9/list.scm
	"
		#	 			  g  nameg  rassq CRC    j       g  m
		(  g  filenamef  ice-9/list.scm		
b	
=	
	
	"
 	
   C6                                                                                             ccache/ice-9/vlist.go                                                                               0000644                 00000237116 15154557173 0010377 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.06>     ] 4    hz      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  vlist	 		g  filenameS	
f  ice-9/vlist.scm	g  importsS	g  srfi	g  srfi-1	 	 	g  srfi-9	 	 	g  gnu	 	 	g  srfi-26	 	 	g  format	 	 	 	g  exportsS	g  vlist?	g  
vlist-cons	 g  
vlist-head	!g  
vlist-tail	"g  vlist-null?	#g  
vlist-null	$g  list->vlist	%g  	vlist-ref	&g  
vlist-drop	'g  
vlist-take	(g  vlist-length	)g  
vlist-fold	*g  vlist-fold-right	+g  	vlist-map	,g  vlist-unfold	-g  vlist-unfold-right	.g  vlist-append	/g  vlist-reverse	0g  vlist-filter	1g  vlist-delete	2g  vlist->list	3g  vlist-for-each	4g  block-growth-factor	5g  vhash?	6g  
vhash-cons	7g  vhash-consq	8g  vhash-consv	9g  vhash-assoc	:g  
vhash-assq	;g  
vhash-assv	<g  vhash-delete	=g  
vhash-delq	>g  
vhash-delv	?g  
vhash-fold	@g  vhash-fold-right	Ag  vhash-fold*	Bg  vhash-foldq*	Cg  vhash-foldv*	Dg  alist->vhash	E !"#$%&'()*+,-./0123456789:;<=>?@ABCD '	Fg  set-current-module	GF 	HF 	Ig  
make-fluid	Jg  make-vector	Kg  % make-block-procedure	Lg  make-syntax-transformer	ML 	NL 	Og  
make-block	Pg  macro	Qg  $sc-dispatch	RQ 	SQ 	Tg  _	Ug  any	VTUUUU 	Wg  syntax-object	Xg  syntax-parameterize	Yg  m-198d9e0d-123b	Zg  top	[YZ 	\g  ribcage	]g  t-198d9e0d-1237	^g  t-198d9e0d-1238	_g  t-198d9e0d-1239	`g  t-198d9e0d-123a	a]^_` 	b[[[[ 	cf  l-198d9e0d-1240	df  l-198d9e0d-1241	ef  l-198d9e0d-1242	ff  l-198d9e0d-1243	gcdef 	h\abg 	i\ 	jg  x	kj 	l[ 	mf  l-198d9e0d-123d	nm 	o\kln 	pg  shift	qg  	proc-name	rg  args	sqr 	tZ 	utt 	vf  l-bde397a-8e8	wf  l-bde397a-8e9	xvw 	y\sux 	zg  name	{g  formals	|g  body	}z{| 	~ttt 	f  l-bde397a-8df f  l-bde397a-8e0 f  l-bde397a-8e1   \}~  g  make-procedure-name g  prefix   tt  f  l-bde397a-8d3 f  l-bde397a-8d1   \  t  f  l-bde397a-8d0   \k  [hiopiiiiy  g  hygiene   WX  thio    WO  g  identifier-syntax W  WK        g  lambda W  g  base W  g  offset W  g  size W  g  	hash-tab? W    g  if W  g  vector W  WJ  g  * W  W	    W    W
              g  each-any T g  syntax-violation     f  Wrong number of arguments g  identifier?     tio  WK  f  -source expression failed to match any pattern g  define-block-accessor UUU  g  define-inlinable g  dummy g  index z  g  m-198d9e0d-1262 Z  tt  f  l-198d9e0d-1267 f  l-198d9e0d-1268 f  l-198d9e0d-1269   \    f  l-198d9e0d-1264   \k  ti  W  g  block W    g  
vector-ref W  g  % block-content-procedure g  block-content TU  g  m-198d9e0d-126f Z  g  t-198d9e0d-126e     f  l-198d9e0d-1274   \  f  l-198d9e0d-1271   \k  ipiiiiy  WX  ti  W  W  W        W  g  m-198d9e0d-126d Z  ipi  W    W  W
       ti W g  % block-base-procedureg  
block-baseg  m-198d9e0d-128bZ g  t-198d9e0d-128a 	 
f  l-198d9e0d-1290
 \	 f  l-198d9e0d-128d \k	 ipiiiiy WX ti W W W    W g  m-198d9e0d-1289Z ipi W  W  W !  "! #" $ti %W$ &g  % block-offset-procedure'g  block-offset(g  m-198d9e0d-12a7)(Z *g  t-198d9e0d-12a6+* ,) -f  l-198d9e0d-12ac.- /\+,. 0f  l-198d9e0d-12a910 2\k,1 3)/i2piiiiy 4WX3 5t/i2 6W'5 7W3 8W&5 978 :69 ;: <W3 =g  m-198d9e0d-12a5>=Z ?>/i2pi @W? A@ BW? CW	5 DB@C E<AD F4;E Gti2 HW&G Ig  % block-size-procedureJg  
block-sizeKg  m-198d9e0d-12c3LKZ Mg  t-198d9e0d-12c2NM OL Pf  l-198d9e0d-12c8QP R\NOQ Sf  l-198d9e0d-12c5TS U\kOT VLRiUpiiiiy WWXV XtRiU YWJX ZWV [WIX \Z[ ]Y\ ^] _WV `g  m-198d9e0d-12c1a`Z baRiUpi cWb dc eWb fW	X gecf h_dg iW^h jtiU kWIj lg  % block-next-free-proceduremg  block-next-freeng  m-198d9e0d-12dfonZ pg  t-198d9e0d-12deqp ro sf  l-198d9e0d-12e4ts u\qrt vf  l-198d9e0d-12e1wv x\krw youixpiiiiy zWXy {tuix |Wm{ }Wy ~Wl{ }~ |  Wy g  m-198d9e0d-12ddZ uixpi W  W W	{   z tix Wl g  vector-lengthg  % block-hash-table?-procedureg  block-hash-table?g  m-198d9e0d-12faZ g  t-198d9e0d-12f9  f  l-198d9e0d-12ff \ f  l-198d9e0d-12fc \k ipiiiiy WX ti W W W    W W  g  <W WJ  W W      ti W g   % set-block-next-free!-procedureg  set-block-next-free!TUU g  m-198d9e0d-1336Z g  t-198d9e0d-1334g  t-198d9e0d-1335  f  l-198d9e0d-133bf  l-198d9e0d-133c \  f  l-198d9e0d-1338 \k ipiiiiy WX ti W W W    W W g  	next-freeW  g  vector-set!W W	    ti W g  % block-append!-procedureg  block-append!TUUU g  m-198d9e0d-1357Z g  t-198d9e0d-1354g  t-198d9e0d-1355g  t-198d9e0d-1356  f  l-198d9e0d-135cf  l-198d9e0d-135df  l-198d9e0d-135e \  f  l-198d9e0d-1359 \k ipiiiiy WX ti W W W    W W g  valueW W  g  and W W WJ   g  =W Wm  	 
g  beginW
 W g  1+W   W W   W   	   ti W g  % block-ref-procedureg  	block-refg  m-198d9e0d-13c0Z  g  t-198d9e0d-13be!g  t-198d9e0d-13bf" ! # $f  l-198d9e0d-13c5%f  l-198d9e0d-13c6&$% '\"#& ( )f  l-198d9e0d-13c2*) +\k(* ,'i+piiiiy -WX, .t'i+ /W. 0W, 1W. 201 3/2 43 5W, 6g  content7W6. 8W. 978 :W. ;:78 <59; =-4< >ti+ ?W> @g  (% block-hash-table-next-offset-procedureAg  block-hash-table-next-offsetBg  m-198d9e0d-13e1CBZ Dg  t-198d9e0d-13deEg  t-198d9e0d-13dfFg  t-198d9e0d-13e0GDEF HCCC If  l-198d9e0d-13e6Jf  l-198d9e0d-13e7Kf  l-198d9e0d-13e8LIJK M\GHL NC Of  l-198d9e0d-13e3PO Q\kNP RCMiQpiiiiy SWXR TtMiQ UWAT VWR WW@T XVW YUX ZY [WR \W6T ]WT ^WT _\]^ `WT ag  +bWaT cb]]^ d`\c e[_d fSZe gtiQ hW@g ig  -% block-hash-table-set-next-offset!-procedurejg  !block-hash-table-set-next-offset!kg  m-198d9e0d-1407lkZ mg  t-198d9e0d-1403ng  t-198d9e0d-1404og  t-198d9e0d-1405pg  t-198d9e0d-1406qmnop rllll sf  l-198d9e0d-140ctf  l-198d9e0d-140duf  l-198d9e0d-140evf  l-198d9e0d-140fwstuv x\qrw yl zf  l-198d9e0d-1409{z |\ky{ }lxi|piiiiy ~WX} txi| Wj W} Wi    W} W6 W W g  next-offsetW  W Wa    ~ ti| Wi g   % block-hash-table-ref-procedureg  block-hash-table-refg  m-198d9e0d-1430Z g  t-198d9e0d-142dg  t-198d9e0d-142eg  t-198d9e0d-142f  f  l-198d9e0d-1435f  l-198d9e0d-1436f  l-198d9e0d-1437 \  f  l-198d9e0d-1432 \k ipiiiiy WX ti W W W    W W6 W g  khashW  W Wa     ti W g  !% block-hash-table-set!-procedureg  block-hash-table-set!g  m-198d9e0d-1456Z g  t-198d9e0d-1452g  t-198d9e0d-1453g  t-198d9e0d-1454g  t-198d9e0d-1455  f  l-198d9e0d-145bf  l-198d9e0d-145cf  l-198d9e0d-145df  l-198d9e0d-145e \  f  l-198d9e0d-1458 \k ipiiiiy WX ti W W W    W W6 W W W  W Wa     ti W g  !% block-hash-table-add!-procedureg  block-hash-table-add!g  m-198d9e0d-1480Z g  t-198d9e0d-147cg  t-198d9e0d-147dg  t-198d9e0d-147eg  t-198d9e0d-147f  f  l-198d9e0d-1485f  l-198d9e0d-1486f  l-198d9e0d-1487f  l-198d9e0d-1488 \  f  l-198d9e0d-1482 \k ipiiiiy WX ti  W W W     W W6 W 	W 
W 	
 Wj W 	 
 W 	
   ti W g  
block-nullg  <vlist>g  %make-vlist-procedureg  
make-vlistg  m-198d9e0d-1501Z g  t-198d9e0d-14ffg  t-198d9e0d-1500   f  l-198d9e0d-1506!f  l-198d9e0d-1507" ! #\" $ %f  l-198d9e0d-1503&% '\k$& (f  l-1e8ba8b5a-60)f  l-1e8ba8b5a-61*() +\su* ,g  key-,z{| .ttttt /f  l-1e8ba8b5a-530f  l-1e8ba8b5a-541f  l-1e8ba8b5a-552f  l-1e8ba8b5a-563f  l-1e8ba8b5a-574/0123 5\-.4 6 7t 8f  l-1e8ba8b5a-4398 :\679 ;f  l-1e8ba8b5a-42<; =\k< >#i'piiii+5:= ? @W>? At#i' BWA CWA DBC Eg  make-structFg  m-198d9e0d-14fdGFZ Hg  t-1e8ba8b5a-133Ig  t-1e8ba8b5a-132Jg  t-1e8ba8b5a-131KHIJ Lg  m-1e8ba8b5a-134MLZ NMMM Of  l-1e8ba8b5a-138Pf  l-1e8ba8b5a-139Qf  l-1e8ba8b5a-13aROPQ S\KNR Tg  	ctor-argsUT Vf  l-1e8ba8b5a-120WV X\UW Yg  ctorZg  field[YZ \f  l-1e8ba8b5a-11c]f  l-1e8ba8b5a-11d^\] _\[u^ `g  formag  	type-namebg  constructor-speccg  field-namesd`abc etttt ff  l-1e8ba8b5a-111gf  l-1e8ba8b5a-112hf  l-1e8ba8b5a-113if  l-1e8ba8b5a-114jfghi k\dej lg  record-layoutmg  functional-settersng  settersog  copierpg  gettersqg  constructorrg  getter-identifierssg  field-identifierstlmnopqrs utttttttt vf  l-1e8ba8b5a-e9wf  l-1e8ba8b5a-e7xf  l-1e8ba8b5a-e5yf  l-1e8ba8b5a-e3zf  l-1e8ba8b5a-e1{f  l-1e8ba8b5a-df|f  l-1e8ba8b5a-dd}f  l-1e8ba8b5a-db~vwxyz{|} \tu~ f  l-1e8ba8b5a-da \k G#i'piSiiiX_ik WE? WA W
? BC @D     ti' W g  record-type-vtable  g  pwpwg  default-record-printer   g  set-struct-vtable-name!  g  vtable-offset-user  g  %vlist?-procedureg  m-198d9e0d-1510Z g  t-198d9e0d-150f  f  l-198d9e0d-1515 \ f  l-198d9e0d-1512 \k ipiiii+5:= W? g  objg  t-1e8ba8b5a-224g  t-1e8ba8b5a-21eg  t-1e8ba8b5a-21fg  t-1e8ba8b5a-220g  t-1e8ba8b5a-223g  t-1e8ba8b5a-222g  t-1e8ba8b5a-221 g  m-1e8ba8b5a-225Z  f  l-1e8ba8b5a-229f  l-1e8ba8b5a-22af  l-1e8ba8b5a-22bf  l-1e8ba8b5a-22cf  l-1e8ba8b5a-22df  l-1e8ba8b5a-22ef  l-1e8ba8b5a-22f \ g  	copier-id f  l-1e8ba8b5a-21c \ g  	ctor-name f  l-1e8ba8b5a-214 \ c f  l-1e8ba8b5a-212 \ g  layout f  l-1e8ba8b5a-210 \ g  
immutable? f  l-1e8ba8b5a-20e \ g  field-count f  l-1e8ba8b5a-20c \ g  
getter-ids f  l-1e8ba8b5a-209 \ g  	field-ids f  l-1e8ba8b5a-206 \ g  predicate-nameg  
field-spec`ab tttttt f  l-1e8ba8b5a-1f9f  l-1e8ba8b5a-1faf  l-1e8ba8b5a-1fbf  l-1e8ba8b5a-1fcf  l-1e8ba8b5a-1fdf  l-1e8ba8b5a-1fe \ Gipiiiiiiiiiiii W?  W? g  struct?W?  g  eq?W? g  struct-vtableW?  ti  W     ti W g  throw-bad-struct  	g  
vlist-base
g  %vlist-base-procedureg  free-idg  
%%on-errorg  m-198d9e0d-151cZ  f  l-198d9e0d-151e \k ipiiii+5:= W?  U g  %%typeg  t-1e8ba8b5a-14bg  t-1e8ba8b5a-14cg  t-1e8ba8b5a-14dg  t-1e8ba8b5a-14eg  t-1e8ba8b5a-14fg  t-1e8ba8b5a-150g  t-1e8ba8b5a-151  g  m-1e8ba8b5a-152! Z "!!!!!!! #f  l-1e8ba8b5a-156$f  l-1e8ba8b5a-157%f  l-1e8ba8b5a-158&f  l-1e8ba8b5a-159'f  l-1e8ba8b5a-15a(f  l-1e8ba8b5a-15b)f  l-1e8ba8b5a-15c*#$%&'() +\"* ,g  getter-, .f  l-1e8ba8b5a-149/f  l-1e8ba8b5a-14a0./ 1\-u0 2a 3f  l-1e8ba8b5a-1444f  l-1e8ba8b5a-1455f  l-1e8ba8b5a-1466345 7\2~6 8Gipi+iii1i7 9W8? :9 ;T:U <g  ck=g  err>g  s?=> @ Af  l-198d9e0d-1521Bf  l-198d9e0d-1522CAB D\?@C EDipiiii+5:= FW<E? Gg  quoteHWGE? ItDi JWI KHJ LK Mg  %%indexNWM8? ON PTOU Qf  l-198d9e0d-1526Rf  l-198d9e0d-1527SQR T\?@S UTipiiii+5:= VW<U? WWGU? XTi YW
X ZWY [Z \g  %%copier]W\8? ^] _T^U `f  l-198d9e0d-152baf  l-198d9e0d-152cb`a c\?@b dcipiiii+5:= eW<d? fWGd? gg  %%<vlist>-set-fieldshtci iWgh jfi kj lg  t-198d9e0d-151bml nf  l-198d9e0d-1530on p\mo qpipiiii+5:= rWq? sGpipi+iii1i7 tW>s? ut vWs? wWs? xWs? yxt ztpi {Wz |wy{ }g  
struct-ref~W}s? pi W
 ~t Ws? WGs? W	z  t v| ru ti W
 g  vlist-offsetg  %vlist-offset-procedureg  m-198d9e0d-1537Z  f  l-198d9e0d-1539 \k ipiiii+5:= W?  U Gipi+iii1i7 W?  TU  f  l-198d9e0d-153cf  l-198d9e0d-153d \? ipiiii+5:= W<? WG? ti W   WM?  TU f  l-198d9e0d-1541f  l-198d9e0d-1542 \? ipiiii+5:= W<? WG? i W   W\?  TU f  l-198d9e0d-1546f  l-198d9e0d-1547 \? ipiiii+5:= W<? WG? ti Wg   g  t-198d9e0d-1536 f  l-198d9e0d-154b \ ipiiii+5:= W? Gipi+iii1i7 W>?  W? W? W?  ti W  W}? i W  W? WG? W     ti W g  eachUU  U㌤U䌤U匤g  %%set-fieldsg  check?g  expr>, g  m-198d9e0d-1552Z GGGG f  l-198d9e0d-1557f  l-198d9e0d-1558f  l-198d9e0d-1559f  l-198d9e0d-155af  l-198d9e0d-155b \  f  l-198d9e0d-1554 \k g  t-1e8ba8b5a-16ag  t-1e8ba8b5a-16cg  t-1e8ba8b5a-16b g  m-1e8ba8b5a-16dZ   f  l-1e8ba8b5a-171f  l-1e8ba8b5a-172f  l-1e8ba8b5a-173  \ f  l-1e8ba8b5a-167f  l-1e8ba8b5a-168f  l-1e8ba8b5a-169 	\2~ 
Gipiiii	 W
? ti W W	 W  g  map  g  listg  set-record-type-printer!f  #<vlist ()>f  #<vhash ~x ~a pairs>g  object-addressf  #<vlist ~a>g  throwg  wrong-type-argf  Not a vlist: ~Sg  % assert-vlist-procedureg  assert-vlistg  m-198d9e0d-157d Z !g  t-198d9e0d-157c"! #  $f  l-198d9e0d-1582%$ &\"#% 'f  l-198d9e0d-157f(' )\k#( * &i)piiiiy +WX* ,t&i) -W, .W* /W, 0./ 1-0 21 3W* 4g  val5W4, 65 7g  unless8W7, 9W, :95 ;W, <WG, =W, ><= ?W, @W, AW, BA5 C;>?@BB D8:C E36D F+2E Gti) HWG Ig  % block-cons-procedureJg  
block-consKg  m-198d9e0d-15a0LKZ Mg  t-198d9e0d-159dNg  t-198d9e0d-159eOg  t-198d9e0d-159fPMNO QLLL Rf  l-198d9e0d-15a5Sf  l-198d9e0d-15a6Tf  l-198d9e0d-15a7URST V\PQU WL Xf  l-198d9e0d-15a2YX Z\kWY [LViZpiiiiy \WX[ ]tViZ ^WJ] _W[ `WI] a_` b^a cb dW[ eg  itemfWe] gW] hW] ifgh jg  letkWj] lW] mW	] nmg oln pW] qW] rW] srg tqs upt vou wg  condxWw] yW] zylfp {W] |{lp }z| ~g  elseW~] g  let*W] W] WJ] l  WO] g  1-W] p g  zero?W]  W]  W] p  W] g  	fluid-refW] W4]    x lh l  W] l W] W] l W
] f {l   x} kv di \c tiZ WI g  foldg  consg  equal?g  
fold-rightg  hashg  hashqg  hashvg  % %vhash-fold*-procedureg  %vhash-fold*TUUUUUU g  m-198d9e0d-1bf6Z g  t-198d9e0d-1bf0g  t-198d9e0d-1bf1g  t-198d9e0d-1bf2g  t-198d9e0d-1bf3g  t-198d9e0d-1bf4g  t-198d9e0d-1bf5  f  l-198d9e0d-1bfbf  l-198d9e0d-1bfcf  l-198d9e0d-1bfdf  l-198d9e0d-1bfef  l-198d9e0d-1bfff  l-198d9e0d-1c00 \  f  l-198d9e0d-1bf8 \k ipiiiiy WX ti W W W    W g  procW g  initW W, g  vhashW W W  g  defineW g  visit-blockW W g  
max-offsetW g  resultW  W W WJ   W6 W   W    Wj g  loopW W W      W WA  W g  <=W  g  car	W 
W 
 	   g  cdrW     g  
next-blockW W    g  >W  W
   W' !  "! #" $# %$ & % '& (' )W *) +W	 ,+ -, .- /W 0/ 1,0 2.1 3(*2 43 5ti 6W5 7g  % %vhash-assoc-procedure8g  %vhash-assoc9g  m-198d9e0d-2023:9Z ;g  t-198d9e0d-201f<g  t-198d9e0d-2020=g  t-198d9e0d-2021>g  t-198d9e0d-2022?;<=> @:::: Af  l-198d9e0d-2028Bf  l-198d9e0d-2029Cf  l-198d9e0d-202aDf  l-198d9e0d-202bEABCD F\?@E G: Hf  l-198d9e0d-2025IH J\kGI K:FiJpiiiiy LWXK MtFiJ NW8M OWK PW7M QOP RNQ SR TWK UW,M VWM WWM XWM YUVWX ZWM [WM \WM ]WM ^[\] _WM `WM aWJM ba\ c`b dW6M eWM fe\ gdf hWM iXU` jhi kcgj lWjM mWM nWM oWM pod`h qnp rq sWM tWM uWM vun] wWM xWM yxdn zwy {WUz |tv{ }WAM ~}d`n m~ s|y WM WM \   WM a W
M  W'M \ [ t l sn lmr _k Z^ WM V W	M V a  WM V [ t TY LS tiJ W7 g  eqv?C 5      h    ]4	
E5 4H >  "  G   4Ii	54RJ  h0      ]$  4	5 
 C45 
 C       g  base
		0 g  offset		0 g  size			0 g  	hash-tab?			0  g  filenamef  ice-9/vlist.scm
	G
		L				M			M			M			M			O		/	O	 			0	  g  nameg  % make-block-procedure CKR4NOPSV       h      ]  C       g  t-198d9e0d-1237
		 g  t-198d9e0d-1238		 g  t-198d9e0d-1239			 g  t-198d9e0d-123a			  			   CO      h   R   ]L 6    J       g  a
		  g  filenamef  ice-9/vlist.scm		G
 		   CT      h   B   ] L 6:       g  filenamef  ice-9/vlist.scm		G
 		
   C        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  {       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm
	G
 		n   C5OR4NPS        h   R   ]  C  J       g  dummy
		 g  name		 g  index			  			   C       h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/vlist.scm
	R
 		"  g  
macro-typeg  syntax-rulesg  patternsg  nameg  index   C5R      h   {   ] 
C s       g  block
		  g  filenamef  ice-9/vlist.scm
	V
 		  g  nameg  % block-content-procedure CR4NPS        h   7   ]  C      /       g  t-198d9e0d-126e
		
  		
   C     h   R   ]L 6    J       g  a
		  g  filenamef  ice-9/vlist.scm		V
 		   CT      h   B   ] L 6:       g  filenamef  ice-9/vlist.scm		V
 		
   C       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  {       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm
	V
 		n   C5R      h   x   ] C p       g  block
		  g  filenamef  ice-9/vlist.scm
	W
 		  g  nameg  % block-base-procedure CR4NPS#        h   7   ]  C      /       g  t-198d9e0d-128a
		
  		
   C    h   R   ]L 6    J       g  a
		  g  filenamef  ice-9/vlist.scm		W
 		   CT      h   B   ] L 6:       g  filenamef  ice-9/vlist.scm		W
 		
   C%       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  {       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm
	W
 		n   C5R     h   z   ] 	Cr       g  block
		  g  filenamef  ice-9/vlist.scm
	X
 		  g  nameg  % block-offset-procedure C&R4N'PSF      h   7   ]  C      /       g  t-198d9e0d-12a6
		
  		
   C'    h   R   ]L 6    J       g  a
		  g  filenamef  ice-9/vlist.scm		X
 		   CT      h   B   ] L 6:       g  filenamef  ice-9/vlist.scm		X
 		
   CH       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  {       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm
	X
 		n   C5'R     h   x   ] 	Cp       g  block
		  g  filenamef  ice-9/vlist.scm
	Y
 		  g  nameg  % block-size-procedure CIR4NJPSi        h   7   ]  C      /       g  t-198d9e0d-12c2
		
  		
   CJ    h   R   ]L 6    J       g  a
		  g  filenamef  ice-9/vlist.scm		Y
 		   CT      h   B   ] L 6:       g  filenamef  ice-9/vlist.scm		Y
 		
   Ck       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  {       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm
	Y
 		n   C5JR     h   }   ] 	Cu       g  block
		  g  filenamef  ice-9/vlist.scm
	Z
 		  g  nameg  % block-next-free-procedure ClR4NmPS   h   7   ]  C      /       g  t-198d9e0d-12de
		
  		
   Cm    h   R   ]L 6    J       g  a
		  g  filenamef  ice-9/vlist.scm		Z
 		   CT      h   B   ] L 6:       g  filenamef  ice-9/vlist.scm		Z
 		
   C       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  {       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm
	Z
 		n   C5mR        h      ] 	4 
5C             g  block
		  g  filenamef  ice-9/vlist.scm
	\
		]			]			]	'		]			]	 		  g  nameg  % block-hash-table?-procedure CR4NPS h   7   ]  C      /       g  t-198d9e0d-12f9
		
  		
   C    h   R   ]L 6    J       g  a
		  g  filenamef  ice-9/vlist.scm		\
 		   CT      h   B   ] L 6:       g  filenamef  ice-9/vlist.scm		\
 		
   C       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  {       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm
	\
 		n   C5R     h      ] 	C            g  block
		 g  	next-free		  g  filenamef  ice-9/vlist.scm
	_
			`	 			  g  nameg   % set-block-next-free!-procedure CR4NPS      h   T   ]  C    L       g  t-198d9e0d-1334
		 g  t-198d9e0d-1335		  			   C       h   R   ]L 6    J       g  a
		  g  filenamef  ice-9/vlist.scm		_
 		   CT      h   B   ] L 6:       g  filenamef  ice-9/vlist.scm		_
 		
   C       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  {       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm
	_
 		n   C5R     h8   	  ] 	$  ( 	$   	 
CCC      g  block
		8 g  value		8 g  offset			8 g  	next-free			)  g  filenamef  ice-9/vlist.scm
	b
			d		
	d			d			e			e			d			g	%		g			-	h		2	h		 		8	  g  nameg  % block-append!-procedure CR4NPS      h   q   ]  C  i       g  t-198d9e0d-1354
		 g  t-198d9e0d-1355		 g  t-198d9e0d-1356			  			   C  h   R   ]L 6    J       g  a
		  g  filenamef  ice-9/vlist.scm		b
 		   CT      h   B   ] L 6:       g  filenamef  ice-9/vlist.scm		b
 		
   C       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  {       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm
	b
 		n   C5R     h      ] C       g  content
		 g  offset		  g  filenamef  ice-9/vlist.scm
	l
		m	 			  g  nameg  % block-ref-procedure CR4NPS=  h   T   ]  C    L       g  t-198d9e0d-13be
		 g  t-198d9e0d-13bf		  			   C       h   R   ]L 6    J       g  a
		  g  filenamef  ice-9/vlist.scm		l
 		   CT      h   B   ] L 6:       g  filenamef  ice-9/vlist.scm		l
 		
   C?       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  {       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm
	l
 		n   C5R     h      ] C         g  content
		 g  size		 g  offset			  g  filenamef  ice-9/vlist.scm
	q
			r			r	 			  g  nameg  (% block-hash-table-next-offset-procedure C@R4NAPSf     h   q   ]  C  i       g  t-198d9e0d-13de
		 g  t-198d9e0d-13df		 g  t-198d9e0d-13e0			  			   CA  h   R   ]L 6    J       g  a
		  g  filenamef  ice-9/vlist.scm		q
 		   CT      h   B   ] L 6:       g  filenamef  ice-9/vlist.scm		q
 		
   Ch       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  {       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm
	q
 		n   C5AR     h      ] C              g  content
		 g  size		 g  offset			 g  next-offset			  g  filenamef  ice-9/vlist.scm
	v
			x			x	 			  g  nameg  -% block-hash-table-set-next-offset!-procedure CiR4NjPSV        h      ]  C       g  t-198d9e0d-1403
		 g  t-198d9e0d-1404		 g  t-198d9e0d-1405			 g  t-198d9e0d-1406			  			   Cj     h   R   ]L 6    J       g  a
		  g  filenamef  ice-9/vlist.scm		v
 		   CT      h   B   ] L 6:       g  filenamef  ice-9/vlist.scm		v
 		
   C       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  {       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm
	v
 		n   C5jR     h      ] C            g  content
		 g  size		 g  khash			  g  filenamef  ice-9/vlist.scm
	|
			}		
	}	 			  g  nameg   % block-hash-table-ref-procedure CR4NPS      h   q   ]  C  i       g  t-198d9e0d-142d
		 g  t-198d9e0d-142e		 g  t-198d9e0d-142f			  			   C  h   R   ]L 6    J       g  a
		  g  filenamef  ice-9/vlist.scm		|
 		   CT      h   B   ] L 6:       g  filenamef  ice-9/vlist.scm		|
 		
   C       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  {       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm
	|
 		n   C5R     h      ] C         g  content
		 g  size		 g  khash			 g  offset			  g  filenamef  ice-9/vlist.scm
	
		 		 	 			  g  nameg  !% block-hash-table-set!-procedure CR4NPSV        h      ]  C       g  t-198d9e0d-1452
		 g  t-198d9e0d-1453		 g  t-198d9e0d-1454			 g  t-198d9e0d-1455			  			   C     h   R   ]L 6    J       g  a
		  g  filenamef  ice-9/vlist.scm		
 		   CT      h   B   ] L 6:       g  filenamef  ice-9/vlist.scm		
 		
   C       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  {       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm
	
 		n   C5R     h(      ]   C       g  content
		( g  size		( g  khash			( g  offset			( g  next-offset		
	  g  filenamef  ice-9/vlist.scm
 
		 	%	
 		# 	 		(	  g  nameg  !% block-hash-table-add!-procedure CR4NPSV     h      ]  C       g  t-198d9e0d-147c
		 g  t-198d9e0d-147d		 g  t-198d9e0d-147e			 g  t-198d9e0d-147f			  			   C     h   S   ]L 6    K       g  a
		  g  filenamef  ice-9/vlist.scm	 
 		   CT     h   C   ] L 6;       g  filenamef  ice-9/vlist.scm	 
 		
   C      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm
 
 		n   C5R4Ji
5


 R    h      ]  C           g  base
		 g  offset		  g  filenamef  ice-9/vlist.scm
 
 			  g  nameg  %make-vlist-procedure CR4NPS    h   T   ]  C    L       g  t-198d9e0d-14ff
		 g  t-198d9e0d-1500		  			   C      h   S   ]L 6    K       g  a
		  g  filenamef  ice-9/vlist.scm	 
 		   CT    h   C   ] L 6;       g  filenamef  ice-9/vlist.scm	 
 		
   C      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm
 
 		n   C5R  4 >  "  G   	i  R     h   r   ] $   CC      j       g  obj
		  g  filenamef  ice-9/vlist.scm
 
 		  g  nameg  %vlist?-procedure CR4NPS       h   7   ]  C      /       g  t-198d9e0d-150f
		
  		
   C    h   S   ]L 6    K       g  a
		  g  filenamef  ice-9/vlist.scm	 
 		   CT    h   C   ] L 6;       g  filenamef  ice-9/vlist.scm	 
 		
   C      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm
 
 		n   C5R	  h   t   ] &   
C 6l       g  s
		  g  filenamef  ice-9/vlist.scm
 
 		  g  nameg  %vlist-base-procedure C
R4N	PS;FL        h   :   ]C     2       g  err
		 g  s		  			   CPV[ h   :   ]C     2       g  err
		 g  s		  			   C_ek h   :   ]C     2       g  err
		 g  s		  			   C     h   7   ]  C      /       g  t-198d9e0d-151b
		
  		
   C	   h   S   ]L 6    K       g  a
		  g  filenamef  ice-9/vlist.scm	 
 		   CT    h   C   ] L 6;       g  filenamef  ice-9/vlist.scm	 
 		
   C      h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/vlist.scm
 
 	    C5	R     h   v   ] &   C 6n       g  s
		  g  filenamef  ice-9/vlist.scm
 
 		  g  nameg  %vlist-offset-procedure CR4NPS      h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   7   ]  C      /       g  t-198d9e0d-1536
		
  		
   C   h   S   ]L 6    K       g  a
		  g  filenamef  ice-9/vlist.scm	 
 		   CT    h   C   ] L 6;       g  filenamef  ice-9/vlist.scm	 
 		
   C      h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  ice-9/vlist.scm
 
 	    C5R4NgPS h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/vlist.scm
 
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5gR4ii"5(2 
      hH      ]4 5$  64 5$  4 54 564	 56          g  vl
		E g  port		E  g  filenamef  ice-9/vlist.scm
 		 	#	 		 	0	 	#	 	#	  		& 	0	' 	+	. 	+	6 	#	< 	0	= 	+	E 	# 		E	   C>  "  G  i i 
  #R        h@      ] $   &  C    6    6             g  val
		:  g  filenamef  ice-9/vlist.scm
 
	 	
		 		 	
	 		 		  		% 		' 		+ 		. 		3 		8 		: 	 		:  g  nameg  % assert-vlist-procedure CR4NPSF  h   7   ]  C      /       g  t-198d9e0d-157c
		
  		
   C    h   S   ]L 6    K       g  a
		  g  filenamef  ice-9/vlist.scm	 
 		   CT     h   C   ] L 6;       g  filenamef  ice-9/vlist.scm	 
 		
   CH      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm
 
 		n   C5R	4J  h    ]+&  
"  	45&  "  	45"  ~	
$  "  $  "  [$  4	5
 "  45
 	

 
 C	$  ;	$  +	
 $  
 C"?";"7      g  item
	 g  vlist	 g  	hash-tab?		 g  base		7 g  offset		7 g  size		D  g  offset		j  g  size		j  g  base	   g  	next-free	    
g  filenamef  ice-9/vlist.scm
 
	 		 		7 		7 		D 		D 		I 		L 		Q 		[ 		_ 		j 		j 	  	  	  	  	  	  	  	  	  	  	 		  g  nameg  % block-cons-procedure CIR4NJPS        h   q   ]  C  i       g  t-198d9e0d-159d
		 g  t-198d9e0d-159e		 g  t-198d9e0d-159f			  			   CJ  h   S   ]L 6    K       g  a
		  g  filenamef  ice-9/vlist.scm	 
 		   CT     h   C   ] L 6;       g  filenamef  ice-9/vlist.scm	 
 		
   C      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm
 
 		n   C5JR4J  h  {  ]*"  #4  >  "  'G  "   $  &  "  ""  "
"  _	
$  "  $  "  [45
 	

 
 C	$  ;	$  +	
 $  
 C"^"Z"V    s      g  item
	 g  vlist	 g  base		R g  offset		R g  size		_  g  offset	   g  size	   g  base	   g  	next-free	    	g  filenamef  ice-9/vlist.scm
 
	 		M 	 		  g  nameg  
vlist-consg  documentationf  ?Return a new vlist with ITEM as its head and VLIST as its
tail. CR  hh     ]"  #4    >  "  'G  "    $   &  "  ""  " 
 
C             g  vlist
		a g  base	Q	a g  offset		Q	a g  content		Y	a  g  filenamef  ice-9/vlist.scm
 
	 		M 		Q 		Q 		Y 		Y 	 		a  g  nameg  
vlist-headg  documentationf  Return the head of VLIST. C R h   d  ]!"  #4    >  "  'G  "    $   &  "  ""  " 
 
$   C	 C     \      g  vlist
	  g  base	Q  g  offset		Q  g  offset		`	l g  base		u  g  offset		u   g  filenamef  ice-9/vlist.scm
 
	 		M 		Q 		Q 		Y 		] 		` 		` 		p 		u 		u 	 	   g  nameg  
vlist-tailg  documentationf  Return the tail of VLIST. C!R hh      ]	"  #4    >  "  'G  "    $   &  "  ""  " 
$  C
	C              g  vlist
		a g  base	M	a  g  filenamef  ice-9/vlist.scm
 
	 		M 		M 		S 		W 		_ 		` 		 			a  g  nameg  vlist-null?g  documentationf  Return true if VLIST is empty. C"R/#      h      ]4 56              g  lst
		  g  filenamef  ice-9/vlist.scm
 
	 		 	 		  g  nameg  list->vlistg  documentationf  4Return a new vlist whose contents correspond to LST. C$R  h     ]3"  #4  >  "  'G  "   $  &  "  ""  ""  V&  C
$  "  $  		"  4 
5"
" 
      g  proc
	  g  init	  g  vlist		  g  base		M  g  offset		M  g  result		M  g  next		[  g  done?		a  g  content	    	g  filenamef  ice-9/vlist.scm
 
	 		M		U		[		[		a		a		i		m		y			~		 
	 
	! 
	 
	 	
 	 	 	 	 	 	  g  nameg  
vlist-foldg  documentationf  /Fold over VLIST, calling PROC for each element. C)R%(       h     ]"  #4  >  "  'G  "   $  &  "  ""  ""  &
$  C4 455"45"         g  proc
	  g  init	  g  vlist		  g  index		M	s g  result		M	s  g  filenamef  ice-9/vlist.scm

			M		Q		U		[		\	
	_		k	
	s		s		t		{	 	 	 	  g  nameg  vlist-fold-rightg  documentationf  OFold over VLIST, calling PROC for each element, starting from
the last element. C*R)#      h      ] 6           g  vlist
		  g  filenamef  ice-9/vlist.scm

		 		  g  nameg  vlist-reverseg  documentationf  EReturn a new VLIST whose content are those of VLIST in reverse
order. C/R)        h   |   ]4L  56 t       g  item
		 g  result		  g  filenamef  ice-9/vlist.scm
					 			   C#/     h      ] O 456         g  proc
		 g  vlist		  g  filenamef  ice-9/vlist.scm

	!			 			  g  nameg  	vlist-mapg  documentationf  ;Map PROC over the elements of VLIST and return a new vlist. C+R*   h      ] 6            g  vlist
		  g  filenamef  ice-9/vlist.scm
#
	%		%	 		  g  nameg  vlist->listg  documentationf  6Return a new list whose contents match those of VLIST. C2R h     ]*"  #4    >  "  'G  "    $   &  "  ""  ""  6$  
C	" 
 "       g  vlist
	  g  index	  g  index		M  g  base		M  g  offset		M  g  content		_	i g  offset		_	i  g  filenamef  ice-9/vlist.scm
'
	)		M*		R-		V-		Z.		_.	(	_.		n/		t0		y1	 /	 *	 +	 ,	 *	 	 	  g  nameg  	vlist-refg  documentationf  +Return the element at index INDEX in VLIST. C%R h     ]""  #4    >  "  'G  "    $   &  "  ""  ""  4$   C	" 
 "         g  vlist
	  g  count	  g  count		M  g  base		M  g  offset		M  g  offset		[	g  g  filenamef  ice-9/vlist.scm
3
	6		M7		R:		V:		[;		[;		l<		r=		w>	 <	 7	 8	 9	 7	 	 	  g  nameg  
vlist-dropg  documentationf  KReturn a new vlist that does not contain the COUNT first elements of
VLIST. C&R/! #        hH   {  ]"  0
$  6454455" "  s      g  vlist
		F g  count		F g  count			6 g  vlist			6 g  result			6  g  filenamef  ice-9/vlist.scm
@
	C		
F		F		G		H		I		J		"J		,J		6H		6C	 		F	  g  nameg  
vlist-takeg  documentationf  HReturn a new vlist that contains only the COUNT first elements of
VLIST. C'R* h   }   ]4L  5$   6Cu       g  e
		 g  v		  g  filenamef  ice-9/vlist.scm
O		P		P		Q	 			   C#      h      ] O 6              g  pred
		 g  vlist		  g  filenamef  ice-9/vlist.scm
L
	O	 			  g  nameg  vlist-filterg  documentationf  LReturn a new vlist containing all the elements from VLIST that
satisfy PRED. C0R0 h   e   ]4L L 5C   ]       g  e
		  g  filenamef  ice-9/vlist.scm
Y		Z		Z	 		   C        h(      - . , 3 #   O 6          g  x
		% g  vlist		% g  equal?			%  g  filenamef  ice-9/vlist.scm
V
	%Y	 		%	  g  nameg  vlist-deleteg  documentationf  KReturn a new vlist corresponding to VLIST without the elements
EQUAL? to X. C1R     h   .  ]"  #4    >  "  'G  "    $   &  "  ""  ""   &  C	" 
 "   &      g  vlist
		} g  base	M	m g  len		M	m  g  filenamef  ice-9/vlist.scm
]
	_		M`		Ub		\d		_e		de		ee		md		m`		q`		ua		}`	 		}  g  nameg  vlist-lengthg  documentationf  Return the length of VLIST. C(R#        h   S   ]C   K       g  x
		  g  filenamef  ice-9/vlist.scm
h	, 		   C       h0      ]4L 5$  L 64L  54L4L 556             g  seed
		*  g  filenamef  ice-9/vlist.scm
j		k		k		l		m		n		 n		(n		*m	 
		*  g  nameg  uf C        h8   )  - . , 3 #  O  Q 6   !      g  p
		5 g  f		5 g  g			5 g  seed			5 g  tail-gen			5 g  uf		"	5  g  filenamef  ice-9/vlist.scm
g
	"j	 		5	  g  nameg  vlist-unfoldg  documentationf  HReturn a new vlist.  See the description of SRFI-1 `unfold' for details. C,R#    hX     - . , 3 #  "  +4 5$  C454455""             g  p
		Q g  f		Q g  g			Q g  seed			Q g  tail			Q g  seed			E g  lis			E  g  filenamef  ice-9/vlist.scm
p
	s		t		%t		)v		0v		3v	!	=v		Ev		Es	 		Q	  g  nameg  vlist-unfold-rightg  documentationf  NReturn a new vlist.  See the description of SRFI-1 `unfold-right' for
details. C-R#*  h   k   ] 6      c       g  e
		
 g  v		
  g  filenamef  ice-9/vlist.scm
}	&	
~	( 		
	   C  h   t   ] 6    l       g  vlist
		 g  result		  g  filenamef  ice-9/vlist.scm
|		}	 			   C h       -  1  3  (  C 6           g  vlists
			  g  filenamef  ice-9/vlist.scm
x
	z		|	 			


  g  nameg  vlist-appendg  documentationf  Append the given lists. C.R)       h   n   ]L  6f       g  item
		 g  x		  g  filenamef  ice-9/vlist.scm
			 			   C       h      ] O 6       g  proc
		 g  vlist		  g  filenamef  ice-9/vlist.scm

		 			  g  nameg  vlist-for-eachg  documentationf  ?Call PROC on each element of VLIST.  The result is unspecified. C3R  h0      ]	 $  ! &   
	4
5CCC           g  obj
		, g  block		(  g  filenamef  ice-9/vlist.scm

											 		,  g  nameg  vhash?g  documentationf  "Return true if OBJ is a hash list. C5R4J	       h    - . , 3 #  "  #4  >  "  'G  "   $  &  "  ""  " 
"  l	
$  "  $  "  [	4		5	
 		


 "  \	$  F	$  2	
$   "  "N"  "F"  ">&  
"  	4	5&  "  	4
5	4 5
		
	

	C             g  key
	 g  value	 g  vhash		 g  hash		 g  item		b@ g  base		m= g  offset		m= g  size		z  g  offset	   g  size		   g  base	   g  	next-free	  g  vhash	@ g  base	\ g  offset	x g  size	 g  khash	 g  content		 g  next-offset	
  g  filenamef  ice-9/vlist.scm

			b	 	b	@	E	\	a	x								 		  g  nameg  
vhash-consg  documentationf  jReturn a new hash list based on VHASH where KEY is associated
with VALUE.  Use HASH to compute KEY's hash. C6R6 h      ] 6         g  t-198d9e0d-1bd9
		 g  t-198d9e0d-1bda		 g  t-198d9e0d-1bdb			  g  filenamef  ice-9/vlist.scm
	 			  g  nameg  vhash-consq C7R6 h      ] 6         g  t-198d9e0d-1be5
		 g  t-198d9e0d-1be6		 g  t-198d9e0d-1be7			  g  filenamef  ice-9/vlist.scm
	 			  g  nameg  vhash-consv C8R  h(  (  ]N"  		

4	5"  s$  F
		$  (4
5$  4 
5"  "  "	
$  	"tC
	"{$  0&  "  4  >  "  G  "  4  >  "  G  
	
$  
"C       g  proc
	( g  init	( g  key		( g  vhash		( g  equal?		( g  hash		( g  base		  g  
max-offset		  g  result		  g  size			  g  content	
	  g  khash		  g  offset		"  g  result		"  g  
next-block		r  g  block	  g  filenamef  ice-9/vlist.scm

															"		(		/		8		<		=		F	,	G	'	I		M		N		U	!	V		Z		n		r		r		y		{			 	* 	 	 	 	 								%	 *	(	  g  nameg  % %vhash-fold*-procedure CR4NPS4       h      ]  C           g  t-198d9e0d-1bf0
		 g  t-198d9e0d-1bf1		 g  t-198d9e0d-1bf2			 g  t-198d9e0d-1bf3			 g  t-198d9e0d-1bf4			 g  t-198d9e0d-1bf5			  			   C   h   S   ]L 6    K       g  a
		  g  filenamef  ice-9/vlist.scm	
 		   CT     h   C   ] L 6;       g  filenamef  ice-9/vlist.scm	
 		
   C6      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm

 		n   C5R        h8  ]  - . , 3 #  #  "  		

4	5"  s$  F
		$  (4
5$  4 
5"  "  "	
$  	"tC
	"{"  #4  >  "  'G  "   $  &  "  ""  "
	
$  
"C U      g  proc
	7 g  init	7 g  key		7 g  vhash		7 g  equal?		7 g  hash		7 g  base		$  g  
max-offset		$  g  result		$  g  size			)  g  content	
	/  g  khash		:  g  offset		@  g  result		@  g  
next-block	   g  block	  g  filenamef  ice-9/vlist.scm

	$	 	7		  g  nameg  vhash-fold*g  documentation k F   o   l   d       o   v   e   r       a   l   l       t   h   e       v   a   l   u   e   s       a   s   s   o   c   i   a   t   e   d       w   i   t   h       K   E   Y       i   n       V   H   A   S   H   ,       w   i   t   h       e   a   c   h   
   c   a   l   l       t   o       P   R   O   C       h   a   v   i   n   g       t   h   e       f   o   r   m          (   p   r   o   c       v   a   l   u   e       r   e   s   u   l   t   )      ,       w   h   e   r   e   
   R   E   S   U   L   T       i   s       t   h   e       r   e   s   u   l   t       o   f       t   h   e       p   r   e   v   i   o   u   s       c   a   l   l       t   o       P   R   O   C       a   n   d       I   N   I   T       t   h   e   
   v   a   l   u   e       o   f       R   E   S   U   L   T       f   o   r       t   h   e       f   i   r   s   t       c   a   l   l       t   o       P   R   O   C   .    CAR     h  }  ]T"  	
	45
"  n$  A	$  #	&  4 	5"  "  "	
$  	"yC	
""  #4  >  "  'G  "   $  &  "  ""  "
	
$  
"Cu      g  proc
	 g  init	 g  key		 g  vhash		 g  hash		 g  base		
  g  
max-offset		
  g  result		
  g  size		  g  content			  g  khash	
	   g  offset		&  g  result		&  g  
next-block		q  g  block	    g  filenamef  ice-9/vlist.scm

		 		  g  nameg  vhash-foldq*g  documentationk  S   a   m   e       a   s          v   h   a   s   h   -   f   o   l   d   *      ,       b   u   t       u   s   i   n   g          h   a   s   h   q          a   n   d          e   q   ?      .    CBR     h     ]T"  	
	45
"  o$  B	$  $	$  4 	5"  "  "	
$  	"xC	
""  #4  >  "  'G  "   $  &  "  ""  "
	
$  
"C       y      g  proc
	 g  init	 g  key		 g  vhash		 g  hash		 g  base		
  g  
max-offset		
  g  result		
  g  size		  g  content			  g  khash	
	   g  offset		&  g  result		&  g  
next-block		r  g  block	    g  filenamef  ice-9/vlist.scm

		 		  g  nameg  vhash-foldv*g  documentationk  S   a   m   e       a   s          v   h   a   s   h   -   f   o   l   d   *      ,       b   u   t       u   s   i   n   g          h   a   s   h   v          a   n   d          e   q   v   ?      .    CCR    h    ]<"  	
4 5"  j	$  B	$  (4 	5$  	C		"		"

	
$  
	"|C	"$  0&  "  4  >  "  G  "  4  >  "  G  
	
$  
"C        g  key
	 g  vhash	 g  equal?		 g  hash		 g  base		  g  
max-offset		  g  size		  g  content		  g  khash		  g  offset			"  g  
next-block	
	n  g  block	    g  filenamef  ice-9/vlist.scm

															"		(		-		1		2			;		&	<		!	>			B		G
		O		Y		`		j		n		n		u		w		{	 	+ 	 	 	 	 	 	 	
 					 )		  g  nameg  % %vhash-assoc-procedure C7R4N8PSV h      ]  C       g  t-198d9e0d-201f
		 g  t-198d9e0d-2020		 g  t-198d9e0d-2021			 g  t-198d9e0d-2022			  			   C8     h   S   ]L 6    K       g  a
		  g  filenamef  ice-9/vlist.scm	
 		   CT     h   C   ] L 6;       g  filenamef  ice-9/vlist.scm	
 		
   C      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  ice-9/vlist.scm

 		n   C58R        h     - . , 3 #  #  "  	
4 5"  e	$  ="  		"	$  4 	5$  	C""

	
$  
	"C	""  #4  >  "  'G  "   $  &  "  ""  "
	
$  
"C      g  key
	  g  vhash	  g  equal?		  g  hash		  g  base		$  g  
max-offset		$  g  size		)  g  content		/  g  khash		:  g  offset			@  g  
next-block	
   g  block	   g  filenamef  ice-9/vlist.scm

	$	 	 		  g  nameg  vhash-assocg  documentationf  pReturn the first key/value pair from VHASH whose key is equal to
KEY according to the EQUAL? equality predicate. C9R  h  u  ]B"  	
4 5"  `$  8"  "$   &  C""			
$  		"C""  #4  >  "  'G  "   $  &  "  ""  "
	
$  
"C       m      g  key
	 g  vhash	 g  hash		 g  base		
  g  
max-offset		
  g  size		  g  content		  g  khash		   g  offset		&  g  
next-block			h  g  block	    g  filenamef  ice-9/vlist.scm

		 		  g  nameg  
vhash-assqg  documentation  k R   e   t   u   r   n       t   h   e       f   i   r   s   t       k   e   y   /   v   a   l   u   e       p   a   i   r       f   r   o   m       V   H   A   S   H       w   h   o   s   e       k   e   y       i   s          e   q   ?          t   o   
   K   E   Y   .    C:R     h  y  ]B"  	
4 5"  a$  9"  "$   $  C""			
$  		"C""  #4  >  "  'G  "   $  &  "  ""  "
	
$  
"
C      q      g  key
	 g  vhash	 g  hash		 g  base		
  g  
max-offset		
  g  size		  g  content		  g  khash		   g  offset		&  g  
next-block			i  g  block	    g  filenamef  ice-9/vlist.scm

	"	 		  g  nameg  
vhash-assvg  documentation  k R   e   t   u   r   n       t   h   e       f   i   r   s   t       k   e   y   /   v   a   l   u   e       p   a   i   r       f   r   o   m       V   H   A   S   H       w   h   o   s   e       k   e   y       i   s          e   q   v   ?          t   o   
   K   E   Y   .    C;R9)6   h(      ]  4LL5$  CL 6       g  k+v
		( g  result		( g  k			( g  v			(  g  filenamef  ice-9/vlist.scm
(		)		*		)		+		+		(-	 		(	   C#      hH   !  - . , 3 #  #  4 5$   O 6C       g  key
		G g  vhash		G g  equal?			G g  hash			G  g  filenamef  ice-9/vlist.scm
$
	!'		1'		D(	 		G		  g  nameg  vhash-deleteg  documentationf  HRemove all associations from VHASH with KEY, comparing keys
with EQUAL?. C<R<        h      ] 6         g  t-198d9e0d-243e
		 g  t-198d9e0d-243f		  g  filenamef  ice-9/vlist.scm
2	 			  g  nameg  
vhash-delq C=R<    h      ] 6         g  t-198d9e0d-2448
		 g  t-198d9e0d-2449		  g  filenamef  ice-9/vlist.scm
3	 			  g  nameg  
vhash-delv C>R)   h      ]L   6         g  	key+value
		 g  result		  g  filenamef  ice-9/vlist.scm
:		;		
;	&	;	 			   C   h   m  ] O 6       e      g  proc
		 g  init		 g  vhash			  g  filenamef  ice-9/vlist.scm
5
	:	 			  g  nameg  
vhash-foldg  documentation k F   o   l   d       o   v   e   r       t   h   e       k   e   y   /   p   a   i   r       e   l   e   m   e   n   t   s       o   f       V   H   A   S   H       f   r   o   m       l   e   f   t       t   o       r   i   g   h   t   ,       w   i   t   h   
   e   a   c   h       c   a   l   l       t   o       P   R   O   C       h   a   v   i   n   g       t   h   e       f   o   r   m          (   P   R   O   C       k   e   y       v   a   l   u   e       r   e   s   u   l   t   )      ,   
   w   h   e   r   e       R   E   S   U   L   T       i   s       t   h   e       r   e   s   u   l   t       o   f       t   h   e       p   r   e   v   i   o   u   s       c   a   l   l       t   o       P   R   O   C       a   n   d   
   I   N   I   T       t   h   e       v   a   l   u   e       o   f       R   E   S   U   L   T       f   o   r       t   h   e       f   i   r   s   t       c   a   l   l       t   o       P   R   O   C   .    C?R*   h      ]L   6         g  	key+value
		 g  result		  g  filenamef  ice-9/vlist.scm
E		F		
F	,	F	 			   C   h   u  ] O 6       m      g  proc
		 g  init		 g  vhash			  g  filenamef  ice-9/vlist.scm
@
	E	 			  g  nameg  vhash-fold-rightg  documentation   k F   o   l   d       o   v   e   r       t   h   e       k   e   y   /   p   a   i   r       e   l   e   m   e   n   t   s       o   f       V   H   A   S   H       f   r   o   m       r   i   g   h   t       t   o       l   e   f   t   ,       w   i   t   h   
   e   a   c   h       c   a   l   l       t   o       P   R   O   C       h   a   v   i   n   g       t   h   e       f   o   r   m          (   P   R   O   C       k   e   y       v   a   l   u   e       r   e   s   u   l   t   )      ,   
   w   h   e   r   e       R   E   S   U   L   T       i   s       t   h   e       r   e   s   u   l   t       o   f       t   h   e       p   r   e   v   i   o   u   s       c   a   l   l       t   o       P   R   O   C       a   n   d   
   I   N   I   T       t   h   e       v   a   l   u   e       o   f       R   E   S   U   L   T       f   o   r       t   h   e       f   i   r   s   t       c   a   l   l       t   o       P   R   O   C   .    C@R6   h      ]  L 6}       g  pair
		 g  result		  g  filenamef  ice-9/vlist.scm
M		N		
N	'	N	 			   C#      h(      - . , 3 #  O  6          g  alist
		% g  hash		%  g  filenamef  ice-9/vlist.scm
K
	%M	 		%  g  nameg  alist->vhashg  documentationf  =Return the vhash corresponding to ALIST, an association list. CDRC            g  m
		, g  rtd
:D:p g  base
JJ  g  filenamef  ice-9/vlist.scm		
	-	E		8	D
g	G
V	V
	t	W
	X
	Y
	Z
;	\
	_
	b
 	l
$	q
(T	v
,	|
/	
3 
6 	6 
7 
I 
J 	J 
K 
Q 
W 
X 
Z 
\% 
]# 
` 
bX
cW
e
e#
hg'
j3
l@
nwL
p8V
r	]
tg
vp
xx
zt
{
      
      ^
      6
      
      
      @
      
      
      
      
      \
      $
      2
      `3
      5
      @
      K
 A	      
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                   ccache/ice-9/readline.go                                                                            0000644                 00000036637 15154557173 0011026 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0=      ]  4   h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  readline	 		g  filenameS	
f  ice-9/readline.scm	g  importsS	g  session	 	 	g  regex	 	 	g  buffered-input	 	 	 	g  exportsS	g  filename-completion-function	g  add-history	g  read-history	g  write-history	g  clear-history	 	g  set-current-module	 	 	 g  	provided?	!g  load-extension	"f  libguilereadline-v-18	#f  scm_init_readline	$g  	scm-error	%g  
misc-error	&f  3readline is not provided in this Guile installation	'g  call-with-deferred-observers	(' 	)' 	*g  module-export!	+* 	,* 	-g  current-module	.- 	/- 	0g  readline-options	1g  readline-enable	2g  readline-disable	3012 	4g  readline-set!	54 	6g  readline-options-interface	7g  for-each	87 	97 	:g  display	;: 	<: 	=g  string-length	>g  symbol->string	?> 	@> 	Ag  newline	BA 	CA 	Dg  append	ED 	FD 	Gg  delq!	HG 	IG 	Jg  make-syntax-transformer	KJ 	LJ 	Mg  macro	Ng  $sc-dispatch	ON 	PN 	Qg  any	RQQQ 	Sg  syntax-object	Tg  	eval-when	Ug  m-a15bdba661f-3	Vg  top	WUV 	Xg  ribcage	Yg  dummy	Zg  opt	[g  val	\YZ[ 	]g  m-a15bdba661f-5	^]V 	_^WW 	`f  l-a15bdba661f-a	af  l-a15bdba661f-b	bf  l-a15bdba661f-c	c`ab 	dX\_c 	eX 	fg  x	gf 	h^ 	if  l-a15bdba661f-7	ji 	kXghj 	lg  shift	mg  	interface	ng  options	og  enable	pg  disable	qg  option-set!	rYmnopq 	sg  m-bde397a-1729	tsV 	uV 	vtuuuuu 	wf  l-bde397a-172e	xf  l-bde397a-172f	yf  l-bde397a-1730	zf  l-bde397a-1731	{f  l-bde397a-1732	|f  l-bde397a-1733	}wxyz{| 	~Xrv} 	t  f  l-bde397a-172b   Xg  Wdekl~e  g  hygiene   ST  g  expand S  g  load S  g  eval S    udek    S0  SD    g  list S  g  quote S  g  syntax-violation     f  -source expression failed to match any pattern g  module-locally-bound?     g  new-input-prompt f    g  continuation-prompt g  
input-port g  current-input-port g  output-port g  current-output-port g  	read-hook g  make-line-buffered-input-port g  	%readline g  string? g  eof-object? g  string=? g  string-append f  
 g  make-readline-port g  the-readline-port g  history-variable f  GUILE_HISTORY g  history-file g  getenv f  HOME f  . f  /.guile_history g  memq g  	add-hook! g  	exit-hook g  readline-port     g  set-readline-prompt!   g  
file-port? g  input-port? g  wrong-type-arg f  set-readline-input-port! f  Not a file input port: ~S g  port-closed? f  Port not open: ~S g  set-readline-input-port!   g  output-port? f  Not a file output port: ~S f  set-readline-output-port! g  set-readline-output-port!   g  set-readline-read-hook!   g  map g  apropos-internal f  ^ g  regexp-quote g  apropos-completion-function   g  *readline-completion-function* g  !with-readline-completion-function   g  readline-repl-reader g  repl-reader g  	fluid-ref g  current-reader g  !set-buffered-input-continuation?! f  ...  g  run-hook g  before-read-hook g  read g  isatty? g  set-current-input-port g  setter     g  using-readline? g  activate-readline   g  string-match g  make-completion-function  C 5      h(    ]4	
5 4 >  "  G   4 i5$  "  4!i"#>  "  G  4 i5$  "  4$i%&>  "  G  4),/3      h   D   ] 45 6   <       g  filenamef  ice-9/readline.scm
	7
 		
   C>  "  G  4),/5  h   D   ] 45 6   <       g  filenamef  ice-9/readline.scm
	;
 		
   C>  "  G  69<=@C     h      ]4 >  "  G  44 55	$  54	>  "  G  	$  4	>  "  G  "   "   4	>  "  G  4>  "  G  4	>  "  G  4>  "  G  6         g  name
	  g  value	  g  documentation		  g  len		 	c  g  filenamef  ice-9/readline.scm
	>
 	 	   C   h   Y   ] @Q       g  option
		  g  filenamef  ice-9/readline.scm
	>
 		   C    h8   {   )    3  6 ] $  4 >  "  G  6 456s       g  arg
		8  g  filenamef  ice-9/readline.scm
	>
 			
 		8  g  nameg  readline-options C0R6F  h0   v   -  1  3 44 45 5>  "  G  6        n       g  flags
			)  g  filenamef  ice-9/readline.scm
	>
 			)


  g  nameg  readline-enable C1R69I    h   W   ]4 M 5N C O       g  flag
		  g  filenamef  ice-9/readline.scm
	>
 		   C      h@      -  1  3 45 H4O  >  "  G  4J>  "  G  6         g  flags
			? g  readline-options		?  g  filenamef  ice-9/readline.scm
	>
 			?


  g  nameg  readline-disable C2R4L4MPR   h(   O   ]     C    G       g  dummy
		$ g  opt		$ g  val			$  		$	   C  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  ice-9/readline.scm
	>
 		"  g  
macro-typeg  syntax-rulesg  patternsg  optg  val   C54R44/5 5$  i"  R44/5 5$  i"  R44/5 5$  i"  4i5 R44/5 5$  i"  4i5 R44/5 5$  i"  R     h   f  ]! $  "  M $  4M >  "  G  N "    $  "  445$  "  45 54	5$  "  14
5$  "  M $  4M 5"  N C       ^      g  continuation?
	  g  prompt	:  g  str		]  g  t		f  g  t		{   g  filenamef  ice-9/readline.scm
	S	#		W	)		W	%		Z	+	(	[	+	2	]	4	:	]	%	=	`	1	@	`	@	J	`	<	Q	b	@	]	`	1	]	]	%	`	f	+	f	f	'	s	g	+	y	g	9	{	g	+	{	f	' 	i	1 	j	5 	k	D 	j	5 	h	+ 	    C       h      ]H  O 6       g  history-buffer
		  g  filenamef  ice-9/readline.scm
	Q
		R			S	 		
  g  nameg  make-readline-port CR44/5 5$  i"  R44/5 5$  i"  R44/5 5$  i"  %4i4i5  $   "   5R66 	hP      ] 445 5$  .4 45$  "  >  "  G  "    6             g  r/w
		G g  t	 	3  g  filenamef  ice-9/readline.scm
 	!	 	#		}			}			}	&		}			}			~			~		 	~		8	~		K 	# 		K
   C     hp      ]$  "  ` 445 5$  .4 45$  "  >  "  G  "    4	5  4
>  "  G  C        g  r/w
		Q g  t	*	=  g  filenamef  ice-9/readline.scm
 		 		 			}			}			}	&		}		 	}		!	~		$	~		*	~		B	~		R 	$	X 		Y 	 		o
   CR4),/     h   D   ] 45 6   <       g  filenamef  ice-9/readline.scm
	{
 		
   C>  "  G     hX     -  1  3  H HHJ (  "  J KJ K J (  "  
J KJ K JJ&  "  JJ @          g  args
		U g  prompt		U g  inp			U  g  filenamef  ice-9/readline.scm
 
	 		 		" 		$ 		' 		) 		/ 		6 		8 		; 		= 		I 		U 	 			U


  g  nameg  readline CR4),/        h   E   ] 45 6   =       g  filenamef  ice-9/readline.scm
 
 		
   C>  "  G        h       - 1 3   (  C C           g  p
			 g  rest			  g  filenamef  ice-9/readline.scm
 
	 		 		 	 	 	 			
  g  nameg  set-readline-prompt! CR4),/   h   E   ] 45 6   =       g  filenamef  ice-9/readline.scm
 
 		
   C>  "  G  $%      hX   3  ]	4 5$  "  4 5$    64 5$  	  6  
C +      g  p
		W g  t	
	"  g  filenamef  ice-9/readline.scm
 
	 		
 		
 			 	'	 	"	& 		* 		, 	$	. 		3 	0	6 			7 			A 		E 		G 	 	I 		N 	(	Q 			U 		 		W  g  nameg  set-readline-input-port! CR4),/     h   E   ] 45 6   =       g  filenamef  ice-9/readline.scm
 
 		
   C>  "  G  $%    hX   4  ]	4 5$  "  4 5$    64 5$  	
  6  C ,      g  p
		W g  t	
	"  g  filenamef  ice-9/readline.scm
 
	 		
 		
 			 	'	 	"	& 		* 		, 	$	. 		3 	1	6 			7 			A 		E 		G 	 	I 		N 	(	Q 			U 		 		W  g  nameg  set-readline-output-port! CR4),/    h   E   ] 45 6   =       g  filenamef  ice-9/readline.scm
 
 		
   C>  "  G          h      ]  Cz       g  h
		  g  filenamef  ice-9/readline.scm
 
	 	 		  g  nameg  set-readline-read-hook! CR4),/      h   E   ] 45 6   =       g  filenamef  ice-9/readline.scm
 
 		
   C>  "  G  H >   h@     ]
$  "  4444 5555N M (  CM M N C          g  text
		= g  cont?		= g  retval		3	=  g  filenamef  ice-9/readline.scm
 		 		 		 		 		 	%	 	)	" 		$ 		& 		( 	
	. 		3 		3 	
	8 	%	: 	 		=	   C O  R4),/ h   E   ] 45 6   =       g  filenamef  ice-9/readline.scm
 
 		
   C>  "  G  4 i5$  ii"       h   O   ] L  CG       g  filenamef  ice-9/readline.scm
 		 	
 		
   C   h   O   ] L  CG       g  filenamef  ice-9/readline.scm
 		 	
 		
   C      h`   (  ]
 O O 4 O >   "  G  V4>   X4O >   "  G  CX4O >   "  G  F       g  	completer
		` g  thunk		` g  old-completer			`  g  filenamef  ice-9/readline.scm
 
	 		 	 		`	  g  nameg  !with-readline-completion-functiong  documentationf  GWith @var{completer} as readline completion function, call @var{thunk}. CR4),/        h   E   ] 45 6   =       g  filenamef  ice-9/readline.scm
 
 		
   C>  "  G  44/5 5$  i" >i         h   O   ] 6G       g  filenamef  ice-9/readline.scm
 	+	 	- 		
   C      h0   s   ] 4L>  "  G  4L >  "  G  6 k       g  filenamef  ice-9/readline.scm
 		 		 		 	4	! 		/ 	 		/
   C     h    X   ] 4LL>  "  G  L 6    P       g  filenamef  ice-9/readline.scm
 		 		 	 		
   C       h   O   ] 6G       g  filenamef  ice-9/readline.scm
 	+	 	- 		
   C      h0   s   ] 4L>  "  G  4L >  "  G  6 k       g  filenamef  ice-9/readline.scm
 		 		 		 	4	! 		/ 	 		/
   C   h    X   ] 4LL>  "  G  L 6    P       g  filenamef  ice-9/readline.scm
 		 		 	 		
   C        h    X   ] 4LL>  "  G  L 6    P       g  filenamef  ice-9/readline.scm
 		 		 	 		
   C     h   P  - . , 3 #  	4545 45 &   O 	O 4
 O >   "  G  V4$  "  >  X4O >   "  G  CX4O >   "  G  FL  6       H      g  repl-prompt
	  g  reader	  g  port		   g  outer-new-input-prompt		3  g  outer-continuation-prompt		3  g  outer-read-hook		3   g  filenamef  ice-9/readline.scm
 		 	-	 		  		% 		- 		3 		N 		f 		} 	  	 	    C O  R 	h8      ] 445 5$  #445 >  "  G   456C          g  filenamef  ice-9/readline.scm
 
	 		 		 		 		 		 	 	 		) 		3 	 		5
  g  nameg  activate-readline CR4),/    h   E   ] 45 6   =       g  filenamef  ice-9/readline.scm
 
 		
   C>  "  G   hX   '  ]
$  -M(  CMMN4M5$  C  "L N44 55N  "          g  text
		T g  	continue?		T g  str			5  g  filenamef  ice-9/readline.scm
 		 		 			+		 		-		"		&	'	"	5	&	9		:
	$	>
	3	?
	7	G
	$	I			T	 		T	  g  nameg  	completer C      h8     ])HHO  Q KKC         g  strings
		5 g  strs		5 g  regexp			5 g  	completer			5 g  strs		 	2 g  regexp		 	2  g  filenamef  ice-9/readline.scm
 
	 		 	 		5  g  nameg  make-completion-functiong  documentationf 
Construct and return a completion function for a list of strings.
The returned function is suitable for passing to
@code{with-readline-completion-function.  The argument @var{strings}
should be a list of strings, where each string is one of the possible
completions. CR),/     h   E   ] 45 6   =       g  filenamef  ice-9/readline.scm
 
 		
   C6       g  m
		, g  t
 g  completions
 g  boot-9-repl-reader
"  g  filenamef  ice-9/readline.scm		
	-	)			3	)		5	)			9	)
	>	*		D	*		F	*	,	K	*		T	,			Z	,		\	,			`	,
	e	-		k	-		n	/		o	0		p	1		u	-		~	7
 	;
	>
	K
	K		K
	L
	L	!	L
	M
	M		M
	N
%	N	.	N
/	O
C	Q
D	u
`	w
y	w	|	w
}	x
	y		y		y		y		y		y	%	y	*	y		x
^	{
S 
 
 
 
5 
 	 	" 
 	 	 	 
 	# 
 
 	" 
$ 
(w 
 G	(
   C6                                                                                                  ccache/ice-9/session.go                                                                             0000644                 00000060640 15154557173 0010715 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0a      ]  4       h;      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  session	 		g  filenameS	
f  ice-9/session.scm	g  importsS	g  documentation	 	 	g  regex	 	 	g  rdelim	 	 	g  match	 	 	 	g  exportsS	g  help	g  add-value-help-handler!	g  remove-value-help-handler!	g  add-name-help-handler!	g  remove-name-help-handler!	g  apropos-hook	 g  apropos	!g  apropos-internal	"g  apropos-fold	#g  apropos-fold-accessible	$g  apropos-fold-exported	%g  apropos-fold-all	&g  source	'g  arity	(g  procedure-arguments	)g  module-commentary	* !"#$%&'() 	+g  set-current-module	,+ 	-+ 	.g  object-documentation	/g  *value-help-handlers*	0g  delete!	1g  or-map	2g  try-value-help	3g  *name-help-handlers*	4g  try-name-help	5g  make-syntax-transformer	65 	75 	8g  macro	9g  $sc-dispatch	:9 	;9 	<g  _	=g  any	><=	?g  syntax->datum	@? 	A? 	Bg  datum->syntax	CB 	DB 	Eg  length	Fg  	provided?	Gg  display	Hg  help-doc	Ig  simple-format	Jf  ^~A$	Kg  regexp-quote	Lg  symbol->string	Mg  string?	Ng  and-map	Og  symbol?	Pg  quote	Qg  
write-line	Rf   commentary:	Sf  No ~A found for ~A
	Tg  
commentary	Ug  
help-usage	Vg  unquote	Wg  
module-ref	Xg  current-module	Yg  search-documentation-files	Zg  begin	[Z 	\f  ]`help' depends on the `regex' feature.
You don't seem to have regular expressions installed.
	]g  syntax-violation	^] 	_] 	`f  -source expression failed to match any pattern	ag  map	bg  reverse	cg  string-append	df  /	eg  %search-load-path	fg  in-vicinity	gg  module-filename	hg  file-commentary	ig  
procedure?	jf  a procedure	kf  	an object	lf  Documentation from file:	mf  Did not find any object 	nf  named `~A'
	of  matching regexp "~A"
	pg  for-each	qf  ~S: ~S
	rg  module-name	sg  cadr	tg  caddr	uf  !`~S' is ~A in the ~S module.

~A
	vg  cadddr	wf  Documentation found for:
	xg  newline	yf  No documentation found for:
	zf vUsage: (help NAME) gives documentation about objects named NAME (a symbol)
       (help REGEXP) ditto for objects with names matching REGEXP (a string)
       (help 'NAME) gives documentation for NAME, even if it is not an object
       (help ,EXPR) gives documentation for object returned by EXPR
       (help (my module)) gives module commentary for `(my module)'
       (help) gives this text

`help' searches among bindings exported from loaded modules, while
`apropos' searches among bindings visible from the "current" module.

Examples: (help help)
          (help cons)
          (help "output-string")

Other useful sources of helpful information:

(apropos STRING)
(arity PROCEDURE)
(name PROCEDURE-OR-MACRO)
(source PROCEDURE-OR-MACRO)

Tools:

(backtrace)				;show backtrace from last error
(debug)					;enter the debugger
(trace [PROCEDURE])			;trace procedure (no arg => show)
(untrace [PROCEDURE])			;untrace (no arg => untrace all)

(OPTIONSET-options 'full)		;display option information
(OPTIONSET-enable 'OPTION)
(OPTIONSET-disable 'OPTION)
(OPTIONSET-set! OPTION VALUE)

where OPTIONSET is one of debug, read, eval, print

	{g  	make-hook	|g  run-hook	}g  string-length	~f  Empty string not allowed	g  make-regexp g  module-uses g  
duplicates g  member g  shadow g  value g  full g  module-obarray g  hash-for-each g  regexp-exec f  :  f  	(unbound) f  	 shadowed g  make-hash-table g  	hash-fold g  hashq-get-handle g  
hashq-set! g  hash-create-handle! g  make-fold-modules g  identity g  
submodules g  resolve-module g  root-modules g  hash-map->list g  module-submodules g  module-public-interface g  procedure-source g  macro? g  macro-transformer g  procedure-property g  arglist f    f  required f   arguments:  f   argument:  f  ', ` f  ' and ` f  ', the rest in ` f  ,  f  optional f  keyword f  other keywords allowed f  the rest in ` f  ' g  procedure-minimum-arity f   or more f   required and  f  	 optional f  	 argument f  
 arguments f  .
 g  required g  number? g  	make-list g  optional g  keyword g  allow-other-keys? g  rest g  error     f  no matching pattern g  system g  vm g  program   g  program?     g  program-arguments-alist    C 5h L  ^  ]4	
*5 4- >  "  G   .      h   r   ]6j       g  name
		 g  value		  g  filenamef  ice-9/session.scm
	$			%	 			   C /R/  h     ]  C           g  proc
		  g  filenamef  ice-9/session.scm
	'
		.				.	 		  g  nameg  add-value-help-handler!g  documentationf 1Adds a handler for performing `help' on a value.

`proc' will be called as (PROC NAME VALUE). `proc' should return #t to
indicate that it has performed help, a string to override the default
object documentation, or #f to try the other handlers, potentially
falling back on the normal behavior for `help'. CR0/    h      ]4 5 C        g  proc
		  g  filenamef  ice-9/session.scm
	0
		2			2	 		  g  nameg  remove-value-help-handler!g  documentationf  3Removes a handler for performing `help' on a value. CR1  h   _   ] LL 6      W       g  proc
		
  g  filenamef  ice-9/session.scm
	5	
	
	5	 		
   C/    h      ] O 6              g  name
		 g  value		  g  filenamef  ice-9/session.scm
	4
		5	 			  g  nameg  try-value-help C2R3R3       h   F  ]  C     >      g  proc
		  g  filenamef  ice-9/session.scm
	:
		D				D	 		  g  nameg  add-name-help-handler!g  documentationf Adds a handler for performing `help' on a name.

`proc' will be called with the unevaluated name as its argument. That is
to say, when the user calls `(help FOO)', the name is FOO, exactly as
the user types it.

`proc' should return #t to indicate that it has performed help, a string
to override the default object documentation, or #f to try the other
handlers, potentially falling back on the normal behavior for `help'. CR03       h      ]4 5 C        g  proc
		  g  filenamef  ice-9/session.scm
	F
		H			H	 		  g  nameg  remove-name-help-handler!g  documentationf  2Removes a handler for performing `help' on a name. CR1    h   _   ] L 6W       g  proc
		  g  filenamef  ice-9/session.scm
	K	
		K	 		   C3    h   x   ] O 6 p       g  name
		  g  filenamef  ice-9/session.scm
	J
		K	 		  g  nameg  try-name-help C4R478;>ADEF4GHIJKLMNOP)QRSTUV2WXY[\        h  "  -  1  3 4 5$ r45$ R 45$  !&  "  4>  "  G  " $  *444	4
555>  "  G  " 45$  4>  "  G  " $ "  45$  (  "  $  g45$  :4>  "  G  4>  "  G  4>  " ?G  " 84>  " $G  " 4>   " G  " 4>   "  G  "  45	$  &  g4445 55$  !&  "  4>  "  G  "   4>  "  G  "  l&  _$  N45$  4>  "  G  "   4>  "  G  "  "l"  "d"  "\"  4>   "  G  C4>  "  G  C4>   "  G  C           g  exp
		 g  name	$s g  t		-p g  t	 ? g  doc	 g  x	 g  t	 A g  x	">  g  filenamef  ice-9/session.scm
	P
	
	S			S			S			V			V			V		!	S		$	[		$	[			'	b		-	_		<	c		A	c	1	Y	f		]	_		^	g		c	h		h	i		i	j		l	j	&	t	j		v	h		{	g	 	m	 	_	 	n	 	q	 	_	  	  	  	  	'  	  	  	  	  	  	  	(  	4 	( 	"	]	'	]	.) 	$0	]	@ 	g	_	h	r	q	r	u	q	x	s	z	s	"~	q		t		t	(	u	(	u	4	v	4	u	(	t		t		w		y		w	:	w	 	]		]	.	w	+	]		~		~	"	|						|	 	 	0  	  	! 	3" 	%	]	*	]	., 	$3	]	^ 	r 	t	W		x	W	}	W			Y			T			U		 `		


   C   h   e   ]	4 5L 4?6]       g  args
		 g  v			  g  filenamef  ice-9/session.scm		P
 		   C_`    h(      ]	4 5$   O @ 6        g  y
		' g  tmp		'  g  filenamef  ice-9/session.scm
	P
 		'  g  documentationf  7(help [NAME])
Prints useful information.  Try `(help)'.g  
macro-typeg  defmacrog  defmacro-argsg  args  C5RaLbccd   h   i   ] 6      a       g  elt
		
  g  filenamef  ice-9/session.scm
 		 	4	
 	! 		
   Cef        hH   x  ])4 54545445?456      p      g  name
		B g  name		B g  reverse-name			B g  leaf			B g  dir-hint-module-name		#	B g  dir-hint		3	B  g  filenamef  ice-9/session.scm
 
	 		 		 		 		 		 		 		! 	(	# 		# 		& 		) 		3 		3 		8 		B 	 		B  g  nameg  module-filename CgRgh     h       ]	4 5$  6C              g  name
		 g  t			  g  filenamef  ice-9/session.scm
 
	 				 	 		  g  nameg  module-commentary C)R"2ijk h0      ] 4545$  "   C              g  module
		) g  name		) g  object			) g  data			)  g  filenamef  ice-9/session.scm
 		 	-	 	4	 	-	 	4	" 	4	% 	'	( 	! 			)	   C$YQlGmInopIqrstuv hh   T  ]	44 54 554 5$  3MN44 54 54 54 55MNCM N C      L      g  entry
		b g  entry-summary		b  g  filenamef  ice-9/session.scm
 		 	.	 	2		 	/	 	<	 	/	 	/	 	.	 		 		& 		+ 	'	- 	!	. 	-	3 	1	4 	.	; 	.	B 	.	G 	;	I 	.	J 	.	R 	-	U 	'	W 	!	^ 	%	` 	 		b   CEwG  h   b   ] 6Z       g  entry
		  g  filenamef  ice-9/session.scm
 		 	- 		   CxG      h(   }   ]M $  N "  4>   "  G   6   u       g  entry
		%  g  filenamef  ice-9/session.scm
 		 		 		 		% 	 		%   CxyG h   b   ] 6Z       g  entry
		  g  filenamef  ice-9/session.scm
 		 	- 		   C   h@    ]245(  O4 5$  4>  "  G  64>  "  G  	 $  
"   6HHHH4O >  "  G  J(  "  4J5$  "  J$  -4>  "  G  4J>  "  G  K"   4O J>  "  G  J(  CJ$  K"  4>   "  G  4>  "  G  J6       g  term
	? g  regexp	? g  entries		? g  t			e g  first?		i? g  undocumented-entries		i? g  documented-entries		i? g  documentations		i? g  t	    	g  filenamef  ice-9/session.scm
 
	 		 		 		 		 		 		 		& 		* 		/ 		= 		> 		B 		G 		U 		Y 		[ 		a 		e 		g 	'	h 	%	i 	!	i 		r 	  	  	  	  	  	  	  	  	  	  	  	  	  	 	 	 	 	& 	* 	/ 	? 	 /	?	  g  nameg  help-doc CHRGz    h   m   ] 6e       g  filenamef  ice-9/session.scm
 
	 		 	 		
  g  nameg  
help-usage CUR4{i	5R|X}~rprLGiWXx        h    ]4L4 55$  4L >  "  G  4>  "  G  4 >  "  G  $  Q45$  "  M$  (4	>  "  G  4>  "  G  "   "  $4	>  "  G  4>  "  G  M$  34L 5445  5&  "  4	>  "  G  "   
6 C         g  symbol
	 g  variable	 g  val		T  g  t		]	o  g  filenamef  ice-9/session.scm
>		?		?	*	?		?		@		'A		+A	 	0A		9B		MC		QC		TD	)	TD		WE	+	]E	'	sE	 	tF	' G	' I	 J	 J	' J	 K	 L	* M	* M	6 M	* K	 N	 N	$ N	O	 "		   C  h0      ]4 54 5L  LLO 6              g  module
		) g  name			) g  obarray			)  g  filenamef  ice-9/session.scm
9			:			:		;		:		)=	 		)   C        h     - 1 3 445  >  "  G  4 5
$  C4 5445 545 (  "  45	$  "  4
5H4
5H4
5$  
KK"   O 6      g  rgx
		  g  options		  g  match		9  g  uses		E  g  modules		p  g  shadow		{  g  value	    g  filenamef  ice-9/session.scm
%
	
'		'		'		#(		*(		/(		1)		3*		9*		<+		?+	 	E+		E*		H,		R-	 	X.	*	].	7	_.	*	a/	*	b.	%	f-		i0	 	p,		p*		s3		w3		{3		{*		~4	 4	 4	 *	 5	 5	 5	 5	 6	 7	 8	 )		 
  g  nameg  aproposg  documentationf  CSearch for bindings: apropos regexp {options= 'full 'shadow 'value} C R"    h      ]C       g  module
		 g  name		 g  var			 g  data			  g  filenamef  ice-9/session.scm
U		V	 			   C#X h      ] 445 56          g  rgx
		  g  filenamef  ice-9/session.scm
S
	W		
Y		Y	)	Y		U	 		  g  nameg  apropos-internalg  documentationf  +Return a list of accessible variable names. C!R|XL  hX     ]$  K4L 4 55$  14L 5$  C4L >  "  G  LL 6CC 
      g  name
		W g  var		W g  data			W g  val			T  g  filenamef  ice-9/session.scm
z		{			{		|	0	|		s	 	s	3	s	 	 s		!t	%	-s		1v		Qw	 		W	  g  nameg  module-filter C h(      ] $  L LL O 4 56C          g  module
		% g  data		%  g  filenamef  ice-9/session.scm
p		~			(	"~	 		%	  g  nameg  fold-module C      h@     ]445 >  "  G  4545  O 6          g  proc
		< g  init		< g  rgx			< g  folder			< g  match		'	< g  recorded		'	<  g  filenamef  ice-9/session.scm
[
	l		l		l		m		#n		'm		<	 			<	  g  nameg  apropos-foldg  documentationf Folds PROCEDURE over bindings matching third arg REGEXP.

Result is

  (PROCEDURE MODULE1 NAME1 VALUE1
    (PROCEDURE MODULE2 NAME2 VALUE2
      ...
      (PROCEDURE MODULEn NAMEn VALUEn INIT)))

where INIT is the second arg to `apropos-fold'.

Fourth arg FOLDER is one of

  (apropos-fold-accessible MODULE) ;fold over bindings accessible in MODULE
  apropos-fold-exported		   ;fold over all exported bindings
  apropos-fold-all		   ;fold over all bindings C"R     hx     ]*"  _(  C4L 5$   4L4L4L554L55"  " "             g  data
		q g  modules		q g  modules			e g  data			e g  obj			7 g  handle		!	4 g  first?		&	1  g  filenamef  ice-9/session.scm
							$				$	!		&	$	&		,		;		<		?	!	B	.	G	7	I	.	M	!	N	!	S	+	U	!	W		e	 		q	  g  nameg  rec C   h0      ]4	5O L L Q 4L5 6        g  fold-module
		/ g  init		/ g  table				/ g  rec			/  g  filenamef  ice-9/session.scm
									)		/	 		/	   C   h     ] O C        g  
init-thunk
		 g  traverse		 g  extract			  g  filenamef  ice-9/session.scm

 			  g  nameg  make-fold-modulesg  documentationf  Return procedure capable of traversing a forest of modules.
The forest traversed is the image of the forest generated by root
modules returned by INIT-THUNK and the generator TRAVERSE.
It is an image under the mapping EXTRACT. CR  h   N   ] L  CF       g  filenamef  ice-9/session.scm
			  		
   C   h      ] O 6       ~       g  module
		  g  filenamef  ice-9/session.scm

		 		  g  nameg  apropos-fold-accessible C#R       h      ] 456   y       g  filenamef  ice-9/session.scm

								 		
  g  nameg  root-modules CR       h   d   ]C   \       g  k
		 g  v		  g  filenamef  ice-9/session.scm
	 			   C       h      ]4 56 w       g  mod
		  g  filenamef  ice-9/session.scm

		#		 		  g  nameg  
submodules CR4iiii5$R4iiii5%Ri      h0      ]4 5$   64 5$  4 56C            g  obj
		+  g  filenamef  ice-9/session.scm

													!	(	)	 			+  g  nameg  source C&REG h  x
  ]I4 5$ H(  " P454>  "  G  4>  "  G  4>  "  G  $  4>  "  G  "  4>  "  G  4`>  "  G  4>  "  G  "  	(  4'>  "  G  "  	$  L	$  4	>  "  G  "  4
>  "  G  4	>  "  G  		"4>  "  G  4	>  "  G  4'>  "  G  "  		"NK(  " lJ$  4>  "  G  "   454>  "  G  4>  "  G  4>  "  G  $  4>  "  G  "  4>  "  G  4`>  "  G  4>  "  G  "  	(  4'>  "  G  "  	$  L	$  4	>  "  G  "  4
>  "  G  4	>  "  G  		"4>  "  G  4	>  "  G  4'>  "  G  "  		"NK(  " lJ$  4>  "  G  "   454>  "  G  4>  "  G  4>  "  G  $  4>  "  G  "  4>  "  G  4`>  "  G  4>  "  G  "  	(  4'>  "  G  "  	$  L	$  4	>  "  G  "  4
>  "  G  4	>  "  G  		"4>  "  G  4	>  "  G  4'>  "  G  "  		"NK$  5J$  4>  "  G  "   4>  "  G  K"   $  VJ$  4>  "  G  "   4>  "  G  4>  "  G  4>  "  G  "   "  4 54>  "  G  $  4>  "  G  "  F
$  "  84>  "  G  4>  "  G  4>  "  G  $  "  $  
"  $  4>  "  G  "  4>  "  G  6 p
      g  obj
	 g  t	 g  required-args		-( g  optional-args		-( g  keyword-args		-( g  allow-other-keys?		-( g  rest-arg		-( g  need-punctuation		-( g  len		J g  ls		  g  len	 g  ls		Q g  len	6| g  ls		p g  arity	3  g  filenamef  ice-9/session.scm

																"	"	(		,		-			?		D		J		M		_		c		h		q		u	:	z	 	
 	 	
 	 	
 	
 	 	
 	 	 	 	 	 	 	 	 								!	&	/	4	9	D	J	K	O	T	]	o								'	0	'								:		
 		
	
	
	
	 	
)	;	@	E	Q	W	X	p	t	w	x	|	}																								'	0#	'0	6	9	K	O	T	]	a	9f	r	
v	w	
{		
	
		
																				 	%	0	6	7	;	@	I	[	p	s	y					'	0	'							'	0	'						
	-	3	6	;	@	K	Q	R	V	[	j	l	q	v	z										
			
				
		
	
		
		 	  g  nameg  arity C'R< h0  "  ]Q4 5$  $  $  $  $  		$  f	(  R	
45$  45"  45$  45"  	

 C456 456 456 456 456 456 4 5$  C4 5$   6C          g  proc
	, g  t	, g  w		   g  x		   g  w		1  g  x		1  g  w		B  g  x		B  g  w		S  g  x			S  g  w	
	h  g  t	,  g  filenamef  ice-9/session.scm

												l			m		w		x		~	+ 	 		 	 	 	 	+ 	 		 	
				 	$	&	*	 	,  g  nameg  procedure-argumentsg  documentationf  Return an alist describing the arguments that `proc' accepts, or `#f'
if the information cannot be obtained.

The alist keys that are currently defined are `required', `optional',
`keyword', `allow-other-keys?', and `rest'. C(RC V      g  m
		,  g  filenamef  ice-9/session.scm		
 	$	 	#
	'
	0
	4
	8		8
Y	:
W	F
	k	J
 
x 
\ 
 
#	#
&g%
($S
-[
2
3
4t
5
5	5
5	5
6
G{
K
  	K
   C6                                                                                                 ccache/ice-9/streams.go                                                                             0000644                 00000017673 15154557173 0010720 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] . 4        h[      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  streams	 		g  filenameS	
f  ice-9/streams.scm	g  exportsS	g  make-stream	g  
stream-car	g  
stream-cdr	g  stream-null?	g  list->stream	g  vector->stream	g  port->stream	g  stream->list	g  stream->reversed-list	g  stream->list&length	g  stream->reversed-list&length	g  stream->vector	g  stream-fold	g  stream-for-each	g  
stream-map	 	g  set-current-module	 	 	g  make-promise	  	! 	"g  force	#g  vector-length	$g  reverse!	%g  make-vector	&g  stream-fold-one	'g  stream-fold-many	(g  or-map	)g  map	*g  stream-for-each-one	+g  stream-for-each-many	,g  apply	-g  eof-object?C 5h     ]4	
5 4 >  "  G   !       h(      ]4LL 5  $   4L 5CC            g  o
			#  g  filenamef  ice-9/streams.scm
	V			W				W			X	
		X			Y			Z			Z			Z		 	Y	
	"	[	
 		#
   C h      ] O 6 ~       g  m
		 g  state		  g  filenamef  ice-9/streams.scm
	U
		V	 			  g  nameg  make-stream CR" h      ]4 5C            g  stream
		  g  filenamef  ice-9/streams.scm
	]
		_		
	_	 		  g  nameg  
stream-carg  documentationf  BReturns the first element in STREAM.  This is equivalent to `car'. CR"        h      ]4 5C            g  stream
		  g  filenamef  ice-9/streams.scm
	a
		c		
	c	 		  g  nameg  
stream-cdrg  documentationf  GReturns the first tail of STREAM. Equivalent to `(force (cdr STREAM))'. CR"   h   ?  ]4 5C     7      g  stream
		  g  filenamef  ice-9/streams.scm
	e
		i			
	i	 		  g  nameg  stream-null?g  documentationf  Returns `#t' if STREAM is the end-of-stream marker; otherwise
returns `#f'.  This is equivalent to `null?', but should be used
whenever testing for the end of a stream. CR h   T   ] C   L       g  l
		  g  filenamef  ice-9/streams.scm
	o	 		   C h      ] 6             g  l
		
  g  filenamef  ice-9/streams.scm
	k
	
	n	 		
  g  nameg  list->streamg  documentationf  oReturns a newly allocated stream whose elements are the elements of
LIST.  Equivalent to `(apply stream LIST)'. CR#     h       ]	 L $  CL  C           g  i
		 g  t		  g  filenamef  ice-9/streams.scm
	u			v			v			w			w	"		w	 		   C   h       ]	4 5 O 
6           g  v
		 g  len		  g  filenamef  ice-9/streams.scm
	r
		t			t			s	 		  g  nameg  vector->stream CR     hH     ]"  /45$  D4545" 
"     	      g  stream
		C g  s		5 g  acc			5 g  len			5  g  filenamef  ice-9/streams.scm
	z
		{			|			|			}			~			~	#	(	~		+	~	7	5	~		5	{		8	{		C	{	 		C  g  nameg  stream->reversed-list&length CR      h      ]4 >  G C        g  stream
		 g  l		 g  len			  g  filenamef  ice-9/streams.scm
 
	 		 	 		  g  nameg  stream->reversed-list CR$ h       ]4 >  G 45D        g  stream
		 g  l		 g  len			  g  filenamef  ice-9/streams.scm
 
	 		 		 		 	 		  g  nameg  stream->list&length CR$ h   $  ]4 56         g  stream
		  g  filenamef  ice-9/streams.scm
 
	 		 	 		  g  nameg  stream->listg  documentationf  Returns a newly allocated list whose elements are the elements of STREAM.
If STREAM has infinite length this procedure will not terminate. CR% hX   5  ])4 >  G 45"  %(  "  &"
"C    -      g  stream
		T g  l		T g  len			T g  v			T g  i		!	F g  l		!	F  g  filenamef  ice-9/streams.scm
 
	 		 		 		 		! 		' 			2 		7 	*	8 		; 		> 		F 		F 	 		T  g  nameg  stream->vector CR&'        h(      - 1 3 (  
 6 6         g  f
			& g  init			& g  stream				& g  rest				&  g  filenamef  ice-9/streams.scm
 
	 		 		$ 		& 	 			&	
	  g  nameg  stream-fold CR&      h0      ]45$  C 4 455456            g  f
		+ g  r		+ g  stream			+  g  filenamef  ice-9/streams.scm
 
	 		 		 		 		" 		# 	3	+ 	 			+	  g  nameg  stream-fold-one C&R('  h       ] (  L C 4L  5C            g  cars
		  g  filenamef  ice-9/streams.scm
 	!	 	#	 	'	 	-	 	-	 	4	 	-	 	' 			  g  nameg  recur C)      hH      ]45$  C 4 O Q 4455?456        g  f
		G g  r		G g  streams			G g  recur		"	:  g  filenamef  ice-9/streams.scm
 
	 		 		 		" 	!	- 	.	7 	!	< 		= 		G 	 		G	  g  nameg  stream-fold-many C'R*+    h(      - 1 3 (   6 6             g  f
			" g  stream			" g  rest				"  g  filenamef  ice-9/streams.scm
 
	 		 		  		" 	 			"	
	  g  nameg  stream-for-each CR*    h8      ]45$  C4 45>  "  G   456            g  f
		3 g  stream		3  g  filenamef  ice-9/streams.scm
 
	 		 		 		 		 		+ 		3 	 			3	  g  nameg  stream-for-each-one C*R(,)+    h@      ]45$  C4 45>  "  G   456            g  f
		; g  streams		;  g  filenamef  ice-9/streams.scm
 
	 		 		 		 		$ 		1 	 	; 	 			;	  g  nameg  stream-for-each-many C+R       h0      ]	4 5$  C4L 4 554 5C              g  s
		) g  t			)  g  filenamef  ice-9/streams.scm
 		 			 		 		 	"	  		! 	2	( 	 			)   C()        h0      ]	4 5$  C4L 4 5?4 5C        g  streams
		/ g  t		/  g  filenamef  ice-9/streams.scm
 		 		 		 		 	(	$ 		% 		. 	 			/   C     h0   \  - 1 3 (   O 6 O 6    T      g  f
			, g  stream			, g  rest				,  g  filenamef  ice-9/streams.scm
 
	 		 		* 		, 	 			,	
	  g  nameg  
stream-mapg  documentationf  Returns a newly allocated stream, each element being the result of
invoking F with the corresponding elements of the STREAMs
as its arguments. CR-        h(      ]4L  545$  C C            g  p
		# g  o			# g  t			#  g  filenamef  ice-9/streams.scm
 		 			 		 		 		" 	 		#   C      h      ]O  6        g  port
		 g  read		  g  filenamef  ice-9/streams.scm
 
	 	 			  g  nameg  port->stream CRC       g  m
		(  g  filenamef  ice-9/streams.scm		
	U
	]
	a
	e
	k
	r
		z

g 
W 
 
@ 
N 
m 
 
 
 
 
g 
 
 	
   C6                                                                      ccache/ice-9/poe.go                                                                                 0000644                 00000005413 15154557173 0010012 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0
      ] # 4   h(      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  poe	 		g  filenameS	
f  ice-9/poe.scm	g  importsS	g  hcons	 	 	 	g  exportsS	g  
pure-funcq	g  perfect-funcq	 	g  set-current-module	 	 	g  make-weak-key-hash-table	g  
funcq-memo	g  make-gc-buffer	g  funcq-buffer	g  hashq	g  
funcq-hash	g  eq?-list	g  funcq-assoc	g  	not-found	 g  	hashx-ref	!g  
hashx-set!	"g  make-hash-tableC 5   h     ]4	
5 4 >  "  G   4i5R4i 5R    h@      ]"  +(  C4     ?5"
 "           g  arg-list
		< g  n		< g  x			1 g  arg-list			1  g  filenamef  ice-9/poe.scm
	3
		4			6			7			8	"		8	)	%	8	"	&	8		)	9		1	8		1	4	 		<	  g  nameg  
funcq-hash CR      h0      ] (  C(  C &  
 6C             g  x
		* g  y		*  g  filenamef  ice-9/poe.scm
	=
		>			?			@			A			A			@		#	B		&	B		(	B	 		*	  g  nameg  eq?-list CR  h(      ](  C4 5$  C 6         g  arg-list
		& g  alist		&  g  filenamef  ice-9/poe.scm
	D
		E			G	
		G			G	
		G			H	
	$	I	 	&	I	
 
		&	  g  nameg  funcq-assoc CR R ! hx      -  1  3 L  45&  84L  ?4>  "  G  4>  "  G  C4>  "  G  C         g  args
			v g  key		v g  cached			v g  val		0	a  g  filenamef  ice-9/poe.scm
	P			Q			Q			R			Q		)	S		*	X		0	X	
	3	Y		E	Z		b	U	 			v


   C   h   n   ] O C      f       g  	base-func
		
  g  filenamef  ice-9/poe.scm
	O
 		
  g  nameg  
pure-funcq CR" !    hx      -  1  3 L 4M 5&  84L ?4>  "  G  4M >  "  G  C4>  "  G  C         g  args
			v g  key		v g  cached			v g  val		0	a  g  filenamef  ice-9/poe.scm
	h			i			i			j			i		)	k		*	p		0	p	
	3	q		E	r		b	m	 			v


   C   h      ]
H4 5KO C       g  size
		 g  	base-func		 g  
funcq-memo			  g  filenamef  ice-9/poe.scm
	e
		f	 			  g  nameg  perfect-funcq CRC       g  m
		,  g  filenamef  ice-9/poe.scm		
	-	0		9	0
	:	1		F	1
	3
	=
	D
	L		L		L
	O
	e
 	
   C6                                                                                                                                                                                                                                                      ccache/ice-9/common-list.go                                                                         0000644                 00000030504 15154557173 0011467 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0,1      ] 2 4    h5      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  common-list	 		g  filenameS	
f  ice-9/common-list.scm	g  exportsS	g  adjoin	g  union	g  intersection	g  set-difference	g  reduce-init	g  reduce	g  some	g  every	g  notany	g  notevery	g  count-if	g  find-if	g  	member-if	g  	remove-if	g  remove-if-not	g  
delete-if!	g  delete-if-not!	g  butlast	g  and?	g  or?	 g  has-duplicates?	!g  pick	"g  pick-mappings	#g  uniq	$ !"# 	%g  set-current-module	&% 	'% 	(g  memq	)g  reverse!	*g  memv	+g  map	,g  car	-g  cdr	.g  length	/g  error	0f  negative argument to butlast	1g  memberC 5      hp,  *  ]4	
$5 4' >  "  G   (  h      ]4 5$  C C       g  e
		 g  l		  g  filenamef  ice-9/common-list.scm
	M
		O			O			O	 			  g  nameg  adjoing  documentationf  GReturn list L, possibly with element E added if it is not already in L. CR       h(   7  ] (  C(   C 4 56   /      g  l1
		% g  l2		%  g  filenamef  ice-9/common-list.scm
	Q
		U			W			W			W	&	#	W		%	W	 		%	  g  nameg  uniong  documentationf  wReturn a new list that is the union of L1 and L2.
Elements that occur in both lists occur only once in
the result list. CR)*      hX     ](  C"  8(  645$  "" "            g  l1
		R g  l2		R g  l1			G g  result			G  g  filenamef  ice-9/common-list.scm
	Y
		\			]			^			^			_		!	_		%	_		)	^		,	_	(	/	_	7	2	_	1	:	_	"	=	`		G	`		G	]		J	]	!	R	]	 		R	  g  nameg  intersectiong  documentationf  yReturn a new list that is the intersection of L1 and L2.
Only elements that occur in both lists occur in the result list. CR)* hP   r  ]"  8(  645$  "" "       j      g  l1
		I g  l2		I g  l1			> g  result			>  g  filenamef  ice-9/common-list.scm
	b
		d			e			e			f			f			f		 	e		#	f	$	-	f		0	g		3	g	%	6	g		>	g		>	d		A	d		I	d	 		I	  g  nameg  set-differenceg  documentationf  5Return elements from list L1 that are not in list L2. CR     h      ](  C 4 56        g  p
		 g  init		 g  l			  g  filenamef  ice-9/common-list.scm
	i
		k			m			m			m			m	&		m	 			  g  nameg  reduce-initg  documentationf  ESame as `reduce' except it implicitly inserts INIT at the start of L. CR    h(      ](  C(  C 6            g  p
		" g  l		"  g  filenamef  ice-9/common-list.scm
	o
		u			v			u			v			w		 	w	%	"	w	 			"	  g  nameg  reduceg  documentationf 9Combine all the elements of sequence L using a binary operation P.
The combination is left-associative.  For example, using +, one can
add up all the elements.  `reduce' allows you to apply a function which
accepts only two arguments to more than 2 objects.  Functional
programmers usually refer to this as foldl. CR+,-   h   $  - 1 3 (  0"  $(  C4 5$  C"""  8(  C4 45?$  C45""       g  pred
		  g  l		  g  rest			  g  l			7 g  t		#	7 g  l		C	{ g  rest		C	{ g  t		\	{  g  filenamef  ice-9/common-list.scm
	y
	 		 			 		 		! 		# 		# 		1 	)	7 	#	7 			C 		I 		L 		Q 	%	R 	-	\ 		\ 		j 		k 	'	{ 		{ 	 		 	
	  g  nameg  someg  documentationf pPRED is a boolean function of as many arguments as there are list
arguments to `some', i.e., L plus any optional arguments.  PRED is
applied to successive elements of the list arguments in order.  As soon
as one of these applications returns a true value, return that value.
If no application returns a true value, return #f.
All the lists should have the same length. CR+,-       h   C  - 1 3 (  +"  (  C4 5$  	"C""  3(  C4 45?$  45"C"   ;      g  pred
			} g  l			} g  rest				} g  l			2 g  l		>	q g  rest		>	q  g  filenamef  ice-9/common-list.scm
 
	 		 			 		 		 		! 		# 		' 		* 	)	0 	#	2 			> 		D 		E 		G 		L 	%	M 	-	W 		[ 		^ 		_ 	'	o 		q 	 			}	
	  g  nameg  everyg  documentationf  Return #t iff every application of PRED to L, etc., returns #t.
Analogous to `some' except it returns #t if every application of
PRED is #t and #f otherwise. CR    h   U  - 1 3 4 ?C    M      g  pred
			 g  ls			  g  filenamef  ice-9/common-list.scm
 
	
 		 	 			
  g  nameg  notanyg  documentationf  Return #t iff every application of PRED to L, etc., returns #f.
Analogous to some but returns #t if no application of PRED returns a
true value or #f as soon as any one does. CR  h   S  - 1 3 4 ?C    K      g  pred
			 g  ls			  g  filenamef  ice-9/common-list.scm
 
	
 		 	 			
  g  nameg  noteveryg  documentationf  Return #t iff there is an application of PRED to L, etc., that returns #f.
Analogous to some but returns #t as soon as an application of PRED returns #f,
or #f otherwise. CRhH   h  ]"  0(  C4 5$  ""
"       `      g  pred
		A g  l		A g  n			6 g  l			6  g  filenamef  ice-9/common-list.scm
 
	 		 		 		 		 		 		 	 	! 	(	) 		. 		6 		6 	 		A	  g  nameg  count-ifg  documentationf  IReturn the number of elements in L for which (PRED element) returns true. CR       h(   X  ](  C4 5$  C 6     P      g  pred
		# g  l		#  g  filenamef  ice-9/common-list.scm
 
	 		 			 		 			 		 		! 		# 	 
		#	  g  nameg  find-ifg  documentationf  |Search for the first element in L for which (PRED element) returns true.
If found, return that element, otherwise return #f. CR       h(     ](  C4 5$  C 6            g  pred
		" g  l		"  g  filenamef  ice-9/common-list.scm
 
	 		 			 		 			 		  		" 	 			"	  g  nameg  	member-ifg  documentationf  9Return the first sublist of L for whose car PRED is true. CR) hH     ]"  6(  64 5$  """       g  pred
		G g  l		G g  l			< g  result			<  g  filenamef  ice-9/common-list.scm
 
	 		 		 		 		 		 		 		! 	 	+ 		. 		1 	$	4 		< 		< 		? 		G 	 		G	  g  nameg  	remove-ifg  documentationf  WRemove all elements from L where (PRED element) is true.
Return everything that's left. CR)       hH     ]"  6(  64 5$  """       g  pred
		G g  l		G g  l			< g  result			<  g  filenamef  ice-9/common-list.scm
 
	 		 		 		 		 		 		 		! 		$ 	$	' 		/ 		2 	&	< 	 	< 		? 		G 	 		G	  g  nameg  remove-if-notg  documentationf  URemove all elements from L where (PRED element) is #f.
Return everything that's left. CRh0      ] (  C4L  5$  	  " 4L 5 C          g  l
		-  g  filenamef  ice-9/common-list.scm
 		 			 		 		 		 		 		 	%	 		" 		' 	"	) 		* 	 		-  g  nameg  	delete-if C  h      ]
O  Q 6       g  pred
		 g  l		 g  	delete-if			  g  filenamef  ice-9/common-list.scm
 
	 	 			  g  nameg  
delete-if!g  documentationf  #Destructive version of `remove-if'. CRh0      ] (  C4L  5$   4L 5 C  "          g  l
		-  g  filenamef  ice-9/common-list.scm
 		 			 		 		 		 		 		 		 	&	  		! 		' 	/	- 	  		-  g  nameg  delete-if-not C      h      ]
O  Q 6       g  pred
		 g  l		 g  delete-if-not			  g  filenamef  ice-9/common-list.scm
 
	 	 			  g  nameg  delete-if-not!g  documentationf  'Destructive version of `remove-if-not'. CR    h(      ] (   C
$   4L  5CC          g  lst
		% g  n		%  g  filenamef  ice-9/common-list.scm
 		 		 		 		 		 	(	 	,	 	6	! 	(	" 		$ 	 		%	  g  nameg  bl C./0    hH   <  ]HO Q 4 5K 
$  45"  J6      4      g  lst
		B g  n		B g  l			B g  bl			B g  l			%  g  filenamef  ice-9/common-list.scm
 
	 		 		 		, 		1 		2 		6 		: 		B 	 		B	  g  nameg  butlastg  documentationf  *Return all but the last N elements of LST. CR   h(      -  1  3  (  C $   @C              g  args
			!  g  filenamef  ice-9/common-list.scm
 
	 		 			 		 	 	 	 			!


  g  nameg  and?g  documentationf  #Return #t iff all of ARGS are true. CR   h(      -  1  3  (  C $  C @              g  args
			!  g  filenamef  ice-9/common-list.scm
 
	 		 			 		 		! 	 			!


  g  nameg  or?g  documentationf  "Return #t iff any of ARGS is true. CR1    h(     ] (  C4  5$  C 6             g  lst
		"  g  filenamef  ice-9/common-list.scm
 
	 		 			 		 		 			 		  		" 	 
		"  g  nameg  has-duplicates?g  documentationf  3Return #t iff 2 members of LST are equal?, else #f. C R    hH     ]"  3(  C4 5$  """          g  p
		D g  l		D g  s			9 g  l			9  g  filenamef  ice-9/common-list.scm
 
	 		 		 		 			 		 		 	$	! 		$ 	/	, 		1 	 	9 		9 		: 		D 	 		D	  g  nameg  pickg  documentationf  ZApply P to each element of L, returning a list of elts
for which P returns a non-#f value. C!R      hH     ]"  6(  C4 5$  """       g  p
		G g  l		G g  s			< g  l			< g  t			<  g  filenamef  ice-9/common-list.scm
 
														$	0	'	A	/	*	4	 	<		<		=		G	 		G	  g  nameg  pick-mappingsg  documentationf  PApply P to each element of L, returning a list of the
non-#f return values of P. C"R)(   hH   \  ]"  1(  645$  "  " "      T      g  l
		B g  acc		7 g  l			7  g  filenamef  ice-9/common-list.scm


													 		)		,		/		7		7		8		B	 		B  g  nameg  uniqg  documentationf  @Return a list containing elements of L, with duplicates removed. C#RC       "      g  m
		(  g  filenamef  ice-9/common-list.scm		4
A	M
	Q
	Y
	b
	i

K	o
	y
 
p 
 
 
C 
 
 
 
 
  
#w 
$ 
% 
& 
( 
* 
,g

 	,i
   C6                                                                                                                                                                                             ccache/ice-9/documentation.go                                                                       0000644                 00000013442 15154557173 0012101 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0
      ] H 4      h      ] g  guile	 	g  define-module*	 	 	g  ice-9	g  documentation	 		g  filenameS	
f  ice-9/documentation.scm	g  importsS	g  rdelim	 	 	 	g  exportsS	g  file-commentary	g  documentation-files	g  search-documentation-files	g  object-documentation	 	g  	autoloadsS	g  regex	 	g  match:suffix	 	 	g  set-current-module	 	 	g  make-regexp	 f  ^;;; Commentary:	!f  
^;;; Code:	"f  ^;+	#g  regexp-exec	$g  length	%g  regexp?	&g  string?	'g  
procedure?	(g  call-with-input-file	)g  eof-object?	*g  after	+g  in	,g  read-delimited	-f  
	.g  string-append	/f   	0g  before	1g  map	2g  in-vicinity	3f  guile-procedures.txt	4g  %library-dir	5g  %package-data-dir	6g  	%site-dir	7f  .	8f  	9g  entry-delimiter	:g  file-exists?	;g  symbol->string	<g  string-length	=g  string=?	>g  	substring	?g  
string-ref	@g  find-documentation-in-file	Ag  or-map	Bg  procedure-documentation	Cg  object-property	Dg  macro?	Eg  macro-transformer	Fg  procedure-name	Gg  set-procedure-property!C 5  h     ]4	
5	 4 >  "  G    !"#       h       ]	4L  5$  6 C           g  line
		 g  m		  g  filenamef  ice-9/documentation.scm
	g			h	%		h			i			i	$ 		   C$%&'()*#+,-./0 
    h     ]!"  45$  "  $  C4L 5$  "  4L5$  "  &  C4 5&  "&  44L55"  "  "g4 5	"P        g  port
	  g  line	  g  doc		  g  parse-state		  g  t			" g  	new-state		Q   g  filenamef  ice-9/documentation.scm
	~					 		 		 	*	 	%	& 	
	* 		6 		8 	:	= 		I 		K 	=	Q 		U 		[ 		_ 		c 	*	g 		i 	(	o 		q 	<	w 		x 		} 	1  	>  	  	 		 		 		) 		  	  	  		 $	    C   h    - 1 3 HHH45K45K45O K45$  J"  145$  "  45$  45"  J	45$  J"  245$  "  45$  45"  J	45$  J"  4	5$  "  J
 O 6           g  filename
		 g  cust		 g  default-in-line-re		 g  default-after-line-re		 g  default-scrub		 g  dirt		+	7 g  v		O	} g  v	   g  v	   g  
in-line-re	  g  after-line-re	  g  scrub	   g  filenamef  ice-9/documentation.scm
	]
		d			d	*		d			e	 	 	e	-	"	e	 	%	f	$	)	f	1	+	f	$	+	f		;	l		B	l		F	l		O	n	!	O	n		R	o	!	\	o		c	p	!	m	o		n	p	- 	r	  	r	 	r	 	t	$ 	t	 	u	$ 	u	 	v	$ 	u	 	v	0 	x	 	x	 	x	 	z	 	z	 	{	 	{	 	l		}	 )		
  g  nameg  file-commentary CR41i23   h   }   ]4 5 6   u       g  vicinity
		  g  filenamef  ice-9/documentation.scm
 		 		 	!	 		 		   C4i5i6i7 h   T   ] C   L       g  filenamef  ice-9/documentation.scm
 		 	 		
   C 5R89R:(;<,9)=>? 	     h     ]!4L 5454 >  "  G  "  {45$  C"  4 5"45$  I44
55$  045
$  	45	6"""4 5"v        g  port
	  g  name		  g  len		  g  entry		,  g  t		x   g  filenamef  ice-9/documentation.scm
 			 			 		 		 		 		, 		- 		7 		> 	#	L 		L 		M 		V 		Z 		[ 		^ 	#	k 		o 		p 		x 	  	  	)  	6  	3  	  	  	!  	 	    C h       ]45$   O 6C           g  name
		 g  file		  g  filenamef  ice-9/documentation.scm
 
	 		 		 	 			  g  nameg  find-documentation-in-file C@RA@   h   g   ]L  6      _       g  file
		
  g  filenamef  ice-9/documentation.scm
 	
	
 	 		
   C    h(      - 1 3  O (  "  6             g  name
			" g  files			"  g  filenamef  ice-9/documentation.scm
 
	 	
	" 	 			"
  g  nameg  search-documentation-files CR'BCDEFG   h   G  ]	4 5$  4 5"  $  C4 5$  C4 5$  44 55"  $  C4 5$  >4 5$  14	4 55$  4
 >  "  G  "   CCC      ?      g  object
	  g  t	  g  t	-  g  t	T  g  	docstring    g  filenamef  ice-9/documentation.scm
 
	 		 		 		 		% 		+ 		- 		- 		9 		C 		D 		G 	!	O 		T 		` 		j 		k 		u 		v 		y 	  	  	  	  	  	1  	 	   g  nameg  object-documentationg  documentationf  zReturn the docstring for OBJECT.
OBJECT can be a procedure, macro or any object that has its
`documentation' property set. CRC           g  m
		0  g  filenamef  ice-9/documentation.scm		P
	]
 	 	 	 
 	 
\ 
 
 
 	
   C6                                                                                                                                                                                                                               ccache/system/foreign.go                                                                            0000644                 00000023253 15154557173 0011300 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0&      ]  4   h      ] g  guile	 	g  define-module*	 	 	g  system	g  foreign	 		g  filenameS	
f  system/foreign.scm	g  importsS	g  rnrs	g  bytevectors	 	 	g  srfi	g  srfi-1	 	 	g  srfi-9	 	 	g  gnu	 	 	 	g  exportsS	g  void	g  float	g  double	g  short	 g  unsigned-short	!g  int	"g  unsigned-int	#g  long	$g  unsigned-long	%g  size_t	&g  ssize_t	'g  	ptrdiff_t	(g  int8	)g  uint8	*g  uint16	+g  int16	,g  uint32	-g  int32	.g  uint64	/g  int64	0g  sizeof	1g  alignof	2g  %null-pointer	3g  null-pointer?	4g  pointer?	5g  make-pointer	6g  pointer->scm	7g  scm->pointer	8g  pointer-address	9g  pointer->bytevector	:g  bytevector->pointer	;g  set-pointer-finalizer!	<g  dereference-pointer	=g  string->pointer	>g  pointer->string	?g  pointer->procedure	@g  make-c-struct	Ag  parse-c-struct	Bg  define-wrapped-pointer-type	C !"#$%&'()*+,-./0123456789:;<=>?@AB '	Dg  set-current-module	ED 	FD 	Gg  load-extension	Hg  string-append	If  	libguile-	Jg  effective-version	Kf  scm_init_foreign	Lg  defined?	Mg  procedure->pointer	Ng  call-with-deferred-observers	ON 	PN 	Qg  module-export!	RQ 	SQ 	Tg  current-module	UT 	VT 	WM 	Xg  *	Yg  error	Zf  what machine is this?	[g  bytevector-pointer-ref	\g  bytevector-pointer-set!	]g  "bytevector-ieee-single-native-set!	^] 	_] 	`g  "bytevector-ieee-double-native-set!	a` 	b` 	cg  bytevector-s8-set!	dc 	ec 	fg  bytevector-u8-set!	gf 	hf 	ig  bytevector-s16-native-set!	ji 	ki 	lg  bytevector-u16-native-set!	ml 	nl 	og  bytevector-s32-native-set!	po 	qo 	rg  bytevector-u32-native-set!	sr 	tr 	ug  bytevector-s64-native-set!	vu 	wu 	xg  bytevector-u64-native-set!	yx 	zx 	{g  	*writers*	|g  !bytevector-ieee-single-native-ref	}| 	~| 	g  !bytevector-ieee-double-native-ref     g  bytevector-s8-ref     g  bytevector-u8-ref     g  bytevector-s16-native-ref     g  bytevector-u16-native-ref     g  bytevector-s32-native-ref     g  bytevector-u32-native-ref     g  bytevector-s64-native-ref     g  bytevector-u64-native-ref     g  	*readers* g  align g  write-c-struct g  assv-ref f  too few values f  too many values g  read-c-struct g  reverse g  make-bytevector g  fold g  make-syntax-transformer     g  macro g  $sc-dispatch     g  _ g  any   g  datum->syntax g  gensym f  wrap g  syntax-object g  begin g  top   g  ribcage   g  %wrap     f  l-40afcf54ff-e4     g  	type-name g  pred g  wrap g  unwrap g  print     f  l-40afcf54ff-d8 f  l-40afcf54ff-d9 f  l-40afcf54ff-da f  l-40afcf54ff-db f  l-40afcf54ff-dc     g  stx   f  l-40afcf54ff-d5       g  hygiene     g  define-record-type   g  pointer     g  define   g  let   g  ptr->obj   g  make-weak-value-hash-table           g  lambda   g  ptr     g  or   g  hash-ref     g  o   g  	hash-set!       g  set-record-type-printer!   g  syntax-violation     f  -source expression failed to match any patternC 5   h0    ]4	
C5 4F >  "  G   4Gi4HiI4Ji5 5K>  "  G  8  h      ]4 5
C           g  pointer
		  g  filenamef  system/foreign.scm
	B
		D			D	 		  g  nameg  null-pointer?g  documentationf  +Return true if POINTER is the null pointer. C3R4LiM5$  4PSVW      h   E   ] 45 6   =       g  filenamef  system/foreign.scm
	G	 		
   C>  "  G  "   40iX5  	$  5        h   z   ] 6     r       g  bv
		 g  offset		  g  filenamef  system/foreign.scm
	P					Q			Q	 			   C"   	$  5   h   z   ] 6     r       g  bv
		 g  offset		  g  filenamef  system/foreign.scm
	R					S			S	 			   C"  	4YiZ5 [R40iX5  	$  8 h      ] 45C       g  bv
		 g  offset		 g  ptr			  g  filenamef  system/foreign.scm
	X				Y	1		Y	 			   C"   	$  8  h      ] 45C       g  bv
		 g  offset		 g  ptr			  g  filenamef  system/foreign.scm
	Z				[	1		[	 			   C"  	4YiZ5 \Ri_ib(ie)ih+ik*in-iq,it/iw.izX\i {Ri~i(i)i+i*i-i,i/i.iX[i R  h      ] C            g  off
		 g  	alignment		  g  filenamef  system/foreign.scm
	y
		z			z				z		
	z	 			  g  nameg  align CR1{0Y 
       h   >  ],"  $  $  r4455$  4 >  "  G  "  445 >  "  G  45"6(  C	6"X  6      g  bv
	  g  offset	  g  types		  g  vals		  g  offset		  g  types		  g  vals		  g  type		  g  offset		'   	g  filenamef  system/foreign.scm
	|
		}							~		 			~		 		 		 		 	#	' 		' 		, 		0 		1 		: 	&	= 	2	B 		O 		P 		_ 	1	d 		o 		v 		y 	%	| 	1  	  	  	  	  	
  	  	
 	}	 #	 	  g  nameg  write-c-struct CR10     hx     ]+"  c$  V445545$  4 5"  445 5"6"      g  bv
		x g  offset		x g  types			x g  offset			i g  types			i g  vals			i g  type			c g  offset		 	c  g  filenamef  system/foreign.scm
 
	 			 		 		 		 		 		 	#	  		  		% 		, 		/ 	%	2 		6 		7 		@ 	/	B 		G 		H 		V 		Y 		c 		i 		i 		n 	/	x 	 		x	  g  nameg  read-c-struct CR0: h0      ]
44 5
54
 >  "  G  6         g  types
		. g  vals		. g  bv			.  g  filenamef  system/foreign.scm
 
	 		 		 		 		 		. 	 		.	  g  nameg  make-c-struct C@R01     h       ]4 544 55C              g  type
		 g  total		  g  filenamef  system/foreign.scm
 		 		
 		 	&	 		 	 			   C9        h       ]
4
54 5
6         g  foreign
		 g  types		 g  size			  g  filenamef  system/foreign.scm
 
	 		 		 		 	 			  g  nameg  parse-c-struct CAR4B    hh      ]4455   	
	         C          g  	type-name
		e g  pred		e g  wrap			e g  unwrap			e g  print			e g  tmp			e  g  filenamef  system/foreign.scm	 		 	2	 	:	 	2	 		 	 		e	   C h(     ]	4 5$  @ 6            g  stx
		" g  tmp		"  g  filenamef  system/foreign.scm
 	 		"  g  documentationf SDefine helper procedures to wrap pointer objects into Scheme
objects with a disjoint type.  Specifically, this macro defines PRED, a
predicate for the new Scheme type, WRAP, a procedure that takes a
pointer object and returns an object that satisfies PRED, and UNWRAP
which does the reverse.  PRINT must name a user-defined object printer. C5BRC      g  m
		, g  key
2 g  key
>  g  filenamef  system/foreign.scm		
	-	:		2	:		8	:	!	9	:	-	A	:		C	;		H	:	8	B
9	F	?	F	A	F	E	F
F	G		O		O		O		O	'	T	
-	T	/	T	
5	N
6	W	<	W	>	W	>	W		\	
	\		\	
	V
	_		^
	l	d	k
"	y
	9	|
 
 
 
 (	0
   C6                                                                                                                                                                                                                                                                                                                                                      ccache/system/base/types.go                                                                         0000644                 00000300005 15154557173 0011716 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0     ]	 4        h      ] g  guile	 	g  define-module*	 	 	g  system	g  base	g  types		 	
g  filenameS	f  system/base/types.scm	g  importsS	g  rnrs	g  bytevectors	 	 	g  io	g  ports	 	 	g  srfi	g  srfi-1	 	 	g  srfi-9	 	 	g  gnu	 	 	g  srfi-11	  	!  	"g  srfi-26	#" 	$# 	%g  srfi-60	&% 	'& 	(g  ice-9	)g  match	*() 	+* 	,g  iconv	-(, 	.- 	/g  format	0(/ 	10 	2g  vlist	3(2 	43 	5g  foreign	65 	76 	8!$'+.147 	9g  exportsS	:g  
%word-size	;g  memory-backend	<g  memory-backend?	=g  %ffi-memory-backend	>g  dereference-word	?g  memory-port	@g  type-number->name	Ag  inferior-object?	Bg  inferior-object-kind	Cg  inferior-object-sub-kind	Dg  inferior-object-address	Eg  inferior-fluid?	Fg  inferior-fluid-number	Gg  inferior-struct?	Hg  inferior-struct-name	Ig  inferior-struct-fields	Jg  scm->object	K:;<=>?@ABCDEFGHIJ 	Lg  set-current-module	ML 	NL 	Og  sizeof	Pg  *	Qg  <memory-backend>	Rg  %memory-backend-procedure	Sg  make-syntax-transformer	TS 	US 	Vg  macro	Wg  $sc-dispatch	XW 	YW 	Zg  _	[g  any	\Z[[[ 	]g  syntax-object	^g  lambda	_g  m-1f6d4c535-6	`g  top	a_` 	bg  ribcage	cg  t-1f6d4c535-3	dg  t-1f6d4c535-4	eg  t-1f6d4c535-5	fcde 	gaaa 	hf  l-1f6d4c535-b	if  l-1f6d4c535-c	jf  l-1f6d4c535-d	khij 	lbfgk 	mb 	ng  x	on 	pa 	qf  l-1f6d4c535-8	rq 	sbopr 	tg  shift	ug  	proc-name	vg  args	wuv 	x` 	yxx 	zf  l-1e8ba8b5a-60	{f  l-1e8ba8b5a-61	|z{ 	}bwy| 	~g  key	g  value g  name g  formals g  body ~  xxxxx  f  l-1e8ba8b5a-53 f  l-1e8ba8b5a-54 f  l-1e8ba8b5a-55 f  l-1e8ba8b5a-56 f  l-1e8ba8b5a-57   b  g  make-procedure-name   x  f  l-1e8ba8b5a-43   b  x  f  l-1e8ba8b5a-42   bo  almstmmmm}  g  hygiene   ]^  g  peek xlms    ]  g  open ]  g  	type-name ]    g  make-struct g  m-1f6d4c535-1 `  g  t-1e8ba8b5a-133 g  t-1e8ba8b5a-132 g  t-1e8ba8b5a-131   g  m-1e8ba8b5a-134 `    f  l-1e8ba8b5a-138 f  l-1e8ba8b5a-139 f  l-1e8ba8b5a-13a   b  g  	ctor-args   f  l-1e8ba8b5a-120   b  g  ctor g  field   f  l-1e8ba8b5a-11c f  l-1e8ba8b5a-11d   by  g  form g  constructor-spec g  field-names   xxxx  f  l-1e8ba8b5a-111 f  l-1e8ba8b5a-112 f  l-1e8ba8b5a-113 f  l-1e8ba8b5a-114   b  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers   xxxxxxxx  f  l-1e8ba8b5a-e9 f  l-1e8ba8b5a-e7 f  l-1e8ba8b5a-e5 f  l-1e8ba8b5a-e3 f  l-1e8ba8b5a-e1 f  l-1e8ba8b5a-df f  l-1e8ba8b5a-dd f  l-1e8ba8b5a-db   b  f  l-1e8ba8b5a-da   bo  lmstmmmmm  ]  ]Q  ]
      g  each-any Z挤 g  syntax-violation     f  Wrong number of arguments g  identifier?     xms  ]R      f  -source expression failed to match any pattern g  record-type-vtable     g  pwpwpw g  default-record-printer       g  set-struct-vtable-name!     g  vtable-offset-user   g  %memory-backend?-procedureZ[ g  m-1f6d4c535-17` g  t-1f6d4c535-16  	f  l-1f6d4c535-1c
	 b
 f  l-1f6d4c535-19 bo mtmmmm} ]^ g  objg  t-1e8ba8b5a-224g  t-1e8ba8b5a-21eg  t-1e8ba8b5a-21fg  t-1e8ba8b5a-220g  t-1e8ba8b5a-223g  t-1e8ba8b5a-222g  t-1e8ba8b5a-221 g  m-1e8ba8b5a-225`  f  l-1e8ba8b5a-229f  l-1e8ba8b5a-22af  l-1e8ba8b5a-22b f  l-1e8ba8b5a-22c!f  l-1e8ba8b5a-22d"f  l-1e8ba8b5a-22e#f  l-1e8ba8b5a-22f$ !"# %b$ &g  	copier-id'& (f  l-1e8ba8b5a-21c)( *b') +g  	ctor-name,+ -f  l-1e8ba8b5a-214.- /b,. 0 1f  l-1e8ba8b5a-21221 3b02 4g  layout54 6f  l-1e8ba8b5a-21076 8b57 9g  
immutable?:9 ;f  l-1e8ba8b5a-20e<; =b:< >g  field-count?> @f  l-1e8ba8b5a-20cA@ Bb?A Cg  
getter-idsDC Ef  l-1e8ba8b5a-209FE GbDF Hg  	field-idsIH Jf  l-1e8ba8b5a-206KJ LbIK Mg  predicate-nameNg  
field-specO9MN Pxxxxxx Qf  l-1e8ba8b5a-1f9Rf  l-1e8ba8b5a-1faSf  l-1e8ba8b5a-1fbTf  l-1e8ba8b5a-1fcUf  l-1e8ba8b5a-1fdVf  l-1e8ba8b5a-1feWQRSTUV XbOPW Ymtm%mmmm*m/m3m8m=mBmGmLX Z]Y [Z \g  and]]\Y ^g  struct?_]^Y `_Z ag  eq?b]aY cg  struct-vtabled]cY edZ fxm g]Qf hbeg i]`h j[i kxm l]k mg  throw-bad-structnm om pg  memory-backend-peekqg  %memory-backend-peek-procedurerg  free-idsg  
%%on-errortg  m-1f6d4c535-23ut` vu wf  l-1f6d4c535-25xw ybovx zumytmmmm} {]sz |r{ }|[ ~g  %%typeg  t-1e8ba8b5a-14bg  t-1e8ba8b5a-14cg  t-1e8ba8b5a-14dg  t-1e8ba8b5a-14eg  t-1e8ba8b5a-14fg  t-1e8ba8b5a-150g  t-1e8ba8b5a-151 g  m-1e8ba8b5a-152`  f  l-1e8ba8b5a-156f  l-1e8ba8b5a-157f  l-1e8ba8b5a-158f  l-1e8ba8b5a-159f  l-1e8ba8b5a-15af  l-1e8ba8b5a-15bf  l-1e8ba8b5a-15c b g  getterg  index f  l-1e8ba8b5a-149f  l-1e8ba8b5a-14a by C& xxx f  l-1e8ba8b5a-144f  l-1e8ba8b5a-145f  l-1e8ba8b5a-146 b mytmmmmm ]~ r Z}[ g  ckg  errg  s uu f  l-1f6d4c535-28f  l-1f6d4c535-29 b umytmmmm} ] g  quote] xmy ]Q   g  %%index] r Z}[ f  l-1f6d4c535-2df  l-1f6d4c535-2e b umytmmmm} ] ] my ]
   g  %%copier] r Z}[ f  l-1f6d4c535-32f  l-1f6d4c535-33 b umytmmmm} ] ] g  %%<memory-backend>-set-fieldsxmy ]   g  t-1f6d4c535-22 f  l-1f6d4c535-37 bv umytmmmm} ]^ mytmmmmm ]  g  if] ]a ]c  xmy ]Q  g  
struct-ref] my ]
  ]m ] ]p     xmy ]q g  memory-backend-openg  %memory-backend-open-procedureg  m-1f6d4c535-3e`  f  l-1f6d4c535-40 bo mtmmmm} ]s r  [ mtmmmmm ]~ r Z [  f  l-1f6d4c535-43f  l-1f6d4c535-44 	b 
	mtmmmm} ]
 ]
 x	m ]Q   ] r Z [ f  l-1f6d4c535-48f  l-1f6d4c535-49 b mtmmmm} ] ] m ]   ]  r !Z  [ "f  l-1f6d4c535-4d#f  l-1f6d4c535-4e$"# %b$ &%mtmmmm} ']& (]& )x%m *]) +(* ,+ -g  t-1f6d4c535-3d.- /f  l-1f6d4c535-520/ 1b.0 21mtmmmm} 3]^2 41mtmmmmm 5]4 65 7]4 8]a4 9]c4 :95 ;x1m <]Q; =8:< >]4 ?1m @]? A>5@ B]m4 C]4 D]; ECD FB5E G7=AF H36G Ixm J]I Kg  memory-backend-type-nameLg  #%memory-backend-type-name-procedureMg  m-1f6d4c535-59NM` ON Pf  l-1f6d4c535-5bQP RboOQ SNmRtmmmm} T]sS UrT VU[ WmRtmmmmm X]~W YrX ZZVY[ [NN \f  l-1f6d4c535-5e]f  l-1f6d4c535-5f^\] _b[^ `N_mRtmmmm} a]` b]` cx_mR d]Qc ebd fe g]W hrg iZVh[ jf  l-1f6d4c535-63kf  l-1f6d4c535-64ljk mb[l nNmmRtmmmm} o]n p]n qmmR r]	q spr ts u]W vru wZVv[ xf  l-1f6d4c535-68yf  l-1f6d4c535-69zxy {b[z |N{mRtmmmm} }]| ~]| x{mR ] ~  g  t-1f6d4c535-58 f  l-1f6d4c535-6d bO NmRtmmmm} ]^ mRtmmmmm ]  ] ]a ]c  xmR ]Q  ] mR ]	  ]m ] ]K     xmR ]L g  each[[  [[[g  %%set-fieldsg  dummyg  check?g  expr g  m-1f6d4c535-74`  f  l-1f6d4c535-79f  l-1f6d4c535-7af  l-1f6d4c535-7bf  l-1f6d4c535-7cf  l-1f6d4c535-7d b  f  l-1f6d4c535-76 bo g  t-1e8ba8b5a-16ag  t-1e8ba8b5a-16cg  t-1e8ba8b5a-16b g  m-1e8ba8b5a-16d`  f  l-1e8ba8b5a-171f  l-1e8ba8b5a-172f  l-1e8ba8b5a-173 b f  l-1e8ba8b5a-167f  l-1e8ba8b5a-168f  l-1e8ba8b5a-169 b mtmmmm ] xm ]Q ]p ] ]K  g  map  g  listg  make-pointerg  pointer->bytevectorg  bytevector-uint-refg  native-endiannessg  open-bytevector-input-portg  make-custom-binary-input-portf  
ffi-memoryg  bytevector-copy!g  setvbufg  _IONBFg  % dereference-word-procedureZ[[ g  syntax-parameterizeg  m-1f6d4c535-c6` g  t-1f6d4c535-c4g  t-1f6d4c535-c5  f  l-1f6d4c535-cbf  l-1f6d4c535-cc b  f  l-1f6d4c535-c8 bo f  l-bde397a-1eaff  l-bde397a-1eb0 bwy  f  l-bde397a-1ea6f  l-bde397a-1ea7f  l-bde397a-1ea8 b g  prefix xx f  l-bde397a-1e9a f  l-bde397a-1e98  b f  l-bde397a-1e97 bo mtmmmm  ] 	xm 
]>	 g  identifier-syntax] ]	  
  ]^ g  backend]	 g  address]	  f  *Return the word at ADDRESS, using BACKEND.]	 g  let]	 ]	 ]p	      !  "! #" $ % &xm ']& ([[[ ) *g  m-1f6d4c535-e9+*` ,+xx -f  l-1f6d4c535-ee.f  l-1f6d4c535-ef/f  l-1f6d4c535-f00-./ 1b),0 2+ 3f  l-1f6d4c535-eb43 5bo24 6x1m5 7]6 8]6 9]6 :]6 ;: <[[[[ =g  size>= ?+xxx @f  l-1f6d4c535-f5Af  l-1f6d4c535-f6Bf  l-1f6d4c535-f7Cf  l-1f6d4c535-f8D@ABC Eb>?D FxEm5 G]F Hg  zero?I]HF J]F K]F Lg  vu8
	        j   M]LF NKM OJN P]F Q]F R]F Sg  get-bytevector-nTg  get-wordUg  % type-number->name-procedureVg  m-1f6d4c535-104WV` Xg  t-1f6d4c535-101Yg  t-1f6d4c535-102Zg  t-1f6d4c535-103[XYZ \WWW ]f  l-1f6d4c535-109^f  l-1f6d4c535-10a_f  l-1f6d4c535-10b`]^_ ab[\` bW cf  l-1f6d4c535-106dc ebobd fWametmmmm g]f hxame i]@h j]f k]Uh ljk mil nm o]^f p]h qg  kindr]qh sg  numbert]sh uprt vf  yReturn the name of the type NUMBER of KIND, where KIND is one of
'smob or 'port, or #f if the information is unavailable.w]vh x]h yg  procz]yh {]Kh |{p }z| ~} ]\h zrt z x~ ouw gn xme ]U g  match-cell-wordsg  
bytevectorg  m-1f6d4c535-12d`  f  l-1f6d4c535-12f bo xm ] r [[ 挤[[[ g  portg  leng  rest xxxxx f  l-1f6d4c535-132f  l-1f6d4c535-133f  l-1f6d4c535-134f  l-1f6d4c535-135f  l-1f6d4c535-136f  l-1f6d4c535-137 b xm ] ]S g  	remainder] g  modulo] ]:  g  unless] ]H  g  -]   ] [挤[[[  xxxx f  l-1f6d4c535-140f  l-1f6d4c535-141f  l-1f6d4c535-142f  l-1f6d4c535-143f  l-1f6d4c535-144 b xm ] ]T ] [[[ g  match-bit-patterng  ||g  m-1f6d4c535-152`  f  l-1f6d4c535-154 bo xm ] r [[ g  &] r g  =] r [[ [[[[ g  bitsg  ag  bg  ng  cg  
consequentg  	alternate xxxxxxx f  l-1f6d4c535-157f  l-1f6d4c535-158f  l-1f6d4c535-159f  l-1f6d4c535-15af  l-1f6d4c535-15bf  l-1f6d4c535-15cf  l-1f6d4c535-15df  l-1f6d4c535-15e b xm ] g  tag] g  logand] ] ]  g  bitwise-not] [[[ [[[[ n xxxxxx f  l-1f6d4c535-168f  l-1f6d4c535-169f  l-1f6d4c535-16af  l-1f6d4c535-16bf  l-1f6d4c535-16cf  l-1f6d4c535-16d f  l-1f6d4c535-16e  b xm ] ] ] ] ] 	]Z 
r	 
[[ [[[[  xxxxx f  l-1f6d4c535-177f  l-1f6d4c535-178f  l-1f6d4c535-179f  l-1f6d4c535-17af  l-1f6d4c535-17bf  l-1f6d4c535-17c b xm ] ] ] ] ] ([ [[[[ g  <<  !f  l-1f6d4c535-184"f  l-1f6d4c535-185#f  l-1f6d4c535-186$f  l-1f6d4c535-187%f  l-1f6d4c535-188&f  l-1f6d4c535-189'f  l-1f6d4c535-18a(f  l-1f6d4c535-18b)!"#$%&'( *b ) +x*m ,]+ -]+ .g  bitwise-and/].+ 0]+ 1g  expt2]1+ 3]	+ 4]+ 54 6]+ 7]+ 8g  arithmetic-shift9]8+ :g  match-cell-clauses;[ <;挤=[[[< >g  tag-pattern?g  thing@>? Ag  m-1f6d4c535-194BA` CBxxxxxx Df  l-1f6d4c535-199Ef  l-1f6d4c535-19aFf  l-1f6d4c535-19bGf  l-1f6d4c535-19cHf  l-1f6d4c535-19dIf  l-1f6d4c535-19eJf  l-1f6d4c535-19fKDEFGHIJ Lb@CK MB Nf  l-1f6d4c535-196ON PboMO QxLmP R]Q S]Q T]:Q U[[[ Vg  inferior-objectW XBxx Yf  l-1f6d4c535-1aaZf  l-1f6d4c535-1ab[f  l-1f6d4c535-1ac\YZ[ ]bWX\ ^x]mP _]V^ `]^ ag  unmatched-tagb]a^ c`b dg  
match-celle f[eg[fhg  patternih jg  m-1f6d4c535-1b0kj` lkxxx mf  l-1f6d4c535-1b5nf  l-1f6d4c535-1b6of  l-1f6d4c535-1b7pf  l-1f6d4c535-1b8qmnop rbilq sk tf  l-1f6d4c535-1b2ut vbosu wxrmv x]w yg  port*z]yw {]w |]Tw }]:w ~g  begin]~w g  match-scm-clauses挤[[g  bit-pattern g  m-1f6d4c535-1c0` xxxx f  l-1f6d4c535-1c5f  l-1f6d4c535-1c6f  l-1f6d4c535-1c7f  l-1f6d4c535-1c8f  l-1f6d4c535-1c9 b  f  l-1f6d4c535-1c2 bo xm ] ]~ ]  x f  l-1f6d4c535-1d2f  l-1f6d4c535-1d3 b xm ] g  unmatched-scm]  g  	match-scm[g  clauses g  m-1f6d4c535-1d6` xx f  l-1f6d4c535-1dbf  l-1f6d4c535-1dcf  l-1f6d4c535-1dd b  f  l-1f6d4c535-1d8 bo xm ] g  bits*] ] g  %tc2-intg  
%tc3-imm24g  	%tc3-consg  	%tc3-int1g  	%tc3-int2g  	%tc8-charg  	%tc8-flagg  %tc3-structg  %tc7-symbolg  %tc7-variableg  %tc7-vectorg  
%tc7-wvectg  %tc7-stringg  %tc7-numberg  %tc7-hashtableg  %tc7-pointerg  
%tc7-fluidg  %tc7-stringbufg  %tc7-dynamic-stateg  
%tc7-frameg  %tc7-objcodeg  %tc7-vmg  %tc7-vm-continuationg  %tc7-bytevectorg  %tc7-programg  
%tc7-arrayg  %tc7-bitvectorg  	%tc7-portg  	%tc7-smobg  %tc16-bignumg  
%tc16-realg  %tc16-complexg  %tc16-fractiong  <stringbuf>g  %stringbuf-procedureg  	stringbufg  m-1f6d4c535-1e6` g  t-1f6d4c535-1e5  f  l-1f6d4c535-1eb b f  l-1f6d4c535-1e8 bo mtmmmm} ]^ g  stringxm ]  g  m-1f6d4c535-1e3` mtmmmmm ] ] ]
   xm ] g  pw g  %stringbuf?-procedureg  
stringbuf?g  m-1f6d4c535-1f3` g  t-1f6d4c535-1f2   f  l-1f6d4c535-1f8  b f  l-1f6d4c535-1f5 bo mtmmmm} ]^ mtm%mmmm*m/m3m8m=mBmGmLX 	] 
	 ]\ ]^ 	 ]a ]c 	 xm ]   
 xm ] g  stringbuf-contentsg  %stringbuf-contents-procedureg  m-1f6d4c535-1ff`  f  l-1f6d4c535-201 bo  mtmmmm} !]s  "r! #"[ $mtmmmmm %]~$ &r% 'Z#&[ ( )f  l-1f6d4c535-204*f  l-1f6d4c535-205+)* ,b(+ -,mtmmmm} .]- /]- 0x,m 1]0 2/1 32 4]$ 5r4 6Z#5[ 7f  l-1f6d4c535-2098f  l-1f6d4c535-20a978 :b(9 ;:mtmmmm} <]; =]; >:m ?]
> @=? A@ B]$ CrB DZ#C[ Ef  l-1f6d4c535-20eFf  l-1f6d4c535-20fGEF Hb(G IHmtmmmm} J]I K]I Lg  %%<stringbuf>-set-fieldsMxHm N]LM OKN PO Qg  t-1f6d4c535-1feRQ Sf  l-1f6d4c535-213TS UbRT VUmtmmmm} W]^V XUmtmmmmm Y]X ZY []X \]aX ]]cX ^]Y _xUm `]_ a\^` b]X cUm d]
c ebYd f]mX g]X h]_ igh jfYi k[aej lWZk mxm n]m og  m-1f6d4c535-21apo` qp rf  l-1f6d4c535-21fsf  l-1f6d4c535-220tf  l-1f6d4c535-221uf  l-1f6d4c535-222vf  l-1f6d4c535-223wrstuv xbqw yp zf  l-1f6d4c535-21c{z |boy{ }xm|tmmmm ~]} xxm| ] ]  g  set-record-type-printer!g  displayf  #<stringbuf g  writef  #>g  <inferior-struct>g  %inferior-struct-procedureg  inferior-structg  m-1f6d4c535-242` g  t-1f6d4c535-240g  t-1f6d4c535-241  f  l-1f6d4c535-247f  l-1f6d4c535-248 b  f  l-1f6d4c535-244 bo mtmmmm} ]^ xm ] g  fields]  g  m-1f6d4c535-23e` mtmmmmm ] ] ]
   xm ] g  pwpw g  %inferior-struct?-procedureg  m-1f6d4c535-251` g  t-1f6d4c535-250  f  l-1f6d4c535-256 b f  l-1f6d4c535-253 bo mtmmmm} ]^ mtm%mmmm*m/m3m8m=mBmGmLX ]  ]\ ]^  ]a ]c  xm ]    xm ] g  %inferior-struct-name-procedureg  m-1f6d4c535-25d`  f  l-1f6d4c535-25f bo mtmmmm} ]s r [ mtmmmmm ]~ r Z[  f  l-1f6d4c535-262f  l-1f6d4c535-263 b mtmmmm} ] ] xm ]   ] r Z[ f  l-1f6d4c535-267f  l-1f6d4c535-268 b mtmmmm} ] ] m ]
   ] r Z[ f  l-1f6d4c535-26cf  l-1f6d4c535-26d b mtmmmm} ] ] g  %%<inferior-struct>-set-fieldsxm ]     g  t-1f6d4c535-25c f  l-1f6d4c535-271 b mtmmmm} ]^ 	mtmmmmm 
]	 
 ]	 ]a	 ]c	 
 xm ]  ]	 m ]
 
 ]m	 ]	 ]H  
   xm ]  g  !%inferior-struct-fields-procedure!g  m-1f6d4c535-278"!` #" $f  l-1f6d4c535-27a%$ &bo#% '"m&tmmmm} (]s' )r( *)[ +m&tmmmmm ,]~+ -r, .Z*-[ /"" 0f  l-1f6d4c535-27d1f  l-1f6d4c535-27e201 3b/2 4"3m&tmmmm} 5]4 6]4 7x3m& 8]7 968 :9 ;]+ <r; =Z*<[ >f  l-1f6d4c535-282?f  l-1f6d4c535-283@>? Ab/@ B"Am&tmmmm} C]B D]B EAm& F]E GDF HG I]+ JrI KZ*J[ Lf  l-1f6d4c535-287Mf  l-1f6d4c535-288NLM Ob/N P"Om&tmmmm} Q]P R]P SxOm& T]S URT VU Wg  t-1f6d4c535-277XW Yf  l-1f6d4c535-28cZY [bX#Z \"[m&tmmmm} ]]^\ ^[m&tmmmmm _]^ `_ a]^ b]a^ c]c^ dc_ ex[m& f]e gbdf h]^ i[m& j]i kh_j l]m^ m]^ n]Ie omn pl_o qagkp r]`q sxm& t] s ug  m-1f6d4c535-293vu` wv xf  l-1f6d4c535-298yf  l-1f6d4c535-299zf  l-1f6d4c535-29a{f  l-1f6d4c535-29b|f  l-1f6d4c535-29c}xyz{| ~bw} v f  l-1f6d4c535-295 bo ~mtmmmm ] x~m ] ]H ]I  g  set-inferior-struct-fields!g  &%set-inferior-struct-fields!-procedureg  m-1f6d4c535-2a7` g  t-1f6d4c535-2a5g  t-1f6d4c535-2a6  f  l-1f6d4c535-2acf  l-1f6d4c535-2ad b  f  l-1f6d4c535-2a9 bo mtmmmm} ]^ g  t-1e8ba8b5a-18cg  t-1e8ba8b5a-18d g  m-1e8ba8b5a-18e`  f  l-1e8ba8b5a-192f  l-1e8ba8b5a-193 b g  setter f  l-1e8ba8b5a-186f  l-1e8ba8b5a-187f  l-1e8ba8b5a-188 b N f  l-1e8ba8b5a-17df  l-1e8ba8b5a-17e by g  field-specs f  l-1e8ba8b5a-179f  l-1e8ba8b5a-17a by mtmmm ] g  val]  ] ]a ]c  xm ]  g  struct-set!] m ]  ]m ] ]     xm ] g  make-parameterg  
vlist-nullg  
vhash-assqf  #-1#f  #<struct ~ag  
parameter?  g  	scm-errorg  wrong-type-argf  parameterizef  Not a parameter: ~Sg  vhash-consqg  for-eachf   #0#f   ~sf   ~x>g  object-addressg  print-inferior-structg  <inferior-fluid>g  %inferior-fluid-procedureg  inferior-fluidg  m-1f6d4c535-2de` g  t-1f6d4c535-2dcg  t-1f6d4c535-2dd  f  l-1f6d4c535-2e3f  l-1f6d4c535-2e4 b  f  l-1f6d4c535-2e0 bo mtmmmm} ]^ xm ]s ]  g  m-1f6d4c535-2da` mtmmmmm ]  ] ]
    xm ] s g  %inferior-fluid?-procedureg  m-1f6d4c535-2ed	` 
g  t-1f6d4c535-2ec
 	 f  l-1f6d4c535-2f2 b f  l-1f6d4c535-2ef bo 	mtmmmm} ]^ mtm%mmmm*m/m3m8m=mBmGmLX ]  ]\ ]^  ]a ]c  xm ]   !  "! #xm $]# %g   %inferior-fluid-number-procedure&g  m-1f6d4c535-2f9'&` (' )f  l-1f6d4c535-2fb*) +bo(* ,'m+tmmmm} -]s, .r- /.[ 0m+tmmmmm 1]~0 2r1 3Z/2[ 4'' 5f  l-1f6d4c535-2fe6f  l-1f6d4c535-2ff756 8b47 9'8m+tmmmm} :]9 ;]9 <x8m+ =]< >;= ?> @]0 Ar@ BZ/A[ Cf  l-1f6d4c535-303Df  l-1f6d4c535-304ECD Fb4E G'Fm+tmmmm} H]G I]G JFm+ K]
J LIK ML N]0 OrN PZ/O[ Qf  l-1f6d4c535-308Rf  l-1f6d4c535-309SQR Tb4S U'Tm+tmmmm} V]U W]U Xg  %%<inferior-fluid>-set-fieldsYxTm+ Z]XY [WZ \[ ]g  t-1f6d4c535-2f8^] _f  l-1f6d4c535-30d`_ ab^(` b'am+tmmmm} c]^b dam+tmmmmm e]d fe g]d h]ad i]cd jie kxam+ l]k mhjl n]d oam+ p]
o qnep r]md s]d t]Fk ust vreu wgmqv xcfw yxm+ z]%y {g  inferior-fluid-value|g  %inferior-fluid-value-procedure}g  m-1f6d4c535-314~}` ~ f  l-1f6d4c535-316 bo ~mtmmmm} ]s r [ mtmmmmm ]~ r Z[ ~~ f  l-1f6d4c535-319f  l-1f6d4c535-31a b ~mtmmmm} ] ] xm ]   ] r Z[ f  l-1f6d4c535-31ef  l-1f6d4c535-31f b ~mtmmmm} ] ] m ]   ] r Z[ f  l-1f6d4c535-323f  l-1f6d4c535-324 b ~mtmmmm} ] ] xm ]X   g  t-1f6d4c535-313 f  l-1f6d4c535-328 b ~mtmmmm} ]^ mtmmmmm ]  ] ]a ]c  xm ]  ] m ]  ]m ] ]{     xm ]| g  m-1f6d4c535-32f`  f  l-1f6d4c535-334f  l-1f6d4c535-335f  l-1f6d4c535-336f  l-1f6d4c535-337f  l-1f6d4c535-338 b  f  l-1f6d4c535-331 bo mtmmmm ] xm ] ]F ]{  f  #<fluid ~a ~x>g  error* * f  no matching patterng  <inferior-object>g  %%inferior-object-procedureg  %inferior-objectg  m-1f6d4c535-3a3` g  t-1f6d4c535-3a0g  t-1f6d4c535-3a1g  t-1f6d4c535-3a2  f  l-1f6d4c535-3a8f  l-1f6d4c535-3a9f  l-1f6d4c535-3aa b  f  l-1f6d4c535-3a5 bo mtmmmm} ]^  xm ]q  g  sub-kind]  ]   g  m-1f6d4c535-39e` mtmmmmm 	] 
]  ]
 	
  xm ] q g  %inferior-object?-procedureg  m-1f6d4c535-3b4` g  t-1f6d4c535-3b3  f  l-1f6d4c535-3b9 b f  l-1f6d4c535-3b6 bo mtmmmm} ]^ mtm%mmmm*m/m3m8m=mBmGmLX  ] !  "]\ #]^ $#  %]a &]c '&  (xm )]( *%') +"$* ,!+ -xm .]- /g  %inferior-object-kind-procedure0g  m-1f6d4c535-3c010` 21 3f  l-1f6d4c535-3c243 5bo24 61m5tmmmm} 7]s6 8r7 98[ :m5tmmmmm ;]~: <r; =Z9<[ >11 ?f  l-1f6d4c535-3c5@f  l-1f6d4c535-3c6A?@ Bb>A C1Bm5tmmmm} D]C E]C FxBm5 G]F HEG IH J]: KrJ LZ9K[ Mf  l-1f6d4c535-3caNf  l-1f6d4c535-3cbOMN Pb>O Q1Pm5tmmmm} R]Q S]Q TPm5 U]
T VSU WV X]: YrX ZZ9Y[ [f  l-1f6d4c535-3cf\f  l-1f6d4c535-3d0][\ ^b>] _1^m5tmmmm} `]_ a]_ bg  %%<inferior-object>-set-fieldscx^m5 d]bc ead fe gg  t-1f6d4c535-3bfhg if  l-1f6d4c535-3d4ji kbh2j l1km5tmmmm} m]^l nkm5tmmmmm o]n po q]n r]an s]cn tso uxkm5 v]u wrtv x]n ykm5 z]
y {xoz |]mn }]n ~]Bu }~ |o qw{ mp xm5 ]/ g  #%inferior-object-sub-kind-procedureg  m-1f6d4c535-3db`  f  l-1f6d4c535-3dd bo mtmmmm} ]s r [ mtmmmmm ]~ r Z[  f  l-1f6d4c535-3e0f  l-1f6d4c535-3e1 b mtmmmm} ] ] xm ]   ] r Z[ f  l-1f6d4c535-3e5f  l-1f6d4c535-3e6 b mtmmmm} ] ] m ]   ] r Z[ f  l-1f6d4c535-3eaf  l-1f6d4c535-3eb b mtmmmm} ] ] xm ]b   g  t-1f6d4c535-3da f  l-1f6d4c535-3ef b mtmmmm} ]^ mtmmmmm ]  ] ]a ]c  xm ]  ] m ]  ]m ] ]C     xm ] g  "%inferior-object-address-procedureg  m-1f6d4c535-3f6`  f  l-1f6d4c535-3f8 bo mtmmmm} ]s r [ mtmmmmm ]~ r Z[  f  l-1f6d4c535-3fbf  l-1f6d4c535-3fc b mtmmmm} ] ] xm ]   ] r Z[ f  l-1f6d4c535-400f  l-1f6d4c535-401 b mtmmmm} ] ] m 	 ]	 		  		 	] 	r	 	Z	[ 	f  l-1f6d4c535-405	f  l-1f6d4c535-406			 		b	 	
		mtmmmm} 	]	
 	]	
 	x		m 	]b	 			 		 	g  t-1f6d4c535-3f5		 	f  l-1f6d4c535-40a		 	b		 		mtmmmm} 	]^	 		mtmmmmm 	]	 		 	]	 	]a	 	]c	 			 	x	m 	 ]	 	!			  	"]	 	#	m 	$]		# 	%	"		$ 	&]m	 	']	 	(]D	 	)	'	( 	*	&		) 	+		!	%	* 	,			+ 	-xm 	.]	- 	/g  m-1f6d4c535-411	0	/` 	1	0 	2f  l-1f6d4c535-416	3f  l-1f6d4c535-417	4f  l-1f6d4c535-418	5f  l-1f6d4c535-419	6f  l-1f6d4c535-41a	7	2	3	4	5	6 	8b	1	7 	9	0 	:f  l-1f6d4c535-413	;	: 	<bo	9	; 	=	8m	<tmmmm 	>]	= 	?x	8m	< 	@]	? 	A]B	? 	B]C	? 	C]D	? 	D	A	B	C 	Ef  #<~a ~:[~*~;~a ~]~x>	Fg  smob	Gg  inferior-smob	Hg  inferior-port	Ig  %visited-cells	Jg  visited	Kg  ->	Lg  m-1f6d4c535-525	M	L` 	N	M 	Of  l-1f6d4c535-527	P	O 	Qbo	N	P 	Rxm	Q 	S]	K	R 	Tr	S 	U[	T[ 	V	U挤	W[	V	Xg  parameterize	Yg  object	Z	Y 	[	Mxxx 	\f  l-1f6d4c535-52a	]f  l-1f6d4c535-52b	^f  l-1f6d4c535-52c	_f  l-1f6d4c535-52d	`	\	]	^	_ 	ab	Z	[	` 	bx	am	Q 	c]	X	b 	d]	I	b 	eg  vhash-consv	f]	e	b 	g	d 	h	g 	ig  symbol->string	jg  string-length	kg  bytevector->uint-list	lg  invalid-struct	mg  address->inferior-struct	ng  and=>	og  
vhash-assv	pg  cdr	qg  cell->object	rg  string->symbol	sg  variable	tg  	substring	ug  bytevector->string	vf  
ISO-8859-1	wg  bitwise-ior	xg  little	yf  UTF-32LE	zg  big	{f  UTF-32BE	|g  make-vector	}g  fold	~g  weak-vector	g  dynamic-state	g  program	g  bignum	g  double	g  
hash-table	g  objcode	g  vm	g  vm-continuation	g  array	g  	bitvector	g  bit-set?	g  integer->char	g  	undefined	g  
eof-object	g  unboundC 5h    ]4	
89K5 4N >  "  G   4OiP5:RQ  h      ]  C         g  peek
		 g  open		 g  	type-name			  g  filenamef  system/base/types.scm
	D
 			  g  nameg  %memory-backend-procedure CRR4U;VY\  h   k   ]  C  c       g  t-1f6d4c535-3
		 g  t-1f6d4c535-4		 g  t-1f6d4c535-5			  			   C; h   X   ]L 6    P       g  a
		  g  filenamef  system/base/types.scm		D
 		   CZ        h   H   ] L 6@       g  filenamef  system/base/types.scm		D
 		
   C  h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/base/types.scm
	D
 		n   C5;RQ  4 Q>  "  G   	Ri  QRQ   h      ] $   CC      x       g  obj
		  g  filenamef  system/base/types.scm
	D
 		  g  nameg  %memory-backend?-procedure CR4U<VYj        h   6   ]  C      .       g  t-1f6d4c535-16
		
  		
   C<      h   X   ]L 6    P       g  a
		  g  filenamef  system/base/types.scm		D
 		   CZ        h   H   ] L 6@       g  filenamef  system/base/types.scm		D
 		
   Cl h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/base/types.scm
	D
 		n   C5<RQop      h      ] &   
C 6z       g  s
		  g  filenamef  system/base/types.scm
	D
 		  g  nameg  %memory-backend-peek-procedure CqR4UpVY  h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C    h   6   ]  C      .       g  t-1f6d4c535-22
		
  		
   Cp     h   X   ]L 6    P       g  a
		  g  filenamef  system/base/types.scm		D
 		   CZ        h   H   ] L 6@       g  filenamef  system/base/types.scm		D
 		
   C h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/types.scm
	D
 	    C5pRQo h      ] &   C 6z       g  s
		  g  filenamef  system/base/types.scm
	D
 		  g  nameg  %memory-backend-open-procedure CR4UVY  h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C!', h   :   ]C     2       g  err
		 g  s		  			   CH    h   6   ]  C      .       g  t-1f6d4c535-3d
		
  		
   C     h   X   ]L 6    P       g  a
		  g  filenamef  system/base/types.scm		D
 		   CZ        h   H   ] L 6@       g  filenamef  system/base/types.scm		D
 		
   CJ h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/types.scm
	D
 	    C5RQoK h       ] &   	C 6              g  s
		  g  filenamef  system/base/types.scm
	D
 		  g  nameg  #%memory-backend-type-name-procedure CLR4UKVYZaf     h   :   ]C     2       g  err
		 g  s		  			   Ciot h   :   ]C     2       g  err
		 g  s		  			   Cw} h   :   ]C     2       g  err
		 g  s		  			   C    h   6   ]  C      .       g  t-1f6d4c535-58
		
  		
   CK     h   X   ]L 6    P       g  a
		  g  filenamef  system/base/types.scm		D
 		   CZ        h   H   ] L 6@       g  filenamef  system/base/types.scm		D
 		
   C h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/types.scm
	D
 	    C5KR4UVY    h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  system/base/types.scm
	D
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5RQi: h(      ]4 545
45 6           g  address
		$ g  ptr			$ g  bv			$  g  filenamef  system/base/types.scm
	O			P				P			Q			P			R	"	$	R	 		$  g  nameg  dereference-word C        h@      ]4M 5454
 >  "  G  M N C              g  bv
		9 g  index		9 g  count			9 g  ptr				9 g  mem			9  g  filenamef  system/base/types.scm
	W			X				X			Y			X			Z	
	4	[	 	6	[	
 			9	  g  nameg  read-memory! C 	    hX   )  ]H K$  4 54564O 54>  "  G  C     !      g  address
		S g  size		S g  current-address			S g  ptr			) g  bv		!	) g  port		:	S  g  filenamef  system/base/types.scm
	T			^			_			_	
		`		!	_	
	)	a		*	b		.	b	5	:	b		:	b	
	=	e	 		S	  g  nameg  open C =RQop    h(      ]
 &   
"  	4 56           g  backend
		$ g  address		$ g  peek			$  g  filenamef  system/base/types.scm
	j
		l			l		$	m	 		$	  g  nameg  % dereference-word-procedure CR4U>VY#   h   R   ]  C    J       g  t-1f6d4c535-c4
		 g  t-1f6d4c535-c5		  			   C>  h   X   ]L 6    P       g  a
		  g  filenamef  system/base/types.scm		j
 		   CZ%       h   H   ] L 6@       g  filenamef  system/base/types.scm		j
 		
   C' h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/base/types.scm
	j
 		n   C5>R4U?VY(789;     h    W   ]    C O       g  dummy
		 g  backend		 g  address			  			   C<GIOPQR        h0   i   ]       C  a       g  dummy
		. g  backend		. g  address			. g  size			.  		.	   C        h@     ]4 5$  @4 5$  @ 6       z      g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  system/base/types.scm
	p	 		9  g  documentationf  Return an input port to the SIZE bytes at ADDRESS, using BACKEND.  When
SIZE is omitted, return an unbounded port to the memory at ADDRESS.g  
macro-typeg  syntax-rulesg  patternsg  backendg  address g  backendg  addressg  size   C5?RS:  h       ]	4 5
45 6            g  port
		 g  bv		  g  filenamef  system/base/types.scm
	~
	 		 		 		 	 		  g  nameg  get-wordg  documentationf  2Read a word from PORT and return it as an integer. CTRQoK      h0      ] &  	 	"  	4 5$  6C        g  backend
		/ g  kind		/ g  number			/ g  proc			/  g  filenamef  system/base/types.scm
 
	 		 		% 		- 	 		/	  g  nameg  % type-number->name-procedure CUR4U@VY\     h   q   ]  C  i       g  t-1f6d4c535-101
		 g  t-1f6d4c535-102		 g  t-1f6d4c535-103			  			   C@   h   Y   ]L 6    Q       g  a
		  g  filenamef  system/base/types.scm	 
 		   CZ%      h   I   ] L 6A       g  filenamef  system/base/types.scm	 
 		
   C        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/base/types.scm
 
 		n   C5@R4UVY 
   h@      ]     	  C~       g  dummy
		@ g  port		@ g  name			@ g  len			@ g  rest			@ g  body			@  		@	   C  h(   u   ]     C      m       g  dummy
		" g  port		" g  name			" g  rest			" g  body			"  		"	   C      h   Q   ]C   I       g  dummy
		 g  port		 g  body			  			   C 
       hP   ?  ]4 5$  @4 5$  @4 5$  @	 67      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  system/base/types.scm
 	 		P  g  
macro-typeg  syntax-rulesg  patternsg  portg  
bytevectorg  nameg  len g  restg  ... g  body g  portg  nameg  restg  ... g  body g  portg  body   C5R4UVY    hP      , 3            C        g  dummy
		O g  bits		O g  a			O g  b			O g  n			O g  c			O g  
consequent			O g  	alternate			O  		O	   C        h@      ]         C             g  dummy
		: g  bits		: g  x			: g  n			: g  c			: g  
consequent			: g  	alternate			:  		:	   C       h0      ]      C            g  dummy
		+ g  bits		+ g  n			+ g  c			+ g  
consequent			+ g  	alternate			+  		+	   C,-/0235679       hX      , 3     	 
       C        g  dummy
		W g  bits		W g  a			W g  <<			W g  n			W g  c			W g  
consequent			W g  	alternate			W  		W	   C      hh     ]!4 5$  @4 5$  @4 5$  @4 5$  	@
 6       g  x
		g g  tmp		g g  tmp		"	g g  tmp		9	g g  tmp		P	g  g  filenamef  system/base/types.scm
 	 		g  g  
macro-typeg  syntax-rulesg  patternsg  bitsg  ag  ||g  b g  &g  ng  =g  c g  
consequentg  	alternate g  bitsg  xg  &g  ng  =g  c g  
consequentg  	alternate g  bitsg  _g  &g  ng  =g  c g  
consequentg  	alternate g  bitsg  ag  <<g  n g  ||g  c g  
consequentg  	alternate   C5R4U:VY=RST  h(      ]   C             g  dummy
		" g  port		" g  tag			" g  tag-pattern			" g  thing			" g  body			" g  rest			"  		"	   CU_c   h   P   ] C    H       g  dummy
		 g  port		 g  tag			  			   C h@     ]4 5$  @4 5$  @ 6             g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  system/base/types.scm
 	 		9  g  
macro-typeg  syntax-rulesg  patternsg  portg  tagg  tag-patterng  thingg  ... g  body g  restg  ...  g  portg  tag   C5:R4UdVYgxz{|}      h   X   ]  C   P       g  tmp-1f6d4c535-1be
		 g  tmp-1f6d4c535-1bd		  			   C     h8   f   ]    45  C      ^       g  dummy
		2 g  port		2 g  pattern			2 g  body			2  		2	   C   h(   B  ]	4 5$  @ 6      :      g  x
		" g  tmp		"  g  filenamef  system/base/types.scm
 	 		"  g  documentationf  fMatch a cell---i.e., a non-immediate value other than a pair.  The
cell's contents are read from PORT.g  
macro-typeg  syntax-rulesg  patternsg  portg  patterng  bodyg  ... g  ...   C5dR4UVY     h    |   ] C       t       g  dummy
		 g  bits		 g  bit-pattern			 g  body			 g  rest			  			   C  h   ?   ]C   7       g  dummy
		 g  bits		  			   C  h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  system/base/types.scm
 	 		9  g  
macro-typeg  syntax-rulesg  patternsg  bitsg  bit-patterng  bodyg  ... g  restg  ... g  bits   C5R4UVY h    T   ]   C      L       g  dummy
		 g  bits		 g  clauses			  			   C     h(   ,  ]	4 5$  @ 6      $      g  x
		" g  tmp		"  g  filenamef  system/base/types.scm
 	 		"  g  documentationf bMatch BITS, an integer representation of an 'SCM' value, against
CLAUSES.  Each clause must have the form:

  (PATTERN BODY ...)

PATTERN is a bit pattern that may specify bitwise operations on BITS to
determine if it matches.  TEMPLATE specify the name of the variable to bind
the matching bits, possibly with bitwise operations to extract it from BITS.g  
macro-typeg  syntax-rulesg  patternsg  bitsg  clausesg  ...   C5R	R	R
RiRi	R	iRi
RR	R	R	R	R	R	R	R	R	%R	'R	-R	/R	5R	7R	GR	MR	OR	UR	WR	}R	Ri Ri Ri Ri R   h   ~   ]  C      v       g  string
		
  g  filenamef  system/base/types.scm

 		
  g  nameg  %stringbuf-procedure CR4UVY h   7   ]  C      /       g  t-1f6d4c535-1e5
		
  		
   C    h   Y   ]L 6    Q       g  a
		  g  filenamef  system/base/types.scm	
 		   CZ       h   I   ] L 6A       g  filenamef  system/base/types.scm	
 		
   C        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/base/types.scm

 		n   C5R  4 >  "  G   	i  R  h   |   ] $   CC      t       g  obj
		  g  filenamef  system/base/types.scm

 		  g  nameg  %stringbuf?-procedure CR4UVY   h   7   ]  C      /       g  t-1f6d4c535-1f2
		
  		
   C    h   Y   ]L 6    Q       g  a
		  g  filenamef  system/base/types.scm	
 		   CZ       h   I   ] L 6A       g  filenamef  system/base/types.scm	
 		
   C        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/base/types.scm

 		n   C5Ro   h      ] &   
C 6z       g  s
		  g  filenamef  system/base/types.scm

 		  g  nameg  %stringbuf-contents-procedure CR4UVY'.3  h   :   ]C     2       g  err
		 g  s		  			   C6<A h   :   ]C     2       g  err
		 g  s		  			   CDJP h   :   ]C     2       g  err
		 g  s		  			   Cl    h   7   ]  C      /       g  t-1f6d4c535-1fe
		
  		
   C    h   Y   ]L 6    Q       g  a
		  g  filenamef  system/base/types.scm	
 		   CZ       h   I   ] L 6A       g  filenamef  system/base/types.scm	
 		
   Cn        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/types.scm

 	    C5R4ULVY~   h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  system/base/types.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5LR4iio  hP      ]4>  "  G  4 &   
"  	4 5>  "  G  6             g  	stringbuf
		J g  port		J  g  filenamef  system/base/types.scm
					%						#	:		F	%	J	 
		J	   C>  "  G   h      ]  C           g  name
		 g  fields		  g  filenamef  system/base/types.scm

 			  g  nameg  %inferior-struct-procedure CR4UVY h   T   ]  C    L       g  t-1f6d4c535-240
		 g  t-1f6d4c535-241		  			   C       h   Y   ]L 6    Q       g  a
		  g  filenamef  system/base/types.scm	
 		   CZ       h   I   ] L 6A       g  filenamef  system/base/types.scm	
 		
   C        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/base/types.scm

 		n   C5R  4 >  "  G   	i  R  h      ] $   CC      z       g  obj
		  g  filenamef  system/base/types.scm

 		  g  nameg  %inferior-struct?-procedure CR4UGVY      h   7   ]  C      /       g  t-1f6d4c535-250
		
  		
   CG     h   Y   ]L 6    Q       g  a
		  g  filenamef  system/base/types.scm	
 		   CZ       h   I   ] L 6A       g  filenamef  system/base/types.scm	
 		
   C        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/base/types.scm

 		n   C5GRoH     h      ] &   
C 6|       g  s
		  g  filenamef  system/base/types.scm

 		  g  nameg  %inferior-struct-name-procedure CR4UHVY h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C    h   7   ]  C      /       g  t-1f6d4c535-25c
		
  		
   CH     h   Y   ]L 6    Q       g  a
		  g  filenamef  system/base/types.scm	
 		   CZ       h   I   ] L 6A       g  filenamef  system/base/types.scm	
 		
   C        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/types.scm

 	    C5HRoI h      ] &   C 6~       g  s
		  g  filenamef  system/base/types.scm

 		  g  nameg  !%inferior-struct-fields-procedure C R4UIVY.5:       h   :   ]C     2       g  err
		 g  s		  			   C=CH h   :   ]C     2       g  err
		 g  s		  			   CKQV h   :   ]C     2       g  err
		 g  s		  			   Cr    h   7   ]  C      /       g  t-1f6d4c535-277
		
  		
   CI     h   Y   ]L 6    Q       g  a
		  g  filenamef  system/base/types.scm	
 		   CZ       h   I   ] L 6A       g  filenamef  system/base/types.scm	
 		
   Ct        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/types.scm

 	    C5IR4UVY    h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  system/base/types.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5Ro h       ] &   C 6             g  s
		 g  val		  g  filenamef  system/base/types.scm

 			  g  nameg  &%set-inferior-struct-fields!-procedure CR4UVY   h   T   ]  C    L       g  t-1f6d4c535-2a5
		 g  t-1f6d4c535-2a6		  			   C       h   Y   ]L 6    Q       g  a
		  g  filenamef  system/base/types.scm	
 		   CZ       h   I   ] L 6A       g  filenamef  system/base/types.scm	
 		
   C        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/base/types.scm

 		n   C5R4ii5 /oH/ h       ] L&  L 6L  6           g  field
		  g  filenamef  system/base/types.scm
/		
0		1	'	1		2	+	2	 		   CI   h   9  ]4 4L 5 5$  64 &   
"  	4 5>  "  G  4L 5$  "  4	
L  >  "  G  L 4L 	4 4L 5 55Y4 O  &   "  	4 5>  "  G  Z4 56       1      g  struct
	  g  port	   g  filenamef  system/base/types.scm
'		(	
	(		(	
	(		)		)	
	+		!+		$,		@+		I-		~.	 .	3 .	 -	 /	 3	 /	 4	 4	  4	 	 	   C O  R4iii>  "  G         h      ]  C           g  number
		 g  value		  g  filenamef  system/base/types.scm
9
 			  g  nameg  %inferior-fluid-procedure CR4UVY h   T   ]  C    L       g  t-1f6d4c535-2dc
		 g  t-1f6d4c535-2dd		  			   C       h   Y   ]L 6    Q       g  a
		  g  filenamef  system/base/types.scm	9
 		   CZ       h   I   ] L 6A       g  filenamef  system/base/types.scm	9
 		
   C        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/base/types.scm
9
 		n   C5R  4 >  "  G   	i  R  h      ] $   CC      y       g  obj
		  g  filenamef  system/base/types.scm
9
 		  g  nameg  %inferior-fluid?-procedure CR4UEVY"       h   7   ]  C      /       g  t-1f6d4c535-2ec
		
  		
   CE     h   Y   ]L 6    Q       g  a
		  g  filenamef  system/base/types.scm	9
 		   CZ       h   I   ] L 6A       g  filenamef  system/base/types.scm	9
 		
   C$        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/base/types.scm
9
 		n   C5ERoF     h      ] &   
C 6}       g  s
		  g  filenamef  system/base/types.scm
9
 		  g  nameg   %inferior-fluid-number-procedure C%R4UFVY3:?        h   :   ]C     2       g  err
		 g  s		  			   CBHM h   :   ]C     2       g  err
		 g  s		  			   CPV\ h   :   ]C     2       g  err
		 g  s		  			   Cx    h   7   ]  C      /       g  t-1f6d4c535-2f8
		
  		
   CF     h   Y   ]L 6    Q       g  a
		  g  filenamef  system/base/types.scm	9
 		   CZ       h   I   ] L 6A       g  filenamef  system/base/types.scm	9
 		
   Cz        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/types.scm
9
 	    C5FRo{        h      ] &   C 6|       g  s
		  g  filenamef  system/base/types.scm
9
 		  g  nameg  %inferior-fluid-value-procedure C|R4U{VY        h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C    h   7   ]  C      /       g  t-1f6d4c535-313
		
  		
   C{    h   Y   ]L 6    Q       g  a
		  g  filenamef  system/base/types.scm	9
 		   CZ       h   I   ] L 6A       g  filenamef  system/base/types.scm	9
 		
   C        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/types.scm
9
 	    C5{R4UXVY   h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  system/base/types.scm
9
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5XR4ii/)    hH      ]
 $  - &   
4 564 56 4 56             g  fluid
		C g  port		C g  w			)  g  filenamef  system/base/types.scm
@		A		C	,	!E	'	)C		*A	 		C	   C>  "  G   h      ]  C         g  kind
		 g  sub-kind		 g  address			  g  filenamef  system/base/types.scm
J
 			  g  nameg  %%inferior-object-procedure CR4UVY\  h   q   ]  C  i       g  t-1f6d4c535-3a0
		 g  t-1f6d4c535-3a1		 g  t-1f6d4c535-3a2			  			   C  h   Y   ]L 6    Q       g  a
		  g  filenamef  system/base/types.scm	J
 		   CZ       h   I   ] L 6A       g  filenamef  system/base/types.scm	J
 		
   C        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/base/types.scm
J
 		n   C5R  4 >  "  G   	i  R   h      ] $   CC      z       g  obj
		  g  filenamef  system/base/types.scm
J
 		  g  nameg  %inferior-object?-procedure CR4UAVY,      h   7   ]  C      /       g  t-1f6d4c535-3b3
		
  		
   CA     h   Y   ]L 6    Q       g  a
		  g  filenamef  system/base/types.scm	J
 		   CZ       h   I   ] L 6A       g  filenamef  system/base/types.scm	J
 		
   C.        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/base/types.scm
J
 		n   C5ARoB     h      ] &   
C 6|       g  s
		  g  filenamef  system/base/types.scm
J
 		  g  nameg  %inferior-object-kind-procedure C/R4UBVY=DI h   :   ]C     2       g  err
		 g  s		  			   CLRW h   :   ]C     2       g  err
		 g  s		  			   CZ`f h   :   ]C     2       g  err
		 g  s		  			   C    h   7   ]  C      /       g  t-1f6d4c535-3bf
		
  		
   CB     h   Y   ]L 6    Q       g  a
		  g  filenamef  system/base/types.scm	J
 		   CZ       h   I   ] L 6A       g  filenamef  system/base/types.scm	J
 		
   C        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/types.scm
J
 	    C5BRoC h      ] &   C 6       g  s
		  g  filenamef  system/base/types.scm
J
 		  g  nameg  #%inferior-object-sub-kind-procedure CR4UCVY     h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C    h   7   ]  C      /       g  t-1f6d4c535-3da
		
  		
   CC     h   Y   ]L 6    Q       g  a
		  g  filenamef  system/base/types.scm	J
 		   CZ       h   I   ] L 6A       g  filenamef  system/base/types.scm	J
 		
   C        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/types.scm
J
 	    C5CRoD h       ] &   	C 6              g  s
		  g  filenamef  system/base/types.scm
J
 		  g  nameg  "%inferior-object-address-procedure CR4UDVY      h   :   ]C     2       g  err
		 g  s		  			   C	 h   :   ]C     2       g  err
		 g  s		  			   C			 h   :   ]C     2       g  err
		 g  s		  			   C	,    h   7   ]  C      /       g  t-1f6d4c535-3f5
		
  		
   CD     h   Y   ]L 6    Q       g  a
		  g  filenamef  system/base/types.scm	J
 		   CZ       h   I   ] L 6A       g  filenamef  system/base/types.scm	J
 		
   C	.        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/types.scm
J
 	    C5DR4UbVY	>	@	D    h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  system/base/types.scm
J
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5bR       h(   U  )   3   C]  C      M      g  kind
			 g  address			 g  kind
		" g  sub-kind		" g  address			"  g  filenamef  system/base/types.scm
R		V		R		!X	 				 		"	  g  nameg  inferior-objectg  documentationf  SReturn an object representing an inferior object at ADDRESS, of type
KIND/SUB-KIND. CVR4ii/	E)        hP      ] $  9 &  # 
  	64 56 4 56         g  io
		O g  port		O g  w			5 g  w			5 g  w		#	5  g  filenamef  system/base/types.scm
[		\		+^	,	5^		6\	 		O	   C>  "  G  V	FQoK    hX   _  ] &  	 	"  	4 5$  45"  $  "  6       W      g  backend
		Q g  type-number		Q g  address			Q g  proc		!	: g  t		:	M  g  filenamef  system/base/types.scm
b
	e			f		.f	2	2f		:f		Qe	 		Q	  g  nameg  inferior-smobg  documentationf  LReturn an object representing the SMOB at ADDRESS whose type is
TYPE-NUMBER. C	GRVQoK   hX   _  ] &  	 	"  	4 5$  45"  $  "  6       W      g  backend
		Q g  type-number		Q g  address			Q g  proc		!	: g  t		:	M  g  filenamef  system/base/types.scm
j
	m			n		.n	2	2n		:n		Qm	 		Q	  g  nameg  inferior-portg  documentationf  LReturn an object representing the port at ADDRESS whose type is
TYPE-NUMBER. C	HR4ii5	IR4U	JVY	W	c	d	f	h      h    h   ]  C    `       g  dummy
		 g  address		 g  object			 g  body			  			   C h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  system/base/types.scm
y	 		"  g  
macro-typeg  syntax-rulesg  patternsg  addressg  ->g  object g  bodyg  ...   C5	JR:QopJ	i	jLS	I	eJ   h   g   ] L 6      _       g  t-1f6d4c535-5af
		
  g  filenamef  system/base/types.scm
	 		
   C	kV	l       h    ]s
&  
"  	454545	&  
"  	454545$ 745	4	5	
 &  
"  	4545

$  4	5"  +&  "  	4
54
54
5 45$  "  4 >  "  G  4	4 45 55Y4O 445 55&  "  4>  "  G  ZCZF 6             g  address
	 g  vtable-data-address	 g  backend		 g  layout-address			 g  peek		%	1 g  layout-bits		1 g  layout		< g  name-address		F g  peek		b	n g  	name-bits		n g  name		y g  layout		  g  len	
  g  address	   g  peek	   g  slots	  g  open	 
 g  port	
 g  fields	 g  result	" g  t-1f6d4c535-5a8	& g  values	  g  filenamef  system/base/types.scm

											1		4		<		E		F		F		K		n		q		y		~	 	 	 	 	 	 	 	1 	 	 	2 		2	
			.		"	"	&	
p	z		6						 /		  g  nameg  address->inferior-structg  documentationf  ^Read the struct at ADDRESS using BACKEND.  Return an 'inferior-struct'
object representing it. C	mR=	n	o	I	pQoT	m	q	r)V	s	tS:	u	v	w	x	y	z	{L.18	|	e	}      h      ]L  C   |       g  element
		 g  index		  g  filenamef  system/base/types.scm
						 			   CJ   h   g   ] L 6      _       g  t-1f6d4c535-732
		
  g  filenamef  system/base/types.scm
	 		
   C	k	~		H		O	s							Ga X     h  
  - . , 3 #  44 45 55$  C&  "  	454 54	5	
$   
6	$  n4	54	>  "  G  4	>  "  G  45$  "&  
6456 456 $  4	>  "  G   6$  c4	54	5	4	5
45$  )&  
		
6456 456 $  Q4	5	4	5	

$  "  4>  "  G  4
5 C		4 5$  4	5
4	
5	

$  "  4>  "  G  445 &   "  !&  ""  4455 5 C	

#$  W4	54	5
$  4$%5"  (&  "  	454564&4'		55($  4)	54	>  "  G  4)	5454*54+5$  "  4,-./ >  "  G  4	40 45 55Y412O 
434O 4545 55>  "  G  ZCZF	6$  7 64&4'		558$  &4)	54	>  "  G  9 C	:$  ; 64&4'		55<$  4)	5=  6	>$  ? 6      @$  A 6B$  }4	>  "  G   	4CD5
$  4$%5"  -&  "  	4544CD5544CD55
45 CE$  4	>  "  G  F 6G$  >4	>  "  G  4	>  "  G  4	>  "  G  H 6I$  4	5J6K$  L 6M$  N 6O$  P 6Q$  R 6S$  T 64&4'		55U$  '4)	54	>  "  G  V 6W6 }
      g  address
	 g  backend	 g  t		) g  open		N	[ g  port		[ g  tag		d g  tag		k g  tag	  g  buf	  g  v	  g  w	   g  tag	 g  tag	* g  buf	< g  start		E g  len	
N g  v	Y g  w	o~ g  tag	 g  len		 g  buf	
 g  	remainder	 g  string	 g  tag		 g  len	
 g  buf	, g  	remainder	, g  v	] g  string	 g  tag	
 g  len	 g  address	 g  open	 g  bv-port	 g  tag	 g  len	$ g  len	A g  words	O g  vector	X g  t-1f6d4c535-729	\ g  tag	 g  tag	 g  n	7 g  tag	< g  tag	` g  
flags+type	t g  tag	 g  tag	 g  tag	 g  address	E g  open	) g  port	)E g  words	9E g  tag	G g  tag	n g  tag	 g  address	 g  tag	 g  tag	 g  tag	 g  tag	 g  tag	) g  tag	M g  	smob-type	a  @g  filenamef  system/base/types.scm

						!	%		)		)		7		[		^			% 	 	 	 	 		$	(	*	Q	|	&~					.					"	 $	)	 ,	T	Y	.i	9o	.w	6|	.						 	9	A	D	M	1O	O	R	X	\					7							6	<	K	O	P		"									&			8		8&	)	,	1	29	9	?	1D	G	h	l	n															#	'	)	8	<	=			 |	  g  nameg  cell->objectg  documentationf  WReturn an object representing the object at ADDRESS, reading from memory
using BACKEND. C	qR=.18Qop		n	o	I	p:	eJ	q	V			   h   |  - . , 3 
#  4 4		55$   	6 	$  &  
"  	4	54 54

5$  44 45 55$  C 45$  "  4 >  "  G  4	4 45 55Y454&  
"  	4	5	4	5	5ZCZF 64 4		55$  4 	564 4		55$  q4 	5
$  C$  C	$  C	$  C	$  C		$   6	
$  6 	$   6CC t      g  bits
	 g  backend	 g  tag		' g  tag		? g  peek		d	p g  type		pB g  pair?		{B g  t	 : g  cdrloc	 : g  pair	 : g  t-1f6d4c535-80f	 : g  peek		#/ g  tag	S g  char	go g  tag	 g  flag	  g  filenamef  system/base/types.scm

			M		p		s		{		{	 	 	 	 	* 	 	 	 	 	 	 	 	"			*3	4 	B	C	o	p												 (	  g  nameg  scm->objectg  documentationf  LReturn the Scheme object corresponding to BITS, the bits of an 'SCM'
object. CJRC             g  m
		, g  rtd
 g  rtd
AB g  rtd
PQ g  %printed-struct
cf g  rtd
jj g  rtd
~  g  filenamef  system/base/types.scm		
	-	B		3	B	
	5	B		8	@
	D
	h	 	K
		j
$	~
%P 
= 
= 
= 
= 
= 	= 
= 	= 
= 	= 
= 
= 
= 
= 
= 
> 
> 
> 
> 
> 
>  
>& 
>,
>2
>8
>>
>D
>J
>P
>V
>\	
>b

>j	$>k	>o
>w	">x	>|
>	%>	>
>	&>	>
?:
L#
N"
c&	c&	f%
f6
g9
y?
{J
      Q
      Z
      b
      j
      v	      r
      
      
      
 K	      
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                            ccache/system/base/ck.go                                                                            0000644                 00000007540 15154557173 0011157 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0H      ]  4      h      ] g  guile	 	g  define-module*	 	 	g  system	g  base	g  ck		 	
g  filenameS	f  system/base/ck.scm	g  exportsS	 	g  set-current-module	 	 	g  make-syntax-transformer	 	 	g  macro	g  $sc-dispatch	 	 	g  any	g  free-id	g  syntax-object	g  quote	g  top	 	g  ribcage	 	 g  x	!  	"g  m-1e97f9b4a-48	#" 	$# 	%f  l-1e97f9b4a-4a	&% 	'!$& 	(' 	)g  hygiene	*) 	+(* 	,+ 	-, 	.- 	/g  each-any	0//	10	21- 	3g  ck-arg	4g  dummy	5g  op	6g  ea	7g  s	8g  v	945678 	:# 	;f  l-1e97f9b4a-52	<f  l-1e97f9b4a-53	=f  l-1e97f9b4a-54	>f  l-1e97f9b4a-55	?f  l-1e97f9b4a-56	@;<=>? 	A9:@ 	BA' 	C3B* 	Dg  append	ED 	FD 	GB* 	H/	IH 	J4756 	K# 	Lf  l-1e97f9b4a-5f	Mf  l-1e97f9b4a-60	Nf  l-1e97f9b4a-61	Of  l-1e97f9b4a-62	PLMNO 	QJKP 	RQ' 	S3R* 	Tg  syntax-violation	UT 	VT 	Wf  -source expression failed to match any pattern	Xg  m-1e97f9b4a-68	YX 	ZY 	[f  l-1e97f9b4a-6a	\[ 	]!Z\ 	^] 	_^* 	`_ 	a` 	ba/	c/b	dc	ed	fg  ea1	g4758f 	hY 	if  l-1e97f9b4a-77	jf  l-1e97f9b4a-78	kf  l-1e97f9b4a-79	lf  l-1e97f9b4a-7a	mf  l-1e97f9b4a-7b	nijklm 	oghn 	po] 	q3p* 	rp* 	s/H	ts	ut	v4756f 	wf  l-1e97f9b4a-84	xf  l-1e97f9b4a-85	yf  l-1e97f9b4a-86	zf  l-1e97f9b4a-87	{f  l-1e97f9b4a-88	|wxyz{ 	}vh| 	~}] 	~* C 5     h  V   ]4	
5 4 >  "  G   4.  h   <   ]C   4       g  dummy
		 g  v		  			   C2CFG        h    k   ]4  5C   c       g  dummy
		 g  op		 g  ea			 g  s			 g  v			  			   CIS     h   \   ] C       T       g  dummy
		 g  s		 g  op			 g  ea			  			   CVW 
    hP   "  ]4 5$  @4 5$  @4 5$  @	 6      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  system/base/ck.scm
	$	 		P  g  
macro-typeg  syntax-rulesg  patternsg  quoteg  v  g  opg  ... g  eag  ... g  sg  quoteg  v  g  sg  opg  eag  ...    C5R43I   h   \   ]C     T       g  dummy
		 g  s		 g  op			 g  va			  			   CeqFr        h    l   ]4  5C   d       g  dummy
		 g  s		 g  op			 g  v			 g  ea1			  			   Cu    h   m   ] C      e       g  dummy
		 g  s		 g  op			 g  ea			 g  ea1			  			   CVW 
   hP   6  ]4 5$  @4 5$  @4 5$  @	 6.      g  x
		P g  tmp		P g  tmp		"	P g  tmp		9	P  g  filenamef  system/base/ck.scm
	.	 		P  g  
macro-typeg  syntax-rulesg  patternsg  sg  opg  vag  ...  g  sg  opg  ... g  quoteg  v g  ea1g  ... g  sg  opg  ... g  eag  ea1g  ...   C53RC   N       g  m
		(  g  filenamef  system/base/ck.scm		 
 	
   C6                                                                                                                                                                 ccache/system/base/message.go                                                                       0000644                 00000071700 15154557173 0012205 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0s      ] 4      h;      ] g  guile	 	g  define-module*	 	 	g  system	g  base	g  message		 	
g  filenameS	f  system/base/message.scm	g  importsS	g  srfi	g  srfi-1	 	 	g  srfi-9	 	 	g  ice-9	g  match	 	 	 	g  exportsS	g  *current-warning-port*	g  *current-warning-prefix*	g  warning	g  warning-type?	g  warning-type-name	g  warning-type-description	 g  warning-type-printer	!g  lookup-warning-type	"g  %warning-types	# !" 		$g  set-current-module	%$ 	&$ 	'g  format	(f  ~a:~a:~a	)g  	assoc-ref	*g  filename	+f  <stdin>	,g  line	-g  column	.f  <unknown-location>	/g  location-string	0g  parameter-fluid	1g  current-warning-port	2g  
make-fluid	3f  ;;; 	4g  <warning-type>	5g  %make-warning-type-procedure	6g  make-syntax-transformer	76 	86 	9g  make-warning-type	:g  macro	;g  $sc-dispatch	<; 	=; 	>g  _	?g  any	@>??? 	Ag  syntax-object	Bg  lambda	Cg  m-44b57084b9-69a	Dg  top	ECD 	Fg  ribcage	Gg  t-44b57084b9-697	Hg  t-44b57084b9-698	Ig  t-44b57084b9-699	JGHI 	KEEE 	Lf  l-44b57084b9-69f	Mf  l-44b57084b9-6a0	Nf  l-44b57084b9-6a1	OLMN 	PFJKO 	QF 	Rg  x	SR 	TE 	Uf  l-44b57084b9-69c	VU 	WFSTV 	Xg  shift	Yg  	proc-name	Zg  args	[YZ 	\D 	]\\ 	^f  l-1e8ba8b5a-60	_f  l-1e8ba8b5a-61	`^_ 	aF[]` 	bg  key	cg  value	dg  name	eg  formals	fg  body	gbcdef 	h\\\\\ 	if  l-1e8ba8b5a-53	jf  l-1e8ba8b5a-54	kf  l-1e8ba8b5a-55	lf  l-1e8ba8b5a-56	mf  l-1e8ba8b5a-57	nijklm 	oFghn 	pg  make-procedure-name	qp 	r\ 	sf  l-1e8ba8b5a-43	ts 	uFqrt 	v\ 	wf  l-1e8ba8b5a-42	xw 	yFSvx 	zEPQWXQQQQaouy 	{g  hygiene	|{ 	}ABz| 	~\PQW 	{  Ad~  g  description A~  g  printer A~    g  make-struct g  m-44b57084b9-695 D  g  t-1e8ba8b5a-133 g  t-1e8ba8b5a-132 g  t-1e8ba8b5a-131   g  m-1e8ba8b5a-134 D    f  l-1e8ba8b5a-138 f  l-1e8ba8b5a-139 f  l-1e8ba8b5a-13a   F  g  	ctor-args   f  l-1e8ba8b5a-120   Fv  g  ctor g  field   f  l-1e8ba8b5a-11c f  l-1e8ba8b5a-11d   F]  g  form g  	type-name g  constructor-spec g  field-names   \\\\  f  l-1e8ba8b5a-111 f  l-1e8ba8b5a-112 f  l-1e8ba8b5a-113 f  l-1e8ba8b5a-114   F  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers   \\\\\\\\  f  l-1e8ba8b5a-e9 f  l-1e8ba8b5a-e7 f  l-1e8ba8b5a-e5 f  l-1e8ba8b5a-e3 f  l-1e8ba8b5a-e1 f  l-1e8ba8b5a-df f  l-1e8ba8b5a-dd f  l-1e8ba8b5a-db   F  f  l-1e8ba8b5a-da   FSv  PQWXQQQQQ  A|  A4~  A
|    }  g  each-any >ʌ g  syntax-violation     f  Wrong number of arguments g  identifier?     \QW  A5      f  -source expression failed to match any pattern g  record-type-vtable     g  pwpwpw g  default-record-printer     d  g  set-struct-vtable-name!     g  vtable-offset-user     g  %warning-type?-procedure >?  g  m-44b57084b9-6ab D  g  t-44b57084b9-6aa     f  l-44b57084b9-6b0   F  f  l-44b57084b9-6ad   FS  QXQQQQaouy  AB|  g  obj g  t-1e8ba8b5a-224 g  t-1e8ba8b5a-21e g  t-1e8ba8b5a-21f g  t-1e8ba8b5a-220 g  t-1e8ba8b5a-223 g  t-1e8ba8b5a-222 g  t-1e8ba8b5a-221   g  m-1e8ba8b5a-225 D   f  l-1e8ba8b5a-229f  l-1e8ba8b5a-22af  l-1e8ba8b5a-22bf  l-1e8ba8b5a-22cf  l-1e8ba8b5a-22df  l-1e8ba8b5a-22ef  l-1e8ba8b5a-22f 	F  
g  	copier-id
 f  l-1e8ba8b5a-21c Fv g  	ctor-name f  l-1e8ba8b5a-214 Fv  f  l-1e8ba8b5a-212 Fv g  layout f  l-1e8ba8b5a-210 Fv g  
immutable? f  l-1e8ba8b5a-20e  !Fv  "g  field-count#" $f  l-1e8ba8b5a-20c%$ &F#v% 'g  
getter-ids(' )f  l-1e8ba8b5a-209*) +F(v* ,g  	field-ids-, .f  l-1e8ba8b5a-206/. 0F-v/ 1g  predicate-name2g  
field-spec312 4\\\\\\ 5f  l-1e8ba8b5a-1f96f  l-1e8ba8b5a-1fa7f  l-1e8ba8b5a-1fb8f  l-1e8ba8b5a-1fc9f  l-1e8ba8b5a-1fd:f  l-1e8ba8b5a-1fe;56789: <F34; =QXQ	QQQQQQQQ!Q&Q+Q0< >A=| ?> @g  andAA@=| Bg  struct?CAB=| DC> Eg  eq?FAE=| Gg  struct-vtableHAG=| IH> J\Q KA4J LFIK MADL N?M O\Q PAO Qg  throw-bad-structRQ SQ Tg  %warning-type-name-procedureUg  free-idVg  
%%on-errorWg  m-44b57084b9-6b7XWD YX Zf  l-44b57084b9-6b9[Z \FSY[ ]XQ\XQQQQaouy ^AV]| _U^ `_? ag  %%typebg  t-1e8ba8b5a-14bcg  t-1e8ba8b5a-14cdg  t-1e8ba8b5a-14deg  t-1e8ba8b5a-14efg  t-1e8ba8b5a-14fgg  t-1e8ba8b5a-150hg  t-1e8ba8b5a-151ibcdefgh jg  m-1e8ba8b5a-152kjD lkkkkkkk mf  l-1e8ba8b5a-156nf  l-1e8ba8b5a-157of  l-1e8ba8b5a-158pf  l-1e8ba8b5a-159qf  l-1e8ba8b5a-15arf  l-1e8ba8b5a-15bsf  l-1e8ba8b5a-15ctmnopqrs uFilt vg  getterwg  indexxvw yf  l-1e8ba8b5a-149zf  l-1e8ba8b5a-14a{yz |Fx]{ }'
 ~\\\ f  l-1e8ba8b5a-144f  l-1e8ba8b5a-145f  l-1e8ba8b5a-146 F}~ Q\XQuQQQ|Q Aa| U >`? g  ckg  errg  s XX f  l-44b57084b9-6bcf  l-44b57084b9-6bd F XQ\XQQQQaouy A| g  quoteA| \Q\ A4   g  %%indexA| U >`? f  l-44b57084b9-6c1f  l-44b57084b9-6c2 F XQ\XQQQQaouy A| A| Q\ A
   g  %%copierA| U >`? f  l-44b57084b9-6c6f  l-44b57084b9-6c7 F XQ\XQQQQaouy A| A| g  %%<warning-type>-set-fields\Q\ A   g  t-44b57084b9-6b6 f  l-44b57084b9-6cb FY XQ\XQQQQaouy AB| Q\XQuQQQ|Q A|  g  ifA| AE| AG|  \Q\ A4  g  
struct-refA| Q\ A
  AQ| A| A     \Q\ AT g  #%warning-type-description-procedureg  m-44b57084b9-6d2D  f  l-44b57084b9-6d4 FS QXQQQQaouy AV| U ? QXQuQQQ|Q Aa| U >?  f  l-44b57084b9-6d7f  l-44b57084b9-6d8 F QXQQQQaouy A| A| \Q A4   A| U >? f  l-44b57084b9-6dcf  l-44b57084b9-6dd F QXQQQQaouy A| A| Q A    A| U >? f  l-44b57084b9-6e1f  l-44b57084b9-6e2 F QXQQQQaouy 	A| 
A| \Q A 
  g  t-44b57084b9-6d1 f  l-44b57084b9-6e6 F QXQQQQaouy AB| QXQuQQQ|Q A|  A| AE| AG|  \Q A4   A| !Q "A! # " $AQ| %A| &A '%& ($' )#( *) +\Q ,A+ -g  %warning-type-printer-procedure.g  m-44b57084b9-6ed/.D 0/ 1f  l-44b57084b9-6ef21 3FS02 4/Q3XQQQQaouy 5AV4| 6U5 76? 8Q3XQuQQQ|Q 9Aa8| :U9 ;>7:? <// =f  l-44b57084b9-6f2>f  l-44b57084b9-6f3?=> @F<? A/@Q3XQQQQaouy BAA| CAA| D\@Q3 EA4D FCE GF HA8| IUH J>7I? Kf  l-44b57084b9-6f7Lf  l-44b57084b9-6f8MKL NF<M O/NQ3XQQQQaouy PAO| QAO| RNQ3 SA	R TQS UT VA8| WUV X>7W? Yf  l-44b57084b9-6fcZf  l-44b57084b9-6fd[YZ \F<[ ]/\Q3XQQQQaouy ^A]| _A]| `\\Q3 aA` b_a cb dg  t-44b57084b9-6eced ff  l-44b57084b9-701gf hFe0g i/hQ3XQQQQaouy jABi| khQ3XQuQQQ|Q lAk| ml nAk| oAEk| pAGk| qpl r\hQ3 sA4r toqs uAk| vhQ3 wA	v xulw yAQk| zAk| {A r |z{ }yl| ~ntx} jm~ \Q3 A- g  each??  ???g  %%set-fieldsg  dummyg  check?g  exprv g  m-44b57084b9-708D  f  l-44b57084b9-70df  l-44b57084b9-70ef  l-44b57084b9-70ff  l-44b57084b9-710f  l-44b57084b9-711 F  f  l-44b57084b9-70a FS g  t-1e8ba8b5a-16ag  t-1e8ba8b5a-16cg  t-1e8ba8b5a-16b g  m-1e8ba8b5a-16dD  f  l-1e8ba8b5a-171f  l-1e8ba8b5a-172f  l-1e8ba8b5a-173 F f  l-1e8ba8b5a-167f  l-1e8ba8b5a-168f  l-1e8ba8b5a-169 F}~ QXQQQQ A| \Q A4 A A A   g  map  g  listg  unsupported-warningf   warn about unknown warning typesf  &~awarning: unknown warning type `~A'~%g  unused-variablef  report unused variablesf  %~a~A: warning: unused variable `~A'~%g  unused-toplevelf  'report unused local top-level variablesf  >~a~A: warning: possibly unused local top-level variable `~A'~%g  unbound-variablef  !report possibly unbound variablesf  /~a~A: warning: possibly unbound variable `~A'~%g  arity-mismatchf  =report procedure arity mismatches (wrong number of arguments)f  2~a~A: warning: wrong number of arguments to `~A'~%f  ;~a~A: warning: possibly wrong number of arguments to `~A'~%g  duplicate-case-datumf  -report a duplicate datum in a case expressionf  F~a~A: warning: duplicate datum ~S in clause ~S of case expression ~S~%g  bad-case-datumf  Ereport a case datum that cannot be meaningfully compared using `eqv?'f  i~a~A: warning: datum ~S cannot be meaningfully compared using `eqv?' in clause ~S of case expression ~S~%f  ,report wrong number of arguments to `format'g  wrong-num-argsf  ~a~A: `format' warning~%f  6~a~A: warning: wrong number of arguments to `format'~%g  non-literal-format-stringf  *~a~A: warning: non-literal format string~%g  wrong-format-stringf  (~a~A: warning: ~S: wrong format string~%g  
wrong-portf  (~a~A: warning: ~S: wrong port argument~%g  syntax-errorg  "unexpected-conditional-terminationf  %~a~A: warning: ~S: unexpected `~~]'~%g  list->stringg  string-fold-rightg  append\n g  unexpected-semicolonf  %~a~A: warning: ~S: unexpected `~~;'~%g  unterminated-conditionalf  -~a~A: warning: ~S: unterminated conditional~%g  unterminated-iterationf  +~a~A: warning: ~S: unterminated iteration~%g  wrong-format-arg-countf  L~a~A: warning: ~S: wrong number of `format' arguments: expected ~A, got ~A~%f  
any numberf  
~aup to ~af  ~aat least ~ag  number->stringf  
~a~a to ~ag  simple-formatf  O~a~A: warning: ~S: unsupported format option ~~~A, use (ice-9 format) instead~%g  findf  #~A: unknown warning type `~A': ~A~%C 5  h3     ]4	
#5 4& >  "  G   '()*+,-. 	       hH     ]	 $  64 5$  "  4 54 56C            g  loc
		B g  t		*  g  filenamef  system/base/message.scm
	+
		,				,			-			.			.	!		.			.		'	.	,	+	/		1	/	!	3	/		4	/		5	0		;	0		=	0		?	-		A	1	 		B  g  nameg  location-string C/R40i1i5R42i35R4        h      ]  C         g  name
		 g  description		 g  printer			  g  filenamef  system/base/message.scm
	E
 			  g  nameg  %make-warning-type-procedure C5R489:=@        h   t   ]  C  l       g  t-44b57084b9-697
		 g  t-44b57084b9-698		 g  t-44b57084b9-699			  			   C9        h   Z   ]L 6    R       g  a
		  g  filenamef  system/base/message.scm		E
 		   C>      h   J   ] L 6B       g  filenamef  system/base/message.scm		E
 		
   C        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/base/message.scm
	E
 		n   C59R4ߨ  4 4>  "  G   	5i  4R4  h      ] $   CC      x       g  obj
		  g  filenamef  system/base/message.scm
	E
 		  g  nameg  %warning-type?-procedure CR48:=N  h   8   ]  C      0       g  t-44b57084b9-6aa
		
  		
   C    h   Z   ]L 6    R       g  a
		  g  filenamef  system/base/message.scm		E
 		   C>      h   J   ] L 6B       g  filenamef  system/base/message.scm		E
 		
   CP       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/base/message.scm
	E
 		n   C5R4S     h      ] &   
C 6z       g  s
		  g  filenamef  system/base/message.scm
	E
 		  g  nameg  %warning-type-name-procedure CTR48:=   h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   8   ]  C      0       g  t-44b57084b9-6b6
		
  		
   C    h   Z   ]L 6    R       g  a
		  g  filenamef  system/base/message.scm		E
 		   C>      h   J   ] L 6B       g  filenamef  system/base/message.scm		E
 		
   C       h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/message.scm
	E
 	    C5R4S h      ] &   C 6       g  s
		  g  filenamef  system/base/message.scm
	E
 		  g  nameg  #%warning-type-description-procedure CR48:=    h   :   ]C     2       g  err
		 g  s		  			   C  h   :   ]C     2       g  err
		 g  s		  			   C	 h   :   ]C     2       g  err
		 g  s		  			   C*     h   8   ]  C      0       g  t-44b57084b9-6d1
		
  		
   C    h   Z   ]L 6    R       g  a
		  g  filenamef  system/base/message.scm		E
 		   C>      h   J   ] L 6B       g  filenamef  system/base/message.scm		E
 		
   C,       h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/message.scm
	E
 	    C5R4S  h       ] &   	C 6       }       g  s
		  g  filenamef  system/base/message.scm
	E
 		  g  nameg  %warning-type-printer-procedure C-R48 :=;BG        h   :   ]C     2       g  err
		 g  s		  			   CJPU h   :   ]C     2       g  err
		 g  s		  			   CX^c h   :   ]C     2       g  err
		 g  s		  			   C     h   8   ]  C      0       g  t-44b57084b9-6ec
		
  		
   C     h   Z   ]L 6    R       g  a
		  g  filenamef  system/base/message.scm		E
 		   C>      h   J   ] L 6B       g  filenamef  system/base/message.scm		E
 		
   C       h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/message.scm
	E
 	    C5 R48:=   h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  system/base/message.scm
	E
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R4i5 h   e   ] @]       g  args
		  g  filenamef  system/base/message.scm
	N			O		 		   C'  h      ] [6        g  port
		 g  unused		 g  name			  g  filenamef  system/base/message.scm
	_			`	 			   C ' h      ] [6              g  port
		 g  loc		 g  name			  g  filenamef  system/base/message.scm
	e			f	 			   C '    h      ] [6              g  port
		 g  loc		 g  name			  g  filenamef  system/base/message.scm
	k			l	 			   C '    h      ] [6              g  port
		 g  loc		 g  name			  g  filenamef  system/base/message.scm
	q			r	 			   C ' h(      ]$   [6 [6         g  port
		& g  loc		& g  name			& g  certain?			&  g  filenamef  system/base/message.scm
	w			x			y			|	 		&	   C '      h      ] [6          g  port
		 g  loc		 g  datum			 g  clause			 g  	case-expr			  g  filenamef  system/base/message.scm
 		 	 			   C '      h      ] [6          g  port
		 g  loc		 g  datum			 g  clause			 g  	case-expr			  g  filenamef  system/base/message.scm
 		 	 			   C '' h      ] 
&  6 C       g  c
		 g  r		  g  filenamef  system/base/message.scm
 	%	
 	'	 	3	 	+	 	+ 			   C  h      ] 
&  6 C       g  c
		 g  r		  g  filenamef  system/base/message.scm
 	%	
 	'	 	3	 	+	 	+ 			   C  h      ] 
&  6 C       g  c
		 g  r		  g  filenamef  system/base/message.scm
 	%	
 	'	 	3	 	+	 	+ 			   C  h      ] 
&  6 C       g  c
		 g  r		  g  filenamef  system/base/message.scm
 	%	
 	'	 	3	 	+	 	+ 			   C  h      ] 
&  6 C       g  c
		 g  r		  g  filenamef  system/base/message.scm
 	%	
 	'	 	3	 	+	 	+ 			   C? h      ] 
&  6 C       g  c
		 g  r		  g  filenamef  system/base/message.scm
 	%	
 	'	 	3	 	+	 	+ 			   C '      h  7  - 1 3 " 5" 5" " ;" " A"  "  "  k$  W&  8"   [6$  (   [6"" [6 [6$  )(  &   [6"i"e"a$  @&  *$  (   	[6""""$  @
&  *$  (   [6""""$  n&  X$  M&  7$  ,(  ! [44556"Z"V"R"N"J"F$  n&  X$  M&  7$  ,(  ! [44556""""""$  n&  X$  M&  7$  ,(  ! [44556"`"\"X"T"P"L$  n&  X$  M&  7$  ,(  ! [44556""""""$  &  $  $  $  
	
$  
(  
 [4455&  	&  "  4 [	5"  <	&  4![5"  #	$  4"5"  4#[	56"""""""$  d$&  N$  C$  .(  # %[44&556"l"h"d"`"\       /      g  port
		 g  loc		 g  rest			 g  w		:  g  x		:  g  w	   g  w	  g  x	  g  w	  g  w	$^ g  x	$^ g  w	AR g  w	o g  x	o g  w	 g  x	 g  w	 g  w	P g  x	P g  w	H g  x	H g  w	< g  w	a g  x	a g  w	z g  x	z g  w	 g  w	B g  x	B g  w	: g  x	: g  w	. g  w	S> g  x	S> g  w	l6 g  x	l6 g  w	}2 g  x	}2 g  w		. g  x	
. g  w	& g  w	O g  x	O g  w	h g  x	h g  w	}  .g  filenamef  system/base/message.scm
 		 		P 		W 		o 	  	  	  	  	  	 	I 	V 	 	 	 	 	% 	 	 	 	& 	, 	/ 	4 	%8 	: 	< 	@ 	 	 	 	 	% 	 	 	 	 	 	! 	& 	%* 	, 	. 	2 	 	 	 	 	% 	 	 	! 	 	% 	 	 	 	! 	 	 	 		 	$ 	& 	* 	 	 	 	 	% 	 	 	 	 K			
	   C  5"R4S       h    n   ]L  &   
"  	4 5Cf       g  wt
		   g  filenamef  system/base/message.scm
 		 		 	
 		    C"     h      ] O 6        g  name
		  g  filenamef  system/base/message.scm
 
	 	 		  g  nameg  lookup-warning-typeg  documentationf  2Return the warning type NAME or `#f' if not found. C!R!1'/4      h`     - 1 3 4 545 "  45 6$  &  	45@""            g  type
			Z g  location			Z g  args				Z g  wt			Z g  port			Z  g  filenamef  system/base/message.scm
 
	
 		 		 		# 		$ 		0 		0 		3 		7 		: 		E 		H 		R 	 			Z	
	  g  nameg  warningg  documentationf  jEmit a warning of type TYPE for source location LOCATION (a source
property alist) using the data in ARGS. CRC       g  m
		, g  rtd
  g  filenamef  system/base/message.scm		
	+
	>		:
	B		B		B		@
	E
	N	P	]		/	N	/	L
1 
3 
 	3
   C6                                                                 ccache/system/base/syntax.go                                                                        0000644                 00000046234 15154557173 0012113 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0L      ] 4  h      ] g  guile	 	g  define-module*	 	 	g  system	g  base	g  syntax		 	
g  filenameS	f  system/base/syntax.scm	g  exportsS	g  %compute-initargs	g  define-type	g  define-record	g  define-record/keywords	g  record-case	g  transform-record	 	g  set-current-module	 	 	g  string->symbol	g  string-trim-both	g  symbol->string	g  symbol-trim-both	g  list->char-set	<> 	g  trim-brackets	g  make-syntax-transformer	 	  	!g  macro	"g  $sc-dispatch	#" 	$" 	%g  _	&g  any	'%&	(g  syntax->datum	)( 	*( 	+g  datum->syntax	,+ 	-+ 	.g  
kw-arg-ref	/g  printerS	0g  common-slotsS	1g  begin	2g  append	32 	42 	5g  map	6g  define	7g  symbol-append	8g  -	9g  make-procedure-with-setter	:g  lambda	;g  x	<; 	=g  
struct-ref	>g  v	?;> 	@g  struct-set!	A> 	Bg  iota	Cg  length	Dg  syntax-violation	ED 	FD 	Gf  -source expression failed to match any pattern	Hg  make-record-type	Ig  quote	Jg  	list-tail	Kg  module-gensym	Lf  defrec	Mg  make-	Ng  let	Og  cond	Pg  null?	Qg  else	Rg  _x	Sg  car	Tg  set!	Ug  cdr	VR 	Wg  make-struct	Xg  ?	Yg  record-predicate	Zg  record-accessor	[g  record-modifier	\g  slots	]g  list	^g  cons	_g  constructor	`g  record-constructor	ag  args	bg  apply	ca\ 	db_c 	e:ad 	fe 	gg  assq	hg  error	if  unbound slot	jg  keyword?	kg  keyword->symbol	lg  memq	mg  filter	ng  pair?	of  unknown slot	pf  slot already set	qf  too many initargs	rg  each-any	s&r	t%s	ug  syntax-object	vg  r	wg  top	xw 	yg  ribcage	zg  record	{g  clause	|z{ 	}xx 	~f  l-3d2ad63ef-21d	f  l-3d2ad63ef-21e ~  y|}  y  ;  x  f  l-3d2ad63ef-21a   y  x  g  hygiene   uv  g  rtd u  g  reverse! g  lp g  clauses g  out   xxx  f  l-3d2ad63ef-265 f  l-3d2ad63ef-266 f  l-3d2ad63ef-267   y  g  process-clause   x  f  l-3d2ad63ef-225   y  v  f  l-3d2ad63ef-221 f  l-3d2ad63ef-222   y}  x 	 uQ  uh  f  unhandled record u  uv      g  free-id   s   g  e0 g  e1   f  l-3d2ad63ef-26f f  l-3d2ad63ef-270   y}  x 
 uQ  & f  bad else clause placement g  rest   f  l-3d2ad63ef-275 f  l-3d2ad63ef-276 f  l-3d2ad63ef-277   y  x 
 u;  uQ  sr & &&  r g  infix   f  l-3d2ad63ef-22e   y  g  tag g  fields g  exprs   f  l-3d2ad63ef-22b f  l-3d2ad63ef-22c f  l-3d2ad63ef-22d   y  x  u    g  each &&   &s  g  eq? g  f g  accessor   xxxxx  f  l-3d2ad63ef-233 f  l-3d2ad63ef-234 f  l-3d2ad63ef-235 f  l-3d2ad63ef-236 f  l-3d2ad63ef-237   y  x  u  u  uN  5  5  uv    &&r  g  let* g  	processed v  f  l-3d2ad63ef-25e f  l-3d2ad63ef-25f f  l-3d2ad63ef-260   y  x 	 u  g  struct-vtable u  uO  f  recf  rtdg  ->g  unquotef  bad -> formg  <g  >g  andg  reverse	g  if
	 
 C 5       h9  r   ]4	
5 4 >  "  G         h      ]44 556           g  sym
		 g  pred		  g  filenamef  system/base/syntax.scm
	
						$						 			  g  nameg  symbol-trim-both CR  h      ] 456        g  sym
		  g  filenamef  system/base/syntax.scm
	
						(						 		  g  nameg  trim-brackets CR4 !$'*-./01454   h(      ]L$   L "   4L  5C         g  def
		&  g  filenamef  system/base/syntax.scm
	(			)		
	)	(		*	/		*	,		+	,		)		!	-		#	)	 
		&   C6789:<=;?@A h@      ]44L 5 5	  
	   C        g  common-slot
		? g  i		?  g  filenamef  system/base/syntax.scm
	/			0			0	!		0	0		1	0		0	!		0	 		?	   CBC       h     - 1 3  $   "    $   "  4545$  "  44O 54O 4	4
5555C z      g  name
		  g  rest		  g  name		(  g  opts		(  g  t		>	P g  printer		P  g  common-slots		P   g  filenamef  system/base/syntax.scm
	#
		$			$			$			%		 	%		#	%		(	%	*	(	$		-	&		6	'		>	'		M	'	=	P	&		V	(		Z	(		j	/		v	5	"	y	5	( 	5	" 	/	 	(	 		 
   C   h   j   ]	4 5L 4?6b       g  args
		 g  v			  g  filenamef  system/base/syntax.scm		#
 		   CFG       h(   h   ]	4 5$   O @ 6 `       g  y
		' g  tmp		'  g  filenamef  system/base/syntax.scm
	#
 		'   C5R4 !$'*-5     h   t   ] $   C Cl       g  slot
		  g  filenamef  system/base/syntax.scm
	?			?	-			?	)		?	: 		   C16HI      h(      ] (  "   $  C 4L  5C          g  slots
		%  g  filenamef  system/base/syntax.scm
	E			F				F			F	;		F	2		F	-		F			G			H	!		H	-	!	H	1	#	H	-	$	H	 		%  g  nameg  lp CJCKL7M4NOPQNRSTUV 
     hH   y   ] L    L    L L   	   C   q       g  o
		E  g  filenamef  system/base/syntax.scm
	L			M			M			M	;		M	 		E   CWXY6789ZI[       h8      ]4L 5L    L      C    }       g  sname
		4  g  filenamef  system/base/syntax.scm
	T			U			U			U	.		U			U	 		4   C        h    - 1 3 	 $   "    $   "  454545 $  	 "   	O Q 454
4554545454O 5
  45  4O 5C       g  	name-form
		 g  slots		 g  name		 g  printer		+ g  
slot-names		6 g  stem		? g  lp		u  g  reqs	   g  opts	   g  tail	    
g  filenamef  system/base/syntax.scm
	<
		=			=			=	%		=			>		"	>		%	>	)	+	=		.	?		6	=		9	A		?	=		C	B		J	C	(	R	B		]	D	)	b	D	5	g	D	D	h	B		u	E	 	E	 	I	 	I	& 	I	 	E	 	J	 	J	$ 	J	 	E	 	K	
 	K	 	K	$ 	K	 	K	
 	L	 	K	
 	B	 	S	 	S	$ 	S	 	B	 	T			B	 -		
   C     h   j   ]	4 5L 4?6b       g  args
		 g  v			  g  filenamef  system/base/syntax.scm		<
 		   CFG       h(   h   ]	4 5$   O @ 6 `       g  y
		' g  tmp		'  g  filenamef  system/base/syntax.scm
	<
 		'   C5R4 !$'*-5     h   t   ] $   C Cl       g  slot
		  g  filenamef  system/base/syntax.scm
	`			`	-			`	)		`	: 		   C16HI7MN\]^I      h(      ] $      C  C            g  slot
		#  g  filenamef  system/base/syntax.scm
	g	#		h	)			h	%		i	)		i	2		i	)		i	>		i	)		j	) 
		#   C_`fXY6789ZI[        h8      ]4L 5L    L      C    }       g  sname
		4  g  filenamef  system/base/syntax.scm
	p			q			q			q	.		q			q	 		4   C        h     - 1 3  $   "    $   "  454545 $  	 "   4	
545     4	5  4O 5C           g  	name-form
		  g  slots		  g  name		  g  printer		+  g  
slot-names		6  g  stem		?   g  filenamef  system/base/syntax.scm
	]
		^			^			^	%		^			_		"	_		%	_	)	+	^		.	`		6	^		9	b		?	^		C	c		J	d	(	R	c		]	e	)	b	e	5	g	e	D	h	c		p	f		t	f		x	f		z	c			g	 	c	 	o	 	o	$ 	o	 	c	 	p		 	c	 !		 
   C  h   j   ]	4 5L 4?6b       g  args
		 g  v			  g  filenamef  system/base/syntax.scm		]
 		   CFG       h(   h   ]	4 5$   O @ 6 `       g  y
		' g  tmp		'  g  filenamef  system/base/syntax.scm
	]
 		'   C5R5ghi      h@      ] $   "   4L 5$  C $   CLL6       g  slot
		@ g  name		@ g  t			@  g  filenamef  system/base/syntax.scm
	y				z				z			z	(		z			{			{		,	|		0	{		3	|	!	8	}	 	@	}	 		@   Cjklgmnhopq     h     ]""  (   O 645$  i4545$  "  4455$  	
645$  
	6"t(  
	 6$  "  "5 "&      g  args
	  g  slots	  g  in		  g  
positional		  g  out		  g  sym		1  g  slot	    g  filenamef  system/base/syntax.scm
	w
				 			y		 		# 		% 		) 		* 		/ 	"	1 		1 		4 		@ 	
	F 		K 		U 		V 		Z 		^ 		b 	
	c 	
	o 		s 	 	y 		| 		~ 	  	,  	!  	  	  	  	  	
  	  	  	
  	  	  	$  	  	  	 		 		- 		 /	 	  g  nameg  %compute-initargs CR4 !$t$     h   T   ] L 6     L       g  filenamef  system/base/syntax.scm		 		 	 		
   C  h   u   ] L 6       m       g  e0
		 g  e1		  g  filenamef  system/base/syntax.scm	 		 	 			   CD   h      ] 6           g  e0
		 g  e1		 g  rest			  g  filenamef  system/base/syntax.scm	 	&	 	&	 	 			   C($    h      ] C           		
   C+78( h(      ] 4L4L45554L 5C          g  v0
		% g  f0		% g  f1			%  g  filenamef  system/base/syntax.scm	 	(	
 	7	 	L	 	O	 	7	 	(	 	!	 	(	$ 	! 
		%	   Cs+78(      h(      ] 4L4L4 5554L 5C          g  f0
		% g  f1		%  g  filenamef  system/base/syntax.scm	 	(	
 	7	 	L	 	O	 	7	 	(	 	!	 	(	$ 	! 
		%	   CFG 	    hh      ]4 5$  @4 5$  L LLO @4 5$  L LLO @ 6              g  fields
		a g  tmp	
	a g  tmp		!	a g  tmp		A	a  g  filenamef  system/base/syntax.scm
 	 		a  g  nameg  lp C$        h      ] C          		
   Cs   h   :   ] C2       g  e0
		 g  e1		  			   CFG h   X   ]  C   P       g  tmp-3d2ad63ef-23e
		 g  tmp-3d2ad63ef-23d		  			   C     h(   p   ]  45 C     h       g  tag
		# g  f		# g  accessor			# g  e0			# g  e1			#  		#	   C     h   B  ]L44 55 O L Q 4545$  4?"  )45$  4?"  
4	5 4
5$  4?"  
4	5L6     :      g  <foo>
	  g  f0	  g  e0		  g  rest		  g  infix		  g  lp		 	3 g  tmp		;	z g  tmp		W	w g  tmp		}  g  tmp	    
g  filenamef  system/base/syntax.scm	 		
 	'	 		 		  		} 	  	  	 		 	   CFG       h      ]"4 5$  O @4 5$  O @4 5$  @4 5$  L LO @	
 6              g  clauses
		y g  out		y g  tmp		
	y g  tmp		&	y g  tmp		B	y g  tmp		Y	y  g  filenamef  system/base/syntax.scm
 	 		y	  g  nameg  lp C$      h(   Q   ] L       C     I       g  r
		# g  rtd		# g  	processed			#  		#	   CFG 	       hP      ]O L Q 45 45$   O @6            g  record
		K g  clause		K g  lp			! g  tmp		$	K g  tmp		/	K  g  filenamef  system/base/syntax.scm	 		 		 		$ 		 		K	   CFG        h(   j   ]	4 5$   O @ 6 b       g  x
		' g  tmp		'  g  filenamef  system/base/syntax.scm
 	 		'   C5R4 !$'*-K 278I       h     ]#"  (  C$  $  "$  644L44L 55  55"44L 55    "^"Q"F      g  x
	  g  record-stem	  g  slots		  g  in		  g  out		  g  slot		   g  arg		    g  filenamef  system/base/syntax.scm
 		 		 		 		 		 		 				  		'		+		.		8		;		?		B		C		F	$	I 		L 		R 		V 		X 	2	\ 		a 		d	8	g	8	i	$	m		u		x
	!	z
	0	{ 		~ 	  	  	  	2  	  	 
	0 
	* 
	 	 	  	  	  	 0	 	  g  nameg  further-predicates C782  h     ]#"  (  C$  $  ,44L 55   "$  644L44L 55  55"r"e44L 55   "0"%             g  x
	  g  record-stem	  g  slots		  g  in		  g  out		  g  slot		   g  arg		   g  slot	    g  filenamef  system/base/syntax.scm
																 		'		+		.		1		4 		: 		> 		@	2	D		I		L	"	O		W		Z		^		a		b		e	$	h		k 		q 		u 		w	2	{	 	 	1 	1 	$ 	 	 	 	 !	 "	 "	. "	& 	  	  	  	 	2 	 	 "	 "	 !	 	 	 	 ;	 	  g  nameg  let-clauses CC7M845 h       ] $   &  L  6 C C       g  y
		   g  filenamef  system/base/syntax.scm
*		+	'		+		+	6	+	>	+	"	,	2	,	" 			    Ch       hx     ] $  g &  O4 5	$  9 44L 554L4LO 55C	
 6 4L 5C C           g  x
		s g  form	$	Y g  s		.	>  g  filenamef  system/base/syntax.scm
#		$			$		%		%		$		&		&		 &		#'		$'		'(		+(	%	.(	7	.(	,	1 		7 		; 		@(		A(		F)		G*		S.		U*		W(		]/		a/		d0		e0	 	l0	4	n0	 	o0	 !		s  g  nameg  transform-expr CQ78N5     h     ]! &   C   44L55L  44LL55	44LL55$  4
L5"   C      g  clause
	  g  stem	  g  slots		  g  body		  g  record-type		3   g  filenamef  system/base/syntax.scm
1		2		2		2		4		5		6		4	
	 7		$7	.	% 		+ 		/ 		17	B	37		37		78		A9		D9	 	P9		Q8		U:		X:		d:		g;		k;		l<		z=		{8	 	   g  nameg  process-clause C578       h      ] 4L  5L  Cy       g  slot
		  g  filenamef  system/base/syntax.scm
@		 		 		 		A	 		   COgQ2h        h   L  - 1 3 45454 5O O O O 	Q Q  Q Q 		 
  4O  54	5
4
5$  
"  4
   5
 C    D      g  type-and-common
		  g  record		  g  clauses			  g  r		  g  rtd		  g  	type-stem		  g  further-predicates		N  g  let-clauses		N  g  transform-expr		N  g  process-clause			N  g  clauses	
    g  filenamef  system/base/syntax.scm
 
	
 		 		 		 		 		 		 		 	"	 		 		v>	 @	 B	 @	 >	 C	 C	 D	 D	 D	 D	 F	 F	% F	 >	 		 	
	   C h   k   ]	4 5L 4?6c       g  args
		 g  v			  g  filenamef  system/base/syntax.scm	 
 		   CFG      h(   i   ]	4 5$   O @ 6 a       g  y
		' g  tmp		'  g  filenamef  system/base/syntax.scm
 
 		'   C5RCj       g  m
		(  g  filenamef  system/base/syntax.scm		
	
	
	w
 	9
   C6                                                                                                                                                                                                                                                                                                                                                                     ccache/system/base/lalr.go                                                                          0000644                 00000335610 15154557173 0011516 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0p     ]b 4    hg      ] g  guile	 	g  define-module*	 	 	g  system	g  base	g  lalr		 	
g  filenameS	f  system/base/lalr.scm	g  importsS	g  srfi	g  srfi-9	 	 	 	g  exportsS	g  lalr-parser	g  print-states	g  make-lexical-token	g  lexical-token?	g  lexical-token-category	g  lexical-token-source	g  lexical-token-value	g  make-source-location	g  source-location?	g  source-location-input	g  source-location-line	g  source-location-column	g  source-location-offset	 g  source-location-length	!g  "source-location->source-properties	"g  	lr-driver	#g  
glr-driver	$ !"# 	%g  set-current-module	&% 	'% 	(f  2.5.0	)g  *lalr-scm-version*	*g  process-use-modules	+* 	,* 	-g  ice-9	.g  pretty-print	/-. 	0/ 	1g  pprint	2g  symbol?	3g  lalr-keyword?	4g  make-syntax-transformer	54 	64 	7g  BITS-PER-WORD	8g  macro	9g  $sc-dispatch	:9 	;9 	<g  _	=g  any	><=	?g  syntax->datum	@? 	A? 	Bg  datum->syntax	CB 	DB 	Eg  syntax-violation	FE 	GE 	Hf  -source expression failed to match any pattern	Ig  
logical-or	Jg  logior	Kg  
lalr-error	Lg  error	Mg  supports-source-properties?	Ng  source-property	Og  loc	Pg  lexical-token	Qg  set-source-property!	Rg  throw-bad-struct	SR 	TR 	Ug  note-source-location	Vg  %make-lexical-token-procedure	W<=== 	Xg  syntax-object	Yg  lambda	Zg  m-1e9d51c93-35	[g  top	\Z[ 	]g  ribcage	^g  t-1e9d51c93-32	_g  t-1e9d51c93-33	`g  t-1e9d51c93-34	a^_` 	b\\\ 	cf  l-1e9d51c93-3a	df  l-1e9d51c93-3b	ef  l-1e9d51c93-3c	fcde 	g]abf 	h] 	ig  x	ji 	k\ 	lf  l-1e9d51c93-37	ml 	n]jkm 	og  shift	pg  	proc-name	qg  args	rpq 	s[ 	tss 	uf  l-1e8ba8b5a-60	vf  l-1e8ba8b5a-61	wuv 	x]rtw 	yg  key	zg  value	{g  name	|g  formals	}g  body	~yz{|} 	sssss  f  l-1e8ba8b5a-53 f  l-1e8ba8b5a-54 f  l-1e8ba8b5a-55 f  l-1e8ba8b5a-56 f  l-1e8ba8b5a-57   ]~  g  make-procedure-name   s  f  l-1e8ba8b5a-43   ]  s  f  l-1e8ba8b5a-42   ]j  \ghnohhhhx  g  hygiene   XY  g  category sghn    X  g  source X  Xz    g  make-struct g  m-1e9d51c93-30 [  g  t-1e8ba8b5a-133 g  t-1e8ba8b5a-132 g  t-1e8ba8b5a-131   g  m-1e8ba8b5a-134 [    f  l-1e8ba8b5a-138 f  l-1e8ba8b5a-139 f  l-1e8ba8b5a-13a   ]  g  	ctor-args   f  l-1e8ba8b5a-120   ]  g  ctor g  field   f  l-1e8ba8b5a-11c f  l-1e8ba8b5a-11d   ]t  g  form g  	type-name g  constructor-spec g  field-names   ssss  f  l-1e8ba8b5a-111 f  l-1e8ba8b5a-112 f  l-1e8ba8b5a-113 f  l-1e8ba8b5a-114   ]  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers   ssssssss  f  l-1e8ba8b5a-e9 f  l-1e8ba8b5a-e7 f  l-1e8ba8b5a-e5 f  l-1e8ba8b5a-e3 f  l-1e8ba8b5a-e1 f  l-1e8ba8b5a-df f  l-1e8ba8b5a-dd f  l-1e8ba8b5a-db   ]  f  l-1e8ba8b5a-da   ]j  ghnohhhhh  X  XP  X
      g  each-any <ጤ E  E  f  Wrong number of arguments g  identifier?     shn  XV  g  record-type-vtable     g  pwpwpw g  default-record-printer     z  g  set-struct-vtable-name!     g  vtable-offset-user     g  %lexical-token?-procedure <=  g  m-1e9d51c93-46 [  g  t-1e9d51c93-45     f  l-1e9d51c93-4b  ] f  l-1e9d51c93-48 ]j hohhhhx XY g  obj	g  t-1e8ba8b5a-224
g  t-1e8ba8b5a-21eg  t-1e8ba8b5a-21fg  t-1e8ba8b5a-220g  t-1e8ba8b5a-223g  t-1e8ba8b5a-222g  t-1e8ba8b5a-221	
 g  m-1e8ba8b5a-225[  f  l-1e8ba8b5a-229f  l-1e8ba8b5a-22af  l-1e8ba8b5a-22bf  l-1e8ba8b5a-22cf  l-1e8ba8b5a-22df  l-1e8ba8b5a-22ef  l-1e8ba8b5a-22f ] g  	copier-id f  l-1e8ba8b5a-21c  !]  "g  	ctor-name#" $f  l-1e8ba8b5a-214%$ &]#% ' (f  l-1e8ba8b5a-212)( *]') +g  layout,+ -f  l-1e8ba8b5a-210.- /],. 0g  
immutable?10 2f  l-1e8ba8b5a-20e32 4]13 5g  field-count65 7f  l-1e8ba8b5a-20c87 9]68 :g  
getter-ids;: <f  l-1e8ba8b5a-209=< >];= ?g  	field-ids@? Af  l-1e8ba8b5a-206BA C]@B Dg  predicate-nameEg  
field-specF0DE Gssssss Hf  l-1e8ba8b5a-1f9If  l-1e8ba8b5a-1faJf  l-1e8ba8b5a-1fbKf  l-1e8ba8b5a-1fcLf  l-1e8ba8b5a-1fdMf  l-1e8ba8b5a-1feNHIJKLM O]FGN Phohhhhh!h&h*h/h4h9h>hCO QXP RQ Sg  andTXSP Ug  struct?VXUP WVQ Xg  eq?YXXP Zg  struct-vtable[XZP \[Q ]sh ^XP] _Y\^ `TW_ aR` bsh cXb dg  !%lexical-token-category-procedureeg  free-idfg  
%%on-errorgg  m-1e9d51c93-52hg[ ih jf  l-1e9d51c93-54kj l]jik mhhlohhhhx nXfm oen po= qg  %%typerg  t-1e8ba8b5a-14bsg  t-1e8ba8b5a-14ctg  t-1e8ba8b5a-14dug  t-1e8ba8b5a-14evg  t-1e8ba8b5a-14fwg  t-1e8ba8b5a-150xg  t-1e8ba8b5a-151yrstuvwx zg  m-1e8ba8b5a-152{z[ |{{{{{{{ }f  l-1e8ba8b5a-156~f  l-1e8ba8b5a-157f  l-1e8ba8b5a-158f  l-1e8ba8b5a-159f  l-1e8ba8b5a-15af  l-1e8ba8b5a-15bf  l-1e8ba8b5a-15c}~ ]y| g  getterg  index f  l-1e8ba8b5a-149f  l-1e8ba8b5a-14a ]t : sss f  l-1e8ba8b5a-144f  l-1e8ba8b5a-145f  l-1e8ba8b5a-146 ] hlohhhhh Xq e <p= g  ckg  errg  s hh f  l-1e9d51c93-57f  l-1e9d51c93-58 ] hhlohhhhx X g  quoteX shl XP   g  %%indexX e <p= f  l-1e9d51c93-5cf  l-1e9d51c93-5d ] hhlohhhhx X X hl X
   g  %%copierX e <p= f  l-1e9d51c93-61f  l-1e9d51c93-62 ] hhlohhhhx X X g  %%lexical-token-set-fieldsshl X   g  t-1e9d51c93-51 f  l-1e9d51c93-66 ]i hhlohhhhx XY hlohhhhh X  g  ifX XX XZ  shl XP  g  
struct-refX hl X
  XR X X     shl Xd g  %lexical-token-source-procedureg  m-1e9d51c93-6d[  f  l-1e9d51c93-6f ]j hohhhhx Xf e = hohhhhh Xq e <=  f  l-1e9d51c93-72f  l-1e9d51c93-73 ] hohhhhx X X sh  XP    X e <= f  l-1e9d51c93-77f  l-1e9d51c93-78 	] 
	hohhhhx X
 X
 	h X   X e <= f  l-1e9d51c93-7cf  l-1e9d51c93-7d ] hohhhhx X X sh X   g  t-1e9d51c93-6c  !f  l-1e9d51c93-81"! #] " $#hohhhhx %XY$ &#hohhhhh 'X& (' )X& *XX& +XZ& ,+' -s#h .XP- /*,. 0X& 1#h 2X1 30'2 4XR& 5X& 6X- 756 84'7 9)/38 :%(9 ;sh <X; =g  %lexical-token-value-procedure>g  m-1e9d51c93-88?>[ @? Af  l-1e9d51c93-8aBA C]j@B D?hCohhhhx EXfD FeE GF= HhCohhhhh IXqH JeI K<GJ= L?? Mf  l-1e9d51c93-8dNf  l-1e9d51c93-8eOMN P]LO Q?PhCohhhhx RXQ SXQ TsPhC UXPT VSU WV XXH YeX Z<GY= [f  l-1e9d51c93-92\f  l-1e9d51c93-93][\ ^]L] _?^hCohhhhx `X_ aX_ b^hC cX	b dac ed fXH gef h<Gg= if  l-1e9d51c93-97jf  l-1e9d51c93-98kij l]Lk m?lhCohhhhx nXm oXm pslhC qXp roq sr tg  t-1e9d51c93-87ut vf  l-1e9d51c93-9cwv x]u@w y?xhCohhhhx zXYy {xhCohhhhh |X{ }| ~X{ XX{ XZ{ | sxhC XP  X{ xhC X	 | XR{ X{ X  | ~ z} shC X= g  each==  ===g  %%set-fieldsg  dummyg  check?g  expr g  m-1e9d51c93-a3[  f  l-1e9d51c93-a8f  l-1e9d51c93-a9f  l-1e9d51c93-aaf  l-1e9d51c93-abf  l-1e9d51c93-ac ]  f  l-1e9d51c93-a5 ]j g  t-1e8ba8b5a-16ag  t-1e8ba8b5a-16cg  t-1e8ba8b5a-16b g  m-1e8ba8b5a-16d[  f  l-1e8ba8b5a-171f  l-1e8ba8b5a-172f  l-1e8ba8b5a-173 ] f  l-1e8ba8b5a-167f  l-1e8ba8b5a-168f  l-1e8ba8b5a-169 ] hohhhh X sh XP X X X  g  map  g  listg  source-locationg  %make-source-location-procedure<===== g  m-1e9d51c93-bc[ g  t-1e9d51c93-b7g  t-1e9d51c93-b8g  t-1e9d51c93-b9g  t-1e9d51c93-bag  t-1e9d51c93-bb  f  l-1e9d51c93-c1f  l-1e9d51c93-c2f  l-1e9d51c93-c3f  l-1e9d51c93-c4f  l-1e9d51c93-c5 ]  f  l-1e9d51c93-be ]j hohhhhx XY g  inputsh X g  lineX g  columnX g  offsetX g  lengthX  g  m-1e9d51c93-b5[ hohhhhh X X X
   sh X g  
pwpwpwpwpw g  %source-location?-procedureg  m-1e9d51c93-d1[ g  t-1e9d51c93-d0  f  l-1e9d51c93-d6  ]  f  l-1e9d51c93-d3 ]j hohhhhx XY hohhhhh!h&h*h/h4h9h>hCO X 	 
XS XU  XX XZ  sh X  
 	 sh X g   %source-location-input-procedureg  m-1e9d51c93-dd[  f  l-1e9d51c93-df ]j hohhhhx Xf  e ! = "hohhhhh #Xq" $e# %<!$= & 'f  l-1e9d51c93-e2(f  l-1e9d51c93-e3)'( *]&) +*hohhhhx ,X+ -X+ .s*h /X. 0-/ 10 2X" 3e2 4<!3= 5f  l-1e9d51c93-e76f  l-1e9d51c93-e8756 8]&7 98hohhhhx :X9 ;X9 <8h =X
< >;= ?> @X" Ae@ B<!A= Cf  l-1e9d51c93-ecDf  l-1e9d51c93-edECD F]&E GFhohhhhx HXG IXG Jg  %%source-location-set-fieldsKsFh LXJK MIL NM Og  t-1e9d51c93-dcPO Qf  l-1e9d51c93-f1RQ S]PR TShohhhhx UXYT VShohhhhh WXV XW YXV ZXXV [XZV \[W ]sSh ^X] _Z\^ `XV aSh bX
a c`Wb dXRV eXV fX] gef hdWg iY_ch jUXi ksh lXk mg  %source-location-line-procedureng  m-1e9d51c93-f8on[ po qf  l-1e9d51c93-farq s]jpr tohsohhhhx uXft veu wv= xhsohhhhh yXqx zey {<wz= |oo }f  l-1e9d51c93-fd~f  l-1e9d51c93-fe}~ ]| ohsohhhhx X X shs X   Xx e <w= f  l-1e9d51c93-102f  l-1e9d51c93-103 ]| ohsohhhhx X X hs X   Xx e <w= f  l-1e9d51c93-107f  l-1e9d51c93-108 ]| ohsohhhhx X X shs XJ   g  t-1e9d51c93-f7 f  l-1e9d51c93-10c ]p ohsohhhhx XY hsohhhhh X  X XX XZ  shs X  X hs X  XR X X     shs Xm g  !%source-location-column-procedureg  m-1e9d51c93-113[  f  l-1e9d51c93-115 ]j hohhhhx Xf e = hohhhhh Xq e <=  f  l-1e9d51c93-118f  l-1e9d51c93-119 ] hohhhhx X X sh X   X e <= f  l-1e9d51c93-11df  l-1e9d51c93-11e ] hohhhhx X X h X	   X e <= f  l-1e9d51c93-122f  l-1e9d51c93-123 ] hohhhhx X X sh XJ   g  t-1e9d51c93-112 f  l-1e9d51c93-127 ] hohhhhx XY  hohhhhh X   X  XX  XZ   sh X 	 
X  h X	 
 XR  X  X   	  sh X g  !%source-location-offset-procedureg  m-1e9d51c93-12e[  f  l-1e9d51c93-130 ]j hohhhhx Xf  e ! = "hohhhhh #Xq" $e# %<!$= & 'f  l-1e9d51c93-133(f  l-1e9d51c93-134)'( *]&) +*hohhhhx ,X+ -X+ .s*h /X. 0-/ 10 2X" 3e2 4<!3= 5f  l-1e9d51c93-1386f  l-1e9d51c93-139756 8]&7 98hohhhhx :X9 ;X9 <8h =X	< >;= ?> @X" Ae@ B<!A= Cf  l-1e9d51c93-13dDf  l-1e9d51c93-13eECD F]&E GFhohhhhx HXG IXG JsFh KXJJ LIK ML Ng  t-1e9d51c93-12dON Pf  l-1e9d51c93-142QP R]OQ SRhohhhhx TXYS URhohhhhh VXU WV XXU YXXU ZXZU [ZV \sRh ]X\ ^Y[] _XU `Rh aX	` b_Va cXRU dXU eX\ fde gcVf hX^bg iTWh jsh kXj lg  !%source-location-length-proceduremg  m-1e9d51c93-149nm[ on pf  l-1e9d51c93-14bqp r]joq snhrohhhhx tXfs uet vu= whrohhhhh xXqw yex z<vy= {nn |f  l-1e9d51c93-14e}f  l-1e9d51c93-14f~|} ]{~ nhrohhhhx X X shr X   Xw e <v= f  l-1e9d51c93-153f  l-1e9d51c93-154 ]{ nhrohhhhx X X hr X	   Xw e <v= f  l-1e9d51c93-158f  l-1e9d51c93-159 ]{ nhrohhhhx X X shr XJ   g  t-1e9d51c93-148 f  l-1e9d51c93-15d ]o nhrohhhhx XY hrohhhhh X  X XX XZ  shr X  X hr X	  XR X X      shr Xl g  m-1e9d51c93-164[  f  l-1e9d51c93-169f  l-1e9d51c93-16af  l-1e9d51c93-16bf  l-1e9d51c93-16cf  l-1e9d51c93-16d ]  f  l-1e9d51c93-166 ]j hohhhh X sh X X X X X X   g  make-vectorg  list->vectorg  reverse
 g  maxg  displayf  Error in map-gotog  newlineg  exptg  bidonf  Error in add-lookback-edge : g  assvg  assqg  reduceg  leftg  rightg  nonef   %% Shift/Reduce conflict (shift f  	, reduce f  ) on 'f  ' in state f  "%% Reduce/Reduce conflict (reduce g  defaultg  acceptg  for-eachg  number?g  list-refg  	*default*g  *error* g  left:g  right:g  	nonassoc:f  +invalid operator precedence specification: 猤茤g  nonassoc  g  memberf  "duplicate definition of terminal: f  invalid terminal: g  assocf  Nonterminal previously defined:f  Invalid nonterminal:f  /Nonterminal definition must be a non-empty listg  *eoi*g  eoi	
 
L
 g  *start*g  carf  -Grammar must contain at least one nonterminalg  cdarg  appendg  :g  $1 f  <Grammar definition must have a non-empty list of productionsf  Invalid token list: f  undefined symbol : g  prec:f  *prec: directive should be at end of rule: f  Invalid prec: directive: f  !Invalid terminal or nonterminal: g  symbol->stringf   Invalid terminal or nonterminal:f  TInvalid 'error' production. A single terminal symbol must follow the 'error' token.:g  vectorg  string->symbolg  string-append f  -!g  number->string"f  $#f  /At least one production needed for nonterminal:$g  vector->list% &g  ___stack'g  ___sp(g  ___goto-table)g  ___push*g  
yypushback+&'()* ,'() -g  let*.g  tok/g  
vector-ref0g  -1. 2. 312. 43 5f  @6. 716. 87 9 : ;' <g  output:=g  with-output-to-file>g  define?f  Malformed lalr-parser form@f  Invalid option:Ag  expect:Bg  driver:Cg  glrDg  
out-table:Ef  State tableFf  -----------Gf  state Hf     If   --> Jf  . Kf   Lf  	   (rule Mf  )Nf  default actionOf   : ErrorPf   : Accept inputQf   : reduce using rule Rf   : shift and goto state Sf  No generated parser available!Tg  string?Ug  integer?Vg  memqWg  lrXWC Yg  combine-locationsZg  *max-stack-size*[g  vector-length\f  %Syntax error: unexpected end of input]f  !Syntax error: unexpected token : ^f  Syntax error: invalid token: _g  
take-right`g  dropag  filenameC 5      hL   ]4	
$5 4' >  "  G   ()R4,0 >  "  G  4, >  "  G  .i1R2i3R4678;>AD    h   P   ] 	C   H       g  filenamef  system/base/lalr.upstream.scm
	S	 		
   C     h   r   ]	4 5L 4?6j       g  args
		 g  v			  g  filenamef  system/base/lalr.upstream.scm		S	 		   CGH       h(   p   ]	4 5$   O @ 6 h       g  y
		' g  tmp		'  g  filenamef  system/base/lalr.upstream.scm
	S	 		'   C57R46I8;>ADJ    h   x   - 1 3  C      p       g  x
			 g  y			  g  filenamef  system/base/lalr.upstream.scm
	T			T	# 			
   C     h   r   ]	4 5L 4?6j       g  args
		 g  v			  g  filenamef  system/base/lalr.upstream.scm		T	 		   CGH       h(   p   ]	4 5$   O @ 6 h       g  y
		' g  tmp		'  g  filenamef  system/base/lalr.upstream.scm
	T	 		'   C5IR46K8;>ADL    h   {   ]  C    s       g  msg
		 g  obj		  g  filenamef  system/base/lalr.upstream.scm
	U			U	% 			   C  h   r   ]	4 5L 4?6j       g  args
		 g  v			  g  filenamef  system/base/lalr.upstream.scm		U	 		   CGH       h(   p   ]	4 5$   O @ 6 h       g  y
		' g  tmp		'  g  filenamef  system/base/lalr.upstream.scm
	U	 		'   C5KRMNOPQT hp      ]4 5$  ^4 5$  "  $  
"  $  24 &  "  	45>  "  G  "   "    C         g  lvalue
		n g  tok		n  g  filenamef  system/base/lalr.upstream.scm
	V			W			W			X			X	*		X			W		"	Y		5	W		6	Z		<	Z	%	?	Z	*	[	Z	 		n	  g  nameg  note-source-location CURP        h      ]  C         g  category
		 g  source		 g  value			  g  filenamef  system/base/lalr.upstream.scm
	x
 			  g  nameg  %make-lexical-token-procedure CVR468;W    h   n   ]  C  f       g  t-1e9d51c93-32
		 g  t-1e9d51c93-33		 g  t-1e9d51c93-34			  			   C      h   `   ]L 6    X       g  a
		  g  filenamef  system/base/lalr.upstream.scm		x
 		   C<        h   P   ] L 6H       g  filenamef  system/base/lalr.upstream.scm		x
 		
   C  h      ] C          		
   CGH        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/base/lalr.upstream.scm
	x
 		n   C5RP  4 P>  "  G   	Vi  PRP    h      ] $   CC             g  obj
		  g  filenamef  system/base/lalr.upstream.scm
	x
 		  g  nameg  %lexical-token?-procedure CR468;a   h   6   ]  C      .       g  t-1e9d51c93-45
		
  		
   C      h   `   ]L 6    X       g  a
		  g  filenamef  system/base/lalr.upstream.scm		x
 		   C<        h   P   ] L 6H       g  filenamef  system/base/lalr.upstream.scm		x
 		
   Cc h      ] C          		
   CGH        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/base/lalr.upstream.scm
	x
 		n   C5RPT        h      ] &   
C 6       g  s
		  g  filenamef  system/base/lalr.upstream.scm
	x
 		  g  nameg  !%lexical-token-category-procedure CdR468;        h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   6   ]  C      .       g  t-1e9d51c93-51
		
  		
   C      h   `   ]L 6    X       g  a
		  g  filenamef  system/base/lalr.upstream.scm		x
 		   C<        h   P   ] L 6H       g  filenamef  system/base/lalr.upstream.scm		x
 		
   C h      ] C          		
   CGH        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/lalr.upstream.scm
	x
 	    C5RPT    h      ] &   C 6       g  s
		  g  filenamef  system/base/lalr.upstream.scm
	x
 		  g  nameg  %lexical-token-source-procedure CR468;  h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C:     h   6   ]  C      .       g  t-1e9d51c93-6c
		
  		
   C      h   `   ]L 6    X       g  a
		  g  filenamef  system/base/lalr.upstream.scm		x
 		   C<        h   P   ] L 6H       g  filenamef  system/base/lalr.upstream.scm		x
 		
   C< h      ] C          		
   CGH        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/lalr.upstream.scm
	x
 	    C5RPT    h       ] &   	C 6              g  s
		  g  filenamef  system/base/lalr.upstream.scm
	x
 		  g  nameg  %lexical-token-value-procedure C=R468;KRW   h   :   ]C     2       g  err
		 g  s		  			   CZ`e h   :   ]C     2       g  err
		 g  s		  			   Chns h   :   ]C     2       g  err
		 g  s		  			   C     h   6   ]  C      .       g  t-1e9d51c93-87
		
  		
   C      h   `   ]L 6    X       g  a
		  g  filenamef  system/base/lalr.upstream.scm		x
 		   C<        h   P   ] L 6H       g  filenamef  system/base/lalr.upstream.scm		x
 		
   C h      ] C          		
   CGH        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/lalr.upstream.scm
	x
 	    C5R468;     h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   CGH   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  system/base/lalr.upstream.scm
	x
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R        h      ]  C             g  input
		 g  line		 g  column			 g  offset			 g  length			  g  filenamef  system/base/lalr.upstream.scm
 
 			  g  nameg  %make-source-location-procedure CR468;  h      ]  C             g  t-1e9d51c93-b7
		 g  t-1e9d51c93-b8		 g  t-1e9d51c93-b9			 g  t-1e9d51c93-ba			 g  t-1e9d51c93-bb			  			   C      h   a   ]L 6    Y       g  a
		  g  filenamef  system/base/lalr.upstream.scm	 
 		   C<       h   Q   ] L 6I       g  filenamef  system/base/lalr.upstream.scm	 
 		
   C        h      ] C          		
   CGH        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/base/lalr.upstream.scm
 
 		n   C5R  4 >  "  G   	i  R    h      ] $   CC             g  obj
		  g  filenamef  system/base/lalr.upstream.scm
 
 		  g  nameg  %source-location?-procedure CR468;       h   6   ]  C      .       g  t-1e9d51c93-d0
		
  		
   C      h   a   ]L 6    Y       g  a
		  g  filenamef  system/base/lalr.upstream.scm	 
 		   C<       h   Q   ] L 6I       g  filenamef  system/base/lalr.upstream.scm	 
 		
   C        h      ] C          		
   CGH        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/base/lalr.upstream.scm
 
 		n   C5RT      h      ] &   
C 6       g  s
		  g  filenamef  system/base/lalr.upstream.scm
 
 		  g  nameg   %source-location-input-procedure CR468;%,1        h   :   ]C     2       g  err
		 g  s		  			   C4:? h   :   ]C     2       g  err
		 g  s		  			   CBHN h   :   ]C     2       g  err
		 g  s		  			   Cj     h   6   ]  C      .       g  t-1e9d51c93-dc
		
  		
   C      h   a   ]L 6    Y       g  a
		  g  filenamef  system/base/lalr.upstream.scm	 
 		   C<       h   Q   ] L 6I       g  filenamef  system/base/lalr.upstream.scm	 
 		
   Cl        h      ] C          		
   CGH        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/lalr.upstream.scm
 
 	    C5RT  h      ] &   C 6       g  s
		  g  filenamef  system/base/lalr.upstream.scm
 
 		  g  nameg  %source-location-line-procedure CmR468;{ h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   6   ]  C      .       g  t-1e9d51c93-f7
		
  		
   C      h   a   ]L 6    Y       g  a
		  g  filenamef  system/base/lalr.upstream.scm	 
 		   C<       h   Q   ] L 6I       g  filenamef  system/base/lalr.upstream.scm	 
 		
   C        h      ] C          		
   CGH        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/lalr.upstream.scm
 
 	    C5RT  h       ] &   	C 6              g  s
		  g  filenamef  system/base/lalr.upstream.scm
 
 		  g  nameg  !%source-location-column-procedure CR468;       h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   7   ]  C      /       g  t-1e9d51c93-112
		
  		
   C     h   a   ]L 6    Y       g  a
		  g  filenamef  system/base/lalr.upstream.scm	 
 		   C<       h   Q   ] L 6I       g  filenamef  system/base/lalr.upstream.scm	 
 		
   C        h      ] C          		
   CGH        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/lalr.upstream.scm
 
 	    C5RT  h       ] &   	C 6              g  s
		  g  filenamef  system/base/lalr.upstream.scm
 
 		  g  nameg  !%source-location-offset-procedure CR468;%,1       h   :   ]C     2       g  err
		 g  s		  			   C4:? h   :   ]C     2       g  err
		 g  s		  			   CBHM h   :   ]C     2       g  err
		 g  s		  			   Ci     h   7   ]  C      /       g  t-1e9d51c93-12d
		
  		
   C     h   a   ]L 6    Y       g  a
		  g  filenamef  system/base/lalr.upstream.scm	 
 		   C<       h   Q   ] L 6I       g  filenamef  system/base/lalr.upstream.scm	 
 		
   Ck        h      ] C          		
   CGH        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/lalr.upstream.scm
 
 	    C5RT   h       ] &   	C 6              g  s
		  g  filenamef  system/base/lalr.upstream.scm
 
 		  g  nameg  !%source-location-length-procedure ClR46 8;z       h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   7   ]  C      /       g  t-1e9d51c93-148
		
  		
   C      h   a   ]L 6    Y       g  a
		  g  filenamef  system/base/lalr.upstream.scm	 
 		   C<       h   Q   ] L 6I       g  filenamef  system/base/lalr.upstream.scm	 
 		
   C        h      ] C          		
   CGH        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/base/lalr.upstream.scm
 
 	    C5 R46J8;    h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   CGH   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  system/base/lalr.upstream.scm
 
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5JR468;>AD  h8      ]"  $$  C  "
"              g  v1
		1 g  v2		1 g  n			1 g  i			*  g  filenamef  system/base/lalr.upstream.scm
 		 		 			 		 	$	 	$	  		! 		$ 		* 	 		1	  g  nameg  	bit-union Ch   
  ]" $  L LL
$  tM
$  IM$  4L>  "  G  "  #ML4L>  "  G  "  4L>  "  G  "  4L>  "  G  "   L L6            g  p
	  g  s4	  g  x		  g  ruleno		  g  y		  g  symbol		0   g  filenamef  system/base/lalr.upstream.scm
					$				)				'		$			#		'	 	+		0	.	0	 	6	+	:	"	?	0	C	&	D	&	I	-	P	&	b	(	i	(	j	(	o	/	r	7	w	( 	& 	- 	& 	  	' 	  	 	 $	 	  g  nameg  loop2 C   h@      ]
 $  0O L LL LLLQ LL  6C          g  s1
		= g  s3		= g  loop2			;  g  filenamef  system/base/lalr.upstream.scm
								6	5	7	#	;	 		=	  g  nameg  loop C h    ]45N4 5N45N4 5N45NMMN45"  #(  "  "45"
"4L >  "  G  4L>   "  G  4M5N4M54M
54M54MM5
	" RM$ 	
$  DM

$  ,M$  " ,M"" 	"  M
$  $  "  M"$  "a
"  PM
$  -
		""
""GO 	LL
Q 4
>  "  G  "  


"	
4L>   "  G  4L>   "  G  4L	>   "  G  4L
 >  "  G  C         g  terms
	 g  
terms/prec	 g  vars		 g  gram		 g  gram/actions		 g  l		A	d g  count		A	d g  no-of-rules		o g  no-of-items		o g  squeue	 @ g  rcount	 @ g  rsets		 @ g  relts	
 @ g  r	 ' g  s2	 ' g  p	 ' g  *r	 ' g  symbol	 . g  r1	2 g  
any-tokens	2 g  symbol	7 g  ruleno	x g  r2	~ g  p2	~ g  symbol	 g  loop	$  g  filenamef  system/base/lalr.upstream.scm
			 													&		'			/			4
		6
		7		A		G		P	&	S	7	X	?	[	7	\	.	d	 	d		o		t		 		 |	 |	 }	 ~	 ~	 ~	 	 	 	 	 }	 	 	 	 	
 	 	 	1 	  	 	 	 	"				 	('	2	7	#7	=	A	D	!J	*U	9]	c	f	$t	u	,x	~	 	0	"	(	$	:	7	*	=	7	*	*	1	:	*	.	(	 		'	A		Q		a		q		 _		   C    h     ]N4N3N2N1N0N/N.N-N,N+N*45N)N(N'N&N%N$N#N"N!N NNNNNNNNNNNNNNNNNL  LLL1LLL2L3LLLLL	L
LLLLO 6           g  tokens
	  g  gram	   g  filenamef  system/base/lalr.upstream.scm
 												 		!		"		#		 $		#%		$'		*'	5	,'		.'		1(		4)		7*		:+		=,		@-		C.		F/		I0		L1		O2		R3		U4		X5		[6		^7		a8		d9		g:		j;		m<		p=		s>		v@		yA		zB		|B	 	 -	 	  g  nameg  gen-tables! C  h     ]K NN4M5N4M5N4M5N "  (  C"  n(  	"M	M	"  8
(  M 
			"M 


"
"	"
"`        g  no-of-rules
	  g  no-of-items	  g  gram		  g  p		.  g  item-no		.  g  rule-no		.  g  nt		:  g  prods		@  g  it-no2		@  g  rl-no2			@  g  rhs	
	i  g  it-no3		i   g  filenamef  system/base/lalr.upstream.scm
E		F		F		G		H		H		I		I		 J		%J		(J		*J		.L		4M		9N		:N	
	@O		FP		IQ		WQ		^S		eT		iU		oV		tX	6	xX		{Y	#	~Y	/ Y	< Y	 [	6 [	 \	# \	- \	 U	 U	% U	 O	 O	 O	 L	 +	 	  g  nameg  pack-grammar C     h     ]0HH 4M
5K 4M	5K"  NM$  AM
$  "J JJ"""  

"4M
5N "  XM$  M"  )
$  "  )J "J"M "C
"       g  delts
	  g  dset	  g  i		"	p g  j		"	p g  lhs		0	l g  i	   g  j	   g  s	   g  x	   g  q	    
g  filenamef  system/base/lalr.upstream.scm
_			`		`		`		a		"c		'd	
	+d		0e		0e	
	6f		:f		Eh	/	Fh	'	Gh		Ni		Qj		Tj	 	\j		_k		ik		pc		{m	 m	 o	 p	
 p	 q	 r	 r	 t	" t	 u	" u	0 u	* u	 q	 q	" q	: q	 q	
 v	 w	 w	 o	 .	 
  g  nameg  set-derives C  hX    ]04M5N"  m M$  `"  Q(  	  "MM	$  "M$  M 4LM 5"   "   "M ""  
 ""   $  "  }M$   "M"  $(  "  $4L M5""$  "M"
"y"   "d"  % M$  M 4L M 5  "C
 "          g  i
		} g  sp		n g  sym		5	n g  continue
  g  i  g  cont	  g  x	  g  l	   g  z	   g  y	  g  i
(M  g  filenamef  system/base/lalr.upstream.scm
					$	
							
				
	#		&		,		3	>	4	-	5		5		<		@		E		N	,	W	9	Y	,	Z		e		k		n	
	s		y	
	}	 	 	 	
 	 	 	 	 	 	 	 	' 	' 	B 	/ 	' 	  	 	 	 	 	 	 	 				
	(	-	
1	6	"?	-A	"B	E	K	M	 C	T
  g  nameg  
set-firsts C   h   u  ]4M5N4L>   "  G  "  S M$  H"  $(  "  &4L M5"M "M   "C
 "      m      g  i
	 	s g  l	-	Q g  fd		-	Q g  x	_	q  g  filenamef  system/base/lalr.upstream.scm
								 		%	
	)		-		3		<	 	=	 	D	<	E	(	I	 	Q		Q		V	"	W	=	_		_	
	h		k		q		s	 		z
  g  nameg  set-fderives C h@    ]9H4M5K"  a(  "  _M	$  :M$  -"  (  "  J"M""   "   " ""  M$  {J$  aM "  J$  /$  """""|"  $  "6" "@      g  core
	@ g  ruleset	@ g  csp			t g  sym		#	t g  dsp		;	U g  ruleno	 2 g  csp	 2 g  itemsetv	 2 g  itemno	   g  c	   g  	itemsetv2	   g  c	& g  	itemsetv2	&  g  filenamef  system/base/lalr.upstream.scm
								"	'	#		#	
	*		.		3		;		A		J	-	L		O		U		U		Z	!	`		k		q		t	 	 	
 	 	 	
  	  	 	 	 	 	 	 	 	 	+ 	% 	 	 	+ 	 	 	+ 	 	 			
						%		 		&
	&	
2	6	/@	 =	@  g  nameg  closure C        h8    ](4M
5N4M5N4M
>  "  G  4L>   "  G  4	
5  

  	 	  NMN	N
 "   $   4L	54L >  "  G  4L>  "  G  4L>   "  G  M
$  ]4	
5

MM	M$  M MN"   NMN"     "DCM ":        g  p
	B	l g  
this-state
	p. g  x	z, g  is	 , g  p	  g  x	   g  x	   g  x	    g  filenamef  system/base/lalr.upstream.scm
'														"		+)		; 	"	B		I 	"	N 	"	T 	"	Z		[ 	"	`!		b!		f"		i#		p+		s,	
	w,		z-		z-	
	}.	  	" .	 -	
 /	 0	 1	 2	 2	  	# 	  	" 	  	# 	  	# 	  	# 		!						&4	,4	.+	 7	6
  g  nameg  generate-states C     h   <  ]!N"  M$  M""  
""  w$  lM
$  I4LM5NM(  MMM"   M"   ""   "4M5N C      4      g  itemset
	  g  i			% g  isp	0  g  i		:  g  sym		A  g  x		[   g  filenamef  system/base/lalr.upstream.scm
7		9		9			:		;	
	;		=	&	=		>		!>		%:		0@		3A	
	7A		:B		:B	
	AC		AB	
	GD		KD		LF	%	VF		[G		[G		cH		jJ	=	mJ	7	nJ		wK	6	xK	 M	, M	& M	 N	6 N	 O	 O	 @	 Q	 Q	 )	   g  nameg  new-itemsets C     h0    ]9M  45"  !(  
"  "
"M(  4L 5M 
C"  	$  }"  .$   $  ""  "  	"$  

C(  4L 5 
C"o(  4L 5 
C"I"A          g  sym
	, g  isp	, g  n		, g  isp1			7 g  k			7 g  key		B, g  sp		I, g  x		X	i g  sp1		m$ g  c		r	| g  i1	   g  t	   g  c	   g  c	   g  x	   g  x	  g  filenamef  system/base/lalr.upstream.scm
U		V		V		
W		V		X		Y		"Z		)[		.[	-	/[	(	7[		7X		BV		I\		IV		Q]		R^		X^	
	c_	)	d_		h 	"	ma	
	rb	'	rb		y 	"	}b	 b	 c	 d	  d	 e	# f	# e	  d	 g	" g	+ g	 h	 c	 c	9 c	-  	" c	 b	 i	 i	  	" j	 j	 k	 k	 l	$ l	  	" n	 n	j	j	k	k	l	$l	 	"n	$n	$a	
 D	,  g  nameg  	get-state C     hh   j  ]!M  454	
5M
  M$  MN"   		M MNMNC     b      g  sym
		c g  isp		c g  n			c g  p			c g  n			)  g  filenamef  system/base/lalr.upstream.scm
q		r		r		
s		r		 	"	r		u		& 	"	/ 	"	4w	
	8w		<w		G 	"	N 	"	Uz		Vz		Y{		[{		^|		`|	 		c  g  nameg  	new-state C   h       ] (  C4L  54L 5C           g  l
		  g  filenamef  system/base/lalr.upstream.scm
	
									!				*		0		*		 		  g  nameg  loop C       h(      ]O  L Q  4 4M55 N C          g  loop
		!  g  filenamef  system/base/lalr.upstream.scm
			
				
	#	 		%
  g  nameg  append-states C   h8     ]	 (  CM 
$  
4L  5C  "              g  l
		1 g  item		1  g  filenamef  system/base/lalr.upstream.scm
								2		 								 		)	$	/	&	)	'		+	 	1	 		1  g  nameg  loop C      h     ]O L Q 45$  T4	
5 

45	M$  M MNC NMNCC           g  core
		{ g  itemset		{ g  loop			 g  rs			{ g  p		-	y g  x		3	> g  x		E	P  g  filenamef  system/base/lalr.upstream.scm
						!	
	%		& 	#	-	
	3 	"	3		; 	#	?		E		M 	#	W 	#	]		d	+	e		h	'	j		q	(	s		w	 		{	  g  nameg  save-reductions C     h      ] M	N4L
>   "  G  4L	>   "  G  4L>   "  G  4L>   "  G  4L>   "  G  4L>   "  G  4L>   "  G  4L>   "  G  4LM>  "  G  L 6        g  filenamef  system/base/lalr.upstream.scm
			/					
						+		;		K		[		k		{	 	 	 	 
  g  nameg  lalr C      h@     ]4M5N"  " $   M
  "CM  "             g  l
		2 g  x		0  g  filenamef  system/base/lalr.upstream.scm
									
						
	" 	"	& 	"	'		*		0		2	 		:
  g  nameg  set-accessing-symbol C    h8      ]4M5N"    $   M
  "CM  "       g  l
		0 g  x		.  g  filenamef  system/base/lalr.upstream.scm
									
						
	" 	#	%		(		.		0	 		8
  g  nameg  set-shift-table C  h8      ]4M5N"    $   M
  "CM  "       g  l
		0 g  x		.  g  filenamef  system/base/lalr.upstream.scm
									
						
	" 	#	%		(		.		0	 		8
  g  nameg  set-reduction-table C      hX   $  ] "  @M  $  1
$    " 45
 "C


 "           g  p
		F g  curmax		F g  length			F g  x			F  g  filenamef  system/base/lalr.upstream.scm
																#	%	-		0		1		D		F	 		S
  g  nameg  set-max-rhs C h      ] (   C  "         g  l
		  g  filenamef  system/base/lalr.upstream.scm
								
				
 		  g  nameg  last C        h  X  ]@O   Q  4M
5N	4M
5N" M
$  MMM$  [$  "  $  M4 	5M"  $  "M	"M	"nMM
4545N"  *$  "  $MM4
5"
"4	5N45N "  wM
$  lM	$  "M$  <"  )(  "M"	""C

"

"w       P      g  last
	
 g  count	( g  i		( g  rp		B  g  sp		B  g  t		R	~ g  c	 " g  j	  g  nelem	   g  i	& g  np	& g  rp	J g  j	V g  np2	V  g  filenamef  system/base/lalr.upstream.scm
									"	"		$		(		-	
	1		8		=		B		B		L		P 	#	R		R		e		h	0	o 	#	q	0	r	$	u	!	v	  	  	# 	 	1 	 	 	  	 	 	  	 	 	 	 	 	 	 	# 	 	>  	 	, 						& 	+	/	4	8	;	E	J	 J	R	V	\	_	(i	"p
	>q
	$t	+w	3	$	 	#		"	 		 P	
  g  nameg  initialize-LA C      h    ]`4M
5N4M
5 " $  k"  K$  7MM$  MM"""4	5"" M$   M""   M$  "  M "
"NMMM MM4M5N4M5N"  (  C
"  R(  "  S	M	

M$  $ 
 
MM	"   
	"	""}M "u

"
M "r            g  temp-map
	 g  ng	 g  sp		 g  i		'	r g  ng2		'	r g  symbol		4	e g  s		x  g  k	  g  i	  g  i	   g  sp	
 g  x	 g  state1	 g  i	!s g  state2		.j g  symbol	
5g g  k	E`  g  filenamef  system/base/lalr.upstream.scm
					 								!									#		'		*		.		3	9	4	 	4		;		?		H	,	I	'	J		M	!	P	)	X		[		e		j		r		r		s		x	2	x	$	 	# 	 	 	  	  	 "	 #	 #	 #	8 #	 &	 '	 &	 (	. (	 &	 &	 *	 +	 ,	 -	% -	 .	#.	
0	2	 2	 	#2	!4	.6	).6	57	)56	<8	 @8	E9	)E9	 N:	?O:	"V;	"]<	"m4	1s4	x 	#~4	0	)0			 V	
  g  nameg  set-goto-map C   h     ]""  t$  +4  >  "  G  4>   "  G  
C	M  $  C $  ""MM"x        g  state
	  g  symbol	  g  low			z g  high			z g  middle		B	z g  s		I	z  g  filenamef  system/base/lalr.upstream.scm
?		@		B	
	B		D		D		D		 D		)D	>	?F	#	BF		BF	
	IG		IF	
	PI		TH		\K		`H		cL		mL		rN		zN		z@		@	 A	- A	 A	 @	 	 	  g  nameg  map-goto C     hX    ]`4M	5N"  * M	$  "  $M M4
5  "
 "4M	5 "  M	$  MMM$  "  $  M M$  -M$  4L5""M			4			5



	"|$   45"  "  	"P"   ""  


"L 6        g  i
		: g  nelem	#	0 g  reads
	IV g  i	OF g  rowp		OF g  rowf		]B g  stateno		d? g  sp		k< g  j		w g  edges		w g  symbol	   g  b		   g  x	
   g  y	    g  filenamef  system/base/lalr.upstream.scm
Q		R		R		S		S		S		#S	8	& 		1S	'	4S		:S		BU		IU		OW		TX		XX		]Y		]Y		dZ		dY		k[		kY		s\		w]		z^		~^	 _	? _	& _	 `	 `	 a	" a	 b	) b	7 b	1 b	" d	) d	" f	. f	   	  	  	  	"  	  	  	  	#  	  	 g	' g	 h	h	
i	1i	]	 	#]	;']	.j	1j	9j	FW	Vk	 C	V
  g  nameg  initialize-F C    h     ]:4545"  .$  "  ( "
""  n$  "  h $  G"  7$  ,""  ""   "
""  !$  "  "
"C       g  r-arg
	  g  n	  g  new-end		  g  new-R		  g  i			H g  x		,	? g  i		S  g  sp		e  g  sp2		r  g  x		|  g  y	   g  i	    g  filenamef  system/base/lalr.upstream.scm
|		}		~		}						#		)		,		,		5	
	<	
	B		H		S		X		\		e		e		j		n	
	r		u		y		|		|	 	 	 	* 	" 	 	- 	 	 	 	 	 	 	 	 	 	" 	 	 	 	 /	 	  g  nameg  	transpose C  hP   P  ]"  *(  CM $  C"M 	 "       H      g  stateno
		I g  symbol		I g  j			0 g  stno			0 g  st2			0 g  s		5	?  g  filenamef  system/base/lalr.upstream.scm
														 		&		0		0		5	"	5		< 	#	I	 		I	  g  nameg  	get-state C h(  X  ]O  LL Q  4M5N" M$  " MMM" $ " M


$  "4 
5		"M$  "  M"  $  "  $  $M$  ""$  MM"  M4>  "  G  4 >  "  G  4>   "  G  "  M"d"  z$  "M	$  AM	$  %M4L
5"""	"q
M 	"kM"  M"?"
"4LMM5NC  P      g  	get-state
	& g  i	  g  state1		:	 g  symbol1		:	 g  rulep		B g  edges		B g  *rulep		L g  rp		R g  stateno		R g  states			R g  *rp	
	W g  st		j  g  k	 ; g  found	 * g  i	 * g  done	? g  stp	? g  rp2	? g  edgp	? g  *rp	W  g  filenamef  system/base/lalr.upstream.scm
						 		%			)		2		9	.	:		:		B		E		I	
	L		L		R		W		W		]		a		b	"	j		o	!	v	- 	 	# 	 n	$ n	 n	 o	 p	 p	 p	 q	 q	 q	 r	 s	 s	 u	 y	* y	 x	 v	 v	  v	 w		w	 w	w	>*o	0o	8o	?	E	H	&R	 W	+W	 ^	&b	"g	&p	2q	-t	-w	-x	3}	=	3	-	&	&		+	+			 	$									$	 [	&
  g  nameg  build-relations C      hp   ~  ](M M "  X $  M"  >$  .MM4LM>  "  G  ""M"C
"    v      g  n
		l g  i		e g  sp			X g  LA-i		,	O g  F-j		,	O  g  filenamef  system/base/lalr.upstream.scm
																!		&		+	,	,		,		1		I		O		R		X		X		]		c		e	 		l
  g  nameg  compute-lookaheads C       h    ]1MNMM MM  L $  "  $  y
M $  4L>  "  G  "   M  M $  M  M "   M M4LM>  "  G  ""  "t"   M  $  F"  >MMMNM M $  C4LM MM>  "  G  ""C       g  i
	 g  height	 g  rp		 g  rp2		+  g  j		5  g  F-i		  g  F-j		  g  j	 	  g  filenamef  system/base/lalr.upstream.scm
																#		'	
	+		.		2		5		5		=		>		B		C		]		b		c		g		p	/	q		z	!		!		 	 	 	 	 	 	 	
 	 	 	 	 	 	 	 	 	 	# 	# 					 2	  g  nameg  traverse C h     ]1HHHHO 	 LLL Q M	K4M
5K4M
5K
K"  CM$  8
J$  $ $  4>  "  G  "   "   "C
"             g  relation
	  g  infinity	  g  INDEX		  g  VERTICES		  g  top		  g  traverse		  g  i		W   g  filenamef  system/base/lalr.upstream.scm
		8		;		@		C		F		K	"	N		W		\ 	
	` 		f		g		k		p		q		u		v	 	 	 	 	   g  nameg  digraph C       h      ] M N C         g  rule
		 g  sym		  g  filenamef  system/base/lalr.upstream.scm
				
	
		 			  g  nameg  add-rule-precedence! Co#  hH    ]SM  45$ $  C" 
MM4M5$  M"  c"  QM


$  	"  J
M$  
MM	"		"
M
	"		$  "  -	$  "  &  "  &  "  	$  M&  CC$  C	

MM$  MM"  M  M	N	M&  CC
$  u
$  i


MM$  MM"  M  M	N	M&  C45C""M   C           g  state
	C g  symbol	C g  
new-action		C g  state-actions		C g  actions		C g  current-action		2 g  rule		4 g  t		N  g  sym		Y	f g  i		n  g  prec			n  g  item	
	s  g  i1	   g  sym	   g  sym-prec	  g  	sym-assoc	  g  	rule-prec		  g  key	 g  n	b g  l	 g  n	 g  l	  g  filenamef  system/base/lalr.upstream.scm
O		P		P		
Q		P		R		R		S	"	S		&T		*T		1b	7	4b		;		<		C	
	D		F		N		Y	"	Y		`		a		n"		s$		s$		y&		}&	
 (	 (	 )	 )	 +	4 +	 	 	 +	 ,	 "	 "	 "	 7	 ;	
 :	 ;	% <	
 :	 <	% =	 :	 =	%>	
:	>	%?	%b	- 	1d	%4e	39e	R;e	A<e	)Af	3Df	)Ob	Sk	&Wk	TXk	`]l	&bl	;bl	/i	m	t	"u	~	l	Mj	%D	D	 	m	%n	3n	Rn	An	)o	3o	)W	W	W	W	3W	[	[	@[	O[	[\	\	0\	$			"		\	BZ	D	D	
 	]	^	(^	G^	6^	_	(_	6(_	=q	2@q	,Aq	 z	C	  g  nameg  
add-action C      h8      ]
"  *M $  C4L >  "  G  ""        g  state
		7 g  action		7 g  i			0  g  filenamef  system/base/lalr.upstream.scm
t		u		v		u		w		*u		0u	 		7	  g  nameg  add-action-for-all-terminals C#   h    y   ]4 >  "  G  6       q       g  message
		  g  filenamef  system/base/lalr.upstream.scm
I		J		K	 		   C 
   hh    ]pH O 
O LLLLLLLL L Q LQ K 4M5N" M$  " M$ L$ >"  M"  $  
MM
"  t	M$  g
	$  4	>  "  G  "   	$  	
	"	
	
	""  



	"y"S"  sM">$  WM	$  FM&  4
	>  "  G  "  4
	>  "  G  "  ""  ""   "   M$  _"  L$  AMM$  4M>  "  G  "   ""  	""   "
"4M
>  "  G  4J 5M$  	J 6C           g  conflict-messages
	c g  
add-action	c g  add-action-for-all-terminals		c g  i		N/ g  red		` g  k		|G g  j	 9 g  rule	 5 g  lav	 5 g  token		  g  x	
  g  y	  g  z	  g  
in-la-set?	   g  shiftp	& g  k	 g  state	 g  symbol	  g  filenamef  system/base/lalr.upstream.scm
4		>A		Ay		Fy	,	Hy		Jy		N{		S|			W{		`}		`}		h~		l 	#	n~		r~		{	0	|		|	 	 	 	 	$ 	' 	$ 	$ 	 	 	  	 	4 	" 	( 	$ 	( 	+ 	& 	" 	- 	= 	- 	- 	& 	- 	9	H	&		3&	)	 /	9	>	 D	G	K 	#M	Q	V	+Z	^ 	b	c	h	4m 	#n	7o	4t			"	+ 	#	.	+								 		!					&		
		 	#	){	/{	7	>	C	LG	UG	
YG	aH	
 i	c
  g  nameg  build-tables C   h   d  ])H"  a$  V4J545$  *
$  $  "  	JK"   "   ""   ""  <(  C$  ""J
"\      g  acts
	  g  accums	  g  l				j g  x			f g  y		 	c g  l		v  g  max		v  g  sym		v  g  x	    	g  filenamef  system/base/lalr.upstream.scm
												
							 		#		-		1	%	5		;		@	)	A	$	B		I	+	M	%	O		Z		`		j		v		|	
 	 	 	 	 	 	 	" 	* 	 	 	 	 '	   g  nameg  most-common-action C h      ]4L  5 C              g  act
		  g  filenamef  system/base/lalr.upstream.scm
				
	#						 		   C     h      ]L O  6        g  acts
		  g  filenamef  system/base/lalr.upstream.scm
			 		  g  nameg  translate-terms C  h       ]4 5	$   L "  C         g  x
		  g  filenamef  system/base/lalr.upstream.scm
	/		>		;		6		@		;		1 		   C    h      ]4L  5 C              g  act
		  g  filenamef  system/base/lalr.upstream.scm
				
	#						 		   C 	    h     ])O  Q "  zM $  CMM$  <45M$  "   44LO 55"  M4 O 5"
"      g  terms
	  g  most-common-action	  g  translate-terms		  g  i		  g  acts		'  g  act		:	k  g  filenamef  system/base/lalr.upstream.scm
							 		'		'		.		/		3		4		:		B	!	H	.	P	:	S	!	T	!	W	"	f	!	g		h		u		v	 	 	 	 	 	   g  nameg  compact-action-table CL L	
     h   |   ] 4 5C      t       g  x
		  g  filenamef  system/base/lalr.upstream.scm
3	(	3	:	3	D	3	4 		   C     h  	  ]{ $ $ " $ c$  &  "  &  "  $  (  645	"  
(  "{
$  )45$  4	>  "  G  "   "  4
>  "  G  
	 
"~
"m6$  )45$  4	>  "  G  "   "  4
>  "  G  
 "" 1$  e		$  R	

$  >4
5$  "  	4
5$  
6	"
6645	45
454545$  6"  Z$  04L 	545"45	
454?6 
"" 
"E6 6  	      g  tokens
	 g  grammar	 g  k		 g  lst		 g  	rev-terms		 g  rev-terms/prec		 g  
prec-level		 g  term		~ g  t		*	N g  prec		g	v g  prec		v g  optype			v g  l	
	~  g  	rev-terms		~  g  rev-terms/prec		~  g  term	   g  lst	 g  rev-nonterm-defs	 g  def		 g  nonterm	
 g  t	 g  terms		 g  
terms/prec	

 g  nonterm-defs	 g  nonterms	! g  defs	; g  ruleno	; g  	comp-defs	; g  nonterm-def	Er g  compiled-def	Tr g  compiled-nonterm-defs	y  g  filenamef  system/base/lalr.upstream.scm
																					#		'		*		*		R		U	%	Y		]	 	a		d	#	g	/	g	#	j		p		r		s		v		~	 	 	# 	 	( 	 	 	 	 	 	 	 	 	 	 	 	  	 	% 	 	 		5		 		 	!	-	.	2	9	J	N	U	`	e	i		(m		p		~									'				%	!	%		-	!	(	(	!	-	!	$	V			B	R	<	'		-	B	R		<
	'
		'		-	6!	'!	$	,	0	4 	$5 	T7 	;!	>%	B%	E&	3E&	H'	3T&	Y+	+\,	5c,	+h-	+r+	 s/	;y/	3	#5	#0	 !	!	9!	E	!	9!	3$	3!			8			"	"			Q			 		  g  nameg  rewrite-grammar CL      h8      ]	4L L 5$  C4L L5$  MC 6          g  x
		5 g  PosInNT		5 g  PosInT		5  g  filenamef  system/base/lalr.upstream.scm
<		=		=		>		@		@		'A		,B		1C		5C	 		5  g  nameg  encode C L      h   F  ] (  C  4L5$  "  	4L 5$  4L5C$  {&  j$  Z(  J4L5$  3(  %4LL4LL5>  "  G   "cL666666 >      g  l
	  g  first	  g  rest		  g  t			6  g  filenamef  system/base/lalr.upstream.scm
F		G			H		I		J		I		L		L		+L	)	:K		=M		DM		HN		LK		OO		QO	&	UN		XP	 	YP		]P		`Q	 	eP		fR		kR	!	pR		tP		zS		{U	 U	7 U	D U	7 U	 V	 W	$ W	 X	  X	 X	  X	 X	  X	 Z	 Z	 Z	 Z	 .	   g  nameg  loop C       h(      ]
O LLLL  Q  6        g  rhs
		' g  ruleno		' g  loop			'  g  filenamef  system/base/lalr.upstream.scm
E		F	 		'	  g  nameg  process-prec-directive C L   h8      ]	4 L 5$  "  	4 L5$  C 6             g  x
		2 g  t		$  g  filenamef  system/base/lalr.upstream.scm
t		u	+	u	'	u	<	(u		.v	.	2v	" 		2   CL L !"!       h0      ] L$  C444 5554L  5C             g  j
		*  g  filenamef  system/base/lalr.upstream.scm
	*		0		,		0		6		7		8		8		7	 	6	!	6	&	>	(	6	)	0 		*  g  nameg  loop-j C#   h    ]lHO O LQ L LQ 45K $ 4 5" i$ \4		54 54O >  "  G  "  s$  h&  V$  "  "4	5$  "  $  4
>  "  G  "   "   ""  ""  Y45444	555 O Q 45	

	"$  4&  '$  	

	""p"l"h
6 
	"
 6             g  nonterm-def
	 g  ruleno	 g  terms		 g  nonterms		 g  No-NT		 g  encode		 g  process-prec-directive		 g  name		J g  lst		P g  i			P g  rev-productions-and-actions	
	P g  rhs		g g  rest		l g  prod		{ g  rhs	  g  t	   g  t	   g  
rhs-length	"t g  loop-j	IY g  action	[t  g  filenamef  system/base/lalr.upstream.scm
8		2:		=h		>h		Bh		Cj		Hj	$	Jj		Jj		Pk	
	Sn		Wn		Xp		]p	5	bp	?	gp		gp		lq		lp		or		vr	/	yr	)	{r		{p		~t	 ]	 ^	 ^	 `	 `	& `	 a	" a	 a	 b	  b	( b	  b	 a	 c	' c	  c	 `	 d	 d	 d	e	e	]		)"	&	$(	0)	7,	82	93	9;	8=	7@	*I	*Z	$[	[	b	g	%j	t	t{	w{	{{	~|	 |	+{	}	"}	{	~			.	#	~	o	k	
k	m	3k	
i	i	Fi	 \		  g  nameg  rewrite-nonterm-def C     h8     ]"  $$   $  C"C
"          g  x
		5 g  lst		5 g  lst			* g  i			*  g  filenamef  system/base/lalr.upstream.scm
																(	 	2	(	"	*	 		5	  g  nameg  pos-in-list C h`   C  ] (  C(   C $  4L  5C$  4L  5C  "       ;      g  L1
		Y g  L2		Y g  x			Y g  y			Y  g  filenamef  system/base/lalr.upstream.scm
							#			#		'		*		1	"	3		4		:		>		A		F		J		K		O		Y	 		Y	  g  nameg  loop C  h      ]
O Q  6        g  lst1
		 g  lst2		 g  loop		
	  g  filenamef  system/base/lalr.upstream.scm
		
	 			  g  nameg  sunion C h@      ]	 (  L C L$  L CL$  4L  5C C             g  l1
		: g  x		:  g  filenamef  system/base/lalr.upstream.scm
					
				
					!		'		+		.		3	!	5		6	 		:  g  nameg  loop C       h      ]
O  Q 6       g  elem
		 g  lst		 g  loop			  g  filenamef  system/base/lalr.upstream.scm
			 			  g  nameg  sinsert C h8      ] (  C  4L 5$  4L5C "             g  l
		2 g  x		2 g  y			2  g  filenamef  system/base/lalr.upstream.scm
						
						
					"		)		2	 		2  g  nameg  loop C    h      ]
O  Q 6       g  p
		 g  lst		 g  loop			  g  filenamef  system/base/lalr.upstream.scm
			 			  g  nameg  lalr-filter C      h8     ] (  C MM $  4L 5C  "       g  l
		7 g  state		7 g  symbol			7  g  filenamef  system/base/lalr.upstream.scm
3		4			5		6	,	6		7	,	6		8	#	8		$9	)	%:	)	*:	/	,:	)	-9	#	1;	)	7;	# 		7  g  nameg  loop C      h8      ]	 $  $O L LQ 4 	5"   C            g  shifts
		3 g  loop		*  g  filenamef  system/base/lalr.upstream.scm
0		1		
2		3		% 	#	'3		/<		21	 			3   C$    h       ] 4LLO 4M 55C            g  filenamef  system/base/lalr.upstream.scm
-		.		/	
	=		/	
	.	 		
  g  nameg  build-goto-table C%Y"+,-!."/&0'"458     h     ]$  u4L 5M &   	  "   	  4	4
554	4
554L 5CC      g  i
	  g  l	  g  rest			~ g  ns			~  g  filenamef  system/base/lalr.upstream.scm
L	#	M	)		M	%	N	5	O	3	O	F	O	C	O	3	N	)	Q	,	!Q	H	%Q	3	'R	7	2R	Z	3R	W	6R	7	?S	7	DS	O	GS	L	HS	I	KS	7	NQ	,	OU	0	RU	@	VU	O	ZU	@	\U	0	^U	-	`X	1	cX	A	gX	P	kX	A	mX	1	oX	.	qZ	.	vZ	4	zZ	.	{W	-	|T	,	}P	+	[	) *	 	  g  nameg  loop C):;/&0'    h     ]) M &  "    45$  "O L Q 45"  
$  "  S	 4
M &  "  M &  45  "  45  5  C            g  p
	  g  act	  g  nt		  g  rhs		#  g  n		,  g  loop		@	T  g  filenamef  system/base/lalr.upstream.scm
E		F		F			G		G	.	G		H		I		J		J		"J	-	#J		&J	:	,J		0K		6K		@L	#	Y\	#	]]		a]		c^		i_		p_	/	q_		w_	N	{_	9	|_	Z _	^ `	= `	( a	, a	L a	, b	, b	> b	, _	 K	 G	 (	    C  h      ]4L O  5C        g  gram/actions
		  g  filenamef  system/base/lalr.upstream.scm
A		B		D	
	B	 		  g  nameg  build-reduction-table C<=1> h    u   ] 4LL  >  "  G  6  m       g  filenamef  system/base/lalr.upstream.scm
									 		
   C        h8   )  ]4 5$  O 6C       !      g  options
		1 g  code		1 g  option			1 g  parser-name			/ g  	file-name			/  g  filenamef  system/base/lalr.upstream.scm
																	
	/	 		1	  g  nameg  output-parser! C3L?L@     h0      ]	4 M 5$  4 5"  $   6C       g  option
		0 g  p		0  g  filenamef  system/base/lalr.upstream.scm
																				"		&			*		.	 		0   CABC#"D=EFGHIJKLM 	      h0    ]14>  "  G  " 
M
$  	"
M 4M>  "  G  4>  "  G  "  M $  4>  "  G  "   
$  E4M$  MM"  M>  "  G  4>  "  G  "4>  "  G  4
>  "  G  4>  "  G  6 M"F "            g  x
	* g  i	" g  v		" g  rlno		4" g  nt		;" g  i		h g  v		m  g  filenamef  system/base/lalr.upstream.scm
!		!	(	!	1	!	(							#		'		*		0		1		4		;		;		>		E		J		S	9	W	B	\	9	h		m		m		t		x		y		}	 	 	 	 	 	 	 	" 	 	 	 	 	! 	 	 	 	 	! 	 	 	! 			!				"	"	 :	*   CHNOPQRS h  b  ]HM$ j4>  "  G  4>   "  G  4>  "  G  4>   "  G  4>   "  G  " 
 (  C 
	M4>  "  G  4>  "  G  4>   "  G  4>   "  G  4LLLLLLO >  "  G  4>   "  G  " M(  " K4>  "  G  	&  4
>  "  G  "  U45$  84MM$  MM"  M>  "  G  "  4>  "  G  &  4>  "  G  "  t&  4>  "  G  "  V
$  *4>  "  G  4
>  "  G  "  $4>  "  G  4>  "  G  4>   "  G  ""4>   "  G    "M  "4>  "  G  4>   "  G  C  Z      g  l
	`j g  core	kj g  i		qj g  items		xj g  actions		j g  l	 I g  sym	I g  act	I g  n	Vu  	g  filenamef  system/base/lalr.upstream.scm
						
				
		"	+	
	/		4	
	=	"	M	,	`	
	f		k		k		q 	"	q		x 	"	x			 		 	 	 	 	% 	1  	 !	 #	 	 								)	-	.	2	7	D		N		O
	V
	)V
	]	a	h	"i	r	z
																								+	=	C	I	R%	d&	j&	j	
s	
w	|	
	
 Y	
  g  nameg  print-states C   h     ]#4LO  >  "  G  4 5$  "  
N4 5$  &  "  N"   4L5M	M  4L
5 4L	5 4
 5$  44LLLLLLLL O >  "  G  "   4L >  "  G  C             g  options
	  g  tokens	  g  rules		  g  option		$	: g  option		C	m g  driver-type		O	f g  gram/actions		v  g  code	   g  option	   g  	file-name	    
g  filenamef  system/base/lalr.upstream.scm
						 		$		$		,		/	*	7		;		?		C		C		K		N		O	
	U	3	Y		[	9	a	E	c		n		v		|	 	8 	L 	 	 	 	 	 	 	 	 	
 	 	 &	 	  g  nameg  build-driver C"DT      h(      ] $  4 5	$   6CC            g  option
		#  g  filenamef  system/base/lalr.upstream.scm
m		n			n		
o		o		n		p		p	 			#   C<T      h0      ] $  $4 5	$   $  	 6CCC        g  option
		/  g  filenamef  system/base/lalr.upstream.scm
r		s			s		
t		t		s		u		u		 s		%v		)v	 		/   CAU   h8      ] $  &4 5	$  4 5$   
CCCC              g  option
		1  g  filenamef  system/base/lalr.upstream.scm
x		y			y		
z		z		y		{		{		 {		$y		'|		*|	 		1   CBVX       h0      ] $  %4 5	$   $  
 6CCC       g  option
		0  g  filenamef  system/base/lalr.upstream.scm
							
										 		%		*	 		0   C 5    h    -  1  3 `H1H0H/H.H-H,H+H*H)H(H'H&H%H$H#H"H!H HHHHHHHHHHHHHHHHHHHHHH
H	HHHHHHHH2O 53O 4O 5O 6O 7O 8O 9	O :
O ;O <O =O >O ?O @O AO BO CO DO EO FO 
GHO IO JO KO LO MO NO OO P Q!R"S#T$O U%O V&W"  "  n^$  _^__$  H4'_5$  14(_J15$  _[\]^^]\["Z[_^6Z[_^6Z[_^6)*^6Y^]\["+O XO459?MN0/,-*)('&%$#"! 
	Q 3Q 4Q 5RSQ 6R6Q 7Q 8>:=$%(8!" 7	Q 9(S	
Q :<Q ;"# Q <;
Q =&'Q >JKIGEDCBA@*Q ?! Q @$ Q A& Q BQ C* Q D$)Q EQ FFK*)Q GHF)Q I *2Q J2*)Q K-Q L/0,-.#+ Q M TQ NPQ OLQQ PQ U+Q V0/!WVU3+.1Q XKKKKKKKKK	K
KKKKKKKKKKKKKKKKKKKKKK K!K"K#K$K%K&K'K(K)K*,K+K,K-
K.K/K0-./01234 K1 XZY"g          g  	arguments
		 g  rrhs	: g  rlhs		: g  ritem		: g  nullable		: g  derives		: g  fderives		: g  firsts		: g  kernel-base		: g  
kernel-end			: g  shift-symbol	
	: g  	shift-set		: g  state-table		: g  acces-symbol		: g  reduction-table		: g  shift-table		: g  
consistent		: g  
lookaheads		: g  LA		: g  LAruleno		: g  lookback		: g  goto-map		: g  
from-state		: g  to-state		: g  includes		: g  F		: g  action-table		: g  nitems		: g  nrules		: g  nvars		: g  nterms		: g  nsyms		: g  nstates	 	: g  first-state	!	: g  
last-state	"	: g  final-state	#	: g  first-shift	$	: g  
last-shift	%	: g  first-reduction	&	: g  last-reduction	'	: g  nshifts	(	: g  ngotos	)	: g  token-set-size	*	: g  driver-name	+	: g  the-terminals/prec	,	: g  rule-precedences	-	: g  expected-conflicts	.	: g  the-terminals	/	: g  the-nonterminals	0	: g  *valid-options*	1	: g  lst	Y{ g  proc	Z{ g  options	[ g  tokens	\ g  rules	] g  lst	^ g  p	_ g  	bit-union	2 g  gen-tables!	3 g  pack-grammar	4 g  set-derives	5 g  
set-firsts	6 g  set-fderives	7 g  closure	8 g  generate-states	9 g  new-itemsets	: g  	get-state	; g  	new-state	< g  append-states	= g  save-reductions	> g  lalr	? g  set-accessing-symbol	@ g  set-shift-table	A g  set-reduction-table	B g  set-max-rhs	C g  initialize-LA	D g  set-goto-map	E g  map-goto	F g  initialize-F	G g  	transpose	H g  build-relations	I g  compute-lookaheads	J g  digraph	K g  add-rule-precedence!	L g  build-tables	M g  compact-action-table	N g  rewrite-grammar	O g  rewrite-nonterm-def	P g  pos-in-list	Q g  sunion	R g  sinsert	S g  lalr-filter	T g  build-goto-table	U g  build-reduction-table	V g  output-parser!	W g  build-driver	X  `g  filenamef  system/base/lalr.upstream.scm
 
{			
			
				"								2									
					 		l	l	q	q	w	w	 ~	~	k		 .		


   C     h   r   ]	4 5L 4?6j       g  args
		 g  v			  g  filenamef  system/base/lalr.upstream.scm	 
 		   CGH       h(   p   ]	4 5$   O @ 6 h       g  y
		' g  tmp		'  g  filenamef  system/base/lalr.upstream.scm
 
 		'   C5RT  	    h    ]B &  	 	"  	4 5&  		"  	45 &  	 	"  	4 5&  		"  	45 &   
"  	4 5&  
"  	45$ 45$  t45$  d45$  T45$  D
$  "  ,
$  "  
$  "  
"  "  "  "  $  e &   
"  	4 5 &   "  	4 5 &  	 	"  	4 5		 C$  o &   
"  	4 5 &   "  	4 5 &  	 	"  	4 5		 C &   
"  	4 5 &   "  	4 5 &  	 	"  	4 5		 CC             g  src-location-1
	 g  src-location-2	 g  offset-1		n g  offset-2		n g  length-1		n g  length-2		n g  t	  g  t	  g  t	 g  input	 g  line	 g  column	 g  input	 g  line	 g  column	 g  length		 g  input	g g  line	g g  column	g g  length		g  g  filenamef  system/base/lalr.upstream.scm

			 		;		V		n		y	 	 	 	 	 	 	- 	 	 	 	- 	 	 	 	 				 	(%	*	(/	3	6	!P	!j	!				!	! 	!	$	!		!-	!G	!d	$g	!g	 1		  g  nameg  combine-locations CYRZR[        hP   )  ]4	4M 5
5 "  
$   M ""  4M 5" N C     !      g  	new-stack
		K g  i		7  g  filenamef  system/base/lalr.upstream.scm
-		.		.	'	.	"	.		.		/		0		 0		)2	'	*2		-3		33		7/		8/		?/		E/		I4	 		K
  g  nameg  ___growstack C[        h      ] M4M5$  L 6 C         g  filenamef  system/base/lalr.upstream.scm
6		7		7		7		8	 		
  g  nameg  ___checkstack CU        hX   {  ]M 	NMM4L5M	N4L >   "  G  MMMM45C       s      g  delta
		Q g  new-category		Q g  lvalue			Q g  tok			Q g  state			Q g  	new-state		 	Q  g  filenamef  system/base/lalr.upstream.scm
:			;		
;		;		<		<		=		=	/	=		 =		 <		'>		)>		*?		@@		EA		FA	(	OA	 		Q	  g  nameg  ___push C  h   r   ] N C j       g  filenamef  system/base/lalr.upstream.scm
&		'	 		
  g  nameg  ___pushback C   h      ]L MMLLL O 6       g  st
		  g  filenamef  system/base/lalr.upstream.scm
C		D		D	 		  g  nameg  	___reduce C    h0      ]M	N4L>   "  G  M MM M C             g  token
		* g  	attribute		*  g  filenamef  system/base/lalr.upstream.scm
F		G			G		
H		I		!I		(J	 		*	  g  nameg  ___shift CL        hP   O  ]"  B
$  NCM 4L5$  NL 6	"M"G      g  tok
		P g  sp		H g  state			H g  act		'	H  g  filenamef  system/base/lalr.upstream.scm
P		Q		
R	
	R		S	
	T		T	
	U		 U		%U	&	'U		'T	
	/V		3X		8Y		=Y		BZ		HZ		HQ	 		P  g  nameg  
___recover CPV    h   G  ]4L  5M	N4L>   "  G  MM	MM	 "  M$  &  
"  "  &  	NC45$   4L  5MMMMCM$  M"  4M5 NNMN"~"z   ?      g  state
	  g  tok	  g  sync-set		  g  tok		A	f g  i		f  g  act	    g  filenamef  system/base/lalr.upstream.scm
\		]		]	"	]		]		]		^		^		_		/`		1`		8a		;a		?b		Ac		Fo		Jo		Mo		Wp		fc		ld		pd	
	te		wf	 f	 g	 g	& g	 g	 h	* h	 i	0 i	 "	 "	4 "	 #	 $	 l	 b	 )	 	  g  nameg  ___sync CP\]^ 
  h  7  ] " M $ 4MM M $  &  
"  "  L 45$  "  $  &  MC&  \&  4M>  "  G  C4MM >  "  G  4L>  "  G  M
$  N "  
NN "%
$  )4LM >  "  G  &  "  N "4L
>  "  G  "4MM >  "  G  CMM L $  	"  4	5$  >
$  4L
>  "  G  "  M
$  M	"  4M5 N N
M N	"  M
$  M	"  4M5 N N
M N	"<"8  /      g  state
	@ g  tok		: g  i	:@ g  l		A	g g  y		L	d g  act		g@ g  state
E g  actsL g  defact	_  	g  filenamef  system/base/lalr.upstream.scm
s		t		u		v		v	
	w		o		o		!o		+p		:v	
	Ax	%	Ax		DM		LM		TN		WN		_N		gv	
	lz		pz		t		xz		|	 	 z	 	 	 	 	$ 	 	 	$ 	 	 	 	 	 	 	. 	 	 	 z	 		-	"	5					*	+{	/{	6{	E	E	
L	L	
Q	U	X	*_	
c	j	n	r	)v	w	z		"	"	4"	#	$	"	"	4"	#	$		t	 V	
  g  nameg  ___run CZ       h       ]N N4
5N
NL 6             g  lexerp
		 g  errorp		  g  filenamef  system/base/lalr.upstream.scm
				
		*		*		+			 			   C 
    h  %  ]{H	HHHHHHO 
O O O O O O O Q 

Q Q Q Q  Q  	Q 	 Q KKK
KKKK		O C          g  action-table
	 g  
goto-table	 g  reduction-table		 g  	___lexerp			 g  	___errorp			 g  ___stack			 g  ___sp			 g  ___curr-input			 g  ___reuse-input			 g  ___input				 g  ___growstack	
	w g  ___checkstack		w g  ___push		w g  	___reduce		w g  ___shift		w g  
___recover		w g  ___sync		w g  ___run		w  g  filenamef  system/base/lalr.upstream.scm

 		  g  nameg  	lr-driver C"RP_`U     h8     ]4 	54L 545C    {      g  delta
		4 g  new-category		4 g  lvalue			4 g  stack			4 g  tok			4 g  stack			4 g  state			4 g  	new-state		"	4  g  filenamef  system/base/lalr.upstream.scm
					"												.	!		"		"		'		2		3	 		4	  g  nameg  push C    h0    ]I" $  "  $  &  "&  "4	5		M N 	"
$  'M					MN	"
	4L	LLO 5			"U"3L4L5$  "  "$  45"C  "         g  process
	- g  stacks	 g  active-stacks		 g  stack		 g  state		 g  actions		  g  active-stacks		  g  action		(  g  other-actions		(  g  parse			R	^ g  symbol			t  g  	new-stack		   g  state		   g  	new-stack		   g  action-list	   g  pair	    g  filenamef  system/base/lalr.upstream.scm
											$				$							"		%		1	(
	1	(			0	1	4		@	%	D	1	H		I	5	R	0	R	%	Y		[		j	%	n	%	r		t	6	}		~	 	% 	 	 	% 	> 	6 	 	 	 	% 	B 	& 	" 	 	 	K 	7 	 	 	 	
 	
						2		$	%	=-	 ?	-   C      h     ] NNNNMN"  {4M5 NM$  &  
"  "  4M5N4LL LLLLO >  "  G  4M5$  ""  "MC          g  lexerp
	  g  errorp	  g  tok		#	H g  symbol		H  g  	processes		Q	~  g  filenamef  system/base/lalr.upstream.scm
							
								#										!		#		(		,		/		9		H		K		Q		T		V		W	 	 	
 	 	
 	 	 	   C  h0   $  ]#HHHHKKKK O C        g  action-table
		. g  
goto-table		. g  reduction-table			. g  	___lexerp			. g  *input*			. g  *processes*			. g  *parses*			.  g  filenamef  system/base/lalr.upstream.scm

				 		.	  g  nameg  
glr-driver C#R`  h(      ]
$   $  
 6 C C              g  l
		! g  n		!  g  filenamef  system/base/lalr.upstream.scm
(
	)		
)		)		)			*		*		*		 			!	  g  nameg  drop C`R`   h      ] 4 56             g  l
		 g  n		  g  filenamef  system/base/lalr.upstream.scm
.
	/		/	
	/	 			  g  nameg  
take-right C_RaT 	  h`      ] &   
"  	4 5 &   "  	4 5 &  	 	"  	4 5 C         g  loc
		^  g  filenamef  system/base/lalr.scm
	/
		0			0			0		$	1		<	0		A	2		Z	0	 			^  g  nameg  "source-location->source-properties C!RC    ~      g  m
		, g  rtd
{ g  rtd
$g$  g  filenamef  system/base/lalr.scm		
g  filenamef  system/base/lalr.upstream.scm	.			1	
	2	N		G	O		b	Q		i	R		V		x
!* 
     (
     (
     >
     I
     J(
     K}.
g  filenamef  system/base/lalr.scm     L	/
 	     L
   C6                                                                                                                         ccache/system/base/pmatch.go                                                                        0000644                 00000017104 15154557173 0012033 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0,      ] 4   h3      ] g  guile	 	g  define-module*	 	 	g  system	g  base	g  pmatch		 	
g  filenameS	f  system/base/pmatch.scm	g  exportsS	 	g  set-current-module	 	 	g  make-syntax-transformer	 	 	g  macro	g  $sc-dispatch	 	 	g  any	g  each-any			g  syntax-object	g  let	g  top	 	 g  ribcage	!g  dummy	"g  e	#g  cs	$!"# 	%g  m-3c4e5dc25-86	&% 	'& 	(f  l-3c4e5dc25-8b	)f  l-3c4e5dc25-8c	*f  l-3c4e5dc25-8d	+()* 	, $'+ 	-  	.g  x	/. 	0& 	1f  l-3c4e5dc25-88	21 	3 /02 	4,-3 	5g  hygiene	65 	746 	8g  v	9846 	:g  pmatch1	;:46 	<g  syntax-violation	=< 	>< 	?f  -source expression failed to match any pattern	@ 	Ag  if	B!8 	Cg  m-3c4e5dc25-92	DC 	ED 	Ff  l-3c4e5dc25-97	Gf  l-3c4e5dc25-98	HFG 	I BEH 	JD 	Kf  l-3c4e5dc25-94	LK 	M /JL 	NI-M 	OAN6 	PN6 	QOPP 	Rg  free-id	Sg  else	T-M 	UST6 	VRU 	WV	XW 	Yg  e0	Z!8Y" 	[D 	\f  l-3c4e5dc25-9c	]f  l-3c4e5dc25-9d	^f  l-3c4e5dc25-9e	_f  l-3c4e5dc25-9f	`\]^_ 	a Z[` 	ba-M 	cb6 	dg  guard	edT6 	fRe 	gf	hg	ih	ji	kj	lk	mg  pat	ng  g	o!8mnY"# 	pD 	qf  l-3c4e5dc25-a6	rf  l-3c4e5dc25-a7	sf  l-3c4e5dc25-a8	tf  l-3c4e5dc25-a9	uf  l-3c4e5dc25-aa	vf  l-3c4e5dc25-ab	wf  l-3c4e5dc25-ac	xqrstuvw 	y opx 	zy-M 	{z6 	|g  fk	}|z6 	~g  lambda	~z6  :z6  g  ppat z6  Az6  g  and z6  }       !8mY"#  D  f  l-3c4e5dc25-b8 f  l-3c4e5dc25-b9 f  l-3c4e5dc25-ba f  l-3c4e5dc25-bb f  l-3c4e5dc25-bc f  l-3c4e5dc25-bd      -M  6  |6  ~6  :6  6      g  _ g  m-3c4e5dc25-c6     f  l-3c4e5dc25-c8    /  -  6  R      g  kt g  kf !8    f  l-3c4e5dc25-d4 f  l-3c4e5dc25-d5 f  l-3c4e5dc25-d6 f  l-3c4e5dc25-d7      -  A6  g  null? 6  g  quote 6  R      g  lit !8    f  l-3c4e5dc25-dd f  l-3c4e5dc25-de f  l-3c4e5dc25-df f  l-3c4e5dc25-e0 f  l-3c4e5dc25-e1      -  A6  g  equal? 6  6  g  unquote 6  R      g  var !8  f  l-3c4e5dc25-e8 f  l-3c4e5dc25-e9 f  l-3c4e5dc25-ea f  l-3c4e5dc25-eb f  l-3c4e5dc25-ec      -  6     g  y !8.    f  l-3c4e5dc25-f3 f  l-3c4e5dc25-f4 f  l-3c4e5dc25-f5 f  l-3c4e5dc25-f6 f  l-3c4e5dc25-f7 f  l-3c4e5dc25-f8      -  A6  g  pair? 6  6  g  vx 6  g  car 6  g  vy 6  g  cdr 6  6    f  l-3c4e5dc25-100 f  l-3c4e5dc25-101 f  l-3c4e5dc25-102 f  l-3c4e5dc25-103 f  l-3c4e5dc25-104      -  A6  g  eq? 6 6 C 5hx  Z   ]4	
5 4 >  "  G   479;  h    L   ]   C      D       g  dummy
		 g  e		 g  cs			  			   C>?     h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  system/base/pmatch.scm
	'
 		"  g  
macro-typeg  syntax-rulesg  patternsg  eg  csg  ...   C5R4:@Q      h   <   ]C   4       g  dummy
		 g  v		  			   CXc    h   [   ]C   S       g  dummy
		 g  v		 g  e0			 g  e			  			   Cl{} 	      h@      ]    C       g  dummy
		@ g  v		@ g  pat			@ g  g			@ g  e0			@ g  e			@ g  cs			@  		@	   C   h8   |   ]    C    t       g  dummy
		4 g  v		4 g  pat			4 g  e0			4 g  e			4 g  cs			4  		4	   C>?     hh   q  ]!4 5$  @4 5$  @4 5$  @4 5$  	@
 6 i      g  x
		g g  tmp		g g  tmp		"	g g  tmp		9	g g  tmp		P	g  g  filenamef  system/base/pmatch.scm
	+	 		g  g  
macro-typeg  syntax-rulesg  patternsg  v g  vg  elseg  e0g  eg  ...  g  vg  patg  guardg  gg  ... g  e0g  eg  ... g  csg  ... g  vg  patg  e0g  eg  ... g  csg  ...   C5:R4    h   \   ]C   T       g  dummy
		 g  v		 g  kt			 g  kf			  			   C  h   \   ]  C     T       g  dummy
		 g  v		 g  kt			 g  kf			  			   C        h    m   ]   C      e       g  dummy
		 g  v		 g  lit			 g  kt			 g  kf			  			   C   h   m   ]   C    e       g  dummy
		 g  v		 g  var			 g  kt			 g  kf			  			   C 	    hP   z   ]          C       r       g  dummy
		I g  v		I g  x			I g  y			I g  kt			I g  kf			I  		I	   C        h    m   ]   C      e       g  dummy
		 g  v		 g  lit			 g  kt			 g  kf			  			   C>?    h     ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$  @4 5$  @ 6         g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp		~   g  filenamef  system/base/pmatch.scm
	8	 	   g  
macro-typeg  syntax-rulesg  patternsg  vg  _g  ktg  kf g  vg  ktg  kf g  vg  quoteg  lit g  ktg  kf g  vg  unquoteg  var g  ktg  kf g  vg  xg  yg  ktg  kf g  vg  litg  ktg  kf   C5RC     R       g  m
		(  g  filenamef  system/base/pmatch.scm		$
 	s
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                             ccache/system/base/language.go                                                                      0000644                 00000013644 15154557173 0012347 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] l 4  h$      ] g  guile	 	g  define-module*	 	 	g  system	g  base	g  language		 	
g  filenameS	f  system/base/language.scm	g  importsS	g  syntax	 	 	 	g  exportsS	g  define-language	g  	language?	g  lookup-language	g  make-language	g  language-name	g  language-title	g  language-reader	g  language-printer	g  language-parser	g  language-compilers	g  language-decompilers	g  language-evaluator	g  language-joiner	g  language-for-humans?	 g  !language-make-default-environment	!g  lookup-compilation-order	"g  lookup-decompilation-order	#g  invalidate-compilation-cache!	$g  default-environment	%g  *current-language*	& !"#$% 	'g  
re-exportsS	(g  current-language	)( 	*g  set-current-module	+* 	,* 	-g  make-record-type	.f  
<language>	/g  name	0g  title	1g  reader	2g  printer	3g  parser	4g  	compilers	5g  decompilers	6g  	evaluator	7g  joiner	8g  for-humans?	9g  make-default-environment	:/0123456789 	;g  
<language>	<g  make-fresh-user-module	=g  record-constructor	>g  %compute-initargs	?g  record-predicate	@g  make-procedure-with-setter	Ag  record-accessor	Bg  record-modifier	Cg  make-syntax-transformer	DC 	EC 	Fg  macro	Gg  $sc-dispatch	HG 	IG 	Jg  _	Kg  any	LJK	Mg  syntax->datum	NM 	OM 	Pg  datum->syntax	QP 	RP 	Sg  begin	T# 	Ug  define	Vg  nameS	Wg  quote	Xg  syntax-violation	YX 	ZX 	[f  -source expression failed to match any pattern	\g  resolve-module	]g  spec	^] 	_g  module-bound?	`g  
module-ref	ag  error	bf  no such language	cg  *compilation-cache*	dg  *decompilation-cache*	eg  reverse!	fg  memq	gg  or-map	hg  compute-translation-order	ig  	assoc-ref	jg  and=>	kg  parameter-fluidC 5       h  
  ]4	
&')5	 4, >  "  G   4-i.:5;R/01234 5 6789<i 4=i;i5 > h   .   -  1  3 L4 L 5@  &       g  args
			  			


   C O  R4?i;i5R4@i4Ai;i/54Bi;i/55R4@i4Ai;i054Bi;i055R4@i4Ai;i154Bi;i155R4@i4Ai;i254Bi;i255R4@i4Ai;i354Bi;i355R4@i4Ai;i454Bi;i455R4@i4Ai;i554Bi;i555R4@i4Ai;i654Bi;i655R4@i4Ai;i754Bi;i755R4@i4Ai;i854Bi;i855R4@i4Ai;i954Bi;i955 R4EFILORSTUVW       h(   x   - 1 3      Cp       g  name
			( g  spec			(  g  filenamef  system/base/language.scm
	7
		8	 			(
   C     h   l   ]	4 5L 4?6d       g  args
		 g  v			  g  filenamef  system/base/language.scm		7
 		   CZ[     h(   j   ]	4 5$   O @ 6 b       g  y
		' g  tmp		'  g  filenamef  system/base/language.scm
	7
 		'   C5R\^_`ab       h0      ]	4 54 5$   6 6         g  name
		. g  m		.  g  filenamef  system/base/language.scm
	<
		=			=			=			=			>			>		&	?		*	@		.	@	 		.  g  nameg  lookup-language CRcRdRdc      h      ]   C             g  filenamef  system/base/language.scm
	E
		F			F			G			G	 		

  g  nameg  invalidate-compilation-cache! C#Refg   h   ~   ]L L  L6      v       g  pair
		  g  filenamef  system/base/language.scm
	T			U			U	2		U	&		U	 		   C     hX      ]4 5$  3 L &  64 5$  C LO 4L 564 5 "              g  from
		Q g  seen		Q  g  filenamef  system/base/language.scm
	N			P			O			R			S		(	O		8	V		@	T		A	Q		Q	Q	 		Q	  g  nameg  lp Ch  h8      ]45$  O Q  6 456         g  from
		6 g  to		6 g  language-translators			6 g  lp			'  g  filenamef  system/base/language.scm
	I
		K				J			N		%	N		'	N		,	L	$	6	L	 			6	  g  nameg  compute-translation-order ChRich    h8     ] 45$  C4 5 C        g  from
		7 g  to		7 g  key			7 g  t			7 g  order		(	7  g  filenamef  system/base/language.scm
	X
		Y			Y		
	Z			Z			[		(	[		/	]		4	\	
 
		7	  g  nameg  lookup-compilation-order C!Ridjhe        h@     ] 45$  C44 55 C        g  from
		> g  to		> g  key			> g  t			> g  order		/	>  g  filenamef  system/base/language.scm
	`
		a			a		
	b			b			d		!	e		/	d		/	d		6	g	&	;	g	
 		>	  g  nameg  lookup-decompilation-order C"R     h(     ]44 5$   "  4 556               g  lang
		!  g  filenamef  system/base/language.scm
	j
		l			m			m			m			l		!	l	 		!  g  nameg  default-environmentg  documentationf  DReturn the default compilation environment for source language LANG. C$R4ki(i5%RC            g  m
		0 g  slots
	u  g  constructor	u   g  filenamef  system/base/language.scm		
	>	*
	O	0		T	1	 	*
	<
	B		B
	C		C
o	E
		I

	X
j	`
	j
	v		v
 	
   C6                                                                                             ccache/system/base/target.go                                                                        0000644                 00000014774 15154557173 0012057 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] i 4     h      ] g  guile	 	g  define-module*	 	 	g  system	g  base	g  target		 	
g  filenameS	f  system/base/target.scm	g  importsS	g  rnrs	g  bytevectors	 	 	g  ice-9	g  regex	 	 	 	g  exportsS	g  target-type	g  with-target	g  
target-cpu	g  target-vendor	g  	target-os	g  target-endianness	g  target-word-size	 	g  set-current-module	  	! 	"g  foreign	#" 	$g  sizeof	%#$ 	&#$ 	'g  *	(g  %native-word-size	)g  
make-fluid	*g  
%host-type	+g  %target-type	,g  native-endianness	-g  %target-endianness	.g  %target-word-size	/g  string?	0g  string-split	1g  length	2g  or-map	3g  string-null?	4g  error	5f  invalid target	6g  validate-target	7g  triplet-cpu	8g  cpu-endianness	9g  triplet-pointer-size	:g  string=?	;g  string-match	<f  
^i[0-9]86$	=g  little	>g  member	?f  x86_64	@f  ia64	Af  	powerpcle	Bf  powerpc64le	Cf  mipsel	Df  mips64el	Ef  nios2	Ff  sh3	Gf  sh4	Hf  alpha	I?@ABCDEFGH 
	Jf  sparc	Kf  sparc64	Lf  powerpc	Mf  	powerpc64	Nf  spu	Of  mips	Pf  mips64	Qf  m68k	Rf  s390x	SJKLMNOPQR 		Tg  big	Uf  ^arm.*el	Vf  ^arm.*eb	Wg  string-prefix?	Xf  arm	Yf  ^aarch64.*be	Zf  aarch64	[f  unknown CPU endianness	\f  ^mips64.*-gnuabi64	]f  ^mips64	^f  ^x86_64-.*-gnux32	_f  64$	`f  64_?[lbe][lbe]$	aJLOCEQFG 	bRH 	cf  ^arm.*	df  unknown CPU word size	eg  
triplet-os	fg  	substring	gg  string-index	hg  triplet-vendorC 5      hH  *  ]4	
5 4! >  "  G   4&'5(R4)i*i5+R4)i4,i5 5-R4)i(i5.R/012345   hX      ]4 5$  54 -545	$  "  	45"  $   6C              g  target
		Q g  parts		> g  t		"	;  g  filenamef  system/base/target.scm
	-
		.			.			/			/	
		0		"	0		"	0		0	1		C	.	
	G	.		K	2		O	2	 		Q  g  nameg  validate-target C6R67+-.89 hH      ]
4 >  "  G  4 5 454 5Y4>   ZCZF              g  target
		A g  thunk		A g  cpu			A  g  filenamef  system/base/target.scm
	4
		5			6			6		&	8	&	-	9	%	6	:	 		A	  g  nameg  with-target CR:7*,;<=>ISTUVWXYZ4[  h   -  ]4 455$  6 4 5$  C4 	5$  C4 
5$  C4 5$  C4 5$  C4 5$  C4 5$  C4 5$  C 6%      g  cpu
	   g  filenamef  system/base/target.scm
	<
		>			>			>			>			?			@			@		!	@		%	@		'	A		)	B		/	B		1	B		5	@		7	D		9	E		?	E		A	E		E	@		G	G		I	H		M	H		Q	H		U	@		W	I		Y	J		]	J		a	J		e	@		g	K		i	L		m	L		q	L		u	@		w	M		y	N		}	N	 	N	 	@	 	O	 	P	 	P	 	P	 	@	 	Q	 	S	 	S	 1	   g  nameg  cpu-endiannessg  documentationf  Return the endianness for CPU. C8R7;<\]^_`>abc4d:*e(        h   }  ]	4 5"  45$  	C4 5$  	C45$  	C4 5$  	C45$  	C45$  	C4	
5$  	C4	5$  	C45$  	C64455$  44 5455$  C"8"4     u      g  triplet
	  g  cpu		   g  filenamef  system/base/target.scm
	U
		W				W			\			\			\			X		 	c		$	c		(	c		,	X		0	d		4	d		8	d		<	X		@	f		D	f		H	f		L	X		P	h		T	h		X	h		\	X		`	i		d	i		h	i		l	X		p	j		v	j		x	j		|	X	 	k	 	k	 	k	 	X	 	l	 	l	 	l	 	X	 	m	 	m	 	X	 	X	 	X	 	X	 	X	 	Y	 	Y	 	Y	/ 	Y	 	X	 4	   g  nameg  triplet-pointer-sizeg  documentationf  1Return the size of pointers in bytes for TRIPLET. C9Rfg        h      ] 
4 -56      x       g  t
		  g  filenamef  system/base/target.scm
	o
		p			p	 		  g  nameg  triplet-cpu C7Rgf     h(      ]	4 -5 4 -56              g  t
		! g  start		!  g  filenamef  system/base/target.scm
	r
		s			s			s			t		!	t	 		!  g  nameg  triplet-vendor ChRgf        h       ]	4 -4 -55 6       g  t
		  g  start		   g  filenamef  system/base/target.scm
	v
		w		
	w	+		w	'		w			w			w		 	x	 			   g  nameg  
triplet-os CeR+      h      ] [C         g  filenamef  system/base/target.scm
	{
 		
  g  nameg  target-typeg  documentationf  <Return the GNU configuration triplet of the target platform. CR7   h      ] 45 6            g  filenamef  system/base/target.scm
	
	 		 	 		
  g  nameg  
target-cpug  documentationf  +Return the CPU name of the target platform. CRh   h      ] 45 6            g  filenamef  system/base/target.scm
 
	 		 	 		
  g  nameg  target-vendorg  documentationf  .Return the vendor name of the target platform. CRe    h      ] 45 6            g  filenamef  system/base/target.scm
 
	 		 	 		
  g  nameg  	target-osg  documentationf  8Return the operating system name of the target platform. CR-        h      ] [C         g  filenamef  system/base/target.scm
 
 		
  g  nameg  target-endiannessg  documentationf  4Return the endianness object of the target platform. CR.      h      ] [C         g  filenamef  system/base/target.scm
 
 		
  g  nameg  target-word-sizeg  documentationf  7Return the word size, in bytes, of the target platform. CRC"      g  m
		,  g  filenamef  system/base/target.scm		
	-	'		/	'		1	'		3	'		6	$
	7	)		D	)
	E	*		J	*	'	R	*		U	*
	V	+		c	+
	-
	4
	<
		U

S	o
@	r
4	v
	{
	
 
 
t 
F 
 	H
   C6     ccache/system/base/compile.go                                                                       0000644                 00000034101 15154557173 0012203 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0)8      ]  4 h      ] g  guile	 	g  define-module*	 	 	g  system	g  base	g  compile		 	
g  filenameS	f  system/base/compile.scm	g  importsS	g  syntax	 	 	g  language	 	 	g  message	 	 	g  vm	 	 	g  ice-9	g  regex	 	 	g  optargs	 	 	 g  receive	!  	"! 	#" 	$g  exportsS	%g  compiled-file-name	&g  compile-file	'g  compile-and-load	(g  read-and-compile	)g  	decompile	*%&'() 	+g  set-current-module	,+ 	-+ 	.g  error	/f  "thunk may only be entered once: ~a	0g  	call-once	1g  string-append	2f  .XXXXXX	3g  mkstemp!	4f  wb	5g  with-throw-handler	6g  catch	76 	86 	9g  
stat:perms	:g  stat	;g  lognot	<g  umask	=g  chmod	>g  
close-port	?g  rename-file	@g  delete-file	Ag  call-with-output-file/atomic	Bg  	language?	Cg  lookup-language	Dg  ensure-language	Eg  system-error	Fg  mkdir	Gg  EEXIST	Hg  ENOENT	Ig  ensure-directory	Jg  dirname	Kg  throw	Lg  %compile-fallback-path	Mg  canonicalize-path	Ng  string-prefix?	Of  /	Pg  string-length	Qg  
string-ref	Rg  	substring	Sg  %load-compiled-extensions	Tg  string-null?	Ug  warn	Vf  !invalid %load-compiled-extensions	Wf  .go	Xg  output-fileS	YX	Zg  fromS	[Z		\g  toS	]\		^g  envS	_^		`g  optsS	a`		bg  canonicalizationS	cb		dY[]_ac 	eg  current-language	fg  objcode	gg  default-environment	hg  relative	ig   %file-port-name-canonicalization	jf  ,failed to create path for auto-compiled file	kg  open-input-file	lg  file-encoding	mg  set-port-encoding!	nf  UTF-8	og  language-printer	pZ	q\		r^		s`		tb		upqrst 	vg  value	wg  current-module	xg  map	yg  cdr	zg  lookup-compilation-order	{f  no way to compile	|f  to	}g  compile-passes	~g  compile-fold	g  language-joiner g  reverse g  find-language-joint f  BMultiple expressions read and compiled, but language has no joiner g  default-language-joiner g  language-reader g  eof-object? g  language-parser g  read-and-parse pqrs  g  
parameter?     g  	scm-error g  wrong-type-arg f  parameterize f  Not a parameter: ~S g  memq g  warningsS g  for-each g  lookup-warning-type g  warning g  unsupported-warning g  lookup-decompilation-order f  no way to decompile g  decompile-passes g  decompile-fold ^ []s  g  assemblyC 5    hp+     ]4	
#$*5 4- >  "  G   ./   h(   r   ] M$  4L >  "  G  "   NC   j       g  filenamef  system/base/compile.scm
	+			,	
			-			-			-		#	.	
 		%
   C    h   J   ] C    B       g  filenamef  system/base/compile.scm
	0	 		
   C./      h(   r   ] M$  4L >  "  G  "   NC   j       g  filenamef  system/base/compile.scm
	+			,	
			-			-			-		#	.	
 		%
   C   hX      ]	H O 4 O >   "  G  V4 >   X4>   "  G  CX4>   "  G  F           g  thunk
		T g  entered		T  g  filenamef  system/base/compile.scm
	(
		)			*	 		T  g  nameg  	call-once C0R12340589:     h   Z   ] 4L 56   R       g  filenamef  system/base/compile.scm
	=			=	<		=	0 		
   C    h   _   -  1  3 C     W       g  args
			  g  filenamef  system/base/compile.scm
	=	 			


   C;<=>? 	   hx      ]4LL>  "  G  4LO 5  $   "  
445 5  4L >  "  G   4L>  "  G  LL 6          g  t
	#	> g  perms
	>	[  g  filenamef  system/base/compile.scm
	9				:			=		#	=		2	>		5	>	$	;	>		>	=		A	?		K	?		P	?		\	@		u	A	 		u
   C>@    h(   o   -  1  3 4L>  "  G  L 6       g       g  args
			!  g  filenamef  system/base/compile.scm
	B			
	C		!	D	 			!


   C      h    R   ] L LLLLO LLO 6 J       g  filenamef  system/base/compile.scm
	7			8	 		
   C   h@   "  - . , 3 #  4 545 O 6        g  filename
		> g  proc		> g  	reference			> g  template			> g  tmp		)	>  g  filenamef  system/base/compile.scm
	3
		4			4	+		4			4		!	5		'	5	!	)	5		)	4		>	6	 		>	  g  nameg  call-with-output-file/atomic CARBC   h      ]4 5$   C 6         g  x
		  g  filenamef  system/base/compile.scm
	F
		G			G			I	 		  g  nameg  ensure-language CDR6EF     h   R   ] L 6J       g  filenamef  system/base/compile.scm
	Q			R	 		
   CGHIJK        hX     ]$  "  $  C$  44L 5>  "  G  L 6 6            g  k
		R g  subr		R g  fmt			R g  args			R g  rest			R g  errno			R  g  filenamef  system/base/compile.scm
	S			T				T			T	%		T			V	
		U		#	Z	
	'	U		(	[	
	+	[		6	[	
	D	\	
	R	^	
 		R	   C h      ] O  O 6         g  dir
		  g  filenamef  system/base/compile.scm
	O
		P				P	 		  g  nameg  ensure-directory CIRL1MNOPQRSTUVW8IJ        h   ]   ] 4L 56   U       g  filenamef  system/base/compile.scm
 		 	4	 	" 		
   C h   `   -  1  3 C     X       g  args
			  g  filenamef  system/base/compile.scm
 	 			


   C     h     ]	$  44 545$  "  B45	$  245:$  44
54	55"  "  	$  "  4
	5$  4	>  "  G  "  	54O 5$  CCC      g  file
	  g  canon		n g  t	q  g  f    g  filenamef  system/base/compile.scm
	l
		~						 	$	 			q			q			q		#	p		*	r		3	r		7	p		8	s		B	s		F	r		G	u		K	u		L	u		U	u	/	_	u		q	x		q	x			y	 	y	 	y	 	x	 	z	 	z	 	z	 	|	 	}	 		 		  	  		 $	   g  nameg  compiled-file-name C%Rdefghi%.jklmnIJAoD(^Z\`    h0      ]44L554L LLLL5	 6              g  port
		)  g  filenamef  system/base/compile.scm
 		 		 		 		 		) 	
 		)   C  h     - /   0   3 
#  #  45 #  #  	45#  #  Y$  "  !4 5$  "  	4	 54
 545	4	$  	"  >  "  G  445>  "  G  4O  >  "  G  ZCZF    ~      g  file
	  g  output-file	  g  from		  g  to		  g  env		  g  opts		  g  canonicalization		  g  t		n  g  comp	   g  in	   g  enc		    g  filenamef  system/base/compile.scm
 
	# 		1 		: 		I 		S 	)	a 		h 	!	n 		} 	  	  	  	  	  	  	  	  	  	  	%  	  	  	  	  	 	 
g  output-fileSg  fromS	g  toS	g  envS	g  optsS	g  canonicalizationS	   g  nameg  compile-file C&Ruevwhi(kZ\`^   hx   n  - /   0   3 #  45 #  #  45 #  #  Y44 5	
>	  ZCZF     f      g  file
		s g  from		s g  to			s g  env			s g  opts			s g  canonicalization			s  g  filenamef  system/base/compile.scm
 
	 	,	( 	D	1 	 	> 	8	H 	-	Q 		T 		o 	 
		s
g  fromSg  toS	g  envS	g  optsS	g  canonicalizationS	   g  nameg  compile-and-load C'Rxyz.{|       h0      ]4 5$  "  4 56        g  from
		/ g  to		/ g  opts			/ g  t			-  g  filenamef  system/base/compile.scm
 
	 		 		 		" 		& 	+	* 		/ 	 			/	  g  nameg  compile-passes C}R  hP   8  ] (  D4 L >  G  $  "   "   0      g  passes
		M g  x		M g  e			M g  cenv			M g  first?			M g  x		 	M g  e		 	M g  new-cenv		 	M  g  filenamef  system/base/compile.scm
 		 		 		 	 	 	!	 	 	# 		, 		6 		M 	
 		M	  g  nameg  lp C     h       ]O Q  6        g  passes
		 g  exp		 g  env			 g  opts			 g  lp			  g  filenamef  system/base/compile.scm
 
	 	 			  g  nameg  compile-fold C~Rz.{|        hh   W  ]"  &(  C45$  C"44 5$  "  4 55"      O      g  from
		b g  to		b g  in			, g  lang			, g  t		8	V  g  filenamef  system/base/compile.scm
 
	 		 		 		 		  		# 		, 		, 		- 		0 		8 		G 		K 	#	O 	<	S 		X 		b 	 		b	  g  nameg  find-language-joint CR.     h(      ]"  L 6 $   (   C""ޯ       g  exps
		( g  env		(  g  filenamef  system/base/compile.scm
 		
 			 		 		 		 		 	!	 		 	 
		(	   C      h      ] O C      y       g  lang
		
  g  filenamef  system/base/compile.scm
 
 		
  g  nameg  default-language-joiner CR  h8     ]44 5545$  C4 5$  6C      g  lang
		8 g  port		8 g  cenv			8 g  exp			8 g  t		'	8  g  filenamef  system/base/compile.scm
 
	 		 		 		 		 		 		! 		' 		5 	0 		8	  g  nameg  read-and-parse CRefgDe>Z\^g`~}       h     ]#445 L545$  b4L>  "  G  44L5$  "  4L54 55	L
L$  "  4L5L6	4445 LL5L>  G   "J      g  exps
	  g  env	  g  cenv		  g  x		  g  t		9	Q g  jexp	   g  jenv	   g  jcenv	    g  filenamef  system/base/compile.scm
 		 		 	#	 		 	
	 		 		 		2 		3 		9 		H 		R 		\ 		l 		s 	%	 	  	  	   	0  	   	  	  	  	 	 	  g  nameg  lp C     h     - /   0   3 
#  45 #  #  	45#  45454545$  "  4	
 >  "  G  4	5YO 		 Q 	4	>  ZCZF       g  port
	  g  from	  g  to		  g  env		  g  opts		  g  from		P  g  to		P  g  joint		]  g  t-3ee4cd0d75-1ff		a  g  lp		    
g  filenamef  system/base/compile.scm
 
	 	!	( 		1 	 	@ 	!	C 		J 		P 		U 		] 		a 	  	  	  	 	 
g  fromSg  toS	g  envS	g  optsS	   g  nameg  read-and-compile C(Revg     h       ]	4 5$  C 6          g  w
		 g  t			  g  filenamef  system/base/compile.scm
 		 			 		 	#	 	 		   C~}    h     - /   0   3 #  45 #  #  	45#  45$  !4>  "  G  "   4	4
5 >  G C        g  x
	  g  from	  g  to		  g  env		  g  opts		  g  warnings		K	x g  warnings		X	q g  exp	   g  env	   g  cenv	    
g  filenamef  system/base/compile.scm
 
	 		( 		1 		@ 		C 		K 		P 		T 		W 		X 		[ 	
	y 		| 	  	  	 	 
g  fromSg  toS	g  envS	g  optsS	   g  nameg  compile CRxy.|    h0      ]4 5$  "  4 56        g  from
		/ g  to		/ g  opts			/ g  t			-  g  filenamef  system/base/compile.scm

							"		&	-	*		/	 			/	  g  nameg  decompile-passes CR     h8     ] (  D4 >  G  6            g  passes
		2 g  exp		2 g  env			2 g  opts			2 g  exp			2 g  env			2  g  filenamef  system/base/compile.scm


											!		*		2	 
		2	  g  nameg  decompile-fold CRv       hP     - /   0   3 #  #  #  #  45 6        g  x
		N g  env		N g  from			N g  to			N g  opts			N  g  filenamef  system/base/compile.scm

	$		.		7		<		N	 		N
g  envSg  fromS	g  toS	g  optsS	   g  nameg  	decompile C)RC       g  m
		,  g  filenamef  system/base/compile.scm		
	(
	3
	F
c	O
)	l
 
 
 
 
r 
 
h 
# 
'L 
(
)

+n
 	+p
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                ccache/system/repl/command.go                                                                       0000644                 00000331665 15154557173 0012240 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0     ]8 4      h/<      ] g  guile	 	g  define-module*	 	 	g  system	g  repl	g  command		 	
g  filenameS	f  system/repl/command.scm	g  importsS	g  base	g  syntax	 	 	g  pmatch	 	 	g  compile	 	 	g  common	 	 	g  debug	 	 	g  vm	g  objcode	 	  	!g  program	"! 	#" 	$g  
trap-state	%$ 	&% 	' 	(' 	)g  frame	*) 	+g  selectS	,g  frame-return-values	-, 	.*+- 	/g  ice-9	0g  format	1/0 	21 	3g  session	4/3 	54 	6g  documentation	7/6 	87 	9g  and-let-star	:/9 	;: 	<g  rdelim	=/< 	>= 	?g  control	@/? 	A@ 	Bg  pretty-print	C/B 	Dg  pp	EBD	FE 	GC+F 	Hg  inspect	IH 	Jg  %inspect	KHJ	LK 	MI+L 	Ng  statprof	ON 	PO 	Q #&(.258;>AGMP 	Rg  exportsS	Sg  meta-command	Tg  define-meta-command	UST 	Vg  	autoloadsS	Wg  language	XW 	Yg  lookup-language	Zg  language-reader	[YZ 	\g  trace	]\ 	^g  call-with-trace	_^ 	`X[]_ 	ag  set-current-module	ba 	ca 	dg  help	eg  h	fde 	gg  show	hg 	ig  apropos	jg  a	kij 	lg  describe	mg  d	nlm 	odfhkn 	pg  module	qg  m	rpq 	sg  import	tg  use	ust 	vg  load	wg  l	xvw 	yg  reload	zg  re	{yz 	|g  binding	}g  b	~|} 	g  in   prux{~  g  L W  W  g  c   g  compile-file g  cc   g  expand g  exp   g  optimize g  opt   g  disassemble g  x   g  disassemble-file g  xx     g  profile g  time g  t   g  pr   g  tr \    g  	backtrace g  bt   g  up   g  down   g  fr )  g  	procedure g  proc   g  locals   g  error-message g  error   g  break g  br g  bp   g  break-at-source g  break-at g  bs   g  step g  s   g  step-instruction g  si   g  next g  n   g  next-instruction g  ni   g  finish   g  
tracepoint g  tp   g  traps   g  delete g  del   g  disable   g  enable   g  	registers g  regs     g  i H  BD  H  g  gc   g  
statistics g  stat   g  option g  o   g  quit g  q g  continue g  cont     o  g  *command-table* g  warranty g  w   g  copying   g  version g  v   g    g  *show-table* g  
group-name g  group-commands g  make-hash-table g  *command-infos* g  command-name g  command-abbrevs g  	hashq-ref g  command-info g  command-info-procedure g  command-procedure g  procedure-documentationg  command-docg  make-command-infog  command-info-arguments-readerg  	substringg  string-indexg  command-usageg  command-summaryg  assq	g  lookup-group
g  memqg  lookup-commandf  $~:(~A~) Commands~:[~; [abbrev]~]:~2%g  for-eachg  display-summaryg  newlineg  display-groupg  displayf  Usage: g  display-commandg  string-lengthf  [,~A~{ ,~A~}]f   f   ,~A~A~A - ~A
f  abbrevs too longf  ~%~v_f  ~v_g  catchg  readf  )Throw to key `~a' while reading command:
g  display-errorg  current-output-port f  8Throw to key `~a' with args `~s' while reading command.
!g  force-output"g  read-command#g  read-command-arguments$g  and=>%f  Unknown meta command: ~A~%&f  Meta-command not a symbol: ~s~%'g  
hashq-set!(g  append)g  add-meta-command!*g  make-syntax-transformer+* ,* -g  macro.g  $sc-dispatch/. 0. 1g  any211 3g  each-any431514625713817968:19;g  syntax-object<g  top=< >g  ribcage?g  dummy@g  nameAg  categoryBg  expression0Cg  datumsDg  	docstringEg  b0Fg  b1G?@ABCDEF 	Hg  m-3ee4d7042b-92IH< JI======== 	Kf  l-3ee4d7042b-97Lf  l-3ee4d7042b-98Mf  l-3ee4d7042b-99Nf  l-3ee4d7042b-9aOf  l-3ee4d7042b-9bPf  l-3ee4d7042b-9cQf  l-3ee4d7042b-9dRf  l-3ee4d7042b-9eSf  l-3ee4d7042b-9fTKLMNOPQRS 	U>GJT V> W XI Yf  l-3ee4d7042b-94ZY [>WXZ \=UV[ ]g  hygiene^] _;)\^ `g  quotea;`\^ bg  lambda*c;b\^ d( e( fg  lambdag;f\^ hg  definei;h\^ jg  handle-read-errork;j\^ lg  	form-namem;l\^ ng  keyo;n\^ pg  argsq;p\^ rkmoq s;\^ tg  unquoteu;t\^ vg  subrw;v\^ xuw yg  msgz;y\^ {uz |uq }g  rest~;}\^ x{|u~ ;0\^ ;\^ f  DThrow to key `~a' while reading ~@[argument `~A' of ~]command `~A':
;\^ ;\^ ;\^ ;\^  wzq~  g  else;\^ f  TThrow to key `~a' with args `~s' while reading ~@[ argument `~A' of ~]command `~A'.
;\^ g  abort;\^   g  %;\^ g  let*;\^ g  map  ;\^ g  repl-reader;\^ ;\^ g  optionalS;\^ g  port;\^ g  current-input-port;\^    ;Z\^ g  repl-language;\^ g  current-module;\^   g  k;\^ qq ;(\^ g  list;\^ g  let;\^ g  open-input-string;\^ g  	read-line;\^     g  lp;\^ g  out;\^ a   ;\^ ;\^    g  if;\^ g  eof-object?;\^  g  reverse;\^  g  cons;\^       g kq g    g  112⌤81䌤?@ACDEF I======= f  l-3ee4d7042b-aef  l-3ee4d7042b-aff  l-3ee4d7042b-b0f  l-3ee4d7042b-b1f  l-3ee4d7042b-b2f  l-3ee4d7042b-b3f  l-3ee4d7042b-b4f  l-3ee4d7042b-b5 > =V[ ;T^ 1581?@BCDEF f  l-3ee4d7042b-c0f  l-3ee4d7042b-c1f  l-3ee4d7042b-c2f  l-3ee4d7042b-c3f  l-3ee4d7042b-c4f  l-3ee4d7042b-c5f  l-3ee4d7042b-c6f  l-3ee4d7042b-c7  >  =V[ ;T^ ;^  1⌤81	?@CDEF 
I====== f  l-3ee4d7042b-d3f  l-3ee4d7042b-d4f  l-3ee4d7042b-d5f  l-3ee4d7042b-d6f  l-3ee4d7042b-d7f  l-3ee4d7042b-d8f  l-3ee4d7042b-d9 >	
 =V[ ;T^ ;^  g  syntax-violation  f  -source expression failed to match any patternf  Command Groups:

f  help allf  List all commandsg  symbol->string g  string-append!f  help "f  List #f  	 commands$f  FType `,help -c COMMAND' to show documentation of a particular command.%g  -c&f  Unknown command: ~A~%'f  Bad arguments: ~A~%(f  Unknown command or group: ~A~%)g  all*g  default-prompt-tag+@* ,@* -f  Unknown topic: ~A~%.g  
*warranty*/g  	*copying*0g  	*version*1g  ->string2g  object-documentation3g  
repl-parse4g  
module-ref5g  	repl-eval6g  form7f    ~A~24t~A
8g  repl-options9g  repl-option-set!:g  eval;g  repl-option-ref<g  throw=g  puts>g  module-name?g  resolve-module@g  module-usesAg  resolve-interfaceBg  module-use!Cf  No such module: ~A~%Dg  load-in-vicinityED FD Gf  system/replHg  reload-moduleIg  module-for-eachJf  ~23A ~A
Kg  ensureSLg  save-module-excursionMg  
repl-printNf  FInvalid arguments to `in': expected a single expression or a command.
Of  No such module: ~s
Pf  6Happy hacking with ~a!  To switch back, type `,L ~a'.
Qg  language-titleRg  language-nameSg  current-languageTg  setterUT VT Wg  repl-compileXg  objcode?Yg  guile:disassembleZg  optsS[g  repl-expand\g  run-hook]g  before-print-hook^g  repl-optimize_g  assembly`W_ a` b` cg  program?df  9Argument to ,disassemble not a procedure or objcode: ~a~%eg  load-objcodefg  gc-run-timegg  get-internal-real-timehg  get-internal-run-timeif  8;; ~,6Fs real time, ~,6Fs run time.  ~,6Fs spent in GC.
je  1.0kg  internal-time-units-per-secondlg  repl-prepare-eval-thunkmg  widthSng  terminal-widthog  define-stack-commandpg  _qprg  datum->syntaxsg  framestg  messageug  	for-trap?vg  indexwg  curx1111111 yg  t-3ee4d7042b-8e0zg  t-3ee4d7042b-8e1{g  t-3ee4d7042b-8e2|g  t-3ee4d7042b-8e3}g  t-3ee4d7042b-8e6~g  t-3ee4d7042b-8e5g  t-3ee4d7042b-8e4yz{|}~ g  m-3ee4d7042b-8e7<  f  l-3ee4d7042b-8ebf  l-3ee4d7042b-8ecf  l-3ee4d7042b-8edf  l-3ee4d7042b-8eef  l-3ee4d7042b-8eff  l-3ee4d7042b-8f0f  l-3ee4d7042b-8f1 > g  bodyg  body*@pD ====== f  l-3ee4d7042b-8d4f  l-3ee4d7042b-8d5f  l-3ee4d7042b-8d6f  l-3ee4d7042b-8d7f  l-3ee4d7042b-8d8f  l-3ee4d7042b-8d9 > = f  l-3ee4d7042b-8d1 >W =VV ;T^ ;^ ;^ g  
repl-debug;^ ;^ g  letrec-syntax;^ g  identifier-syntax;^ g  debug-frames;^    g  debug-error-message;^    g  debug-for-trap?;^    g  id;^ g  debug-index;^   g  set!;^ ;^      g  
vector-ref;^ ;0^ ;^ f  Nothing to debug.~%;^   m	g  full?S	 g  print-framesg  countSg  	for-trap?Sg  integer?f  BInvalid argument to `up': expected a positive integer for COUNT.~%g  vector-lengthf  Already at outermost frame.
g  print-frameg  indexSg  next-source?Sf  DInvalid argument to `down': expected a positive integer for COUNT.~%f  Already at innermost frame.
f  GInvalid argument to `frame': expected a non-negative integer for IDX.~%f  No such frame.~%g  frame-procedurem g  print-localsf  ~a~%g  string?f  No error messageg  
procedure?g  add-trap-at-procedure-call!f  Trap ~a: ~a.~%g  	trap-namef  Not a procedure: ~ag  add-trap-at-source-location!g  default-prompt-handler@ @ g  frame->stack-vectorg  frame-previousf  No return values.~%f  Return values:~% g  
start-replg  debugSg  
make-debugg  repl-pop-continuation-resumerf  Return from ~ag  #add-ephemeral-trap-at-frame-finish!g  repl-next-resumerf  Step into ~ag  add-ephemeral-stepping-trap!g  into?Sg  instruction?Sg  add-trace-at-procedure-call! g  
list-trapsf  No traps set.~%f    ~a: ~a~a~%g  trap-enabled?f   (disabled)g  delete-trap!f  .expected a trap index (a non-negative integer)g  disable-trap!g  enable-trap!	g  print-registers
g  widthf  !Set screen width to ~a columns.~%g  timesg  gc-statsg  repl-tm-statsg  repl-gc-statsg  assq-refg  gc-timesg  display-diff-statf  	GC times:f  timesg  	heap-sizeg  heap-free-sizeg  display-stat-titlef  Memory size:f  currentf  limitg  display-statf  heapf  bytesg  heap-total-allocatedf  Bytes allocated: f  diff!f  total"f  	allocated#g  gc-time-taken$f  GC time taken:%g  display-time-stat&g  	tms:utime'g  	tms:stime(g  
tms:cutime)g  
tms:cstime*f  Process time spent:+f  user,f  system-f  
child user.f  child system/f  ~~20~AA ~~10@A /~~10@A ~~A~~%0f  @1f  ~10,2F2g  exact->inexact3f  s4f  ----5e  	1000000.06f  mips7g  display-mips-statC 5    ho C  ]4	
QRUV`5	 4c >  "  G   RR    h   x   ] C  p       g  g
		  g  filenamef  system/repl/command.scm
	J
		J	 		  g  nameg  
group-name CR   h   |   ] C  t       g  g
		  g  filenamef  system/repl/command.scm
	K
		K	 		  g  nameg  group-commands CR4i5 R     h   z   ] C  r       g  c
		  g  filenamef  system/repl/command.scm
	N
		N	 		  g  nameg  command-name CR h   }   ] C  u       g  c
		  g  filenamef  system/repl/command.scm
	O
		O	 		  g  nameg  command-abbrevs CR      h      ]4 56 z       g  c
		  g  filenamef  system/repl/command.scm
	P
		P	4		P	 		  g  nameg  command-info CR   h      ]4 56          g  c
		  g  filenamef  system/repl/command.scm
	Q
		Q	6		Q	 		  g  nameg  command-procedure CR      h      ]4 56   y       g  c
		  g  filenamef  system/repl/command.scm
	R
		R	1		R	 		  g  nameg  command-doc CR h      ] C       g  proc
		 g  arguments-reader		  g  filenamef  system/repl/command.scm
	T
		U	 			  g  nameg  make-command-info CR  h      ] C         g  info
		  g  filenamef  system/repl/command.scm
	W
		X	 		  g  nameg  command-info-procedure CR    h      ] C         g  info
		  g  filenamef  system/repl/command.scm
	Z
		[	 		  g  nameg  command-info-arguments-reader CR h       ]	4 5
4
56            g  c
		 g  doc			  g  filenamef  system/repl/command.scm
	]
		^				^			_			_	 		  g  nameg  command-usage CR    h@      ]4 54
54
5$  
66           g  c
		< g  doc			< g  start			< g  t		"	<  g  filenamef  system/repl/command.scm
	a
		b				b			c			c			b			d		"	d		4	e		<	f	 		<  g  nameg  command-summary CR    h   }   ] 6      u       g  name
		
  g  filenamef  system/repl/command.scm
	h
	
	i	 		
  g  nameg  lookup-group C	R
      hx   ;  - . , 3 #  "  N"  4(  "4 5$  C"(  (  C"""     3      g  key
		s g  table		s g  groups			h g  commands			h  g  filenamef  system/repl/command.scm
	k
		l		$	m		'	o		*	o		3	o		4	p		;	p		=	p		A	m		D	p	%	J	q		R	q		R	m		^	m		h	l		k	l	&	s	l	 		s  g  nameg  lookup-command CR0       h(      ]4 5L $  4 5"  4 56         g  c
		&  g  filenamef  system/repl/command.scm
	u			v			w			w	+		w	?		x		&	v	 		&   C      hX      - . , 3 #  44 5>  "  G  4O 4 5>  "  G  6             g  group
		S g  abbrev?		S  g  filenamef  system/repl/command.scm
	s
		t			t			t	4	)	t		2	u		<	y		G	u		S	z	 
		S  g  nameg  display-group CR        h0      ]4>  "  G  44 5>  "  G  6         g  command
		/  g  filenamef  system/repl/command.scm
	|
		}			}			}			~			~		#	~		/		 			/  g  nameg  display-command CR0 
   h     ]4 5$  45"  45 	 $  45"  0	 $  4		 5"  4		 56    	      g  usage
	  g  abbrevs	  g  summary		  g  	usage-len			  g  abbrevs		&  g  abbrevs-len		/   g  filenamef  system/repl/command.scm
 
	 			 		 		 		 		 	!	 	1	 	?	  		& 		& 		) 		/ 		6 		= 		A 		B 		F 		J 		S 		V 		Z 		[ 		` 		g 	&	h 	!	j 		o 		t 		y 		~ 	  	 "	 	  g  nameg  display-summary CR        h   T   ] 6   L       g  filenamef  system/repl/command.scm
 		 	 		
   C0 !       h   d  - 1 3 $  $  y$  G4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  4>   "  G  C    \      g  key
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	u g  vy		8	u  g  filenamef  system/repl/command.scm
 		 		= 			B 		I 			R 			V 		g 			z 			 	  		  	  		  	  		  	 		 
   C h      ]6     w       g  repl
		  g  filenamef  system/repl/command.scm
 
	 	 		  g  nameg  read-command C"R    h      ]44 556             g  c
		 g  repl		  g  filenamef  system/repl/command.scm
 
	 		 	"	 		 	 			  g  nameg  read-command-arguments C#R"$#      h   p   ]4L5L  @ h       g  args
		  g  filenamef  system/repl/command.scm
 		 	(	 	! 		   C0%& 	    hX     ]4 5&  C$  .45$  4 5 O 666            g  repl
		R g  command			R g  t		"	I  g  filenamef  system/repl/command.scm
 
	 			 		 		 		 		 		 		" 		- 		@ 		E 		I 		N 		R 	 		R  g  nameg  meta-command CSR'(  hh   ~  ]4 45>  "  G  $  >45$  4   5C4    5 CC   v      g  name
		e g  category		e g  proc			e g  argument-reader			e g  entry		.	c  g  filenamef  system/repl/command.scm
 
	 		
 	#	 		% 		& 		. 		6 		9 		> 	$	C 	6	F 	0	H 		I 		L 		W 	/	Z 	 	] 		_ 		a 	 		e	  g  nameg  add-meta-command! C)R4,T-0:_acegirsqomgcka     hH   9   ] 	L   
        C  1       g  tmp-3ee4d7042b-ab
		F  		F   C        h      , 	3 	  45 	
  	    4O 5   C          g  dummy
	  g  name	  g  category		  g  repl		  g  expression0		  g  datums		  g  	docstring		  g  b0		  g  b1		   		 		   C h(      , 3  C             g  dummy
		" g  name		" g  category			" g  repl			" g  datums			" g  	docstring			" g  b0			" g  b1			"  		"	   C h(      , 3 C              g  dummy
		! g  name		! g  repl			! g  expression0			! g  datums			! g  	docstring			! g  b0			! g  b1			!  		!	   C      h       ]C           g  dummy
		 g  name		 g  repl			 g  datums			 g  	docstring			 g  b0			 g  b1			  			   C   hh     ]!4 5$  @4 5$  @4 5$  @4 5$  	@
 6       g  x
		g g  tmp		g g  tmp		"	g g  tmp		9	g g  tmp		P	g  g  filenamef  system/repl/command.scm
 	 		g  g  
macro-typeg  syntax-rulesg  patternsg  nameg  category g  replg  expression0g  ... g  datumsg  	docstringg  b0g  b1g  ... g  nameg  category g  replg  datumsg  	docstringg  b0g  b1g  ... g  nameg  replg  expression0g  ... g  datumsg  	docstringg  b0g  b1g  ... g  nameg  replg  datumsg  	docstringg  b0g  b1g  ...   C5TR4)id	d !"#     h8     ]44 5545456       	      g  g
		1 g  name		1 g  usage			1 g  header		&	1  g  filenamef  system/repl/command.scm
					.								.						 	 	/	$	<	&	 	&		1	 		1   C$%0&'()     h   j  - 1 3 (  y445>  "  G  4>  "  G  4>  "  G  4	
>  "  G  4>   "  G  4>  "  G  6 " a" $"  "  "  ]$  M&  2$  "(  	66666$  (  	6""{$  O&  9$  .(  45$  456"-")"%"!"$  .(  45$  456"""$  .(  45$  456"""$  (&  (  	6"t"p"lb      g  repl
		  g  args		  g  vx	   g  vy	   g  vx	   g  vy	   g  vx	 g  vy	 g  vx	.w g  vy	.w g  vx	Go g  vy	Go g  vx	 g  vy	 g  vx	 g  vy	 g  vx	 g  vy	  g  filenamef  system/repl/command.scm
 
											"							'
		+
		0
		9		=		@	$	E		N		U		Z		c		s		w		|	 	 	 !	 !	 #	 #	 #	 #	 #	 #	 #	 #	 				R	\	_	g	k													 7		 
  g  documentationf help [all | GROUP | [-c] COMMAND]
Show help.

With one argument, tries to look up the argument as a group name, giving
help on that group if successful. Otherwise tries to look up the
argument as a command, giving help on the command.

If there is a command whose name is also a group name, use the ,help
-c COMMAND form to give help on the command instead of the group.

Without any argument, a list of help commands and command groups
are displayed. C,( h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
 
 		>
   C0d     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
 
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
 
 		,   C>  "  G  4)ig0-' 	     h     - 1 3 (  4>  "  G  6 $  q(  A45$  4455 6(  	66(  	666      g  repl
		  g  args		  g  vx		4  g  vy		4  g  vx		c	 g  vy		c	 g  vx	   g  vy	    g  filenamef  system/repl/command.scm
%
	/		1		1		1		'2		*/		?3		K/		L4		O4		Y4		]4		`/		r6		v6		{8		8	 /	 6	 6	 8	 8	 8	 8	 		 
  g  documentationf show [TOPIC]
Gives information about Guile.

With one argument, tries to show a particular piece of information;

currently supported topics are `warranty' (or `w'), `copying' (or `c'),
and `version' (or `v').

Without any argument, a list of topics is displayed. C,(      h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
%
 		>
   C0g     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
%
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
%
 		,   C>  "  G  4)i.  h      ]4>  "  G  6        g  repl
		  g  filenamef  system/repl/command.scm
>
	A		B	 		  g  documentationf  .show warranty
Details on the lack of warranty. C,(        h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
>
 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
>
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
>
 		,   C>  "  G  4)i/  h      ]4>  "  G  6        g  repl
		  g  filenamef  system/repl/command.scm
D
	G		H	 		  g  documentationf  show copying
Show the LGPLv3. C,( h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
D
 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
D
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
D
 		,   C>  "  G  4)i0  h      ]4>  "  G  6        g  repl
		  g  filenamef  system/repl/command.scm
J
	M		N	 		  g  documentationf  !show version
Version information. C,(     h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
J
 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
J
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
J
 		,   C>  "  G  4)iii1      h      ]456          g  repl
		 g  regexp		  g  filenamef  system/repl/command.scm
P
	S		S	 			  g  documentationf  .apropos REGEXP
Find bindings/modules/packages. C,(    h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
P
 		>
   C0i     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
P
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
P
 		,   C>  "  G  4)il2345      hP   9  ]
444 5$  445 5"  	4 55>  "  G  6        1      g  repl
		I g  form		I g  input			6  g  filenamef  system/repl/command.scm
U
	X		Y			Z		Z		[		[		\		\		&\		+]		8Y		=X		I^	 		I	  g  documentationf  ,describe OBJ
Show description/documentation. C0l       h     ]3$  $  $  K4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6        g  	form-name
	  g  key	  g  args		  g  vx		  g  vy		  g  vx		   g  vy		   g  vx		1	r g  vy		1	r  	g  filenamef  system/repl/command.scm
U
 	 	  g  nameg  handle-read-error C,Z h0   ^   -  . , 3  #  45  44L 55 45 6  V       g  port
		.  g  filenamef  system/repl/command.scm
U
 		.
   C       h   J   ] L O 6 B       g  filenamef  system/repl/command.scm
U
 		
   C6       h   m   - 1 3 L  6     e       g  k
			 g  args			  g  filenamef  system/repl/command.scm
U
 			
   C(     h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
U
 		>
   C  h   m   - 1 3 L  6      e       g  k
			 g  args			  g  filenamef  system/repl/command.scm
U
 			
   C 	       hP      ]45 U  64 O O 54 4O 5>  XCXFG C          g  repl
		M g  handle-read-error		M g  form		$	B g  k		F	M  g  filenamef  system/repl/command.scm
U
 		M   C>  "  G  4)i07 h      ]  6z       g  spec
		  g  filenamef  system/repl/command.scm
e		f		
f	+	f	6	f	 		   C89:; 
     h     - 1 3 (  4 56"  B$  9$  &(   445 56CCC$  1(  44 5>  "  G  	6 ""        g  repl
		  g  args		  g  vx		-	` g  vy		-	` g  vx		>	^ g  vy		>	^ g  vx		o  g  vy		o   g  filenamef  system/repl/command.scm
`
	c		g		e		 c		On	!	Tn	+	Zn	!	\n		bc		zi		}i	 i	 j	 c	 		 
  g  documentationf  *option [NAME] [EXP]
List/show/set options. C,(     h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
`
 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
`
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
`
 		,   C>  "  G  4)i<      h      ]6       g  repl
		  g  filenamef  system/repl/command.scm
p
	s			s	 		  g  documentationf  quit
Quit this session. C,(       h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
p
 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
p
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
p
 		,   C>  "  G  4)ip=>a?     hh   k  - 1 3 (  445 56$  8(  $  456456456456 c      g  repl
			g g  args			g g  vx		*	\ g  vy		*	\  g  filenamef  system/repl/command.scm
z
	}		~		~		~		~		 }		7		;}		>		F		I	#	Q		T	#	\		_	#	g	 			g
  g  documentationf  5module [MODULE]
Change modules / Show current module. C,(        h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
z
 		>
   C0p     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
z
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
z
 		,   C>  "  G  4)is=>@AB0C  h(      ]	4 5$  45 6 6          g  name
		% g  mod			%  g  filenamef  system/repl/command.scm
													!		%	 			%  g  nameg  use C        h0     - 1 3 (  4445 5566         g  repl
			. g  args			.  g  filenamef  system/repl/command.scm

						(		5	"	(	$		&		.	 
			.
  g  documentationf  9import [MODULE ...]
Import modules / List those imported. C,(    h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C0s     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm

 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm

 		,   C>  "  G  4)ivFG1  h      ]456        g  repl
		 g  file		  g  filenamef  system/repl/command.scm

						 			  g  documentationf  ,load FILE
Load a file in the current module. C,(       h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C0v     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm

 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm

 		,   C>  "  G  4)iyH?  hh   u  - 1 3 (  	45 6$  8(  $  456456456456      m      g  repl
			b g  args			b g  vx		%	W g  vy		%	W  g  filenamef  system/repl/command.scm

									2		6		9		A		D		L		O		W		Z		b	 			b
  g  documentationf  Qreload [MODULE]
Reload the given module, or the current module if none was given. C,(      h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C0y     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm

 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm

 		,   C>  "  G  4)i|I0J  h   |   ] 6   t       g  k
		 g  v		  g  filenamef  system/repl/command.scm
			,		! 			   C      h      ]45 6          g  repl
		  g  filenamef  system/repl/command.scm

				 		  g  documentationf  binding
List current bindings. C,(        h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C0|     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm

 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm

 		,   C>  "  G  4)i?KtLa    h(   x   ] 4L>  "  G  44L 55LL@  p       g  filenamef  system/repl/command.scm
							(	 		&	 		&
   CM:0NO       h     - 1 3 	45$  $  &  $  d(  845$   O 6(   456	
6(   456	
6(   456	
6(   456	
6(   456	
6	6          g  repl
		  g  module		  g  command-or-expression			  g  args			  g  m		  g  vx		(  g  vy		(  g  vx		A  g  vy		A   	g  filenamef  system/repl/command.scm

	
								L	&	V		g		m		r		|	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 $		 	
	  g  documentationf  [in MODULE COMMAND-OR-EXPRESSION
Evaluate an expression or command in the context of module. C,(      h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm

 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm

 		,   C>  "  G  4)iWY0PQRSV 	    hX   %  ]454 544545>  "  G  4>  "  G  45 6          g  repl
		T g  name		T g  lang			T g  cur			T  g  filenamef  system/repl/command.scm

			
										"	"	-		6		T	 		T	  g  documentationf  #language LANGUAGE
Change languages. C,(      h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C0W     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm

 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm

 		,   C>  "  G  4)iW3XYM    h0      ]
4 4 5545$  6 6          g  repl
		- g  form		- g  x			-  g  filenamef  system/repl/command.scm

													%		-	 
		-	  g  documentationf  #compile EXP
Generate compiled code. C0 h     ]3$  $  $  K4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6        g  	form-name
	  g  key	  g  args		  g  vx		  g  vy		  g  vx		   g  vy		   g  vx		1	r g  vy		1	r  	g  filenamef  system/repl/command.scm

 	 	  g  nameg  handle-read-error C,Z h0   ^   -  . , 3  #  45  44L 55 45 6  V       g  port
		.  g  filenamef  system/repl/command.scm

 		.
   C       h   J   ] L O 6 B       g  filenamef  system/repl/command.scm

 		
   C6       h   m   - 1 3 L  6     e       g  k
			 g  args			  g  filenamef  system/repl/command.scm

 			
   C(     h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C  h   m   - 1 3 L  6      e       g  k
			 g  args			  g  filenamef  system/repl/command.scm

 			
   C 	       hP      ]45 U  64 O O 54 4O 5>  XCXFG C          g  repl
		M g  handle-read-error		M g  form		$	B g  k		F	M  g  filenamef  system/repl/command.scm

 		M   C>  "  G  4)i1Z  h      - 1 3 456       g  repl
			 g  file			 g  opts				  g  filenamef  system/repl/command.scm

				 				
	  g  documentationf  !compile-file FILE
Compile a file. C,(      h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm

 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm

 		,   C>  "  G  4)i[3\]D     h0      ]
4 4 554>  "  G  6         g  repl
		. g  form		. g  x			.  g  filenamef  system/repl/command.scm

											.	 		.	  g  documentationf  'expand EXP
Expand any macros in a form. C0       h     ]3$  $  $  K4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6        g  	form-name
	  g  key	  g  args		  g  vx		  g  vy		  g  vx		   g  vy		   g  vx		1	r g  vy		1	r  	g  filenamef  system/repl/command.scm

 	 	  g  nameg  handle-read-error C,Z h0   ^   -  . , 3  #  45  44L 55 45 6  V       g  port
		.  g  filenamef  system/repl/command.scm

 		.
   C       h   J   ] L O 6 B       g  filenamef  system/repl/command.scm

 		
   C6       h   m   - 1 3 L  6     e       g  k
			 g  args			  g  filenamef  system/repl/command.scm

 			
   C(     h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C  h   m   - 1 3 L  6      e       g  k
			 g  args			  g  filenamef  system/repl/command.scm

 			
   C 	       hP      ]45 U  64 O O 54 4O 5>  XCXFG C          g  repl
		M g  handle-read-error		M g  form		$	B g  k		F	M  g  filenamef  system/repl/command.scm

 		M   C>  "  G  4)i^3\]D    h0     ]
4 4 554>  "  G  6  	      g  repl
		. g  form		. g  x			.  g  filenamef  system/repl/command.scm

											.	 		.	  g  documentationf  Goptimize EXP
Run the optimizer on a piece of code and print the result. C0       h     ]3$  $  $  K4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6        g  	form-name
	  g  key	  g  args		  g  vx		  g  vy		  g  vx		   g  vy		   g  vx		1	r g  vy		1	r  	g  filenamef  system/repl/command.scm

 	 	  g  nameg  handle-read-error C,Z h0   ^   -  . , 3  #  45  44L 55 45 6  V       g  port
		.  g  filenamef  system/repl/command.scm

 		.
   C       h   J   ] L O 6 B       g  filenamef  system/repl/command.scm

 		
   C6       h   m   - 1 3 L  6     e       g  k
			 g  args			  g  filenamef  system/repl/command.scm

 			
   C(     h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C  h   m   - 1 3 L  6      e       g  k
			 g  args			  g  filenamef  system/repl/command.scm

 			
   C 	       hP      ]45 U  64 O O 54 4O 5>  XCXFG C          g  repl
		M g  handle-read-error		M g  form		$	B g  k		F	M  g  filenamef  system/repl/command.scm

 		M   C>  "  G  b        h      ] 6       g  x
		  g  filenamef  system/repl/command.scm

				 		  g  nameg  guile:disassemble CYR4)i53cXY0d hH   9  ]4 4 5545$  "  45$  66   1      g  repl
		E g  form		E g  obj			E g  t			2  g  filenamef  system/repl/command.scm

													)		6		<		A		E	 		E	  g  documentationf  1disassemble EXP
Disassemble a compiled procedure. C0       h     ]3$  $  $  K4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6        g  	form-name
	  g  key	  g  args		  g  vx		  g  vy		  g  vx		   g  vy		   g  vx		1	r g  vy		1	r  	g  filenamef  system/repl/command.scm

 	 	  g  nameg  handle-read-error C,Z h0   ^   -  . , 3  #  45  44L 55 45 6  V       g  port
		.  g  filenamef  system/repl/command.scm

 		.
   C       h   J   ] L O 6 B       g  filenamef  system/repl/command.scm

 		
   C6       h   m   - 1 3 L  6     e       g  k
			 g  args			  g  filenamef  system/repl/command.scm

 			
   C(     h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C  h   m   - 1 3 L  6      e       g  k
			 g  args			  g  filenamef  system/repl/command.scm

 			
   C 	       hP      ]45 U  64 O O 54 4O 5>  XCXFG C          g  repl
		M g  handle-read-error		M g  form		$	B g  k		F	M  g  filenamef  system/repl/command.scm

 		M   C>  "  G  4)iYe1 h      ]44556             g  repl
		 g  file		  g  filenamef  system/repl/command.scm

				#				 			  g  documentationf  )disassemble-file FILE
Disassemble a file. C,( h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm

 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm

 		,   C>  "  G  4)ifgh53M0ijk      h   D  ]:45 45 45 4 4 5545 45 45 4 >  "  G  4	
	
	
>  "  G  C       <      g  repl
	  g  form	  g  gc-start		  g  
real-start		  g  	run-start		  g  result		'  g  run-end		.  g  real-end		5  g  gc-end		<   	g  filenamef  system/repl/command.scm

					
								 		 	!	' 		'		*		.		1		5		8		<		?		S		X		]			_		`		h			j		k		s			u		v		~	 	 	  g  documentationf  time EXP
Time execution. C0    h     ]3$  $  $  K4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6        g  	form-name
	  g  key	  g  args		  g  vx		  g  vy		  g  vx		   g  vy		   g  vx		1	r g  vy		1	r  	g  filenamef  system/repl/command.scm

 	 	  g  nameg  handle-read-error C,Z h0   ^   -  . , 3  #  45  44L 55 45 6  V       g  port
		.  g  filenamef  system/repl/command.scm

 		.
   C       h   J   ] L O 6 B       g  filenamef  system/repl/command.scm

 		
   C6       h   m   - 1 3 L  6     e       g  k
			 g  args			  g  filenamef  system/repl/command.scm

 			
   C(     h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C  h   m   - 1 3 L  6      e       g  k
			 g  args			  g  filenamef  system/repl/command.scm

 			
   C 	       hP      ]45 U  64 O O 54 4O 5>  XCXFG C          g  repl
		M g  handle-read-error		M g  form		$	B g  k		F	M  g  filenamef  system/repl/command.scm

 		M   C>  "  G  4)iNl3  h       - 1 3 4 4 55@        g  repl
			 g  form			 g  opts				  g  filenamef  system/repl/command.scm

					'					 				
	  g  documentationf  profile EXP
Profile execution. C0    h     ]3$  $  $  K4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6        g  	form-name
	  g  key	  g  args		  g  vx		  g  vy		  g  vx		   g  vy		   g  vx		1	r g  vy		1	r  	g  filenamef  system/repl/command.scm

 	 	  g  nameg  handle-read-error C,Z h0   ^   -  . , 3  #  45  44L 55 45 6  V       g  port
		.  g  filenamef  system/repl/command.scm

 		.
   C       h   J   ] L O 6 B       g  filenamef  system/repl/command.scm

 		
   C6       h   m   - 1 3 L  6     e       g  k
			 g  args			  g  filenamef  system/repl/command.scm

 			
   C(     h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C  h   m   - 1 3 L  6      e       g  k
			 g  args			  g  filenamef  system/repl/command.scm

 			
   C 	       hP      ]45 U  64 O O 54 4O 5>  XCXFG C          g  repl
		M g  handle-read-error		M g  form		$	B g  k		F	M  g  filenamef  system/repl/command.scm

 		M   C>  "  G  4)i\^l3mn    h(      - 1 3 4 4 5545 @         g  repl
			& g  form			& g  opts				&  g  filenamef  system/repl/command.scm

					'						&	 			&	
	  g  documentationf  trace EXP
Trace execution. C0\       h     ]3$  $  $  K4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6        g  	form-name
	  g  key	  g  args		  g  vx		  g  vy		  g  vx		   g  vy		   g  vx		1	r g  vy		1	r  	g  filenamef  system/repl/command.scm

 	 	  g  nameg  handle-read-error C,Z h0   ^   -  . , 3  #  45  44L 55 45 6  V       g  port
		.  g  filenamef  system/repl/command.scm

 		.
   C       h   J   ] L O 6 B       g  filenamef  system/repl/command.scm

 		
   C6       h   m   - 1 3 L  6     e       g  k
			 g  args			  g  filenamef  system/repl/command.scm

 			
   C(     h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C  h   m   - 1 3 L  6      e       g  k
			 g  args			  g  filenamef  system/repl/command.scm

 			
   C 	       hP      ]45 U  64 O O 54 4O 5>  XCXFG C          g  repl
		M g  handle-read-error		M g  form		$	B g  k		F	M  g  filenamef  system/repl/command.scm

 		M   C>  "  G  4,o-0qrstuvw0x  hh      ]LLLLL    	
    L L  C             g  t-3ee4d7042b-8e0
		b g  t-3ee4d7042b-8e1		b g  t-3ee4d7042b-8e2			b g  t-3ee4d7042b-8e3			b g  t-3ee4d7042b-8e6			b g  t-3ee4d7042b-8e5			b g  t-3ee4d7042b-8e4			b  		b	   C   hx     ]45454545454545 45$  	 O @
6         g  name
		u g  repl		u g  args			u g  	docstring			u g  body			u g  body*			u g  tmp		D	u g  tmp		O	u  g  filenamef  system/repl/command.scm	+			+	/	+		-		-	/	-		/		/	/	/		1		$1	/	&1		'5		-5	/	/5		07	&	67	<	87	&	98	&	?8	<	A8	&	D&	 		u	   C h(   k   ]	4 5$  @ 6      c       g  x
		" g  tmp		"  g  filenamef  system/repl/command.scm
#	 		"   C5oR4)inm0       hh     - /   0   3 #  #  45 #  4 5$   45	4
56	6      g  repl
		h g  count		h g  width			h g  full?			h g  debug		9	h  g  filenamef  system/repl/command.scm
<
	#=	.	3<
	aC		f<
 		hg  widthS	g  full?S	   g  documentationf  backtrace [COUNT] [#:width W] [#:full? F]
Print a backtrace.

Print a backtrace of all stack frames, or innermost COUNT frames.
If COUNT is negative, the last COUNT frames will be shown. C,( h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
<
 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
<
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
<
 		,   C>  "  G  4)i0V  h@  Z  - . , 3 #  4 5$ 45$  "  
$  6454455$  {454455$  644	54455>  "  G  
45454545
$  45"  644	545>  "  G  
45454545
$  45"  66R      g  repl
	@ g  count	@ g  debug		@ g  t		,	@  g  filenamef  system/repl/command.scm
I
	%P		,P		,P		=P		DO		IQ		KQ		UR		VR		bR		fO		nT		zT		{T		S	 U	 U	 W	 W	 W	 W	 Y	' Y	" X	 [	 [	 [	&]	%+]	 9\	>I
 !	@  g  documentationf  up [COUNT]
Select a calling stack frame.

Select and print stack frames that called this one.
An argument says how many frames up to go. C,( h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
I
 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
I
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
I
 		,   C>  "  G  4)i0V     h    - . , 3 #  4 5$  45$  "  
$  645
$  Q45
$  6445
>  "  G  4	545
4545644545>  "  G  4	545
4545
$  45"  66           g  repl
	 g  count	 g  debug		 g  t		,	@  g  filenamef  system/repl/command.scm
_
	%f		,f		,f		=f		De		Ig		Kg		Uh		Wh		[e		cj		hi		mk		ok		pm	 n	 p	 p	 p	 r	% r	 q		_
 	  g  documentationf  down [COUNT]
Select a called stack frame.

Select and print stack frames called by this one.
An argument says how many frames down to go. C,(        h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
_
 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
_
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
_
 		,   C>  "  G  4)i)0V  h     - . , 3 #  4 5$  $  45$  "  
$  64455$  P445>  "  G  	4545
4545
$  45"  66	4545
4545
$  45"  66             g  repl
	  g  idx	  g  debug		  g  t		2	F  g  filenamef  system/repl/command.scm
t
	*z		+}		2}	
	2}		C}		J|		O~		Q~		T		`		d|		e	 	' 	" 	 	 	 	* 	% 		 t
 	   g  documentationf  lframe [IDX]
Show a frame.

Show the selected frame.
With an argument, select a frame by index, then show it. C,(        h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
t
 		>
   C0)     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
t
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
t
 		,   C>  "  G  4)iM0       h8      ]	4 5$   44545566             g  repl
		2 g  debug			2  g  filenamef  system/repl/command.scm

			+		0
 		2  g  documentationf  5procedure
Print the procedure for the selected frame. C,(       h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm

 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm

 		,   C>  "  G  4)inm0 
hP     - /   0   3 #  45 4 5$  45456	6         g  repl
		M g  width		M g  debug		'	M  g  filenamef  system/repl/command.scm

		0	!
	F		K
 		M
g  widthS   g  documentationf  Qlocals
Show local variables.

Show locally-bound variables in the selected frame. C,(      h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm

 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm

 		,   C>  "  G  4)i0       h@   3  ]	4 5$  $4455$  45"  66    +      g  repl
		< g  debug			<  g  filenamef  system/repl/command.scm

					&		3	2	5		:
 		<  g  documentationf  yerror-message
Show error message.

Display the message associated with the error that started the current
debugging REPL. C,(        h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm

 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm

 		,   C>  "  G  4)i530 
 h@   ~  ]4 4 5545$  45456	6v      g  repl
		@ g  form		@ g  proc			@ g  idx		&	8  g  filenamef  system/repl/command.scm

													 		&		-		0	*	8	
	<		@	 		@	  g  documentationf  abreak PROCEDURE
Break on calls to PROCEDURE.

Starts a recursive prompt when PROCEDURE is called. C0  h     ]3$  $  $  K4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6        g  	form-name
	  g  key	  g  args		  g  vx		  g  vy		  g  vx		   g  vy		   g  vx		1	r g  vy		1	r  	g  filenamef  system/repl/command.scm

 	 	  g  nameg  handle-read-error C,Z h0   ^   -  . , 3  #  45  44L 55 45 6  V       g  port
		.  g  filenamef  system/repl/command.scm

 		.
   C       h   J   ] L O 6 B       g  filenamef  system/repl/command.scm

 		
   C6       h   m   - 1 3 L  6     e       g  k
			 g  args			  g  filenamef  system/repl/command.scm

 			
   C(     h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C  h   m   - 1 3 L  6      e       g  k
			 g  args			  g  filenamef  system/repl/command.scm

 			
   C 	       hP      ]45 U  64 O O 54 4O 5>  XCXFG C          g  repl
		M g  handle-read-error		M g  form		$	B g  k		F	M  g  filenamef  system/repl/command.scm

 		M   C>  "  G  4)i0    h8     ]$  45"  45456           g  repl
		3 g  file		3 g  line			3 g  file			3 g  idx		!	3  g  filenamef  system/repl/command.scm

						
	!					!		(		+	&	3	 		3	  g  documentationf  break-at-source FILE LINE
Break when control reaches the given source location.

Starts a recursive prompt when control reaches line LINE of file FILE.
Note that the given source location must be inside a procedure. C,( h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm

 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm

 		,   C>  "  G  ,  h      ]L  44 556    {       g  frame
		  g  filenamef  system/repl/command.scm
				
					 		   C  h   [   ] O C      S       g  k
		
  g  filenamef  system/repl/command.scm
	 		
   C0,M      h   d   ]L  6      \       g  x
		
  g  filenamef  system/repl/command.scm
		
	' 		
   C4A       h   S  ]4>  G  4L>  "  G  4 5(  4>  "  G  "  ,4>  "  G  4	L O >  "  G  4
4554
L56     K      g  from
	  g  stack	  g  vals		0	~  g  filenamef  system/repl/command.scm										!			*		0			8		9		>		C		P		U		Z		c			
 	 	) 	 	> 	
 	 		 	 
   C  h0      ]45 U   4 O >   XCXFG@         g  repl
		. g  msg		. g  handler			. g  args		#	.  g  filenamef  system/repl/command.scm

		 		.	  g  nameg  repl-pop-continuation-resumer CR4)i0<   h`   \  ]4 5$  G4 445455544545>  "  G  	6
6 T      g  repl
		_ g  debug			_ g  handler		/	X  g  filenamef  system/repl/command.scm

						"	-		/		/		2		V		X		]
 		_  g  documentationf  ifinish
Run until the current frame finishes.

Resume execution, breaking when the current frame finishes. C,(       h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm

 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm

 		,   C>  "  G  ,     h   q   ]L 4 56   i       g  frame
		  g  filenamef  system/repl/command.scm
					 		   C    h   [   ] O C      S       g  k
		
  g  filenamef  system/repl/command.scm
	 		
   C04A   h@      ]45 4L >  "  G  4455	4
 
L 56          g  stack
			=  g  filenamef  system/repl/command.scm												!		$		(	'	*		,	<	.		1		=	 		=
   C h0      ]45 U   4 O >   XCXFG@           g  msg
		, g  handler		, g  args		!	,  g  filenamef  system/repl/command.scm

		 		,  g  nameg  repl-next-resumer CR4)i0<    hh   d  ]4 5$  K4454554454545	>  "  G  
66     \      g  repl
		c g  debug			c g  msg		(	\  g  filenamef  system/repl/command.scm

					(		(		+		=	&	N		Z		\		a
 		c  g  documentationf  ustep
Step until control reaches a different source location.

Step until control reaches a different source location. C,(       h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm

 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm

 		,   C>  "  G  4)i0< hh   k  ]4 5$  K4454554454545	>  "  G  
66     c      g  repl
		c g  debug			c g  msg		(	\  g  filenamef  system/repl/command.scm

					(		(		+		=	&	N		Z		\		a
 		c  g  documentationf  |step-instruction
Step until control reaches a different instruction.

Step until control reaches a different VM instruction. C,(        h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm

 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm

 		,   C>  "  G  4)i0< hh     ]4 5$  K4454554454545	>  "  G  
66           g  repl
		c g  debug			c g  msg		(	\  g  filenamef  system/repl/command.scm

					(		(		+		=	&	N		Z		\		a
 		c  g  documentationf  next
Step until control reaches a different source location in the current frame.

Step until control reaches a different source location in the current frame. C,(     h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm

 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm

 		,   C>  "  G  4)i0< hh     ]4 5$  K4454554454545	>  "  G  
66           g  repl
		c g  debug			c g  msg		(	\  g  filenamef  system/repl/command.scm
 
					(		(		+		=	&	N		Z		\		a 
 		c  g  documentationf  next-instruction
Step until control reaches a different instruction in the current frame.

Step until control reaches a different VM instruction in the current frame. C,(      h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
 
 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
 
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
 
 		,   C>  "  G  4)i530 
 h@     ]4 4 5545$  45456	6      g  repl
		@ g  form		@ g  proc			@ g  idx		&	8  g  filenamef  system/repl/command.scm


													 		&		-		0	*	8	
	<		@	 		@	  g  documentationf  tracepoint PROCEDURE
Add a tracepoint to PROCEDURE.

A tracepoint will print out the procedure and its arguments, when it is
called, and its return value(s) when it returns. C0      h     ]3$  $  $  K4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6        g  	form-name
	  g  key	  g  args		  g  vx		  g  vy		  g  vx		   g  vy		   g  vx		1	r g  vy		1	r  	g  filenamef  system/repl/command.scm


 	 	  g  nameg  handle-read-error C,Z h0   ^   -  . , 3  #  45  44L 55 45 6  V       g  port
		.  g  filenamef  system/repl/command.scm


 		.
   C       h   J   ] L O 6 B       g  filenamef  system/repl/command.scm


 		
   C6       h   m   - 1 3 L  6     e       g  k
			 g  args			  g  filenamef  system/repl/command.scm


 			
   C(     h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm


 		>
   C  h   m   - 1 3 L  6      e       g  k
			 g  args			  g  filenamef  system/repl/command.scm


 			
   C 	       hP      ]45 U  64 O O 54 4O 5>  XCXFG C          g  repl
		M g  handle-read-error		M g  form		$	B g  k		F	M  g  filenamef  system/repl/command.scm


 		M   C>  "  G  4)i 00     h(      ] 4 54 5$  "  6          g  idx
		%  g  filenamef  system/repl/command.scm
				
 	 	!	 	!		!	4	#!	7	%	 			%   C h    3  ]	45 (  66  +      g  repl
		 g  traps		  g  filenamef  system/repl/command.scm

												 		  g  documentationf  xtraps
Show the set of currently attached traps.

Show the set of currently attached traps (breakpoints and tracepoints). C,(        h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm

 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm

 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm

 		,   C>  "  G  4)i        h       ]45$  66            g  repl
		 g  idx		  g  filenamef  system/repl/command.scm
$
	)		)		+		*		*	 			  g  documentationf  )delete IDX
Delete a trap.

Delete a trap. C,( h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
$
 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
$
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
$
 		,   C>  "  G  4)i        h       ]45$  66            g  repl
		 g  idx		  g  filenamef  system/repl/command.scm
-
	2		2		4		3		3	 			  g  documentationf  ,disable IDX
Disable a trap.

Disable a trap. C,(      h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
-
 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
-
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
-
 		,   C>  "  G  4)i        h       ]45$  66            g  repl
		 g  idx		  g  filenamef  system/repl/command.scm
6
	;		;		=		<		<	 			  g  documentationf  )enable IDX
Enable a trap.

Enable a trap. C,( h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
6
 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
6
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
6
 		,   C>  "  G  4)i	0  h0      ]	4 5$  454566            g  repl
		+ g  debug			+  g  filenamef  system/repl/command.scm
?
	$D		)?
 		+  g  documentationf  Eregisters
Print registers.

Print the registers of the current frame. C,(        h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
?
 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
?
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
?
 		,   C>  "  G  4)i
n0  h8     - . , 3 #  4>  "  G  45 6           g  repl
		3 g  x		3  g  filenamef  system/repl/command.scm
F
	L		,M		-M	1	3M	 		3  g  documentationf  pwidth [X]
Set debug output width.

Set the number of screen columns in the output from `backtrace' and
`locals'. C,(     h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
F
 		>
   C0
    h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
F
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
F
 		,   C>  "  G  4)iHl3J        h(     ]
44 4 55>   G6         g  repl
		& g  form		& g  args			&  g  filenamef  system/repl/command.scm
U
	X		X			X	2	X		X		&Z	 		&	  g  documentationf  4inspect EXP
Inspect the result(s) of evaluating EXP. C0H       h     ]3$  $  $  K4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6        g  	form-name
	  g  key	  g  args		  g  vx		  g  vy		  g  vx		   g  vy		   g  vx		1	r g  vy		1	r  	g  filenamef  system/repl/command.scm
U
 	 	  g  nameg  handle-read-error C,Z h0   ^   -  . , 3  #  45  44L 55 45 6  V       g  port
		.  g  filenamef  system/repl/command.scm
U
 		.
   C       h   J   ] L O 6 B       g  filenamef  system/repl/command.scm
U
 		
   C6       h   m   - 1 3 L  6     e       g  k
			 g  args			  g  filenamef  system/repl/command.scm
U
 			
   C(     h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
U
 		>
   C  h   m   - 1 3 L  6      e       g  k
			 g  args			  g  filenamef  system/repl/command.scm
U
 			
   C 	       hP      ]45 U  64 O O 54 4O 5>  XCXFG C          g  repl
		M g  handle-read-error		M g  form		$	B g  k		F	M  g  filenamef  system/repl/command.scm
U
 		M   C>  "  G  4)iBl3\]D        h    m   ]4 >  "  G   6    e       g  x
		  g  filenamef  system/repl/command.scm
b		c			d		 		   C        h(     ]
44 4 55>   G6        g  repl
		& g  form		& g  args			&  g  filenamef  system/repl/command.scm
\
	_		_			_	2	_		_		&a	 		&	  g  documentationf  >pretty-print EXP
Pretty-print the result(s) of evaluating EXP. C0B     h     ]3$  $  $  K4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6        g  	form-name
	  g  key	  g  args		  g  vx		  g  vy		  g  vx		   g  vy		   g  vx		1	r g  vy		1	r  	g  filenamef  system/repl/command.scm
\
 	 	  g  nameg  handle-read-error C,Z h0   ^   -  . , 3  #  45  44L 55 45 6  V       g  port
		.  g  filenamef  system/repl/command.scm
\
 		.
   C       h   J   ] L O 6 B       g  filenamef  system/repl/command.scm
\
 		
   C6       h   m   - 1 3 L  6     e       g  k
			 g  args			  g  filenamef  system/repl/command.scm
\
 			
   C(     h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
\
 		>
   C  h   m   - 1 3 L  6      e       g  k
			 g  args			  g  filenamef  system/repl/command.scm
\
 			
   C 	       hP      ]45 U  64 O O 54 4O 5>  XCXFG C          g  repl
		M g  handle-read-error		M g  form		$	B g  k		F	M  g  filenamef  system/repl/command.scm
\
 		M   C>  "  G  4)i        h      ]6          g  repl
		  g  filenamef  system/repl/command.scm
l
	o	 		  g  documentationf  gc
Garbage collection. C,( h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
l
 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
l
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
l
 		,   C>  "  G  4)i !"#$%&'()*+,-.V &   h  ;  ]a45 45 4 54 545454	>  "  G  4
>   "  G  45454>  "  G  4>  "  G  4
>   "  G  45454>  "  G  4>  "  G  4
>   "  G  45454>  "  G  4>  "  G  4
>   "  G  4545454545454545
	4 >  "  G  4!>  "  G  4">  "  G  4#	
>  "  G  4$>  "  G  4
>   "  G  	
44%5 >  "  G  4%5 6    3      g  repl
	| g  this-tms	| g  this-gcs		| g  last-tms		| g  last-gcs		| g  
this-times		4	g g  
last-times		4	g g  	this-heap		y  g  	this-free		y  g  
this-alloc	   g  
last-alloc	   g  
this-total	2x g  
last-total	2x g  
this-utime	V g  
last-utime	V g  
this-stime	V g  
last-stime	V g  this-cutime		V g  last-cutime	
V g  this-cstime	V g  last-cstime	V  g  filenamef  system/repl/command.scm
q
	t		u		v		w		t		#y		)y	*	+y		,z		2z	*	4z		4y		9{		={		D{	>	I{		R|		h~		n~	)	p~		q		w	*	y		y~		~	 	 	) 	3 	 	 	 	 	@ 	 	 	 	) 	 	 	) 	 	 	 	 	- 	4 	 	 	 	>		!	'	))	*	0	)2	2	7	;	=	+?	2D	M	Q	Z	c	y												0	7												&	/	W	|	 c	|  g  documentationf  statistics
Display statistics. C,(        h@   |   ]445 5 "  %4 545$  6""  t       g  port
		> g  out		7 g  x			7  g  filenamef  system/repl/command.scm
q
 		>
   C0     h      - 1 3 $  $  $  J4 >  "  G  445 >  "  G  "  4 >  "  G  "  4 >  "  G  "  4 >  "  G  6              g  k
		  g  args		  g  vx		  g  vy		  g  vx		'  g  vy		'  g  vx		8	x g  vy		8	x  g  filenamef  system/repl/command.scm
q
 		 
   C h0   k   ]	45 U  4  45>  XCXFG C    c       g  repl
		, g  k	%	,  g  filenamef  system/repl/command.scm
q
 		,   C>  "  G  0/0 h0     ]4$  "  5 6             g  title
		) g  flag		) g  field1			) g  field2			) g  unit			) g  fmt			)  g  filenamef  system/repl/command.scm

						8		A		D					)	 
		)	  g  nameg  display-stat CR      h      ] 6        g  title
		 g  field1		 g  field2			  g  filenamef  system/repl/command.scm

		'		 			  g  nameg  display-stat-title CR      h      ] 6            g  title
		 g  flag		 g  this			 g  last			 g  unit			  g  filenamef  system/repl/command.scm

				 			  g  nameg  display-diff-stat CR012k3 h@   8  ] 445544556       0      g  title
		9 g  this		9 g  last			9 g  num			#  g  filenamef  system/repl/command.scm

												(			 		)		*		1	(	3		5		7	:	9	 		9	  g  nameg  display-time-stat C%R40156       h`     ] 
$  "  45
$  "  456           g  title
		[ g  	this-time		[ g  
this-clock			[ g  	last-time			[ g  
last-clock			[ g  time			9 g  clock			9  g  filenamef  system/repl/command.scm

				.									$		)	%	.	.	0	<	1	.	3		=		A		C		H		M	%	R	.	T	<	U	.	W		Y	,	[	 		[	  g  nameg  display-mips-stat C7RC    ;      g  m
		0  g  filenamef  system/repl/command.scm		
	2	3		5	2
	7	H		:	G
 	J
_	K
`	M	i	M
	N
	O
=	P
	Q
	R
L	T
	W
	Z
o	]
	a
	a	h
/	k
H	s
O	|
 
 
 
 
 
! 
.q%
5>
:D
>QJ
BP
GU
O`
Up
Yz
_Y
e9
i
o)
t
|A
      i
      
      
      
      n
      o
      b
      
      2
      
      ƒ<
      iI
      ӹ_
      ڑt
      )
      
      
      
      J
     
     
     
     
     
     
     A 
     !

     *r
     0I$
     4-
     96
     >?
     BF
     GU
     OJ\
     Wl
     [q
     i
     j
     k
     ml
     o
 W	     o
   C6                                                                            ccache/system/repl/error-handling.go                                                                0000644                 00000023544 15154557173 0013527 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0L'      ]  4     h      ] g  guile	 	g  define-module*	 	 	g  system	g  repl	g  error-handling		 	
g  filenameS	f  system/repl/error-handling.scm	g  importsS	g  base	g  pmatch	 	 	g  vm	g  
trap-state	 	 	g  debug	 	 	g  ice-9	g  format	 	 	 	g  exportsS	g  call-with-error-handling	g  with-error-handling	  	!g  set-current-module	"! 	#! 	$g  call-with-output-string	%g  vector-length	&g  print-exception	'g  error-string	(g  on-errorS	)(	*g  
post-errorS	+*		,g  	pass-keysS	-,		.g  trap-handlerS	/.		0)+-/ 	1g  catch	2g  quit	32 	4g  current-input-port	5g  current-output-port	6g  current-error-port	7g  %stacks	8g  narrow-stack->vector	9g  
make-stack	:f  Trap ~d: ~a	;g  
make-debug	<g  with-input-from-port	=g  with-output-to-port	>g  with-error-to-port	?f  ~a~%	@f  Entering a new prompt.  	Af  0Type `,bt' for a backtrace or `,q' to continue.
	B 	Cg  
start-repl	DBC 	EBC 	Fg  debugS	Gg  pass	Hg  disabled	Ig  error	Jf  Unknown trap-handler strategy	Kg  with-default-trap-handler	Lg  %start-stack	Mg  report	Ng  memq	Og  throw	Pg  run-hook	Qg  before-error-hook	Rg  after-error-hook	Sg  force-output	Tg  
procedure?	Uf  Unknown post-error strategy	Vg  	backtrace	Wg  print-frames	Xf  Unknown on-error strategy	Yg  make-syntax-transformer	ZY 	[Y 	\g  macro	]g  $sc-dispatch	^] 	_] 	`g  any	a`` 	bg  syntax-object	cg  top	dc 	eg  ribcage	fg  dummy	gg  form	hfg 	ig  m-82c280f576c6227-80	jic 	kjd 	lf  l-82c280f576c6227-85	mf  l-82c280f576c6227-86	nlm 	oehkn 	pe 	qg  x	rq 	sj 	tf  l-82c280f576c6227-82	ut 	versu 	wdopv 	xg  hygiene	yx 	zbwy 	{g  lambda	|b{wy 	}g  syntax-violation	~} 	}  f  -source expression failed to match any patternC 5 hx  r   ]4	
 5 4# >  "  G   $%& h(      ]	
4L 5$  L 
"   LL6         g  port
		& g  frame		&  g  filenamef  system/repl/error-handling.scm
	&			'			'			'			'	3		'		&	(	 		&   C       h      ] O 6              g  stack
		 g  key		 g  args			  g  filenamef  system/repl/error-handling.scm
	$
		%	 			  g  nameg  error-string C'R013456789:;<=>?@AEF hP      ] L$  ?4L>  "  G  4>  "  G  4>  "  G  "   L 6        g  filenamef  system/repl/error-handling.scm
	L				M				O			O			O			P		#	P		(	P		1	Q		6	Q		;	Q		I	R		O	R	 		O
   C    h   Y   ] LLLL O 6     Q       g  filenamef  system/repl/error-handling.scm
	4			5	 		
   C    h   Y   ] LLLLL O 6   Q       g  filenamef  system/repl/error-handling.scm
	2			3	
 		
   C 	   hp     ]#[$  	["  44 5

$  "  5$  45"  4
5LLL O 6      g  frame
		p g  trap-idx		p g  	trap-name			p g  tag			p g  stack		2	p g  	error-msg		L	p g  debug		Y	p  g  filenamef  system/repl/error-handling.scm
	8			9		
	9			:			9			;			<		*	F		2	;		2	9		:	G		;	H		@	H	'	F	H		L	9		O	J		Y	9		p	1	 		p	  g  nameg  debug-trap-handler CG     h      ]C           g  frame
		 g  trap-idx		 g  	trap-name			  g  filenamef  system/repl/error-handling.scm
	T	 			  g  nameg  null-trap-handler CHIJ1KL       h   Y   ] L 6       Q       g  filenamef  system/repl/error-handling.scm
	a	
			a	 			
   C    h   Y   ] ML O 6 Q       g  filenamef  system/repl/error-handling.scm
	_			`	 		
   CMNO<=>PQ&RS  hH   q   ] 4>  "  G  4LLL >  "  G  4>  "  G  L6     i       g  filenamef  system/repl/error-handling.scm
	j			k			l		,	m		C	n	 		C
   C    h   Y   ] LLL LO 6     Q       g  filenamef  system/repl/error-handling.scm
	4			5	 		
   C    h   Y   ] LLLL O 6     Q       g  filenamef  system/repl/error-handling.scm
	2			3	
 		
   C    h@      - 1 3 4 L5$   @4L L LO >  "  G  C        g  key
			? g  args			?  g  filenamef  system/repl/error-handling.scm
	e			
	f			f			g			1	 			?
   CNO  h       - 1 3 4 L 5$   @C       g  key
			  g  args			   g  filenamef  system/repl/error-handling.scm
	q			
	r			r			s	 			 
   CTNO        h(      - 1 3 4 L5$  "  L  @           g  k
			$ g  args			$  g  filenamef  system/repl/error-handling.scm
	v		
	w			w		$	w	 			$
   CUN789';<=>?@AEF     hH      ] 4L>  "  G  4>  "  G  4>  "  G  L 6          g  filenamef  system/repl/error-handling.scm
 		 		 		 		 		 		" 		+ 		0 		5 		? 		E 	 		E
   C        h   Y   ] LLL O 6       Q       g  filenamef  system/repl/error-handling.scm
	4			5	 		
   C    h   Y   ] LLLL O 6     Q       g  filenamef  system/repl/error-handling.scm
	2			3	
 		
   C 	   hx   J  - 1 3 4 L5$  C[$  	["  445	
$  "  54 54
5L LLO 6 B      g  key
			w g  args			w g  tag		*	w g  stack		H	w g  	error-msg		U	w g  debug		b	w  g  filenamef  system/repl/error-handling.scm
	|			
	}			}			~	 	 	~		$		 	*	~		- 		0 		@ 	 	H 		H	~		K 	!	U	~		X 		b	~		w	1	 			w
   CN<=>PQ&RS     hH   v   ] 4>  "  G  4LLL >  "  G  4>  "  G  L6     n       g  filenamef  system/repl/error-handling.scm
 		 		 		, 		C 	 		C
   C       h   Y   ] LLL LO 6     Q       g  filenamef  system/repl/error-handling.scm
	4			5	 		
   C    h   Y   ] LLLL O 6     Q       g  filenamef  system/repl/error-handling.scm
	2			3	
 		
   C    h@      - 1 3 4 L5$  C4L L LO >  "  G  C              g  key
			9 g  args			9  g  filenamef  system/repl/error-handling.scm
 			
 		 			1	 			9
   CVN789<=>WPQ&RS    hX      ] 4L>  "  G  4>  "  G  4L LL>  "  G  4>  "  G  L 6   w       g  filenamef  system/repl/error-handling.scm
 		 		 		' 		> 		U 	 		U
   C      h   Y   ] LLLLL O 6   Q       g  filenamef  system/repl/error-handling.scm
	4			5	 		
   C    h   Y   ] LLLLL O 6   Q       g  filenamef  system/repl/error-handling.scm
	2			3	
 		
   C    hp     - 1 3 4 L5$  C[$  	["  445	
$  "  54L L LO >  "  G  C          g  key
			m g  args			m g  tag		*	m g  frames		H	m  g  filenamef  system/repl/error-handling.scm
 			
 		 		 	 	  		$ 	 	* 		- 		0 		@ 	'	H 		H 		K	1	 			m
   C       h   w   - 1 3 C     o       g  key
			 g  args			  g  filenamef  system/repl/error-handling.scm
 		 			
   CNO h(      - 1 3 4 L5$  "  L  @           g  k
			$ g  args			$  g  filenamef  system/repl/error-handling.scm
 		
 		 		$ 	 			$
   CX   hx    - /   0   3 
#  #  #  #  45 45 45 HO 	Q 	$  	"  &	$  
"  $  "  	45K O $  O "  5$  O "  !45$  O "  	45$  O "  d$  O "  J$  O "  0	$  "  !45$  O "  	456      g  thunk
	x g  on-error	x g  
post-error		x g  	pass-keys		x g  trap-handler		x g  in		Jx g  out		Jx g  err		Jx g  le-trap-handler		Qx g  debug-trap-handler			]x  
g  filenamef  system/repl/error-handling.scm
	*
		+	-	%	+	A	/	,	.	9	,	E	<	-		A	.		F	/		J	-		o	X	 	\	 	\	 	\	 	c	 	u	 	u		 	x	 	x	 	x		z	V 	` 		n 	r 	v 	x	^	 	x
g  on-errorSg  
post-errorS	g  	pass-keysS	g  trap-handlerS	   g  nameg  call-with-error-handling CR4[\_az|       h   ?   ]  C7       g  dummy
		 g  form		  			   C  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  system/repl/error-handling.scm
 
 		"  g  
macro-typeg  syntax-rulesg  patternsg  form   C5RC       j       g  m
		,  g  filenamef  system/repl/error-handling.scm		
	$
	*
 	q
   C6                                                                                                                                                             ccache/system/repl/repl.go                                                                          0000644                 00000026343 15154557173 0011556 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0,      ]  4       h"      ] g  guile	 	g  define-module*	 	 	g  system	g  repl	 		g  filenameS	
f  system/repl/repl.scm	g  importsS	g  base	g  syntax	 	 	g  pmatch	 	 	g  compile	 	 	g  language	 	 	g  vm	 	 	g  error-handling	 	 	g  common	  	!  	"g  command	#" 	$# 	%g  ice-9	&g  control	'%& 	(' 	)!$( 		*g  exportsS	+g  
start-repl	,g  run-repl	-+, 	.g  set-current-module	/. 	0. 	1g  	read-char	2g  eof-object?	3g  read-scheme-line-comment	4g  read	5g  read-scheme-datum-comment	6g  language-name	7g  scheme	8g  	peek-char	9g  unread-char	:g  read-comment	;g  meta	<g  meta-command-token	=g  current-input-port	>g  with-input-from-port	?g  flush-leading-whitespace	@g  language-reader	Ag  meta-reader	Bg  char-ready?	Cg  flush-all-input	Dg  catch	Eg  repl-reader	Fg  repl-prompt	Gg  repl-language	Hg  current-module	Ig  quit	Jg  throw	Kg  format	Lg  current-output-port	Mf  While reading expression:
	Ng  print-exception	Og  prompting-meta-read	Pg  debugS	QP	RQ 	Sg  current-language	Tg  start-repl*	Ug  
parameter?	VU 	WU 	Xg  	scm-error	Yg  wrong-type-arg	Zf  parameterize	[f  Not a parameter: ~S	\g  	run-repl*	]g  	make-repl	^g  make-syntax-transformer	_^ 	`^ 	ag  abort-on-error	bg  macro	cg  $sc-dispatch	dc 	ec 	fg  any	gfff 	hg  syntax-object	ig  top	ji 	kg  ribcage	lg  dummy	mg  string	ng  exp	olmn 	pg  m-1e9e6487f-43	qpi 	rqjj 	sf  l-1e9e6487f-48	tf  l-1e9e6487f-49	uf  l-1e9e6487f-4a	vstu 	wkorv 	xk 	yg  x	zy 	{q 	|f  l-1e9e6487f-45	}| 	~kz{} 	jwx~  g  hygiene   hD  h  g  lambda h  g  key h  g  args h   hK  f  While ~A:~% h  hN  hL    h    g  abort h      g  syntax-violation     f  -source expression failed to match any pattern g  default-prompt-tag g  %start-stack     '  '  g  *repl-stack* g  repl-welcome g  meta-command f  While executing meta-command:~% g  newline g  flush-to-newline g  call-with-error-handling g  repl-prepare-eval-thunk g  
repl-parse f  parsing expression f  compiling expression g  run-hook g  before-eval-hook g  on-errorS g  repl-option-ref g  on-error g  for-each g  
repl-print g  trap-handlerS g  disabled g  char-whitespace? g  char=?C 5 h     ]4	
)*-5 40 >  "  G   12    h8      ]"  *4 545$  C
$  C""           g  port
		4 g  ch		0 g  t			0  g  filenamef  system/repl/repl.scm
	)
		*			+			+			,	
		,		&	-	
	*	,		+	-	
	0	.	
	0	*	 		4  g  nameg  read-scheme-line-comment C3R4   h      ] 6       g  port
		  g  filenamef  system/repl/repl.scm
	0
		1	 		  g  nameg  read-scheme-datum-comment C5R6713859    h     ]4 5&  ;$  &4>  "  G  4>  "  G  C#$  `4>  "  G  45;$  &4>  "  G  4>  "  G  C4#>  "  G  CCC           g  lang
	  g  port	  g  ch		  g  key		`   g  filenamef  system/repl/repl.scm
	4
		5			5	!		5			6			8	
	+	9	
	G	6		H	<	
	Z	=		`	=	
	l	?		~	@	 	G	 	 	  g  nameg  read-comment C:R;"<R=>?21<:@    hX      ]45  4 5$  6  ,$  4>   "  G  C4LL 5$  C4L5LL 6             g  ch
		R  g  filenamef  system/repl/repl.scm
	W			X			X		
	Y			Y	
		Z			[		!	Y	
	"	\		5	^		C	Y	
	F	`		R	`	 		R
   C     h0   k   -  . , 3  #  45   L L O 6      c       g  port
		*  g  filenamef  system/repl/repl.scm
	U			U		*	V	 		*
   C  h      ] O C    z       g  lang
		 g  env		  g  filenamef  system/repl/repl.scm
	T
 			  g  nameg  meta-reader CARB281C     h8      ] 45 $  $445 5$  C4>   "  G  6 C              g  filenamef  system/repl/repl.scm
	b
		c			c			d			d			d			c			f		/	g	 
		1
  g  nameg  flush-all-input CCRDEF       h   O   ] L 6G       g  filenamef  system/repl/repl.scm
	s			s	 		
   CAGH        h    o   ] L O 44L 545 56  g       g  filenamef  system/repl/repl.scm
	r			t			t	 		t	5		t			s	 		
   CIJKLMNC       h`      - 1 3  $   @445 >  "  G  445  >  "  G  4>   "  G  C          g  key
			] g  args			]  g  filenamef  system/repl/repl.scm
	u			v			x				z				z		$	z	'	)	z			2	{			5	{		C	{			L	|		 			]
   C h      ] O 6y       g  repl
		  g  filenamef  system/repl/repl.scm
	p
		q	 		  g  nameg  prompting-meta-read CORRSTO        h8      -  /    0   3  #  45  #   6            g  lang
		3 g  debug		3  g  filenamef  system/repl/repl.scm
 
	 	&	3 	 		3
g  debugS   g  nameg  
start-repl C+RSWXYZ[\] 	 hX      ]45$  "  4 >  "  G  4	 5Y44 5>  ZCZF       g  lang
		X g  debug		X g  prompting-meta-read			X g  t-1e9e6487f-3e			X  g  filenamef  system/repl/repl.scm
 
	 		B 		E 		T 	 		X	  g  nameg  start-repl* CTR4`abeg h(   R   ]   C  J       g  dummy
		& g  string		& g  exp			&  		&	   C       h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  system/repl/repl.scm
 
 		"  g  
macro-typeg  syntax-rulesg  patternsg  stringg  exp   C5aR\O  h   x   ] 6      p       g  repl
		
  g  filenamef  system/repl/repl.scm
 
	
 	 		
  g  nameg  run-repl C,R    h   Q   ] L 6   I       g  filenamef  system/repl/repl.scm
 	!	 	1 		
   C    h   I   ] L O 6  A       g  filenamef  system/repl/repl.scm	 	! 		
   C     h   Q   ] LL 6I       g  filenamef  system/repl/repl.scm
 	/	 	: 		
   C    h8      ]45 U   4 O >   XCXFG O  "            g  thunk
		3 g  k		3 g  proc			3  g  filenamef  system/repl/repl.scm
 		 		 		3 	 		3  g  nameg  with-stack-and-prompt C<D       h   Q   ] L 6I       g  filenamef  system/repl/repl.scm
 		 	 		
   CIKNL       h8      - 1 3  &  64>  "  G  45  6       g  k
			8 g  args			8  g  filenamef  system/repl/repl.scm
 		 		 		 		 		 	"	" 		- 	(	8 	 
			8
   C2DIDD      h   Q   ] LL 6      I       g  filenamef  system/repl/repl.scm
 	'	
 	) 		

   CKNL       h@      - 1 3 4>  "  G  445  >  "  G  6     w       g  key
			< g  args			<  g  filenamef  system/repl/repl.scm
 	'	 	7	 	' 			<
   C      h    Z   ] L4L LO 56       R       g  filenamef  system/repl/repl.scm
 	$	 	'	 	& 		
   CKNL      h@      - 1 3 4>  "  G  445  >  "  G  6            g  key
			< g  args			<  g  filenamef  system/repl/repl.scm
 	$	 	'	 	4	 	$ 			<
   Ch   Q   ] LL 6I       g  filenamef  system/repl/repl.scm
 	 	 	" 		
   C h   a   ]L  6      Y       g  v
		
  g  filenamef  system/repl/repl.scm
 	"	
 	$ 		
   C    hx      ]45 U  I4LLO 5 4L>  "  G  4 L O 	4
L5>  X"  G  
"  G LO  6             g  thunk
		O g  k
	U	_ g  l
	`	r  g  filenamef  system/repl/repl.scm
 		 		 	$	 		  		4 		B 	+	H 	A	J 	+	O 		X 		_ 	)	c 		r 	 		r
   C     h   t   - 1 3 6 l       g  k
			 g  args			  g  filenamef  system/repl/repl.scm
 		 	 			
   C h   Z   ] L LLO 6   R       g  filenamef  system/repl/repl.scm
 		 		 	 		
   C h(    ]O Q 45 U  [$  "  Y[(  4 >  "  G  "   "  4 5$  "  &  4 O >  "  G  "  j4	5$  %4
>   "  G  4>  "  G  "  :4>   "  G  4 O 4 5>  "  G  4>   "  G  "G"CZ"  XCXFG C      g  repl
	( g  prompting-meta-read	( g  with-stack-and-prompt		
( g  t		 	2 g  exp		^ g  k	( g  status	(  g  filenamef  system/repl/repl.scm
 
	 		  		/ 	<	3 		9 		= 		> 		W 		X 		^ 			d 		h 		u 	  	  	  	  	  	  	  	  	  	  	/  	  	  	  	 	 	! 	  	(	  g  nameg  	run-repl* C\R821?        h@      ]45  4 5$   C4 5$  4>   "  G  6  C              g  ch
		9  g  filenamef  system/repl/repl.scm
 
	 		 		
 		 		 		" 		# 	!	6 	- 
		9
  g  nameg  flush-leading-whitespace C?RB821      hX      ]45 $  G45  4 5$  "  4 5$  #4>   "  G  4 
5$  C6 CC           g  ch
		R  g  filenamef  system/repl/repl.scm
 
	 		 		 		 		 		 		# 	(	- 		. 		> 		J 		P 	 		T
  g  nameg  flush-to-newline CRC         g  m
		,  g  filenamef  system/repl/repl.scm		
g	)

	0
	4
	R	!	R	'	R		R
u	T
m	b

d	p
b 
 
 
b 
 
 
 	
   C6                                                                                                                                                                                                                                                                                              ccache/system/repl/coop-server.go                                                                   0000644                 00000142472 15154557173 0013062 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0"      ] 4        hO^      ] g  guile	 	g  define-module*	 	 	g  system	g  repl	g  coop-server		 	
g  filenameS	f  system/repl/coop-server.scm	g  importsS	g  ice-9	g  match	 	 	g  receive	 	 	g  threads	 	 	g  q	 	 	g  srfi	g  srfi-9	 	 	 	g  selectS	 g  start-repl*	!g  prompting-meta-read	" ! 	#" 	$g  server	%$ 	&g  run-server*	'g  make-tcp-server-socket	(g  add-open-socket!	)g  close-socket!	*g  guard-against-http-request	+&'()* 	,%+ 	-#, 	.g  exportsS	/g  spawn-coop-repl-server	0g  poll-coop-repl-server	1/0 	2g  set-current-module	32 	42 	5g  <coop-repl-server>	6g  !%%make-coop-repl-server-procedure	7g  make-syntax-transformer	87 	97 	:g  %make-coop-repl-server	;g  macro	<g  $sc-dispatch	=< 	>< 	?g  _	@g  any	A?@@ 	Bg  syntax-object	Cg  lambda	Dg  m-6cff15a80cd23e5-5	Eg  top	FDE 	Gg  ribcage	Hg  t-6cff15a80cd23e5-3	Ig  t-6cff15a80cd23e5-4	JHI 	KFF 	Lf  l-6cff15a80cd23e5-a	Mf  l-6cff15a80cd23e5-b	NLM 	OGJKN 	PG 	Qg  x	RQ 	SF 	Tf  l-6cff15a80cd23e5-7	UT 	VGRSU 	Wg  shift	Xg  	proc-name	Yg  args	ZXY 	[E 	\[[ 	]f  l-1e8ba8b5a-2ba	^f  l-1e8ba8b5a-2bb	_]^ 	`GZ\_ 	ag  key	bg  value	cg  name	dg  formals	eg  body	fabcde 	g[[[[[ 	hf  l-1e8ba8b5a-2ad	if  l-1e8ba8b5a-2ae	jf  l-1e8ba8b5a-2af	kf  l-1e8ba8b5a-2b0	lf  l-1e8ba8b5a-2b1	mhijkl 	nGfgm 	og  make-procedure-name	po 	q[ 	rf  l-1e8ba8b5a-29d	sr 	tGpqs 	u[ 	vf  l-1e8ba8b5a-29c	wv 	xGRuw 	yFOPVWPPPP`ntx 	zg  hygiene	{z 	|BCy{ 	}g  mutex	~[OPV 	z  B}~  g  queue B~    g  make-struct g  m-6cff15a80cd23e5-1 E  g  t-1e8ba8b5a-38d g  t-1e8ba8b5a-38c g  t-1e8ba8b5a-38b   g  m-1e8ba8b5a-38e E    f  l-1e8ba8b5a-392 f  l-1e8ba8b5a-393 f  l-1e8ba8b5a-394   G  g  	ctor-args   f  l-1e8ba8b5a-37a   Gu  g  ctor g  field   f  l-1e8ba8b5a-376 f  l-1e8ba8b5a-377   G\  g  form g  	type-name g  constructor-spec g  field-names   [[[[  f  l-1e8ba8b5a-36b f  l-1e8ba8b5a-36c f  l-1e8ba8b5a-36d f  l-1e8ba8b5a-36e   G  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers   [[[[[[[[  f  l-1e8ba8b5a-343 f  l-1e8ba8b5a-341 f  l-1e8ba8b5a-33f f  l-1e8ba8b5a-33d f  l-1e8ba8b5a-33b f  l-1e8ba8b5a-339 f  l-1e8ba8b5a-337 f  l-1e8ba8b5a-335   G  f  l-1e8ba8b5a-334   GRu  OPVWPPPPP  B{  B5~  B
{    |  g  each-any ?Ȍ g  syntax-violation     f  Wrong number of arguments g  identifier?     [PV  B6      f  -source expression failed to match any pattern g  record-type-vtable     g  pwpw g  default-record-printer     }  g  set-struct-vtable-name!     g  vtable-offset-user     g  %coop-repl-server?-procedure g  coop-repl-server? ?@  g  m-6cff15a80cd23e5-14 E  g  t-6cff15a80cd23e5-13     f  l-6cff15a80cd23e5-19   G  f  l-6cff15a80cd23e5-16   GR  PWPPPP`ntx  BC{  g  obj g  t-1e8ba8b5a-47e g  t-1e8ba8b5a-478 g  t-1e8ba8b5a-479 g  t-1e8ba8b5a-47a g  t-1e8ba8b5a-47d g  t-1e8ba8b5a-47c g  t-1e8ba8b5a-47b   g  m-1e8ba8b5a-47f E    f  l-1e8ba8b5a-483f  l-1e8ba8b5a-484f  l-1e8ba8b5a-485f  l-1e8ba8b5a-486f  l-1e8ba8b5a-487f  l-1e8ba8b5a-488f  l-1e8ba8b5a-489  G 	g  	copier-id
	 f  l-1e8ba8b5a-476 G
u g  	ctor-name f  l-1e8ba8b5a-46e Gu  f  l-1e8ba8b5a-46c Gu g  layout f  l-1e8ba8b5a-46a Gu g  
immutable? f  l-1e8ba8b5a-468  Gu !g  field-count"! #f  l-1e8ba8b5a-466$# %G"u$ &g  
getter-ids'& (f  l-1e8ba8b5a-463)( *G'u) +g  	field-ids,+ -f  l-1e8ba8b5a-460.- /G,u. 0g  predicate-name1g  
field-spec201 3[[[[[[ 4f  l-1e8ba8b5a-4535f  l-1e8ba8b5a-4546f  l-1e8ba8b5a-4557f  l-1e8ba8b5a-4568f  l-1e8ba8b5a-4579f  l-1e8ba8b5a-458:456789 ;G23: <PWPPPPPPPPP P%P*P/; =B<{ >= ?g  and@B?<{ Ag  struct?BBA<{ CB= Dg  eq?EBD<{ Fg  struct-vtableGBF<{ HG= I[P JB5I KEHJ L@CK M>L N[P OBN Pg  throw-bad-structQP RP Sg  coop-repl-server-mutexTg  !%coop-repl-server-mutex-procedureUg  free-idVg  
%%on-errorWg  m-6cff15a80cd23e5-20XWE YX Zf  l-6cff15a80cd23e5-22[Z \GRY[ ]XP\WPPPP`ntx ^BV]{ _U^ `_@ ag  %%typebg  t-1e8ba8b5a-3a5cg  t-1e8ba8b5a-3a6dg  t-1e8ba8b5a-3a7eg  t-1e8ba8b5a-3a8fg  t-1e8ba8b5a-3a9gg  t-1e8ba8b5a-3aahg  t-1e8ba8b5a-3abibcdefgh jg  m-1e8ba8b5a-3ackjE lkkkkkkk mf  l-1e8ba8b5a-3b0nf  l-1e8ba8b5a-3b1of  l-1e8ba8b5a-3b2pf  l-1e8ba8b5a-3b3qf  l-1e8ba8b5a-3b4rf  l-1e8ba8b5a-3b5sf  l-1e8ba8b5a-3b6tmnopqrs uGilt vg  getterwg  indexxvw yf  l-1e8ba8b5a-3a3zf  l-1e8ba8b5a-3a4{yz |Gx\{ }&	 ~[[[ f  l-1e8ba8b5a-39ef  l-1e8ba8b5a-39ff  l-1e8ba8b5a-3a0 G}~ P\WPuPPP|P Ba{ U ?`@ g  ckg  errg  s XX f  l-6cff15a80cd23e5-25f  l-6cff15a80cd23e5-26 G XP\WPPPP`ntx B{ g  quoteB{ [P\ B5   g  %%indexB{ U ?`@ f  l-6cff15a80cd23e5-2af  l-6cff15a80cd23e5-2b G XP\WPPPP`ntx B{ B{ P\ B
   g  %%copierB{ U ?`@ f  l-6cff15a80cd23e5-2ff  l-6cff15a80cd23e5-30 G XP\WPPPP`ntx B{ B{ g  %%<coop-repl-server>-set-fields[P\ B   g  t-6cff15a80cd23e5-1f f  l-6cff15a80cd23e5-34 GY XP\WPPPP`ntx BC{ P\WPuPPP|P B{  g  ifB{ BD{ BF{  [P\ B5  g  
struct-refB{ P\ B
  BP{ B{ BS     [P\ BT g  coop-repl-server-queueg  !%coop-repl-server-queue-procedureg  m-6cff15a80cd23e5-3bE  f  l-6cff15a80cd23e5-3d GR PWPPPP`ntx BV{ U @ PWPuPPP|P Ba{ U ?@  f  l-6cff15a80cd23e5-40f  l-6cff15a80cd23e5-41 G PWPPPP`ntx B{ B{ [P B5   B{ U ?@ f  l-6cff15a80cd23e5-45f  l-6cff15a80cd23e5-46 G PWPPPP`ntx B{ B{ P B     B{ U ?@ f  l-6cff15a80cd23e5-4af  l-6cff15a80cd23e5-4b G 	PWPPPP`ntx 
B	{ B	{ [P B   g  t-6cff15a80cd23e5-3a f  l-6cff15a80cd23e5-4f G PWPPPP`ntx BC{ PWPuPPP|P B{  B{ BD{ BF{  [P B5   !B{ "P #B" $!# %BP{ &B{ 'B (&' )%( * $) +* ,[P -B, .g  each/@@ 0./ 1@02@13@24g  %%set-fields5g  dummy6g  check?7g  expr856v7 9g  m-6cff15a80cd23e5-56:9E ;: <f  l-6cff15a80cd23e5-5b=f  l-6cff15a80cd23e5-5c>f  l-6cff15a80cd23e5-5d?f  l-6cff15a80cd23e5-5e@f  l-6cff15a80cd23e5-5fA<=>?@ BG8;A C: Df  l-6cff15a80cd23e5-58ED FGRCE Gg  t-1e8ba8b5a-3c4Hg  t-1e8ba8b5a-3c6Ig  t-1e8ba8b5a-3c5JGHI Kg  m-1e8ba8b5a-3c7LKE MLLL Nf  l-1e8ba8b5a-3cbOf  l-1e8ba8b5a-3ccPf  l-1e8ba8b5a-3cdQNOP RGJMQ Sf  l-1e8ba8b5a-3c1Tf  l-1e8ba8b5a-3c2Uf  l-1e8ba8b5a-3c3VSTU WG}~V XBPFWPRPPPW YB4X{ Z[BPF [B5Z \BSZ ]BZ ^\] _g  map`_ a_ bg  listcg  
make-mutexdg  make-qeg  make-coop-repl-serverfg  
lock-mutexgf hf ig  unlock-mutexji ki lg  enq!mg  coop-repl-server-evalng  <coop-repl>og  %%make-coop-repl-procedurepg  %make-coop-replq?@@@@ rg  m-6cff15a80cd23e5-91srE tg  t-6cff15a80cd23e5-8dug  t-6cff15a80cd23e5-8evg  t-6cff15a80cd23e5-8fwg  t-6cff15a80cd23e5-90xtuvw yssss zf  l-6cff15a80cd23e5-96{f  l-6cff15a80cd23e5-97|f  l-6cff15a80cd23e5-98}f  l-6cff15a80cd23e5-99~z{|} Gxy~ s f  l-6cff15a80cd23e5-93 GR sPWPPPP`ntx BC{ [P B} g  condvarB g  thunkB g  contB  g  m-6cff15a80cd23e5-8bE PWPPPPP B{ Bn B
{   [P Bo g  pwpwpwpw} g  %coop-repl?-procedureg  
coop-repl?g  m-6cff15a80cd23e5-a4E g  t-6cff15a80cd23e5-a3  f  l-6cff15a80cd23e5-a9 G f  l-6cff15a80cd23e5-a6 GR PWPPPP`ntx BC{ PWPPPPPPPPP P%P*P/; B{  B?{ BA{  BD{ BF{  [P Bn    [P B g  coop-repl-mutexg  %coop-repl-mutex-procedureg  m-6cff15a80cd23e5-b0E  f  l-6cff15a80cd23e5-b2 GR PWPPPP`ntx BV{ U @ PWPuPPP|P Ba{ U ?@  f  l-6cff15a80cd23e5-b5f  l-6cff15a80cd23e5-b6 G PWPPPP`ntx B{ B{ [P Bn   B{ U ?@ f  l-6cff15a80cd23e5-baf  l-6cff15a80cd23e5-bb G PWPPPP`ntx B{ B{ P B
   B{ U ?@ f  l-6cff15a80cd23e5-bff  l-6cff15a80cd23e5-c0 G PWPPPP`ntx B{ B{ g  %%<coop-repl>-set-fields[P B   g  t-6cff15a80cd23e5-af f  l-6cff15a80cd23e5-c4 G PWPPPP`ntx BC{ PWPuPPP|P B{  B{ BD{ BF{   [P Bn   B{ P B
  BP{ 	B{ 
B 	
    [P B g  coop-repl-condvarg  %coop-repl-condvar-procedureg  m-6cff15a80cd23e5-cbE  f  l-6cff15a80cd23e5-cd GR PWPPPP`ntx BV{ U @ PWPuPPP|P Ba{ U  ?@ ! "f  l-6cff15a80cd23e5-d0#f  l-6cff15a80cd23e5-d1$"# %G!$ &%PWPPPP`ntx 'B&{ (B&{ )[%P *Bn) +(* ,+ -B{ .U- /?.@ 0f  l-6cff15a80cd23e5-d51f  l-6cff15a80cd23e5-d6201 3G!2 43PWPPPP`ntx 5B4{ 6B4{ 73P 8B7 968 :9 ;B{ <U; =?<@ >f  l-6cff15a80cd23e5-da?f  l-6cff15a80cd23e5-db@>? AG!@ BAPWPPPP`ntx CBB{ DBB{ E[AP FBE GDF HG Ig  t-6cff15a80cd23e5-caJI Kf  l-6cff15a80cd23e5-dfLK MGJL NMPWPPPP`ntx OBCN{ PMPWPuPPP|P QBP{ RQ SBP{ TBDP{ UBFP{ VUQ W[MP XBnW YTVX ZBP{ [MP \B[ ]ZQ\ ^BPP{ _BP{ `BW a_` b^Qa cSY]b dORc e[P fBe gg  coop-repl-read-thunkhg  %coop-repl-read-thunk-procedureig  m-6cff15a80cd23e5-e6jiE kj lf  l-6cff15a80cd23e5-e8ml nGRkm ojPnWPPPP`ntx pBVo{ qUp rq@ sPnWPuPPP|P tBas{ uUt v?ru@ wjj xf  l-6cff15a80cd23e5-ebyf  l-6cff15a80cd23e5-eczxy {Gwz |j{PnWPPPP`ntx }B|{ ~B|{ [{Pn Bn ~  Bs{ U ?r@ f  l-6cff15a80cd23e5-f0f  l-6cff15a80cd23e5-f1 Gw jPnWPPPP`ntx B{ B{ Pn B	   Bs{ U ?r@ f  l-6cff15a80cd23e5-f5f  l-6cff15a80cd23e5-f6 Gw jPnWPPPP`ntx B{ B{ [Pn B   g  t-6cff15a80cd23e5-e5 f  l-6cff15a80cd23e5-fa Gk jPnWPPPP`ntx BC{ PnWPuPPP|P B{  B{ BD{ BF{  [Pn Bn  B{ Pn B	  BP{ B{ Bg     [Pn Bh g  coop-repl-contg  %coop-repl-cont-procedureg  m-6cff15a80cd23e5-101E  f  l-6cff15a80cd23e5-103 GR PWPPPP`ntx BV{ U @ PWPuPPP|P Ba{ U ?@  f  l-6cff15a80cd23e5-106f  l-6cff15a80cd23e5-107 G PWPPPP`ntx B{ B{ [P Bn   B{ U ?@ f  l-6cff15a80cd23e5-10bf  l-6cff15a80cd23e5-10c G PWPPPP`ntx B{ B{ P B	   B{ U ?@ f  l-6cff15a80cd23e5-110f  l-6cff15a80cd23e5-111 G PWPPPP`ntx B{ B{ [P B   g  t-6cff15a80cd23e5-100 f  l-6cff15a80cd23e5-115 G PWPPPP`ntx BC{ PWPuPPP|P B{  B{  BD{ BF{  [P Bn   B{ P B	 	 
BP{ B{ B  
 	  [P B g  m-6cff15a80cd23e5-11cE  f  l-6cff15a80cd23e5-121f  l-6cff15a80cd23e5-122f  l-6cff15a80cd23e5-123f  l-6cff15a80cd23e5-124f  l-6cff15a80cd23e5-125 G8  f  l-6cff15a80cd23e5-11e  GR !P WPRPPPW "B4!{ #[P  $Bn# %B# &B# 'Bg# (B# )%&'( *g  set-coop-repl-read-thunk!+g  $%set-coop-repl-read-thunk!-procedure,g  m-6cff15a80cd23e5-130-,E .g  t-6cff15a80cd23e5-12e/g  t-6cff15a80cd23e5-12f0./ 1-- 2f  l-6cff15a80cd23e5-1353f  l-6cff15a80cd23e5-136423 5G014 6- 7f  l-6cff15a80cd23e5-13287 9GR68 :-5P9WPPPP`ntx ;BC:{ <g  t-1e8ba8b5a-3e6=g  t-1e8ba8b5a-3e7><= ?g  m-1e8ba8b5a-3e8@?E A@@ Bf  l-1e8ba8b5a-3ecCf  l-1e8ba8b5a-3edDBC EG>AD Fg  setterGcvF Hf  l-1e8ba8b5a-3e0If  l-1e8ba8b5a-3e1Jf  l-1e8ba8b5a-3e2KHIJ LGG~K M1w Nf  l-1e8ba8b5a-3d7Of  l-1e8ba8b5a-3d8PNO QGM\P Rg  field-specsSR Tf  l-1e8ba8b5a-3d3Uf  l-1e8ba8b5a-3d4VTU WGS\V X5P9WPELPQPW YBX{ Zg  val[BZX{ \Y[ ]BX{ ^BDX{ _BFX{ `_Y a[5P9 bBna c^`b dg  struct-set!eBdX{ f5P9 gB	f heYg[ iBPX{ jBX{ kB*a ljk miYl n]chm o;\n p[P9 qB+p rg  set-coop-repl-cont!sg  %set-coop-repl-cont!-proceduretg  m-6cff15a80cd23e5-140utE vg  t-6cff15a80cd23e5-13ewg  t-6cff15a80cd23e5-13fxvw yuu zf  l-6cff15a80cd23e5-145{f  l-6cff15a80cd23e5-146|z{ }Gxy| ~u f  l-6cff15a80cd23e5-142 GR~ u}PWPPPP`ntx BC{ }PWPELPQPW B{ BZ{  B{ BD{ BF{  [}P Bn  Bd{ }P B	  BP{ B{ Br     [P Bs g  make-condition-variableg  make-coop-replg  wait-condition-variableg  errorf  2coop-repl-read: condvar signaled, but thunk is #f!g  coop-repl-readg  coop-repl-promptg  store-repl-contg  *repl-stack*g  current-modulef  "coop-reader: read-thunk is not #f!g  signal-condition-variableg  make-coop-readerg  evalg  reader-loopg  q-empty?g  deq!  f  no matching patterng  new-replg  start-repl-clientg  catch  g  call-with-new-thread  g  %thread-handler  g  current-languageg  start-coop-replg  make-coop-client-procg  run-coop-repl-serverg  
close-fdesg  filenog  with-continuation-barrierg  current-input-portg  current-output-portg  current-error-portg  current-warning-portg  
parameter?  g  	scm-errorg  wrong-type-argf  parameterizef  Not a parameter: ~Sg  save-module-excursionC 5    h`    ]4	
-.15 44 >  "  G   5      h      ]  C           g  mutex
		 g  queue		  g  filenamef  system/repl/coop-server.scm
	$
 			  g  nameg  !%%make-coop-repl-server-procedure C6R49:;>A h   \   ]  C    T       g  t-6cff15a80cd23e5-3
		 g  t-6cff15a80cd23e5-4		  			   C:        h   ^   ]L 6    V       g  a
		  g  filenamef  system/repl/coop-server.scm		$
 		   C?  h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm		$
 		
   C    h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/repl/coop-server.scm
	$
 		n   C5:R5ݨ  4 5>  "  G   	6i  5R5      h      ] $   CC             g  obj
		  g  filenamef  system/repl/coop-server.scm
	$
 		  g  nameg  %coop-repl-server?-procedure CR49;>M  h   <   ]  C      4       g  t-6cff15a80cd23e5-13
		
  		
   C        h   ^   ]L 6    V       g  a
		  g  filenamef  system/repl/coop-server.scm		$
 		   C?  h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm		$
 		
   CO   h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/repl/coop-server.scm
	$
 		n   C5R5RS        h      ] &   
C 6       g  s
		  g  filenamef  system/repl/coop-server.scm
	$
 		  g  nameg  !%coop-repl-server-mutex-procedure CTR49S;> h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   <   ]  C      4       g  t-6cff15a80cd23e5-1f
		
  		
   CS       h   ^   ]L 6    V       g  a
		  g  filenamef  system/repl/coop-server.scm		$
 		   C?  h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm		$
 		
   C   h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/repl/coop-server.scm
	$
 	    C5SR5R   h      ] &   C 6       g  s
		  g  filenamef  system/repl/coop-server.scm
	$
 		  g  nameg  !%coop-repl-server-queue-procedure CR49;> h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C
 h   :   ]C     2       g  err
		 g  s		  			   C+     h   <   ]  C      4       g  t-6cff15a80cd23e5-3a
		
  		
   C       h   ^   ]L 6    V       g  a
		  g  filenamef  system/repl/coop-server.scm		$
 		   C?  h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm		$
 		
   C-   h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/repl/coop-server.scm
	$
 	    C5R49;>3Y[^ab      h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  system/repl/coop-server.scm
	$
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5Rcd5     h       ]45 45    C             g  mutex
		 g  queue		  g  filenamef  system/repl/coop-server.scm
	*
		+			+	'		+	 		
  g  nameg  make-coop-repl-server CeR5RSh       h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm
	0	 		
   Ck   h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm
	0	 		
   Cl h     - 1 3  &   
"  	4 5O O 4O >   "  G  V4 &   "  	4 5>  X4O >   "  G  CX4O >   "  G  F        g  coop-server
		  g  opcode		  g  args			  g  x		#   g  filenamef  system/repl/coop-server.scm
	-
		0		#	0		J	1		O	1	
	k	2	
	p	1		r	0	 			 	
	  g  nameg  coop-repl-server-evalg  documentationf  Queue a new instruction with the symbolic name OPCODE and an arbitrary
number of arguments, to be processed the next time COOP-SERVER is polled. CmRn h      ]  C       g  mutex
		 g  condvar		 g  thunk			 g  cont			  g  filenamef  system/repl/coop-server.scm
	4
 			  g  nameg  %%make-coop-repl-procedure CoR49p;>q     h      ]  C       g  t-6cff15a80cd23e5-8d
		 g  t-6cff15a80cd23e5-8e		 g  t-6cff15a80cd23e5-8f			 g  t-6cff15a80cd23e5-90			  			   Cp h   ^   ]L 6    V       g  a
		  g  filenamef  system/repl/coop-server.scm		4
 		   C?  h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm		4
 		
   C   h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/repl/coop-server.scm
	4
 		n   C5pRn  4 n>  "  G   	oi  nRn      h      ] $   CC      y       g  obj
		  g  filenamef  system/repl/coop-server.scm
	4
 		  g  nameg  %coop-repl?-procedure CR49;>       h   <   ]  C      4       g  t-6cff15a80cd23e5-a3
		
  		
   C       h   ^   ]L 6    V       g  a
		  g  filenamef  system/repl/coop-server.scm		4
 		   C?  h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm		4
 		
   C   h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/repl/coop-server.scm
	4
 		n   C5RnR      h      ] &   
C 6|       g  s
		  g  filenamef  system/repl/coop-server.scm
	4
 		  g  nameg  %coop-repl-mutex-procedure CR49;>        h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   <   ]  C      4       g  t-6cff15a80cd23e5-af
		
  		
   C       h   ^   ]L 6    V       g  a
		  g  filenamef  system/repl/coop-server.scm		4
 		   C?  h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm		4
 		
   C   h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/repl/coop-server.scm
	4
 	    C5RnR  h      ] &   C 6~       g  s
		  g  filenamef  system/repl/coop-server.scm
	4
 		  g  nameg  %coop-repl-condvar-procedure CR49;> ',      h   :   ]C     2       g  err
		 g  s		  			   C/5: h   :   ]C     2       g  err
		 g  s		  			   C=CH h   :   ]C     2       g  err
		 g  s		  			   Cd     h   <   ]  C      4       g  t-6cff15a80cd23e5-ca
		
  		
   C       h   ^   ]L 6    V       g  a
		  g  filenamef  system/repl/coop-server.scm		4
 		   C?  h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm		4
 		
   Cf   h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/repl/coop-server.scm
	4
 	    C5RnRg  h       ] &   	C 6              g  s
		  g  filenamef  system/repl/coop-server.scm
	4
 		  g  nameg  %coop-repl-read-thunk-procedure ChR49g;>v}   h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   <   ]  C      4       g  t-6cff15a80cd23e5-e5
		
  		
   Cg       h   ^   ]L 6    V       g  a
		  g  filenamef  system/repl/coop-server.scm		4
 		   C?  h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm		4
 		
   C   h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/repl/coop-server.scm
	4
 	    C5gRnR  h       ] &   	C 6       {       g  s
		  g  filenamef  system/repl/coop-server.scm
	4
 		  g  nameg  %coop-repl-cont-procedure CR49;> h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   =   ]  C      5       g  t-6cff15a80cd23e5-100
		
  		
   C      h   ^   ]L 6    V       g  a
		  g  filenamef  system/repl/coop-server.scm		4
 		   C?  h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm		4
 		
   C   h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/repl/coop-server.scm
	4
 	    C5R49;>3"$)ab      h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  system/repl/coop-server.scm
	4
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5RnR*    h       ] &   	C 6            g  s
		 g  val		  g  filenamef  system/repl/coop-server.scm
	4
 			  g  nameg  $%set-coop-repl-read-thunk!-procedure C+R49*;>Ao h   `   ]  C    X       g  t-6cff15a80cd23e5-12e
		 g  t-6cff15a80cd23e5-12f		  			   C*   h   ^   ]L 6    V       g  a
		  g  filenamef  system/repl/coop-server.scm		4
 		   C?  h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm		4
 		
   Cq   h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/repl/coop-server.scm
	4
 		n   C5*RnRr      h       ] &   	C 6            g  s
		 g  val		  g  filenamef  system/repl/coop-server.scm
	4
 			  g  nameg  %set-coop-repl-cont!-procedure CsR49r;>A       h   `   ]  C    X       g  t-6cff15a80cd23e5-13e
		 g  t-6cff15a80cd23e5-13f		  			   Cr   h   ^   ]L 6    V       g  a
		  g  filenamef  system/repl/coop-server.scm		4
 		   C?  h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm		4
 		
   C   h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/repl/coop-server.scm
	4
 		n   C5rRcn      h       ]45 45    C           g  mutex
		 g  condvar		  g  filenamef  system/repl/coop-server.scm
	<
		=			=	 		=	 		
  g  nameg  make-coop-repl CRnRh   h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm
	B		 		
   Ck   h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm
	B		 		
   Cg*     h0    ] &   
"  	4 5O O 4O >   "  G  V &  	 	"  	4 5$  "  D4 &   "  	4 5 &   
"  	4 5>  "  G   &  	 	"  	4 5$  "  4	
>  "  G   &   	"  4 >  "  G  X4O >   "  G  6         g  	coop-repl
	. g  x	( g  thunk	  g  thunk(.  g  filenamef  system/repl/coop-server.scm
	?
		B			B			E	C		a	C		f	D		k	D	& 	E	& 	D	 	F	 	F	 	G	 	H	 	H	 	H	 	I		B		(	A	.	K	 	.  g  nameg  coop-repl-readg  documentationf  5Read an expression via the thunk stored in COOP-REPL. CRn h   V   ] LL 6N       g  filenamef  system/repl/coop-server.scm
	R			R	% 		
   C       h   h   ] L O 6 `       g  exp
		  g  filenamef  system/repl/coop-server.scm
	P			Q	 		   CRr       h       ]&  	 O C6       g  cont
		  g  	coop-repl		   g  filenamef  system/repl/coop-server.scm
	M
		O	 		 	  g  nameg  store-repl-contg  documentationf  4Save the partial continuation CONT within COOP-REPL. CR      h      ] L 6          		
   C    h0     ]U   4 O >   XCXFG@              g  thunk
		) g  handler		) g  args			)  g  filenamef  system/repl/coop-server.scm
	T
		V			V			V	 		)  g  nameg  coop-repl-promptg  documentationf  2Apply THUNK within a prompt for cooperative REPLs. CR2!     h(   ^   ] L Y4L>  "  G  4L>  ZCZFV       g  filenamef  system/repl/coop-server.scm
	b				d			e	 		(
   CnRh  h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm
	f	 		
   Ck   h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm
	f	 		
   Cg*  h  D  ][45  O L &  L 
"  	4L 5O O 4O >   "  G  VL &  	L 	"  	4L 	5$  4
>  "  G  "   L &  L 	"  4L >  "  G  4L &  L "  	4L 5>  "  G  X4O >   "  G  L WF   <      g  repl
	 g  stack	
	 g  module		
	 g  
read-thunk	 g  x		;  g  filenamef  system/repl/coop-server.scm
	\			a		
	`			]		$	f		;	f		d	g	 	g	 	h	
 	h	 	h	
 	i	 	j	 	j	# 	j	 	f		k		k	 	   C h   S  ] O C      K      g  	coop-repl
		
  g  filenamef  system/repl/coop-server.scm
	X
 		
  g  nameg  make-coop-readerg  documentationf  Return a new procedure for reading user input from COOP-REPL.  The
generated procedure passes the responsibility of reading input to
another thread and aborts the cooperative REPL prompt. CRm h(   S  ]4 45>  "  G   6 K      g  coop-server
		' g  	coop-repl		'  g  filenamef  system/repl/coop-server.scm
	m
		p				p	%		q			p		'	r	 		'	  g  nameg  reader-loopg  documentationf  Run an unbounded loop that reads an expression for COOP-REPL and
stores the expression within COOP-SERVER for later evaluation. CR5RSh h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm
	y	 		
   Ck   h   N   ] L 6F       g  filenamef  system/repl/coop-server.scm
	y	 		
   Cn       h    ]1 &   
"  	4 5O O 4O >   "  G  V &   "  	4 545$  "  45X4O >   "  G  $ }" $  	&  $  $  [(  74
&  		"  	45>  " G  " 	445>   "  G  "  445>   "  G  "  445>   "  G  "  445>   "  G  "  445>   "  pG  "  i$  ^&  >$  /(   4 >  "  G  "  ""  ""  ""  ""   C      g  coop-server
	 g  x	  g  queue		\	x g  op  g  w	  g  x	  g  w	 L g  x	 L g  w	  g  w	
 g  x	
 g  w	  g  filenamef  system/repl/coop-server.scm
	t
		y			y		E	z		\	z		_	{		i	{		o	|		z	y	 	y	 	}	 	~	  			~	 			~	 	  g  nameg  poll-coop-repl-serverg  documentationf  Poll the cooperative REPL server COOP-SERVER and apply a pending
operation if there is one, such as evaluating an expression typed at the
REPL prompt.  This procedure must be called from the same thread that
called spawn-coop-repl-server. C0R        h   O   ] LL 6      G       g  filenamef  system/repl/coop-server.scm
 	 		

   C    h8      ]45  4 L O >  "  G  45 4 56          g  	coop-repl
		5  g  filenamef  system/repl/coop-server.scm
 		 		 		
 		' 		- 	(	5 	 		5
   C h   d   -  1  3 C     \       g  args
			  g  filenamef  system/repl/coop-server.scm
 	 			


   C h      ] O 6       g  coop-server
		  g  filenamef  system/repl/coop-server.scm
 
	 	 		  g  nameg  start-coop-replg  documentationf  5Start a new cooperative REPL process for COOP-SERVER. CR&   h     ]4 56       g  coop-server
		 g  server-socket		  g  filenamef  system/repl/coop-server.scm
 
	 		 	 			  g  nameg  run-coop-repl-serverg  documentationf  QStart the cooperative REPL server for COOP-SERVER using the socket
SERVER-SOCKET. CR'e       h   O   ] LL 6      G       g  filenamef  system/repl/coop-server.scm
 	 		

   C   h@     -  . , 3  #  45  45 4 O >  "  G  C        g  server-socket
		> g  coop-server		>  g  filenamef  system/repl/coop-server.scm
 
	 	$	 		 		! 	 		>
  g  nameg  spawn-coop-repl-serverg  documentationf  Create and return a new cooperative REPL server object, and spawn a
new thread to listen for connections on SERVER-SOCKET.  Proper
functioning of the REPL server requires that poll-coop-repl-server be
called periodically on the returned server object. C/Rm       h      ]L  6           g  client
		 g  addr		  g  filenamef  system/repl/coop-server.scm
 		 	'	 	 			   C     h     ] O C             g  coop-server
		
  g  filenamef  system/repl/coop-server.scm
 
 		
  g  nameg  make-coop-client-procg  documentationf  gReturn a new procedure that is used to schedule the creation of a new
cooperative REPL for COOP-SERVER. CR(        h   a   ] 4L 56   Y       g  filenamef  system/repl/coop-server.scm
 		 	2	 	& 		
   C*     h   X   ] L 6P       g  filenamef  system/repl/coop-server.scm
 		 	 		
   C)       h   X   ] L 6P       g  filenamef  system/repl/coop-server.scm
 		 		 		
   C      h   d   -  1  3 C     \       g  args
			  g  filenamef  system/repl/coop-server.scm
 	 			


   C h0    ]  4 5$  "  4	  >  "  G  45$  "  4	 >  "  G  45$  "  4	 >  "  G  45$  "  4	 >  "  G   4 	L54	L54	L54	L5Y
Y4L O >  "  G  ZZ LO 6       g  t-6cff15a80cd23e5-300
	
" g  t-6cff15a80cd23e5-301	
" g  t-6cff15a80cd23e5-302		
" g  t-6cff15a80cd23e5-303		
"  g  filenamef  system/repl/coop-server.scm
 		
 	  	&  	0 	 	0
   C      h   X   ] L LO 6 P       g  filenamef  system/repl/coop-server.scm
 		 	 		
   C     h@   8  ]4O >  "  G  4>  "  G   O 6      0      g  coop-server
		: g  client		:  g  filenamef  system/repl/coop-server.scm
 
	 		 		: 	 		:	  g  nameg  start-repl-clientg  documentationf  mRun a cooperative REPL for COOP-SERVER within a prompt.  All input
and output is sent over the socket CLIENT. CRC         g  m
		, g  rtd
 g  rtd
m  g  filenamef  system/repl/coop-server.scm		
 	$
1	*
h	-
N	4
=L	<
A	?
C9	M
D	T
J	X
K	m
Q	t
T 
U 
X~ 
Z[ 
` 
 	`
   C6                                                                                                                                                                                                       ccache/system/repl/debug.go                                                                         0000644                 00000026171 15154557173 0011701 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0a,      ]  4     h-      ] g  guile	 	g  define-module*	 	 	g  system	g  repl	g  debug		 	
g  filenameS	f  system/repl/debug.scm	g  importsS	g  base	g  pmatch	 	 	g  syntax	 	 	g  language	 	 	g  vm	 	 	g  frame	 	 	g  ice-9	g  rdelim	 	  	!g  pretty-print	"! 	#" 	$g  format	%$ 	&% 	'g  inspect	(' 	)g  selectS	*g  %inspect	+'*	,+ 	-(), 	.g  program	/. 	0/ 	1 #&-0 
	2g  exportsS	3g  <debug>	4g  
make-debug	5g  debug?	6g  debug-frames	7g  debug-index	8g  debug-error-message	9g  debug-for-trap?	:g  terminal-width	;g  print-registers	<g  print-locals	=g  print-frame	>g  print-frames	?g  frame->module	@g  stack->vector	Ag  narrow-stack->vector	Bg  frame->stack-vector	C3456789:;<=>?@AB 	Dg  set-current-module	ED 	FD 	Gg  make-record-type	Hf  <debug>	Ig  frames	Jg  index	Kg  error-message	Lg  	for-trap?	MIJKL 	Ng  record-predicate	Og  make-procedure-with-setter	Pg  record-accessor	Qg  record-modifier	Rg  
make-fluid	Sg  catch	TS 	US 	Vg  string->number	Wg  getenv	Xf  COLUMNS	Yg  integer?	Zg  exact?	[g  error	\f  -Expected a column number (a positive integer)	]g  make-hash-table	^g  hash-for-each	_g  
hashq-set!	`g  	hashq-ref	ag  reverse-hashq	bg  per-line-prefixS	cb		dc 	eg  current-output-port	ff    	gf  ~aRegisters:~%	hg  frame-instruction-pointer	ig  display	jg  run-hook	kg  before-print-hook	lf  ip = ~d
	mg  frame-stack-pointer	nf  
sp = #x~x
	og  frame-address	pf  
fp = #x~x
	qg  widthS	rq		sb		trs 	ug  frame-bindings	vf  ~aNo local variables.~%	wf  ~aLocal variables:~%	xg  for-each	yg  frame-local-ref	zg  binding:index	{g  binding:boxed?	|f  ~a~:[~; (boxed)~] = ~v:@y
	}g  binding:name	~g  indexS	~	 q	 g  full?S 	 g  last-sourceS 	 g  next-source?S 	   g  frame-next-source g  frame-source g  source:file f  current input f  unknown file g  and=> g  source:line-for-user g  source:column f  
~&In ~a:~& f  ~9@a~:[~*~3_~;~3d~] ~v:@y~% f  ~a:~a f    g  frame-call-representation f        	 g  forward?S 	 g  countS 	 g  	for-trap?S 	 r  g  vector-length g  max g  min g  frame-procedure g  program? g  program-module g  current-module g  make-module g  module-use! g  make-variable f  3~:[Read-only~;Mutable~] local variable ~a = ~70:@y
 g  module-add! g  stack-length g  make-vector g  frame-previous g  	stack-ref g  
make-stack    g  %stacksC 5      hx     ]4	
12C5 4F >  "  G   4GiHM53R3        h      - 1 3   C        g  frames
			 g  index			 g  error-message				 g  	for-trap?				 g  defrec-1f507eb13-0				  g  filenamef  system/repl/debug.scm
	9
 				
	  g  nameg  
make-debug C4R4Ni3i55R4Oi4Pi3iI54Qi3iI556R4Oi4Pi3iJ54Qi3iJ557R4Oi4Pi3iK54Qi3iK558R4Oi4Pi3iL54Qi3iL559R4Ri5  UVWX      h   h   ] 456   `       g  filenamef  system/repl/debug.scm
	E			E	8			E	@		E	8		E	( 		
   C      h   ]   -  1  3 C     U       g  args
			  g  filenamef  system/repl/debug.scm
	E	 			


   CYZ[\        h   :  )    ]3 L [  $   C45 4 5$  #4 5$   
$   "  "  "     $   C	HC] $  (4 5$  4 5$   
"  "  "  $  L  \C 6 2      g  t
		c g  w
	!	U g  t
	U	c g  w
	e   g  filenamef  system/repl/debug.scm
	B			D			E		!	E		$	F		.	F		/	F		9	F		=	F	*	A	F		U	D		e	B		k	I		l	I		v	I		w	I	) 	I	 	I	4 	I	 	I	 	K	 	K	 			c
 	e    C O  :R]^_`      h      ]L  4L 56        g  k
		 g  v		  g  filenamef  system/repl/debug.scm
	S			T	!		T	2		T	!		T			T	 			   C      h(      ]	45 4O  >  "  G  C          g  h
		% g  ret		%  g  filenamef  system/repl/debug.scm
	P
		Q			Q		
	R	 		%  g  nameg  reverse-hashq CaRdef$ghijklmnop    h    - /   0   3 #  45 #  4>  "  G  4 54>  "  G  4	>  "  G  4
>  "  G  4 54>  "  G  4	>  "  G  4>  "  G  4 54>  "  G  4	>  "  G  6       g  frame
	 g  port	 g  per-line-prefix		 g  val		G  g  val	   g  val	   g  filenamef  system/repl/debug.scm
	X
		X	1	(	Y	1	+	_		1	_		8	_		A	`		G	`		J	[		^	\		r	]		x	`				]	 	a	 	a	 	[	 	\	 	]	 	a		 	]	 	b	 	b	 	[	 	\		b			]	 	g  per-line-prefixS	   g  nameg  print-registers C;Rte:fu$vwxyz{ijk$|} 
hp      ]	4L 4 554 5$  "  4LL>  "  G  4>  "  G  L4	 54 5L6          g  binding
		m g  x		) g  v	)	m  g  filenamef  system/repl/debug.scm
	m			n			n	2		n			n			o			o		 	p		)	n			,	r		@	s		Y	t		Z	u		a	u	*	m	t	 		m   C   h   ]  - /   0   3 #  45 #  45 #  4 5(  
64>  "  G  	
 O 4 56  U      g  frame
		~ g  port		~ g  width			~ g  per-line-prefix			~ g  bindings		>	~  g  filenamef  system/repl/debug.scm
	d
		d	.	'	e	$	5	e	G	8	f		>	f		F	g		L	i		P	i		Q	k		W	k		^	k		v	v		~	l	 		~g  widthS	g  per-line-prefixS	   g  nameg  print-locals C<Re:$<qb  hH  '  - /   0   3 #  45 #  #  45 #  #  #  4$  "   5$  45$  "  "  4	
5	4	5
$  K$  45$  "  "  $  "  4>  "  G  "   4	$  4	
5"  4 5>  "  G  $   6C          g  frame
	D g  port	D g  index		D g  width		D g  full?		D g  last-source		D g  next-source?		D g  source		dD g  t		s  g  file	 D g  line		 D g  col	
 D g  t	    g  filenamef  system/repl/debug.scm
	x
		x	-	0	y	)	R			X			d			d			l	|		m	}		s	}	 	}	! 	~	 		  	 		  	 		  	 	|	 	}	 	}	 	}	! 	~	  	  	  	  	  	  	  	 	 	 	  	 	2 	& 	4 	@ 	(B 	 )	Dg  indexS	g  widthS	g  full?S	g  last-sourceS	g  next-source?S	   g  nameg  print-frame C=Re:=~q      h  _  - /   0   3 #  45 #  45 #  #  #  #  4 5$  
"  $  
"  4
5"  $  45"  "  !$  
$  "  ""  "	"  
$  
	$   
4
	


$  "  >  "  G  
$  "  	"  45"  %

$  $  45"  ""  "
"fCC$  "  	
"K       W      g  frames
	y g  port	y g  width		y g  full?		y g  forward?		y g  count		y g  	for-trap?		y g  len		Xy g  	lower-idx		}y g  	upper-idx		 y g  i	
 b g  last-source	 b g  frame	 ^  g  filenamef  system/repl/debug.scm
 
	 	(	' 	$	R 		X 		` 		c 	(	i 		m 		s 		{ 		} 		} 	  	  	&  	  	  	#  	  	  	  	  	
  	  	
  	  	
  	  	-  	(
 	 	" 	' 	1 	4 	9 	? 	@ 	^ 	b 	h 	y 	 ,	yg  widthS	g  full?S	g  forward?S	g  countS	g  	for-trap?S	   g  nameg  print-frames C>Rxyz{$} 	  hp      ]4L 4 554 5$  "  4544 54 5$  "  >  "  G  L4 56          g  binding
		l g  x		l g  var		*	l  g  filenamef  system/repl/debug.scm
 		 		 	.	 		 		 		 		$ 	8	* 		- 		2 		3 		: 		C 		G 		J 	1	U 		b 	!	l 	 		l   Cu 
  hx   @  ]4 545$  ]45$  "  45 45 4>  "  G  4 O 4	 5>  "  G  C6  8      g  frame
		w g  proc			w g  t			3 g  mod		3	s g  mod*		:	s  g  filenamef  system/repl/debug.scm
 
	 			 		 		 		 		 		, 	.	3 		6 		: 		= 	
	Q 	
	] 		h 	
	w 	 		w  g  nameg  frame->module C?R h`   G  ]!4 545
$  ?"  &$  45""  
4 
5""   C  ?      g  stack
		^ g  len			^ g  v			^ g  i		 	F g  frame		 	F  g  filenamef  system/repl/debug.scm
 
	 			 		 		 		 		 		  		% 		) 	
	0 		3 		4 		B 		F 		H 		W 	 		^  g  nameg  stack->vector C@R@  h0      - 1 3 44 
5?$  6C              g  stack
			) g  args			) g  narrowed			)  g  filenamef  system/repl/debug.scm
 
	
 		 	$	 		 		  		& 		( 	 				)
  g  nameg  narrow-stack->vector CARA      h8      ]	[$  	["  4 5

$  "  6              g  frame
		1 g  tag		1  g  filenamef  system/repl/debug.scm
 
	 		
 		 		 		 		) 		1 	 			1  g  nameg  frame->stack-vector CBRC       g  m
		, g  	set-width
  g  filenamef  system/repl/debug.scm		
	:	9
	A		A		@
	P
		X
(	d
	x
 
k 
* 
X 
v 
 	x
   C6                                                                                                                                                                                                                                                                                                                                                                                                        ccache/system/repl/server.go                                                                        0000644                 00000042115 15154557173 0012115 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.05D      ]  4       h      ] g  guile	 	g  define-module*	 	 	g  system	g  repl	g  server		 	
g  filenameS	f  system/repl/server.scm	g  importsS	 	 	g  ice-9	g  threads	 	 	g  rdelim	 	 	g  match	 	 	g  iconv	 	 	g  rnrs	g  bytevectors	 	 	 g  io	!g  ports	" ! 	#" 	$g  srfi	%g  srfi-1	&$% 	'& 	(g  srfi-26	)$( 	*) 	+#'* 		,g  exportsS	-g  make-tcp-server-socket	.g  make-unix-domain-server-socket	/g  
run-server	0g  spawn-server	1g  stop-server-and-clients!	2-./01 	3g  set-current-module	43 	53 	6g  *open-sockets*	7g  
make-mutex	8g  sockets-lock	9g  
lock-mutex	:9 	;9 	<g  unlock-mutex	=< 	>< 	?g  assq-remove!	@g  
close-port	Ag  close-socket!	Bg  add-open-socket!	Cg  error	DC 	EC 	Ff  no matching pattern	Gg  hostS	HG
	Ig  addrS	JI	Kg  portS	LK		MHJL 	Ng  	inet-aton	Og  INADDR_LOOPBACK	Pg  socket	Qg  PF_INET	Rg  SOCK_STREAM	Sg  
setsockopt	Tg  
SOL_SOCKET	Ug  SO_REUSEADDR	Vg  bind	Wg  AF_INET	Xg  pathS	YX
	ZY 	[f  /tmp/guile-socket	\g  PF_UNIX	]g  AF_UNIX	^g  delete-duplicates	_g  
filter-map	`g  and=>	ag  module-variable	bg  the-root-module	cg  variable-ref	dg  EINTR	eg  EAGAIN	fg  EWOULDBLOCK	gdef 	hg  errs-to-retry	ig  run-server*	jg  serve-client	kg  catch	lg  select	mg  memq	ng  accept	og  system-error-errno	pg  memv	qg  warn	rf  Error accepting client	sg  sleep	tg  pipe	ug  fcntl	vg  F_SETFL	wg  
O_NONBLOCK	xg  F_GETFL	yg  	sigaction	zg  SIGPIPE	{g  SIG_IGN	|g  display	}g  force-output	~g  listen	g  call-with-new-thread     g  %thread-handler     g  close g  current-thread g  set-thread-cleanup! g  cancel-thread g  guard-against-http-request g  with-continuation-barrier g  current-input-port g  current-output-port g  current-error-port g  current-warning-port g  
parameter?     g  	scm-error g  wrong-type-arg f  parameterize f  Not a parameter: ~S g  *repl-stack* g  
start-repl g  port-closed? g  port-encoding g  set-port-encoding! g  with-temporary-port-encoding g  	port-line g  port-column g  set-port-line! g  set-port-column! g  with-saved-port-line+column g  char-ready? g  get-bytevector-some g  bytevector? g  bytevector->string f  
ISO-8859-1 g  string-concatenate-reverse g  setvbuf g  _IOFBF g  drain-input-and-close g  ucs-range->char-set g  make-regexp g  string-append f  2^(OPTIONS|GET|HEAD|POST|PUT|DELETE|TRACE|CONNECT)  f  [^ ]+  f  HTTP/[0-9]+.[0-9]+$ g  string-every g  regexp-exec g  permissive-http-request-line? g  read-delimited f  
 g  peek g  eof-object? g  done g  %make-void-port f  rw g  call-with-port g  	dup->port f  w g  format f 
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
@@ POSSIBLE BREAK-IN ATTEMPT ON THE REPL SERVER                @@
@@ BY AN HTTP INTER-PROTOCOL EXPLOITATION ATTACK.  See:        @@
@@ <https://en.wikipedia.org/wiki/Inter-protocol_exploitation> @@
@@ Possible HTTP request received: ~S
@@ The associated socket has been closed.                      @@
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
 g  unread-string g  check-for-http-request g  %set-port-property! g  guard-against-http-request? g  %port-property g  maybe-check-for-http-request g  	add-hook! g  before-read-hookC 5       h1    ]4	
+,25 45 >  "  G   6R47i5 8R8;     h   I   ] L 6A       g  filenamef  system/repl/server.scm
	/	 		
   C> h   I   ] L 6A       g  filenamef  system/repl/server.scm
	/	 		
   C?6@      hX      ]	O O 4O >   "  G  V4 5 X4O >   "  G   6           g  s
		T g  x		N  g  filenamef  system/repl/server.scm
	.
		/		+	0		5	0		7	/		T	3	 		T  g  nameg  close-socket! CAR8;    h   I   ] L 6A       g  filenamef  system/repl/server.scm
	7	 		
   C> h   I   ] L 6A       g  filenamef  system/repl/server.scm
	7	 		
   C6  hh      ]
O O 4O >   "  G  V  X4O >   "  G  CX4O >   "  G  F            g  s
		c g  force-close		c g  x			c  g  filenamef  system/repl/server.scm
	6
		7		/	8		4	8		7	7	 		c	  g  nameg  add-open-socket! CBR8;       h   I   ] L 6A       g  filenamef  system/repl/server.scm
	<	 		
   C> h   I   ] L 6A       g  filenamef  system/repl/server.scm
	<	 		
   C6EF1 	 h     ](  O  O 4 O >   "  G  V(  "  T$  ?$   "  4455 "  4455 X4 O >   "  G     $  4 >   "  G  6 C       g  x
	  g  v	,  g  w		F	{ g  x		F	{ g  x		T	c g  t
    g  filenamef  system/repl/server.scm
	:
		<		,	=		^	@			h	=	 	<	 	;	 	C		 	D		 
	 
  g  nameg  stop-server-and-clients! C1RMNOPQRSTUVW    h     -  /     0   3  #   #   $  4 5"  #        4
54	>  "  G  4
>  "  G  C        g  host
	  g  addr	  g  port		  g  sock		R   g  filenamef  system/repl/server.scm
	F
	(	H	 	)	H	)	I	J		R	J		U	K		l	L	 	 

g  hostS
g  addrSg  portS	   g  nameg  make-tcp-server-socket C-RZ[P\RSTUV]     h`      -  /     0   3  #   4
54>  "  G  4	
 >  "  G  C              g  path
		Y g  sock	'	Y  g  filenamef  system/repl/server.scm
	O
		O	5		P		'	P		*	Q		A	R	 		Y

g  pathS
   g  nameg  make-unix-domain-server-socket C.R4^i4_i`abc       h   l   ]4 56       d       g  name
		  g  filenamef  system/repl/server.scm
	Y			Z			Z	 		   Cg55hR-ij h(      -  . , 3  #  45   6              g  server-socket
		!  g  filenamef  system/repl/server.scm
	^
		^	/	!	_	 		!
  g  nameg  
run-server C/Rklmn   h(      ]4M 5 4M 5$  CL6            g  ready-ports
		#  g  filenamef  system/repl/server.scm
	s			t	 		t	8			t	<		t	 		t			t			v			v	
	#	w	 		#
   Cophqrs     hP      -  1  3 4 545$  L 6 4 >  "  G  4>  "  G  L 6            g  k-args
			L g  err		L  g  filenamef  system/repl/server.scm
	x		
	y			y			{			z	
	#	|		$	~		(	~		/	~		8 		L 	 			L


   C   h    o   ] LLLO L O 6       g       g  filenamef  system/repl/server.scm
	q			r	 		
  g  nameg  accept-new-client Ctuvwxyz{B|}       h    u   ] 4!M >  "  G  M 6    m       g  filenamef  system/repl/server.scm
	i			j			k	 		
  g  nameg  shutdown-server C~     h   J   ] LLL 6      B       g  filenamef  system/repl/server.scm
 	
 		

   C       h  q  ]BHHHHO  Q 45 KJKJK J K4 4 5>  "  G  4	>  "  G  4
 O >  "  G  4 	>  "  G  "  b$  2	4	O >  "  G  45 "4J>  "  G  4J>  "  G   645 "i      g  server-socket
	 g  serve-client	 g  shutdown-pipes		 g  shutdown-read-pipe		 g  shutdown-write-pipe		 g  monitored-ports		 g  accept-new-client		 g  client	  g  client-socket	   g  client-addr		    
g  filenamef  system/repl/server.scm
	b
	%	d		.	e		3	f		<	n		? 		H 		Q 			V 		_ 		s 	  	  	  	  	  	  	  	
  	  	
  	  	 	 	 	 	 		  g  nameg  run-server* CiR-/ h   J   ] L 6B       g  filenamef  system/repl/server.scm
 	 		
   C h(      -  . , 3  #  45   O 6         g  server-socket
		&  g  filenamef  system/repl/server.scm
 
	 	1	& 	 		&
  g  nameg  spawn-server C0RA h   S   ] L 6K       g  filenamef  system/repl/server.scm
 	 	 	+ 		
   CB     h   S   ] L 6K       g  filenamef  system/repl/server.scm
 		 	( 		
   C       h     ]  4 5$  "  4	  >  "  G  45$  "  4	 >  "  G  45$  "  4	 >  "  G  45$  "  4	 >  "  G   4 	L 54	L 54	L 54	L 5Y
Y4>   Z"  ZCZF        g  t-3d081069b-c3
	
 g  t-3d081069b-c4	
 g  t-3d081069b-c5		
 g  t-3d081069b-c6		
  g  filenamef  system/repl/server.scm
 		
 	  	#  		 	
   C 	h`      ]
45 4 O >  "  G  4 O >  "  G  4 >  "  G   O 6            g  client
		[ g  addr		[ g  thread			>  g  filenamef  system/repl/server.scm
 
	 		 		
 		# 		? 		[ 	 		[	  g  nameg  serve-client CjR       h    w   ] 4L5$  C4L5N LM6o       g  filenamef  system/repl/server.scm
 		 		 		 		 	
	  	
 		 
   C       h    w   ] 4L5$  C4L5N LM6o       g  filenamef  system/repl/server.scm
 		 		 		 		 	
	  	
 		 
   C       h    w   ] 4L5$  C4L5N LM6o       g  filenamef  system/repl/server.scm
 		 		 		 		 	
	  	
 		 
   C       h    w   ] 4L5$  C4L5N LM6o       g  filenamef  system/repl/server.scm
 		 		 		 		 	
	  	
 		 
   C       h    w   ] 4L5$  C4L5N LM6o       g  filenamef  system/repl/server.scm
 		 		 		 		 	
	  	
 		 
   C      hx   S  ]HH O  O 4 O >   "  G  V4>   X4 O >   "  G  CX4 O >   "  G  F K      g  port
		w g  encoding		w g  thunk			w g  saved-encoding			w  g  filenamef  system/repl/server.scm
 
	 		  	 		w	  g  nameg  with-temporary-port-encodingg  documentationf  aCall THUNK in a dynamic environment in which the encoding of PORT is
temporarily set to ENCODING. CR       h(      ] 4L5$  C4L5N 4L5NC     x       g  filenamef  system/repl/server.scm
 		 		 		 		 	
	 		! 	
 		#
   C      h0   n   ] 4L5$  C4LM >  "  G  LM6     f       g  filenamef  system/repl/server.scm
 		 		 		 	
	+ 	
 		+
   C        h(      ] 4L5$  C4L5N 4L5NC     x       g  filenamef  system/repl/server.scm
 		 		 		 		 	
	 		! 	
 		#
   C      h0   n   ] 4L5$  C4LM >  "  G  LM6     f       g  filenamef  system/repl/server.scm
 		 		 		 	
	+ 	
 		+
   C        h0   n   ] 4L5$  C4LM >  "  G  LM6     f       g  filenamef  system/repl/server.scm
 		 		 		 	
	+ 	
 		+
   C       hx   t  ]HH O  O 4 O >   "  G  V4>   X4 O >   "  G  CX4 O >   "  G  F  l      g  port
		v g  thunk		v g  
saved-line			v g  saved-column			v  g  filenamef  system/repl/server.scm
 
	 		 	 		v	  g  nameg  with-saved-port-line+columng  documentationf  Save the line and column of PORT before entering THUNK, and restore
their previous values upon normal or non-local exit from THUNK. CR        hP     ]"  <4L 5$  4L 5"  45$  45  " 6 "              g  chunks
		B g  result		B  g  filenamef  system/repl/server.scm
 		 		 		 		 		 		  		* 	
	+ 		1 	5	3 		6 		< 		B 		B 		C 		I 	 		I
   C      h   S   ] L 6      K       g  filenamef  system/repl/server.scm
 		
 	 		

   C@       h   S   ] L 6K       g  filenamef  system/repl/server.scm
 		 	 		
   C  hp   2  ]	O  Q  O  O 4 O >   "  G  V4>   X4 O >   "  G  CX4 O >   "  G  F       *      g  socket
		i g  thunk	
	i  g  filenamef  system/repl/server.scm
 
	
 	 		i  g  nameg  drain-input-and-closeg  documentationf  Drain input from SOCKET using ISO-8859-1 encoding until it would block,
and then close it.  Return the drained input as a string. CR4i	 	~54i4i55         h       ]4L 5$  L  6C              g  line
		  g  filenamef  system/repl/server.scm
 		 		 		 	 		  g  documentationf  QReturn true if LINE might plausibly be an HTTP request-line,
otherwise return #f. C O  R      h      ] 4L L56     {       g  t-3d081069b-183
		  g  filenamef  system/repl/server.scm
-		-	 		5		-	 		   C        h   Q  ]4L 5 4 5$  C4 5$  s454	>  "  G  4
>  "  G  4>  "  G  4>  "  G  4L 54	5 O 6 L 6     I      g  v
	  g  	void-port	/	| g  drained-input    g  filenamef  system/repl/server.scm
			
		!		/		
				
	) 		- 	/	/ 		/ 		2!		D"		V#		h$		}(	" (	 ,	 ,	, ,	 ,	 ;	 	 
   C    h   S   ] L L O 6 K       g  filenamef  system/repl/server.scm
			 		
   C  h   T  ]  O 6       L      g  socket
		  g  filenamef  system/repl/server.scm
 
		'		 		  g  nameg  check-for-http-requestg  documentationf  Check for a possible HTTP request in the initial input from SOCKET.
If one is found, close the socket and print a report to STDERR (fdes 2).
Otherwise, put back the bytes. CR h   	  ] 6           g  socket
		  g  filenamef  system/repl/server.scm
=
	D		D	 		  g  nameg  guard-against-http-requestg  documentationf \Arrange for the Guile REPL to check for an HTTP request in the
initial input from SOCKET, in which case the socket will be closed.
This guards against HTTP inter-protocol exploitation attacks, a scenario
whereby an attacker can, via an HTML page, cause a web browser to send
data to TCP servers listening on a loopback interface or private
network. CR    hP     -  . , 3  #  45  4 5$  (4 >  "  G  4 5$  C 6C      g  socket
		P  g  filenamef  system/repl/server.scm
F
	G		K		 K		"K		&K		'L		9M		CM		KN	"	NN	 		P
  g  nameg  maybe-check-for-http-requestg  documentationf  Apply check-for-http-request to SOCKET if previously requested by
guard-against-http-request.  This procedure is intended to be added to
before-read-hook. CRiii6           g  m
		, g  cs
't( g  rx't(  g  filenamef  system/repl/server.scm		
	-	(		0	(
	1	*		:	*
	.
	6
	:
	F
		O
		X			Y	
	\	
	Y	
	X	
	W
g	^
	b
 
N 
 
#G 
'U 
'V 	'a 	'f 	'l 	'n 	'p 	'r 	't 	't 	( 
-w 
/=
1F
1Q
 &	1
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                    ccache/system/repl/common.go                                                                        0000644                 00000033433 15154557173 0012102 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.07      ]  4    h|      ] g  guile	 	g  define-module*	 	 	g  system	g  repl	g  common		 	
g  filenameS	f  system/repl/common.scm	g  importsS	g  base	g  syntax	 	 	g  compile	 	 	g  language	 	 	g  message	 	 	g  vm	g  program	 	 	g  ice-9	g  control	  	!  	"g  history	#" 	$# 	%!$ 	&g  exportsS	'g  <repl>	(g  	make-repl	)g  repl-language	*g  repl-options	+g  repl-tm-stats	,g  repl-gc-stats	-g  
repl-debug	.g  repl-welcome	/g  repl-prompt	0g  	repl-read	1g  repl-compile	2g  repl-prepare-eval-thunk	3g  	repl-eval	4g  repl-expand	5g  repl-optimize	6g  
repl-parse	7g  
repl-print	8g  repl-option-ref	9g  repl-option-set!	:g  repl-default-option-set!	;g  repl-default-prompt-set!	<g  puts	=g  ->string	>g  
user-error	?g  
*warranty*	@g  	*copying*	Ag  	*version*	B'()*+,-./0123456789:;<=>?@A 	Cg  	autoloadsS	Dg  tree-il	Eg  optimize	FDE 	Gg  	optimize!	HG 	IFH 	Jg  set-current-module	KJ 	LJ 	Mg  format	Nf GNU Guile ~A
Copyright (C) 1995-2016 Free Software Foundation, Inc.

Guile comes with ABSOLUTELY NO WARRANTY; for details type `,show w'.
This program is free software, and you are welcome to redistribute it
under certain conditions; type `,show c' for details.	Og  version	Pf qGuile is free software: you can redistribute it and/or modify
it under the terms of the GNU Lesser General Public License as
published by the Free Software Foundation, either version 3 of
the License, or (at your option) any later version.

Guile is distributed in the hope that it will be useful, but
WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Lesser General Public License for more details.

You should have received a copy of the GNU Lesser General Public
License along with this program. If not, see
<http://www.gnu.org/licenses/lgpl.html>.	Qf 8Guile is distributed WITHOUT ANY WARRANTY. The following
sections from the GNU General Public License, version 3, should
make that clear.

  15. Disclaimer of Warranty.

  THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY
APPLICABLE LAW.  EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT
HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY
OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO,
THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
PURPOSE.  THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM
IS WITH YOU.  SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF
ALL NECESSARY SERVICING, REPAIR OR CORRECTION.

  16. Limitation of Liability.

  IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES AND/OR CONVEYS
THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY
GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE
USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF
DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD
PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS),
EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF
SUCH DAMAGES.

  17. Interpretation of Sections 15 and 16.

  If the disclaimer of warranty and limitation of liability provided
above cannot be given local legal effect according to their terms,
reviewing courts shall apply local law that most closely approximates
an absolute waiver of all civil liability in connection with the
Program, unless a warranty or assumption of liability accompanies a
copy of the Program in return for a fee.

See <http://www.gnu.org/licenses/lgpl.html>, for more details.	Rg  make-record-type	Sf  <repl>	Tg  options	Ug  tm-stats	Vg  gc-stats	Wg  debug	XTUVW 	Yg  record-constructor	Zg  %compute-initargs	[g  record-predicate	\g  repl?	]g  make-procedure-with-setter	^g  record-accessor	_g  record-modifier	`g  	copy-tree	ag  compile-options	bg  %auto-compilation-options	c 	dg  trace	ed 	fg  interp	gf 	hg  prompt	ig  string?	jg  thunk?	kg  
procedure?	lg  error	mf  Invalid prompt	ng  print	of  Invalid print procedure	pg  value-history	qg  value-history-enabled?	rg  enable-value-history!	sg  disable-value-history!	tg  ->bool	ug  on-error	vg  	backtrace	wg  report	xg  pass	yf  )Bad on-error value ~a; expected one of ~a	zWvwx 	{g  repl-default-options	|g  
%make-repl	}g  languageS	~g  	language?	g  lookup-language g  optionsS g  tm-statsS g  times g  gc-statsS g  debugS g  display g  newline f  Enter `,help' for help.
 f  	~A@~A~A>  g  language-name g  module-name g  current-module g  length g  *repl-stack* f    f   [~a] g  language-reader g  current-input-port g  repl-compile-options g  fromS g  toS g  objcode g  optsS g  envS g  	decompile g  language-parser g  language-evaluator g  make-program g  language-compilers g  default-prompt-handler       g  default-prompt-tag       g  run-hook g  before-print-hook g  write g  assq f  unknown repl option g  object->string g  throwC 5       h    ]4	
%&BCI5	 4L >  "  G   4MiN4Oi5 5ARP@RQ?R4RiSX5'RTUVW 4Yi'i5 Z  h   .   -  1  3 L4 L 5@  &       g  args
			  			


   C O  (R4[i'i5\R4]i4^i'i54_i'i55)R4]i4^i'iT54_i'iT55*R4]i4^i'iU54_i'iU55+R4]i4^i'iV54_i'iV55,R4]i4^i'iW54_i'iW55-R4`iabiceghi     h   \   ]L C   T       g  repl
		  g  filenamef  system/repl/common.scm
	u	& 		   Cjh   d   ]L 6   \       g  repl
		  g  filenamef  system/repl/common.scm
	v	%		v	4 		   Cklm   hH      ] $  <4 5$   O C4 5$   O C4 5$   C 6C         g  prompt
		F  g  filenamef  system/repl/common.scm
	r			s				u			s			v		&	s		/	w		9	s		@	x	!	D	x	 		F   C nklo  h       ] $  4 5$   C 6C}       g  print
		   g  filenamef  system/repl/common.scm
	y			z				|			z			}	 		}	 		    C p4qi5 rst     h8   ~   ] $  4>   "  G  "  4>   "  G   6      v       g  x
		2  g  filenamef  system/repl/common.scm
 		 				 		 	'	2 		 		2   C uWWvwxlyz h@      ] &  "   &  "   &  "   $   C 6        g  x
		?  g  filenamef  system/repl/common.scm
 			
 		2 		9 		= 		? 	 		?   C  5{R(i|R|}~`{V   hP      - . , 3 #  4 5$   "  4 5454	5 
45 6
         g  lang
		N g  debug		N  g  filenamef  system/repl/common.scm
 
	 		$ 		+ 		4 		= 		D 		N 	 			N  g  nameg  	make-repl C(RA     h@      ]4>  "  G  4>   "  G  4>   "  G  6             g  repl
		:  g  filenamef  system/repl/common.scm
 
	 		 		% 		8 		: 	 		:  g  nameg  repl-welcome C.R8hM)       hp   |  ]4 5$   644 55445 54	
[$  "  5
$  "  
456  t      g  repl
		n g  t		n g  t		:	M g  level		O	l  g  filenamef  system/repl/common.scm
 
	 			 		 		 		 		 		 		" 	*	* 		+ 		. 		4 		5 		: 	!	J 	(	O 		O 		T 		Y 		[ 	 	` 	#	e 	.	i 	#	n 	 		n  g  nameg  repl-prompt C/R)     h       ]	44 5545 45 6         g  repl
		 g  reader		  g  filenamef  system/repl/common.scm
 
	 		 	!	 		 		 		 	!	 	 			  g  nameg  	repl-read C0R8a h      ] 6             g  repl
		
  g  filenamef  system/repl/common.scm
 
	 		
 	 		
  g  nameg  repl-compile-options CR) 
       h0      ]4 54 54	5 6	          g  repl
		- g  form		- g  from			- g  opts			-  g  filenamef  system/repl/common.scm
 
	 		
 		 		  	#	' 		- 	 		-	  g  nameg  repl-compile C1R)D    h@      ]4 54 54	4
5 5	6             g  repl
		: g  form		: g  from			: g  opts			:  g  filenamef  system/repl/common.scm
 
	 		
 		 		 		# 	.	* 		0 		4 		: 	 		:	  g  nameg  repl-expand C4R)GD        hH     ]4 54 544	
45 5	45 56        g  repl
		F g  form		F g  from			F g  opts			F  g  filenamef  system/repl/common.scm
 
	 		
 		 		 		 		& 	9	- 	)	3 		4 		< 		@ 		F 	 		F	  g  nameg  repl-optimize C5R)     h       ]
44 55$  6C        g  repl
		 g  form		 g  parser			  g  filenamef  system/repl/common.scm
 
	 		 	!	 		 		 		 	 			  g  nameg  
repl-parse C6R)18f h   \   ] LL 45 6   T       g  filenamef  system/repl/common.scm
 		 		 	 		
   C 	hh   C  ]44 55"  4 56$  844 55$  "  	4 5$  
O C""     ;      g  repl
		c g  form		c g  eval			c g  t		4	M  g  filenamef  system/repl/common.scm
 
	 		 	#	 		 		 		! 		! 		( 		+ 	,	3 		4 		4 		B 		H 	'	J 		Q 	 		c	  g  nameg  repl-prepare-eval-thunk C2R2 h   K   ] L 6   C       g  filenamef  system/repl/common.scm	 	 		
   C  h8      ]4 545 U   4O >   XCXFG@        g  repl
		7 g  form		7 g  thunk			7 g  handler			7 g  args		,	7  g  filenamef  system/repl/common.scm
 
	 		 		 	 		7	  g  nameg  	repl-eval C3R8n    hP      ]
&  C4>  "  G  4 5$   64>  "  G  6          g  repl
		N g  val		N g  t		(	N  g  filenamef  system/repl/common.scm
 
		 		 		  	
	& 	 	( 	
	( 		8 		9 	
	N 	
 		N	  g  nameg  
repl-print C7R*l     h0      ]
44 55$  "  	45C          g  repl
		- g  key		- g  t			*  g  filenamef  system/repl/common.scm
 
	 		 		 		 		 		# 		' 		+ 	 
		-	  g  nameg  repl-option-ref C8R*lk       hP   U  ]44 55$  "  	4545$  45"  CM      g  repl
		P g  key		P g  val			P g  t			* g  spec		*	P  g  filenamef  system/repl/common.scm
 
	 		 		 		 		 		# 		' 		* 		/ 		0 		5 		9 		= 		> 		A 		G 		N 	 		P	  g  nameg  repl-option-set! C9R{lk  hP   9  ]
4 5$  "  	4 545$  45"  C     1      g  key
		K g  val		K g  t			% g  spec		%	K  g  filenamef  system/repl/common.scm
 
	 		 		 		 		" 		% 		* 		+ 		0 		4 		8 		9 		< 		B 		I 	 		K	  g  nameg  repl-default-option-set! C:R:h    h      ] 6             g  prompt
		
  g  filenamef  system/repl/common.scm
 
	 		
 	 		
  g  nameg  repl-default-prompt-set! C;R        h   |   ]4 >  "  G  6 t       g  x
		  g  filenamef  system/repl/common.scm
 
	 		 	 		  g  nameg  puts C<R h   w   ] 6      o       g  x
		
  g  filenamef  system/repl/common.scm

	
	 		
  g  nameg  ->string C=R>      h      - 1 3  6          g  msg
			 g  args			  g  filenamef  system/repl/common.scm

					 			
  g  nameg  
user-error C>RC          g  m
		0 g  slots
	t  g  constructor	t   g  filenamef  system/repl/common.scm		
	1	(		8	(		9	-	7	A	(		D	'
	F	0
	I	/
	K	?
	N	>
	\	j
	n		o	k		A	o	/	n	2	m
9 
w 
u 

 
 
B 
| 
 
k 
r 
 
< 
 
 
 
$ 
 
 
*

 &	
   C6                                                                                                                                                                                                                                      ccache/system/xref.go                                                                               0000644                 00000046607 15154557173 0010623 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0oM      ]  4   h	      ] g  guile	 	g  define-module*	 	 	g  system	g  xref	 		g  filenameS	
f  system/xref.scm	g  importsS	g  base	g  pmatch	 	 	g  compile	 	 	g  vm	g  program	 	 	g  srfi	g  srfi-1	 	 	 	g  exportsS	g  *xref-ignored-modules*	g  procedure-callees	g  procedure-callers	 g  source-closures	!g  source-procedures	" ! 	#g  set-current-module	$# 	%# 	&g  memq	'g  program-objects	(g  vector-length	)g  make-vector	*g  	decompile	+g  program-objcode	,g  toS	-g  assembly	.g  load-program	/g  for-each	0g  toplevel-set	1g  toplevel-ref	2g  program?	3g  fold	4g  program-callee-rev-vars	5g  	variable?	6g  module-variable	7g  program-module	8g  the-root-module	9g  nested-ref-module	:g  resolve-module	;g  module-public-interface	<g  procedure-callee-rev-vars	=g  *callers-db*	>g  make-hash-table	?g  *module-callees-db*	@g  *tainted-modules*	Ag  value-history	BA 	CB 	Dg  module-name	Eg  member	Fg  on-module-modified	Gg  	hashq-ref	Hg  assoc	Ig  
hashq-set!	Jg  
add-caller	Kg  assoc-remove!	Lg  forget-callers	Mg  	hash-set!	Ng  append	Og  hash-ref	Pg  add-callees	Qg  ensure-callers-db	Rg  untaint-modules	Sg  hash-for-each	Tg  module-observers	Ug  module-observe	Vg  module-for-each	Wg  
procedure?	Xg  filter	Yg  variable-bound?	Zg  module-submodules	[g  current-module	\g  error	]f  /expected a variable, symbol, or (modname . sym)	^g  program-sources	_g  procedure-sources	`g  *closure-sources-db*	ag  *sources-db*	bg  *module-sources-db*	cg  *tainted-sources*	dg  on-source-modified	eg  
hashv-set!	fg  	hashv-ref	gg  
add-source	hg  delq	ig  hashv-remove!	jg  forget-source	kf  unexpected source format	lg  add-sources	mg  and=>	ng  vector->list	og  hashq-remove!	pg  forget-sources	qg  ensure-sources-db	rg  untaint-sources	sg  sort!	tg  hash-map->list	ug  cons	vg  lines->ranges	wg  reverse	xg  lookup-source-procedures	yg  canonicalizationS	zy		{z 	|g  relative	}g   %file-port-name-canonicalization	~g  catch	~  ~  g  open-input-file g  port-filenameC 5   hA    ]4	
"5 4% >  "  G   &     h      ]4 5$  C C       g  x
		 g  y		  g  filenamef  system/xref.scm
	"			#			#			#	 			  g  nameg  	cons-uniq C'()*+,-./01       h      ]!"  @ $  7  &  #$  (  L CCCCC $  =  &  '$  (  L C"""|"x         g  x
	  g  vx		D g  vy			D g  vx		,	@ g  vy		,	@ g  vx	S  g  vy		S  g  vx		l  g  vy		l   	g  filenamef  system/xref.scm
	-			.		<	0	'	F	.		|	/	' 	.	 	    C2345&6789:;        h@    ]4 5$ )45445544 55$  g	&  K$  @$  )	4
O 	>  "  G  	"   "   "   "   " $  C45$  4455"$ 545$  #45$  "  "$  R44 5		$  	"  	5		$  4	5$  "  	"  "1$  
	
$  

$  x(  f445	5$  4$  45"  5"  $  45$  "  "  "CCCC"}
"sC      g  prog
	@ g  	cons-uniq	@ g  t		@ g  n		9> g  progv		9> g  asm		9> g  vx		L  g  vy		L  g  vy		b  g  vy			r  g  i	 4 g  out	 4 g  obj	 ' g  t		8K g  v		O g  vx		% g  vy	
% g  vx	# g  vy	# g  vx	! g  vy	! g  m	 g  v	  g  filenamef  system/xref.scm
	!
		%			$			'			(		 	(	$	)	(		*	)		-	)	 	7	)	<	9	)		9	'	
	B	*		y	,	 	2	 	4	 	3	 	5	 	5	 	5	 	3	 	6	 	7	 	8	 	8	3 	8	 	7	 	6	 	9	 	3	 	:	 	:	 	;		;		<		#		#		#	'	<	*	?	%.	>	/	@	"2	@	78	@	3O	@	"O	@	T	C	Z	C	&[	#	g	#	r	#		C		>		F	#	F	6	F	F	F	6	F	#	F		H	#	I	(	J	)	K	-	I	(	F		N		O		#		#		#		N	*	P	4	P	4	2	6	2	 >	2	?	Q		 N	@  g  nameg  program-callee-rev-vars C4R24    h      ]4 5$   6C          g  proc
		  g  filenamef  system/xref.scm
	S
		U			T			U			V		 		  g  nameg  procedure-callee-rev-vars C<R<     hH   Y  ]"  0(  C$  ""4 5"  Q      g  prog
		F g  in		6 g  out			6  g  filenamef  system/xref.scm
	X
		Z			[			\			\			[			]			]	,		]		!	]		)	]		,	^		6	^		6	Z		7	Z		>	Z	6	F	Z	 		F  g  nameg  procedure-calleesg  documentationf  1Evaluates to a list of the given program callees. CR=R4>i5 ?R@RCRDE@ hH      ]	4 545$  "  45$  "  $  	 CC              g  m
		A g  name			A  g  filenamef  system/xref.scm
	h
		i				i			j			j			k		*	j		2	l		6	j		;	m	 	=	m	 		A  g  nameg  on-module-modified CFRG=HEI      hh   E  ]4 5$  =45$  45$  CC  6   6      =      g  callee
		b g  caller		b g  mod-name			b g  all-callers			b g  callers			P  g  filenamef  system/xref.scm
	o
		p			p			q			s			s		$	t	
	%	u		1	u		:	v	1	;	v	$	<	v		K	x	 	N	x		P	w		]	r	(	b	r	 		b	  g  nameg  
add-caller CJRI=KG    h       ] 44 556            g  callee
		 g  mod-name		  g  filenamef  system/xref.scm
	z
			|			|			|	;		|			|			{	 			  g  nameg  forget-callers CLRM?NO  h       ]4 4556            g  callees
		 g  mod-name		  g  filenamef  system/xref.scm
	~
		 		 		 	D	 		 				 			  g  nameg  add-callees CPRQ//L     h   a   ] L 6      Y       g  callee
		
  g  filenamef  system/xref.scm
 		
 	 		
   CO?Q      h0      ]4 O 4 5>  "  G   6              g  m
		)  g  filenamef  system/xref.scm
 		 		 		 	.	 		 		) 	 		)  g  nameg  untaint C@      h0      ] 4>  "  G  4>  "  G   C    z       g  filenamef  system/xref.scm
 
	 		 		( 		* 	 		,
  g  nameg  untaint-modules CRR:SI&FTUDVGWIXY</J h   a   ] LL 6    Y       g  callee
		  g  filenamef  system/xref.scm
 		 	 		   CP 
 h   9  ]$  M $  4M 5"  $  C45$  RM $  4M >  "  G  "   44554LO >  "  G  	L6CC  1      g  sym
	  g  var	  g  x		  g  t		"  g  callees		e   g  filenamef  system/xref.scm
 		 	
		 		 		 	
	 		 		" 		. 		8 		> 		? 		X 		] 	%	e 		e 		h 	  	 	 	   CG 
 h      ]
"  vM$  4M>  "  G  "   4455$  "  4>  "  G  454LO >  "  G  L 6M$  4	M5$  C"q"m              g  name
	  g  sub	  g  name		V	v  g  filenamef  system/xref.scm
 		 		 		& 		+ 	(	3 		7 		< 	
	P 		V 		Y 		| 		| 		  	  	 	 	   CZ       h      ]L LO 4 56  |       g  mod
		  g  filenamef  system/xref.scm
 		 		 	 		  g  nameg  visit-submodules C=>I&FTUDVGWIXY</J     h   a   ] LL 6    Y       g  callee
		  g  filenamef  system/xref.scm
 		 	 		   CP 
 h   9  ]$  M $  4M 5"  $  C45$  RM $  4M >  "  G  "   44554LO >  "  G  	L6CC  1      g  sym
	  g  var	  g  x		  g  t		"  g  callees		e   g  filenamef  system/xref.scm
 		 	
		 		 		 	
	 		 		" 		. 		8 		> 		? 		X 		] 	%	e 		e 		h 	  	 	 	   C    h     ]! $  4 5"  HO Q  $  "  $  45 45K456 $  aJ$  4J>  "  G  "   4455$  "  4	>  "  G  4
5O 6C           g  mod-name
	  g  mod	  g  visited		  g  visit-submodules		"  g  name	    g  filenamef  system/xref.scm
 
	 			 		 		/ 		7 		; 		< 		E 		F 		O 		R 		U 	-	X 		Z 		` 		f 		g 	  	  	(  	  	  	
  	  	  	 	   g  nameg  ensure-callers-db CQR56[:\]RG= 
  hx   N  ]4 5$   "  I $  445  5"  2 $  "  4455"  	4 54>   "  G  	6 F      g  var
		w g  vx	7	O g  vy		7	O g  v	\	w  g  filenamef  system/xref.scm
 
	 		 		 		 		 	 	 	1	& 	 	- 		< 		? 	&	I 		T 		X 		\ 		\ 		_ 		u 		w 	 		w  g  nameg  procedure-callersg  documentationf  Returns an association list, keyed by module name, of known callers
of the given procedure. The latter can specified directly as a
variable, a symbol (which gets resolved in the current module) or a
pair of the form (module-name . variable-name),  CR2^       h      ]4 5$   6C          g  proc
		  g  filenamef  system/xref.scm
 
	 		 		 		 		 		  g  nameg  procedure-sources C_R`RaR4>i5 bRcRDEc    hH      ]	4 545$  "  45$  "  $  	 CC              g  m
		A g  name			A  g  filenamef  system/xref.scm
 
	 			 		 		 		 		* 		2 		6 		; 	 	= 	 		A  g  nameg  on-source-modified CdRO>Mef   hX   =  ]45$  "  "45 4>  "  G   456   5      g  proc
		U g  file		U g  line			U g  db			U g  t			> g  table			; g  
file-table		>	U  g  filenamef  system/xref.scm
 
	 		 		 	%	 		! 		> 		I 		P 	6	R 		S 		U 	 		U	  g  nameg  
add-source CgROhfei  hH   C  ]45$  ,4 455$  
66C       ;      g  proc
		A g  file		A g  line			A g  db			A g  
file-table			A g  procs		$	?  g  filenamef  system/xref.scm
 
	 		 		 		 		 	 	  	;	" 	 	$ 		$ 		) 		- 	
	7 		? 	 		A	  g  nameg  forget-source CjR_IOb>M/g\k hX      ]! $  F  $  .$  L L6 6 6 6        g  source
		W g  vy		O g  vx			G g  vy			G g  vx		-	?  g  filenamef  system/xref.scm
 		 		?		C	%	G		K	%	O		S	%	W	 
		W   CWl`       h    p   ]4 5$  
 L 6C       h       g  obj
		  g  filenamef  system/xref.scm
							 		   C2m'n     h     ]4 5$  o445$  "  "45 4>  "  G   >  "  G  4 O >  "  G  "   	O 4
 5$  44 55"  $  "  6          g  proc
	  g  mod-name	  g  db		  g  sources			  g  t			Q g  table		1	N g  t	    g  filenamef  system/xref.scm
 
	 			 		 		 		 	
	 		 		- 	'	1 		4 		Z 	
	c 	
 		 		 
	 
	 
	 		 	 	 	 	  g  nameg  add-sources ClROb/j\k        hX      ]! $  F  $  .$  L L6 6 6 6        g  source
		W g  vy		O g  vx			G g  vy			G g  vx		-	?  g  filenamef  system/xref.scm
				?		C	%	G		K	%	O		S	%	W	 
		W   CGoWp`   h    p   ]4 5$  
 L 6C       h       g  obj
		  g  filenamef  system/xref.scm
							 		   C2m'n     h   ]  ]45$  r4 O 4 5>  "  G  4 >  "  G  O 4 5$  4	4
 55"  $  "  6C U      g  proc
	  g  mod-name	  g  db		  g  	mod-table		  g  t		q   g  filenamef  system/xref.scm

								
	 		'	.	)		.	
	7	
	T		^		_		b		l		q	  	 	
 	 	  g  nameg  forget-sources CpRq//pa        h   _   ] L 6    W       g  proc
		  g  filenamef  system/xref.scm
$		$	 		   CObS h   k   ] C   c       g  proc
		 g  sources		  g  filenamef  system/xref.scm
(	$ 			   Cq        hH      ]	4 O 4 5$  45"  >  "  G   6              g  m
		A g  t		.  g  filenamef  system/xref.scm
#		$		&		%		(		+)		3$		A*	 			A  g  nameg  untaint Cc       h0      ] 4>  "  G  4>  "  G   C    z       g  filenamef  system/xref.scm
"
	+		,		(-		*-	 		,
  g  nameg  untaint-sources CrR&dTUDVWla   h(      ]
$  45$  
L 6CC        g  sym
		' g  var		' g  x			%  g  filenamef  system/xref.scm
5		6			6			7		7		8		8		#9	 			'	   C hH      ]	44 55$  "  4 >  "  G  4 5O  6             g  mod
		B g  name	3	B  g  filenamef  system/xref.scm
0		1		1	&	1		1		2		-3		33		B4	 
		B  g  nameg  visit-module C>SGI    h@      ]4M5$  C4M>  "  G  4L >  "  G  M6         g  name
		> g  sub		>  g  filenamef  system/xref.scm
B			C		C		E		'F		>G	 		>	   CZ       h0      ]M$  "  45 NLL LO 4 56       z       g  mod
		)  g  filenamef  system/xref.scm
>		?		@		@		!H			)A	 		)   Ca`>:   hp   J  ]HHO K $  "  $  "  $  45 45 J456 $  4 56C     B      g  mod-name
		k g  visit-submodules		k g  visit-module				k g  visited		
	  g  filenamef  system/xref.scm
/
	
=		"J			5J	0	9J		:K	$	CK			DL		ML			PM		SM	+	VM		XM			^J		aN	 	iN	 		k  g  nameg  ensure-sources-db CqR>S/GI   hH      ]	4L  5$  &L$  	L"   L$  LCCL  LL6         g  proc
		F g  t		F  g  filenamef  system/xref.scm
U		W		V	
	Y		Y		Y		"Z		+[		,[		0[		5\		D^	$	F^	 		F   C     h   r   ]L  O 6       j       g  line
		 g  procs		  g  filenamef  system/xref.scm
S		T	 			   Cstu      h   }   ] C    u       g  x
		 g  y		  g  filenamef  system/xref.scm
b		b			b	%	b	 			   C        h8      ]	45 4O  >  "  G  456              g  
file-table
		1 g  ranges		1  g  filenamef  system/xref.scm
P
	Q		Q		
R		%a		1a	 		1  g  nameg  lines->ranges CvROwv      h     ]4 5"  O(  6"  "$  "$  """$  45"  "           g  
canon-file
		{ g  line		{ g  db			{ g  
file-table			{ g  ranges			` g  procs			`  g  filenamef  system/xref.scm
d
	e		e		f		h		i		$m		.m		.h		1j		6j		:h		?j	 	Bj		Ik		Lk		Pk		Xk		`f		ff		gf	$	rf	?	sg		{f	 		{	  g  nameg  lookup-source-procedures CxR{|q}    h   L   ] L 6D       g  filenamef  system/xref.scm
r		r	% 		
   C  h   X   -  1  3 C     P       g  args
			  g  filenamef  system/xref.scm
r	 			


   Cx`       hh   +  - /   0   3 #  4>  "  G  Y4 O 5Z$  45"   	
6   #      g  file
		e g  line		e g  canonicalization			e g  port		D	e g  file		Y	e  g  filenamef  system/xref.scm
o
	o	<	p		5r		Dq		Ls		Ms		Yq		et	 
		e	
g  canonicalizationS	   g  nameg  source-closures C R{|q} h   L   ] L 6D       g  filenamef  system/xref.scm
y		y	% 		
   C  h   X   -  1  3 C     P       g  args
			  g  filenamef  system/xref.scm
y	 			


   Cxa       hh   -  - /   0   3 #  4>  "  G  Y4 O 5Z$  45"   	
6   %      g  file
		e g  line		e g  canonicalization			e g  port		D	e g  file		Y	e  g  filenamef  system/xref.scm
v
	v	>	w		5y		Dx		Lz		Mz		Yx		e{	 
		e	
g  canonicalizationS	   g  nameg  source-procedures C!RC      }      g  m
		,  g  filenamef  system/xref.scm		
		!

u	S
,	X
0	a
1	c	:	c
;	e	>	e
@	g	C	g
t	h
@	o
2	z
%	~
] 
G 
 1 
  
  
! 
! 	! 
! 	! 
"O 
$  
% 
* 
. 
1"
6/
: P
<kd
>o
Av
 %	A
   C6                                                                                                                          ccache/system/vm/trap-state.go                                                                      0000644                 00000037452 15154557173 0012363 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0?      ]  4    hp      ] g  guile	 	g  define-module*	 	 	g  system	g  vm	g  
trap-state		 	
g  filenameS	f  system/vm/trap-state.scm	g  importsS	g  base	g  syntax	 	 	g  srfi	g  srfi-1	 	g  selectS	g  fold	 	 	 	 	g  traps	 	 	g  trace	 	 	 g  frame	!  	"! 	#g  program	$# 	%$ 	&"% 	'g  exportsS	(g  	add-trap!	)g  
list-traps	*g  trap-enabled?	+g  	trap-name	,g  enable-trap!	-g  disable-trap!	.g  delete-trap!	/g  with-default-trap-handler	0g  install-trap-handler!	1g  add-trap-at-procedure-call!	2g  add-trace-at-procedure-call!	3g  add-trap-at-source-location!	4g  #add-ephemeral-trap-at-frame-finish!	5g  add-ephemeral-stepping-trap!	6()*+,-./012345 	7g  set-current-module	87 	97 	:g  
make-fluid	;g  %default-trap-handler	<g  warn	=f  Trap with no handler installed	>g  default-trap-handler	?g  make-record-type	@f  <trap-wrapper>	Ag  index	Bg  enabled?	Cg  trap	Dg  name	EABCD 	Fg  <trap-wrapper>	Gg  make-trap-wrapper	Hg  record-predicate	Ig  trap-wrapper?	Jg  make-procedure-with-setter	Kg  record-accessor	Lg  record-modifier	Mg  trap-wrapper-index	Ng  trap-wrapper-enabled?	Og  trap-wrapper-trap	Pg  trap-wrapper-name	Qf  <trap-state>	Rg  handler	Sg  next-idx	Tg  next-ephemeral-idx	Ug  wrappers	VRSTU 	Wg  <trap-state>	Xg  make-trap-state	Yg  trap-state?	Zg  trap-state-handler	[g  trap-state-next-idx	\g  trap-state-next-ephemeral-idx	]g  trap-state-wrappers	^g  trap-wrapper<?	_g  error	`f  Trap already enabled	ag  setter	ba 	ca 	dg  enable-trap-wrapper!	ef  Trap already disabled	fg  disable-trap-wrapper!	gg  append	hg  add-trap-wrapper!	ig  delq	jg  remove-trap-wrapper!	kg  trap-state->trace-level	lf  )no wrapper found with index in trap-state	mg  wrapper-at-index	ng  next-index!	og  next-ephemeral-index!	pg  handler-for-index	qg  ephemeral-handler-for-index	rg  make-weak-key-hash-table	sg  *trap-states*	tg  	hashq-ref	ug  
hashq-set!	vg  trap-state-for-vm	wg  the-vm	xg  the-trap-state	yg  set-vm-trace-level!	zg  map	{g  and=>	|g  trap-at-procedure-call	}g  format	~f  Breakpoint at ~a	g  trace-calls-to-procedure g  prefixS f  	Trap ~a:  f  Tracepoint at ~a g  trap-at-source-location f  Breakpoint at ~a:~a g  trap-frame-finish f  Return from ~a f  ~a:~a:~a g  source:file f  unknown file g  source:line-for-user g  source:column f  unknown source location g  source-string g  into?S 	 g  instruction?S 	   g  frame-next-source g  trap-matching-instructions g  frame-address f  Step to different instruction f  #Step to different instruction in ~a f  Step into ~a f  Step out of ~aC 5   hX0    ]4	
&'65 49 >  "  G   4:i5 ;R;<=        h(      ][$  
 6 6            g  frame
		# g  idx		# g  	trap-name			# g  default-handler			#  g  filenamef  system/vm/trap-state.scm
	1
		2			3			4			5		#	5	 		#	  g  nameg  default-trap-handler C>R4?i@E5FRF     h      - 1 3   C        g  index
			 g  enabled?			 g  trap				 g  name				 g  defrec-3703f9048699c1-8				  g  filenamef  system/vm/trap-state.scm
	7
 				
	  g  nameg  make-trap-wrapper CGR4HiFi5IR4Ji4KiFiA54LiFiA55MR4Ji4KiFiB54LiFiB55NR4Ji4KiFiC54LiFiC55OR4Ji4KiFiD54LiFiD55PR4?iQV5WR>W   h   9  -  1  3  H J (  "  J J K J (  
"  J J K J (  	"  J J K J (  "  J J K  C   1      g  defrec-3703f9048699c1-14
	  g  _x		( g  _x	6	B g  _x	Q	] g  _x	k	w g  handler	w  g  next-idx		w  g  next-ephemeral-idx		w  g  wrappers		w   	g  filenamef  system/vm/trap-state.scm
	=
	d	A	 		 


  g  nameg  make-trap-state CXR4HiWi5YR4Ji4KiWiR54LiWiR55ZR4Ji4KiWiS54LiWiS55[R4Ji4KiWiT54LiWiT55\R4Ji4KiWiU54LiWiU55]RM        h      ]4 545C             g  t1
		 g  t2		  g  filenamef  system/vm/trap-state.scm
	C
		D		
	D			D	 			  g  nameg  trap-wrapper<? C^RN_`MOc       hP      ]	4 5$  4 564 5445 45 >  "  G  45 6            g  wrapper
		K g  trap	!	K  g  filenamef  system/vm/trap-state.scm
	J
		K			K			L			L	$		L			M		!	M		$	N		.	N	*	7	N		K	O	 		K  g  nameg  enable-trap-wrapper! CdRNOc_eM   hP      ]	4 5$  14 5445 45 >  "  G  45 64 56            g  wrapper
		K g  trap		>  g  filenamef  system/vm/trap-state.scm
	Q
		R			R			T			T			U		!	U	*	*	U		>	V		B	S		C	S	%	K	S	 		K  g  nameg  disable-trap-wrapper! CfRc]gM      h0      ]445 44 5 5>  "  G  6       g  
trap-state
		0 g  wrapper		0  g  filenamef  system/vm/trap-state.scm
	X
		Y			Z			Z			Z	1		Z		"	Y		0	[	 			0	  g  nameg  add-trap-wrapper! ChRc]i     h       ]45 44 556            g  
trap-state
		 g  wrapper		  g  filenamef  system/vm/trap-state.scm
	]
		_			_			_			^	 			  g  nameg  remove-trap-wrapper! CjRN   h      ]4 5$  CC           g  wrapper
		 g  level		  g  filenamef  system/vm/trap-state.scm
	b			c			c	
		d	 			   C]       h      ]
4 56       g  
trap-state
		  g  filenamef  system/vm/trap-state.scm
	a
		g			b	 		  g  nameg  trap-state->trace-level CkR<lM]  hP   '  ]
"  8(  4>  "  G  C45$  C"4 5"           g  
trap-state
		K g  idx		K g  wrappers			>  g  filenamef  system/vm/trap-state.scm
	i
		j			k			m			m			m		#	o		(	o	 	*	o		-	o		1	k		4	p		8	r	
	>	r		>	j		?	j		K	j	 		K	  g  nameg  wrapper-at-index CmR[c      h(      ]	4 5445 >  "  G  C       g  
trap-state
		( g  idx			(  g  filenamef  system/vm/trap-state.scm
	t
		u				u			v			v	+		v	 		(  g  nameg  next-index! CnR\c  h(      ]	4 5445 >  "  G  C       g  
trap-state
		( g  idx			(  g  filenamef  system/vm/trap-state.scm
	y
		z				z			{			{	5		{	 		(  g  nameg  next-ephemeral-index! CoRmZMP   h8      ]4L L54L 5$   45456C             g  frame
		2 g  wrapper		2 g  handler			2  g  filenamef  system/vm/trap-state.scm
			 		 		 		 		! 		( 		0 	
 			2   C      h      ] O C           g  
trap-state
		 g  idx		  g  filenamef  system/vm/trap-state.scm
	~
 			  g  nameg  handler-for-index CpRmNfj      hP      ]	4LL 5$  ;45$  4>  "  G  "   4L>  "  G  L 6C       g  frame
		P g  wrapper		P  g  filenamef  system/vm/trap-state.scm
 		 		 		 		 		 		 		5 		N 	 
		P   C h      ] O C         g  
trap-state
		 g  idx		 g  handler			  g  filenamef  system/vm/trap-state.scm
 
 			  g  nameg  ephemeral-handler-for-index CqR4ri5 sRtsXuv   h@      ]	4 5$  C45 4 >  "  G   6              g  vm
		9 g  t		9 g  ts		9  g  filenamef  system/vm/trap-state.scm
 
	 		 		 		 		 		9 	 		9  g  nameg  trap-state-for-vm CvRvw        h   x   ] 45 6     p       g  filenamef  system/vm/trap-state.scm
 
	 		 	 		
  g  nameg  the-trap-state CxRx;ywk      h    p   ] L$  45 4L 56C      h       g  filenamef  system/vm/trap-state.scm
 		 		 	!	 	*	 	 		
   Cyw        h   g   ] L $  
45 
6C    _       g  filenamef  system/vm/trap-state.scm
 		 		 	!	 	 		
   Cywk       h    p   ] L$  45 4L 56C      h       g  filenamef  system/vm/trap-state.scm
 		 		 	!	 	*	 	 		
   Cyw        h   g   ] L $  
45 
6C    _       g  filenamef  system/vm/trap-state.scm
 		 		 	!	 	 		
   C      hp      - . , 3 #  45  Y O  O 4 O >   "  G  V4>   X4 O >   "  G  "  ZCZF         g  handler
		n g  thunk		n g  
trap-state			n  g  filenamef  system/vm/trap-state.scm
 
	 	;	0 	 		n	  g  nameg  with-default-trap-handler C/RxzM]    h(      -  . , 3  #  45  4 56         g  
trap-state
		&  g  filenamef  system/vm/trap-state.scm
 
	 	,	 		& 	 		&
  g  nameg  
list-traps C)Rx{mP  h(      - . , 3 #  45 4 56       g  idx
		( g  
trap-state		(  g  filenamef  system/vm/trap-state.scm
 
	 	/	 			( 	 		(  g  nameg  	trap-name C+Rx{mN   h(      - . , 3 #  45 4 56       g  idx
		( g  
trap-state		(  g  filenamef  system/vm/trap-state.scm
 
	 	3	 			( 	 		(  g  nameg  trap-enabled? C*Rx{md       h(      - . , 3 #  45 4 56       g  idx
		( g  
trap-state		(  g  filenamef  system/vm/trap-state.scm
 
	 	2	 			( 	 		(  g  nameg  enable-trap! C,Rx{mf        h(      - . , 3 #  45 4 56       g  idx
		( g  
trap-state		(  g  filenamef  system/vm/trap-state.scm
 
	 	3	 			( 	 		(  g  nameg  disable-trap! C-Rx{mNfj  h0      ]4 5$  4 >  "  G  "   L  6     ~       g  wrapper
		+  g  filenamef  system/vm/trap-state.scm
 			 		 		 		+ 	 		+   C       h0      - . , 3 #  45 4 5O 6          g  idx
		- g  
trap-state		-  g  filenamef  system/vm/trap-state.scm
 
	 	2	 			- 	 		-  g  nameg  delete-trap! C.RxcZ  h(      - . , 3 #  45 45 6         g  handler
		& g  
trap-state		&  g  filenamef  system/vm/trap-state.scm
 
	 	?	& 	 		&  g  nameg  install-trap-handler! C0Rxn|phG}~ 	   hP   6  - . , 3 #  45 454 45544 556  .      g  proc
		N g  
trap-state		N g  idx		 	N g  trap		2	N  g  filenamef  system/vm/trap-state.scm
 
	 	B	 		  		# 		( 		2 		2 		9 		A 		F 		J 		L 		N 	 		N  g  nameg  add-trap-at-procedure-call! C1Rxn}hG 
hX   I  - . , 3 #  45 454 45544	 556       A      g  proc
		Q g  
trap-state		Q g  idx		 	Q g  trap		5	Q  g  filenamef  system/vm/trap-state.scm
 
	 	>	 		  		# 		* 		/ 	$	3 		5 		5 		< 		D 		I 		M 		O 		Q 	 		Q  g  nameg  add-trace-at-procedure-call! C2RxnphG} 	       hX   O  - . , 3 #  45 454 45544 556      G      g  file
		R g  	user-line		R g  
trap-state			R g  idx		 	R g  trap		4	R  g  filenamef  system/vm/trap-state.scm
 
	 	>	 		  		# 		* 	(	4 		4 		; 		C 		H 		N 		P 		R 	 		R	  g  nameg  add-trap-at-source-location! C3Rxoq.       h   i   ]LL 6      a       g  frame
		
  g  filenamef  system/vm/trap-state.scm
 		
 	  		
   ChG} 
   h`   U  - . , 3 #  45 454 45O 544	 556       M      g  frame
		Y g  handler		Y g  
trap-state			Y g  idx		 	Y g  trap		=	Y  g  filenamef  system/vm/trap-state.scm
 
	 	:	 		  		# 		( 		= 		= 		D 		L		Q		U		W 		Y 	 		Y	  g  nameg  #add-ephemeral-trap-at-frame-finish! C4R}      h@      ]	 $  /4 5$  "  4 54 56C             g  source
		: g  t		'  g  filenamef  system/vm/trap-state.scm

						 			$	5	(		/	,	7		9	 		:  g  nameg  source-string CRxo       h   \   ]C    T       g  f
		  g  filenamef  system/vm/trap-state.scm
	 		   C      h   w   ]4 5L C  o       g  f
		  g  filenamef  system/vm/trap-state.scm
			.		&		! 		   C h      ]4 5L$  L  6Cx       g  f
		  g  filenamef  system/vm/trap-state.scm
	
								 		   CqhG}   h     - /   0   3 	#  45 #  #  4 5454$  "  O $  "  4 5	O 4
554$  $  "  
4 5"  ($  4455"  445556       g  frame
	  g  handler	  g  
trap-state		  g  into?		  g  instruction?		  g  source		9  g  idx		B  g  	predicate		Z  g  fp		o	} g  trap	    
g  filenamef  system/vm/trap-state.scm
	
		3	3		9		<		B		E		M		Z		b		i		o	 	 	 	 	 !	 "	
 #	 $	 $	 $	 %	
 &	 &	 &	( &	 '	 '	 '	* '	 	 	 "	 	g  into?S	g  instruction?S	   g  nameg  add-ephemeral-stepping-trap! C5RxnhG  h8      - . , 3 #  45 454 56           g  trap
		4 g  name		4 g  
trap-state			4 g  idx		 	4  g  filenamef  system/vm/trap-state.scm
)
	)	5	*		 *		'-		4+	 		4	  g  nameg  	add-trap! C(RC            g  m
		,  g  filenamef  system/vm/trap-state.scm		
	-	/		6	/
g	1
u	7
-	=
y	C
	J
	.	Q

I	X
<	]
	a
B	i
6	t
0	y
	~
 
 	 
( 
 
 
r 
Y 
E 
4 
% 
 
  
"y 
$< 
&
 
(p 
)
/"	
0P)
 %	0R
   C6                                                                                                                                                                                                                       ccache/system/vm/frame.go                                                                           0000644                 00000015605 15154557173 0011365 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0m      ] E 4 h      ] g  guile	 	g  define-module*	 	 	g  system	g  vm	g  frame		 	
g  filenameS	f  system/vm/frame.scm	g  importsS	g  base	g  pmatch	 	 	g  program	 	 	g  instruction	 	 	g  objcode	 	 	 	g  exportsS	g  frame-bindings	g  frame-lookup-binding	g  frame-binding-ref	g  frame-binding-set!	 g  frame-next-source	!g  frame-call-representation	"g  frame-environment	#g  frame-object-binding	$g  frame-object-name	%g  frame-return-values	& !"#$% 
	'g  set-current-module	(' 	)' 	*g  frame-procedure	+g  program?	,g  program-bindings-for-ip	-g  frame-instruction-pointer	.g  binding:name	/g  frame-local-set!	0g  binding:index	1g  error	2f  variable not bound in frame	3g  frame-local-ref	4g  frame-arguments	5g  program-source	6g  program-sources-pre-retire	7g  catch	87 	97 	:g  procedure-name	;g  program-arguments-alist	<g  frame-num-locals	=g  ???	>g  assq-ref	?g  required	@g  optional	Ag  keyword	Bg  rest	Cg  map	Dg  iotaC 5 hh     ]4	
&5 4) >  "  G   *+,-        h(      ]	4 545$  4 56C          g  frame
		% g  p			%  g  filenamef  system/vm/frame.scm
	!
		"				"			#			#			$	#	#	$		$	%	 			%  g  nameg  frame-bindings CR.   h8     ]
"  #(  C45&  C"4 5"         g  frame
		6 g  var		6 g  bindings			)  g  filenamef  system/vm/frame.scm
	'
		(			)			+			+			+			)			,		#	.		)	.		)	(		*	(		6	(	 		6	  g  nameg  frame-lookup-binding CR/012      h8      ] 44 5$  "  4 556           g  frame
		4 g  var		4 g  val			4 g  t			.  g  filenamef  system/vm/frame.scm
	0
		2		
	3			3		!	4		%	4	 	+	4		0	2		4	1	 
		4	  g  nameg  frame-binding-set! CR3012      h8      ]
 44 5$  "  4 556             g  frame
		2 g  var		2 g  t			.  g  filenamef  system/vm/frame.scm
	7
		9		
	:			:		!	;		%	;		+	;		0	9		2	8	 
		2	  g  nameg  frame-binding-ref CR!        h      ]4 5C     }       g  frame
		  g  filenamef  system/vm/frame.scm
	A
		B		
	B	 		  g  nameg  frame-arguments C4R*+5-6  h0      ]	4 545$  4 5456C           g  frame
		, g  proc			,  g  filenamef  system/vm/frame.scm
	J
		K				K			L			L			N		"	O		*	M		+	P	 
		,  g  nameg  frame-next-source C R*9:  h   N   ] L 6F       g  filenamef  system/vm/frame.scm
	e				e	 		
   Ch   [   -  1  3 C     S       g  args
			  g  filenamef  system/vm/frame.scm
	e		 			


   C+;-30<= h8    ] $  ^ 4L 5$  4L 455"  4L 5$  4L 5"  4L 5C$  ^4L 5$  4L 455"  4L 5$  4L 5"  4L 5C$  #4L 54L 5C$  74L 5$  L 4564L 5$  L 6CC   	      g  req
	5 g  opt	5 g  key		5 g  rest		5 g  i		5 g  sym			T g  t			Q g  sym		q  g  t		|  g  t	3  
g  filenamef  system/vm/frame.scm
	t			z				y			{	#		{			m			l		 	n		%	n	6	-	n		4	o		;	o		?	l		@	p		N	s		U	|		Z	|		c	|	1	e	|		f	{		j	}		n	y		q	~	#	q	~		t	m		|	l	 	n	 	n	6 	n	 	o	 	o	 	l	 	p	 	s	 		 		 		1 		 	~	  	 	y	  	  	  	.  	  	  	#  	2  	  	 	y	 	m		l		n	6	n		o	$	o	(	l	0	p	2	s	4 	 >	5	  g  nameg  lp C>?@ABC3     h   `   ]L  6      X       g  i
		
  g  filenamef  system/vm/frame.scm
 		
 	 		
   CD< h   E  ]!4 54O 5$  "  45$  44 55"  $  O  Q 44	
5$  "  4	5$  "  4	5$  "  4	5$  "  
5"  4 O 44 555C       =      g  frame
	  g  p		  g  t			- g  t		K  g  lp		\  g  t		o  g  t	   g  t	   g  t	    	g  filenamef  system/vm/frame.scm
	b
		c				c			e				e		.	g		8	g		9	h		>	h	'	F	h		K	f		\	t		g	t		m	t	2	o	t		o	t		~	t	= 	u	 	u	2 	u	 	u	 	u	= 	v	 	v	2 	v	 	v	 	v	< 	w	 	w	3 	w	 	w	 	t	  	  	  	  	  	 	d	 '	   g  nameg  frame-call-representation C!RC.     h   x   ]4 54L  5C    p       g  binding
		  g  filenamef  system/vm/frame.scm
 		 		
 	&	 		 		   C   h      ] O 4 56           g  frame
		  g  filenamef  system/vm/frame.scm
 
	 		 	 		  g  nameg  frame-environment C"R   hH   #  ]
"  2(  "  4 5$  $  CC"4 5"         g  frame
		E g  obj		E g  bs			8  g  filenamef  system/vm/frame.scm
 
	 		 		 		 		 	8	 		 		" 		% 		) 		, 		2 	"	8 		9 		E 	 		E	  g  nameg  frame-object-binding C#R#.  h       ]
4 5$  6C            g  frame
		 g  obj		 g  t			  g  filenamef  system/vm/frame.scm
 
	 			 	 			  g  nameg  frame-object-name C$R<3C3      h   r   ]LL L 6      j       g  i
		  g  filenamef  system/vm/frame.scm
 			 	%	 	"	 	 		   CD h0      ]4 54 5 O 456          g  frame
		- g  len			- g  nvalues			-  g  filenamef  system/vm/frame.scm
 
	 			 		 		 	)	 		 		% 			- 	 
		-  g  nameg  frame-return-values C%RC           g  m
		,  g  filenamef  system/vm/frame.scm		
-	!
|	'
	0
	7
	A
	J
	b
5 
 
 
b 
 	d
   C6                                                                                                                            ccache/system/vm/traps.go                                                                           0000644                 00000072243 15154557173 0011425 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0t      ]  4    hU      ] g  guile	 	g  define-module*	 	 	g  system	g  vm	g  traps		 	
g  filenameS	f  system/vm/traps.scm	g  importsS	g  base	g  pmatch	 	 	 	 	g  frame	 	 	g  program	 	 	g  objcode	 	 	g  instruction	 	 	g  xref	  	!  	"g  rnrs	#g  bytevectors	$"# 	%$ 	&!% 	'g  exportsS	(g  trap-at-procedure-call	)g  trap-in-procedure	*g  trap-instructions-in-procedure	+g  trap-at-procedure-ip-in-range	,g  trap-at-source-location	-g  trap-frame-finish	.g  trap-in-dynamic-extent	/g  trap-calls-in-dynamic-extent	0g  #trap-instructions-in-dynamic-extent	1g  trap-calls-to-procedure	2g  trap-matching-instructions	3()*+,-./012 	4g  set-current-module	54 	64 	7g  make-syntax-transformer	87 	97 	:g  	arg-check	;g  macro	<g  $sc-dispatch	=< 	>< 	?g  any	@???? 	Ag  syntax-object	Bg  if	Cg  top	DC 	Eg  ribcage	Fg  dummy	Gg  arg	Hg  
predicate?	Ig  message	JFGHI 	Kg  m-1f68148ae-0	LKC 	MLDDD 	Nf  l-1f68148ae-5	Of  l-1f68148ae-6	Pf  l-1f68148ae-7	Qf  l-1f68148ae-8	RNOPQ 	SEJMR 	TE 	Ug  x	VU 	WL 	Xf  l-1f68148ae-2	YX 	ZEVWY 	[DSTZ 	\g  hygiene	]\ 	^AB[] 	_g  not	`A_[] 	ag  error	bAa[] 	cf  bad argument ~a: ~a	dAc[] 	eg  quote	fAe[] 	g??? 	hFGH 	iLDD 	jf  l-1f68148ae-e	kf  l-1f68148ae-f	lf  l-1f68148ae-10	mjkl 	nEhim 	oDnTZ 	pABo] 	qA_o] 	rAao] 	sf  bad argument ~a: expected ~a	tAso] 	uAeo] 	vg  syntax-violation	wv 	xv 	yf  -source expression failed to match any pattern	zf  trap already enabled	{f  trap already disabled	|g  new-disabled-trap	}g  new-enabled-trap	~g  	procedure	g  frame-procedure g  program? g  program-objcode g  frame-matcher g  vmS 	 g  closure?S 	 g  
our-frame?S 	   g  the-vm g  
procedure? g  proc g  handler g  	add-hook! g  vm-apply-hook g  remove-hook! g  current-frameS 	 	 	 	   g  enter-handler g  exit-handler g  warn f  already in proc g  frame-previous g  vm-push-continuation-hook g  vm-pop-continuation-hook g  vm-abort-continuation-hook g  vm-restore-continuation-hook g  next-handler g  vm-next-hook g  number? g  integer? g  exact? g  non-negative-integer? g  positive-integer? g  and-map g  range? g  or-map g  	in-range? g  range g  frame-address g  frame-instruction-pointer g  objcode->bytecode g  program-last-ip f  
unexpected g  for-each g  	assv-set! g  assv-ref g  sort! g  program-sources-pre-retire g  program-sources-by-line f  no instructions found at f  : f  ; using line f  instead f  no instructions found for g  source->ip-range g  source-closures g  source-procedures g  source-closures-or-procedures   g  string? g  file g  	user-line g  map f  No procedures found at ~a:~a. 	   g  frame? g  return-handler g  abort-handler f  .return-or-abort traps may only be enabled once 	 	 	 	   g  apply-handler 	 	 	   g  length g  delq   g  
frame-predC 5      hc    ]4	
&'35 46 >  "  G   49:;>@^`bdf  h(   k   ]     C    c       g  dummy
		$ g  arg		$ g  
predicate?			$ g  message			$  		$	   Cgpqrtu     h0   V   ]      C       N       g  dummy
		) g  arg		) g  
predicate?			)  		)	   Cxy   h@      ]4 5$  @4 5$  @ 6              g  x
		9 g  tmp		9 g  tmp		"	9  g  filenamef  system/vm/traps.scm
	N	 		9  g  
macro-typeg  syntax-rulesg  patternsg  argg  
predicate?g  message g  argg  
predicate?   C5:Raza{     hP      -  . , 3  #   M$  "  4>  "  G  4L >  "  G  NL C              g  frame
		I  g  filenamef  system/vm/traps.scm
	c			d		 	d		$	d		)	d		2	e		D	f	 		I
  g  nameg  disable-trap C hX      -  . , 3  #   M$  4>  "  G  "   4L >  "  G  NLL LO C             g  frame
		R  g  filenamef  system/vm/traps.scm
	]			^			^		 	^		%	^		2	_		F	`	 		R
  g  nameg  enable-trap C  h       ]HO Q C         g  vm
		 g  enable		 g  disable			 g  enabled?			 g  enable-trap			  g  filenamef  system/vm/traps.scm
	V
		W	 			  g  nameg  new-disabled-trap C|R|   h      ]4 56              g  vm
		 g  frame		 g  enable			 g  disable			  g  filenamef  system/vm/traps.scm
	k
		l			l	 			  g  nameg  new-enabled-trap C}R~ h8      ]	4 5L &  C45$  454L 5CC             g  frame
		2 g  
frame-proc			2  g  filenamef  system/vm/traps.scm
	s			t				t	
		u			u			v		 	v		!	w		(	x		/	w	 		2   C h   j   ]4 5L C   b       g  frame
		  g  filenamef  system/vm/traps.scm
	y			z			z	
 		   C   h0      ]
 $  4 5"   $  O CO C         g  proc
		. g  match-objcode?		. g  proc			.  g  filenamef  system/vm/traps.scm
	n
		o				o		
	p			o			r	 		.	  g  nameg  frame-matcher CRash      ]4L 5$  L  6C          g  frame
		  g  filenamef  system/vm/traps.scm
 		 	
	 		 	
 		  g  nameg  
apply-hook C} h   m   ]4L5L 6 e       g  frame
		  g  filenamef  system/vm/traps.scm
 		 		 	 		   C   h   m   ]4L5L 6 e       g  frame
		  g  filenamef  system/vm/traps.scm
 		 		 	 		   C        h   M  - /   0   3 #  45 #  #  4 54 5$  "  4>  "  G  45$  "  4	>  "  G  
O Q O O 6   E      g  proc
	  g  handler	  g  vm		  g  closure?		  g  
our-frame?		  g  
apply-hook	    g  filenamef  system/vm/traps.scm
	~
		~	8	0 	-	; 		` 	  	 	 	
g  vmS	g  closure?S	g  
our-frame?S	   g  nameg  trap-at-procedure-call C(Ras   hX      ]M$  4L >  "  G  N"   4L  5$  %M$   64L >  "  G  NCC            g  frame
		S  g  filenamef  system/vm/traps.scm
 		 			 		 		" 	
	, 		2 		6 		: 	
	; 		O 	 		S  g  nameg  
apply-hook C  h(      ]M$  4L  >  "  G  NCC              g  frame
		!  g  filenamef  system/vm/traps.scm
 		 			 		 	 		!  g  nameg  push-cont-hook C     hh     ]	M$  4L >  "  G  N"   4L 4 55$  .4 5M$  64L>  "  G  NCC              g  frame
		a g  frame	8	_  g  filenamef  system/vm/traps.scm
 		 			 		 		" 	
	% 		- 	
	1 		2 		8 	
	@ 		D 		H 	
	I 		] 	 		a  g  nameg  pop-cont-hook C   hX      ]M$  4L >  "  G  N"   4L  5$  %M$   64L >  "  G  NCC            g  frame
		S  g  filenamef  system/vm/traps.scm
 		 			 		 		" 	
	, 		2 		6 		: 	
	; 		O 	 		S  g  nameg  
abort-hook C    hX      ]M$  4L >  "  G  N"   4L  5$  %M$   64L >  "  G  NCC            g  frame
		S  g  filenamef  system/vm/traps.scm
 		 			 		 		" 	
	, 		2 		6 		: 	
	; 		O 	 		S  g  nameg  restore-hook C} 	   h   4  ]44L5L>  "  G  44L5L>  "  G  44L5L>  "  G  44L5L>  "  G  44L5L>  "  G   $  24L 5$  %M $   64L >  "  G  N CCC       ,      g  frame
	   g  filenamef  system/vm/traps.scm
 		 		 		 		 		 		, 		5 		8 		E 		N 		Q 		^ 		g 		j 		w 	  	  	  	  	  	  	
  	  	 	    C    h      ]M$  4L >  "  G  N"   44L5L>  "  G  44L5L>  "  G  44L5L>  "  G  44L5L>  "  G  4L5L 6             g  frame
	   g  filenamef  system/vm/traps.scm
 		 			 		 		" 		% 		2 		; 		> 		K 		T 		W 		d 		m 		p 		} 	  	  	 	    C     hX  9  - /   0   3 #  #  45 #  #  4 54 5$  "  4>  "  G  45$  "  4	>  "  G  45$  "  4
>  "  G  HO O 	O 
O O Q Q 	Q 
Q Q 
	O 	
	O 6       1      g  proc
	Q g  enter-handler	Q g  exit-handler		Q g  current-frame		Q g  vm		Q g  closure?		Q g  
our-frame?		Q g  in-proc?	 Q g  
apply-hook	 Q g  push-cont-hook		 Q g  pop-cont-hook	
 Q g  
abort-hook	 Q g  restore-hook	 Q  g  filenamef  system/vm/traps.scm
 
	# 	4	9 	(	D 		i 	  	  	Q 	 		Q	
g  current-frameS	g  vmS	g  closure?S	g  
our-frame?S	   g  nameg  trap-in-procedure C)Ras     h      ]4L 5$  L  6C          g  frame
		  g  filenamef  system/vm/traps.scm
 		 	
	 		 	
 		  g  nameg  	next-hook C)  h8      ]44L5L>  "  G   $  4L 5$  L  6CC         g  frame
		6  g  filenamef  system/vm/traps.scm
 		 		 		 		! 		" 	
	, 		2 	
 			6  g  nameg  enter C    h(      ]4L >  "  G  4L 5L6              g  frame
		!  g  filenamef  system/vm/traps.scm
 		 		 		! 	 		!  g  nameg  exit C        h     - /   0   3 #  #  45 #  #  4 54 5$  "  4>  "  G  45$  "  4	>  "  G  45$  "  4
>  "  G  O Q  O O 6	          g  proc
	  g  next-handler	  g  exit-handler		  g  current-frame		  g  vm		  g  closure?		  g  
our-frame?		  g  	next-hook	    g  filenamef  system/vm/traps.scm
 
	# 	A	9 	*	D 		i 	  	  	 	 	
g  current-frameS	g  vmS	g  closure?S	g  
our-frame?S	   g  nameg  trap-instructions-in-procedure C*R  h0      ]4 5$   4 5$  4 5$   
CCCC        g  x
		/  g  filenamef  system/vm/traps.scm
 
	 		 		 		 		 	 	# 		& 	0	( 	+ 
		/  g  nameg  non-negative-integer? CR   h0      ]4 5$  4 5$  4 5$   
CCCC         g  x
		.  g  filenamef  system/vm/traps.scm
 
										 	#		&	+ 			.  g  nameg  positive-integer? CR h       ] $  4 5$   6CC       g  x
		   g  filenamef  system/vm/traps.scm
							
			.						.		 
		    C      h      ] $   6C     |       g  x
		  g  filenamef  system/vm/traps.scm

							 		  g  nameg  range? CR    h      ] L $  L  CC          g  bounds
		  g  filenamef  system/vm/traps.scm
	
										 		   C    h      ]O  6        g  range
		 g  i		  g  filenamef  system/vm/traps.scm

		 			  g  nameg  	in-range? CRas  h@      ]	"  ,"  N C$   $  	"""M "             g  fp
		: g  frames		2  g  filenamef  system/vm/traps.scm
				!									#		 	!		$ 		* 		2	 		:  g  nameg  cull-frames! C       hp   k  ]!4 54 54L>  "  G  4L5M $  
M "  $  $  CM N C$  M N L 6C c      g  frame
		o g  fp		o g  ip			o g  now-in-range?		A	o g  was-in-range?		A	o  g  filenamef  system/vm/traps.scm
#		$		
%		$		&		''		2(	"	6(		9(	6	<(	3	A'		K)	
	Q+		V,		X,		`)	
	e.		g.		m/	 		o  g  nameg  next-handler C*     h(      ]M $  M 4 5$  M N CCC            g  frame
		#  g  filenamef  system/vm/traps.scm
1		2			2		3		3	!	3		2	
	4		4	
 
		#  g  nameg  exit-handler C   h     - /   0   3 
#  #  45 #  #  4 54 5$  "  4>  "  G  4	5$  "  4
>  "  G  45$  "  4>  "  G  HO O 	Q Q 	 	O 6	           g  proc
	  g  range	  g  handler		  g  current-frame		  g  vm		  g  closure?		  g  
our-frame?		  g  fp-stack	   g  cull-frames!	   g  next-handler		    
g  filenamef  system/vm/traps.scm

	#	@	9	)	D		i	 	 	 	 6	 
	 	
g  current-frameS	g  vmS	g  closure?S	g  
our-frame?S	   g  nameg  trap-at-procedure-ip-in-range C+R      h      ]44 55
C              g  prog
		  g  filenamef  system/vm/traps.scm
=
	>		>	0	>		>	 		  g  nameg  program-last-ip CRa   h0      ]	4M   4M  5$  "  5N C       g  pair
		0 g  t		)  g  filenamef  system/vm/traps.scm
T		V		
V	$	W	$	X	(	X	8	X	(	X	$	&Y	(	*W		,V		.U	 		0   C h      ] C      y       g  x
		
 g  y		
  g  filenamef  system/vm/traps.scm
[		[	(	[	0		[	% 		
	   C 	 h     ]R" $  $  $  $  g	$  L	$  0

$  

"  45
"  
4 5"  	"  45"  45"  45"-H4O >  "  G  4J>  "  G  JC4 5"          g  proc
	 g  file	 g  sources		 g  out		 g  v		  g  vx		"  g  vy		"  g  vx		3  g  vy		3  g  vx			A  g  v	
	^  g  vx		j	x g  alist	   g  filenamef  system/vm/traps.scm
@
	A			C		C		D		E		E		LG		PG		UI	*	VI	#	ZI		]J	+	^J	#	uL	&	}M	+ M	2 M	+ N	2 N	# H	 H	 Q	 Q	 Q	 Q	 Q	 Q	 Q	 D	 R	 R	 S	
 [	
A	A	B	A	 '		  g  nameg  program-sources-by-line CR     h@      ] L$   C L$  #4L L >  "  G   CC        g  line-and-ranges
		?  g  filenamef  system/vm/traps.scm
_		a		a		`		b		c		c		`		d		d		#d	8	'e		*e	'	,e	=	1d		<f	 		?   C h@      ]4O 4 55$  C4>  "  G  C         g  proc
		> g  file		> g  line			> g  t			>  g  filenamef  system/vm/traps.scm
^
	_		h		_		_		%j		)j		-j	/	4j		=k	 		>	  g  nameg  source->ip-range CR   h(      ]
4 5$  D4 5D          g  file
		% g  line		% g  closures			%  g  filenamef  system/vm/traps.scm
m
	n		n		o		o		p		q		%q	 			%	  g  nameg  source-closures-or-procedures CRas}+   h(      ]	4 L L5 LLLL6	         g  proc
		& g  range		&  g  filenamef  system/vm/traps.scm
			!		=		!			&	 		&   Ca        h0      ]4LLLLLLO L5N M (  
LL6C         g  frame
		.  g  filenamef  system/vm/traps.scm
							"		&		,	 		.   C   h   c   ] L 6[       g  trap
		  g  filenamef  system/vm/traps.scm
			$ 		   C  h    m   ]4 O M >  "  G  N Ce       g  frame
		   g  filenamef  system/vm/traps.scm
						 		    C        h     - /   0   3 #  #  45 4 5$  "  4>  "  G  45$  "  4	
>  "  G  45$  "  4>  "  G  H4 >  G  O O 6          g  file
	  g  	user-line	  g  handler		  g  current-frame		  g  vm		  g  traps	   g  procs	   g  	closures?	    g  filenamef  system/vm/traps.scm
w
	#x	:	*y		Oz		t{	 |	 ~	 ~	7 ~	 }	 	 	 	
g  current-frameS	g  vmS	   g  nameg  trap-at-source-location C,Ras    h(      ]M$  4 5M&  	NL  6CC             g  frame
		"  g  filenamef  system/vm/traps.scm
								
				 		"  g  nameg  pop-cont-hook C        h(      ]M$  4 5M$  	NL  6CC            g  frame
		#  g  filenamef  system/vm/traps.scm
										
				 		#  g  nameg  
abort-hook C}a      h`      ]M$  "  4>  "  G  44L5L>  "  G  44L5L >  "  G  4L5L 6          g  frame
		]  g  filenamef  system/vm/traps.scm
												"		/		8		;		H		S		]	 		]   C     hH      ]N44L5L>  "  G  44L5L >  "  G  4L5L 6           g  frame
		D  g  filenamef  system/vm/traps.scm
													"		/		:		D	 		D   C h   _  - /   0   3 #  45 4 5$  "  4>  "  G  45$  "  4	
>  "  G  45$  "  4
>  "  G  4 5HO O Q Q  O O 6      W      g  frame
	  g  return-handler	  g  abort-handler		  g  vm		  g  fp	   g  pop-cont-hook	   g  
abort-hook	    g  filenamef  system/vm/traps.scm

		&	!		F		k	 	 	 	 		 	
g  vmS	   g  nameg  trap-frame-finish C-Ras     h       ]4M >  "  G  NL  6          g  frame
		  g  filenamef  system/vm/traps.scm
							 		  g  nameg  
abort-hook C-      h       ]4M >  "  G  NL  6          g  frame
		  g  filenamef  system/vm/traps.scm
							 		  g  nameg  return-hook C     hH      ]M$  "  4L 5$  ,4L  >  "  G  4 LLO LL5NCC         g  frame
		F  g  filenamef  system/vm/traps.scm
			
							+		B	 		F  g  nameg  
apply-hook C}      h   m   ]4L5L 6 e       g  frame
		  g  filenamef  system/vm/traps.scm
					 		   C   hH      ]M$  +4M >  "  G  N4L >  "  G  "   N4L 5L6            g  frame
		C  g  filenamef  system/vm/traps.scm
											6		9		C	 			C   C   h(    - /   0   3 #  #  45 #  #  4 54 5$  "  4>  "  G  45$  "  4	>  "  G  45$  "  4
>  "  G  45$  "  4>  "  G  HO 	O 
Q 		Q 

O 
O 6          g  proc
	$ g  enter-handler	$ g  return-handler		$ g  abort-handler		$ g  current-frame		$ g  vm		$ g  closure?		$ g  
our-frame?		$ g  	exit-trap	 $ g  
abort-hook		 $ g  
apply-hook	
 $  g  filenamef  system/vm/traps.scm

	#	9	9	-	D		i	 	 	 	$	 
	$	
g  current-frameS	g  vmS	g  closure?S	g  
our-frame?S	   g  nameg  trap-in-dynamic-extent C.Ras      h      ]M N C       |       g  frame
			  g  filenamef  system/vm/traps.scm
					 			  g  nameg  
trace-push C  h       ]4L M >  "  G  M N C          g  frame
		  g  filenamef  system/vm/traps.scm
							 		  g  nameg  	trace-pop C  h   |   ]L M 6      t       g  frame
		
  g  filenamef  system/vm/traps.scm
		
	 		
  g  nameg  trace-apply C.      hH      ]44L5L>  "  G  44L5L>  "  G  4L5L 6              g  frame
		A  g  filenamef  system/vm/traps.scm
												,		7		A	 
		A  g  nameg  enter C       hH      ]44L5L>  "  G  44L5L>  "  G  4L5L 6              g  frame
		A  g  filenamef  system/vm/traps.scm
												,		7 		A 	 
		A  g  nameg  return C      hH      ]44L5L>  "  G  44L5L>  "  G  4L5L 6              g  frame
		A  g  filenamef  system/vm/traps.scm
												,		7 		A 	 
		A  g  nameg  abort C  h     - /   0   3 #  #  45 #  #  4 54 5$  "  4>  "  G  45$  "  4	>  "  G  45$  "  4
>  "  G  
HO O 	O 
Q Q 	Q 
 
	O 
	O 
	O 6
           g  proc
	 g  apply-handler	 g  return-handler		 g  current-frame		 g  vm		 g  closure?		 g  
our-frame?		 g  *call-depth*	  g  
trace-push	  g  	trace-pop		  g  trace-apply	
   g  filenamef  system/vm/traps.scm

	#	?	9	(	D		i	 	 		 			
g  current-frameS	g  vmS	g  closure?S	g  
our-frame?S	   g  nameg  trap-calls-in-dynamic-extent C/Ras   h   {   ]L  6s       g  frame
		  g  filenamef  system/vm/traps.scm
			 		  g  nameg  
trace-next C.   h      ]4L5L 6 w       g  frame
		  g  filenamef  system/vm/traps.scm
					 		  g  nameg  enter C h      ]4L5L 6 x       g  frame
		  g  filenamef  system/vm/traps.scm
					 		  g  nameg  return C        h      ]4L5L 6 w       g  frame
		  g  filenamef  system/vm/traps.scm
"					 		  g  nameg  abort C        h     - /   0   3 #  #  45 #  #  4 54 5$  "  4>  "  G  45$  "  4	>  "  G  
O Q  O O O 6
       g  proc
	  g  next-handler	  g  current-frame		  g  vm		  g  closure?		  g  
our-frame?		  g  
trace-next	    g  filenamef  system/vm/traps.scm

	#	F	9	/	D		i	 %	 	 	
g  current-frameS	g  vmS	g  closure?S	g  
our-frame?S	   g  nameg  #trap-instructions-in-dynamic-extent C0Ras-   h0      ]4M >  "  G  4MM5NNL  L6             g  frame
		*  g  filenamef  system/vm/traps.scm
?		:		<		;		"=		*A	 		*  g  nameg  return-hook C  h(      ]4M >  "  G  4MM 5N NC           g  frame
		$  g  filenamef  system/vm/traps.scm
D		:		<		;		"=	 		$  g  nameg  
abort-hook C     h`      ]4M54L >  "  G  4 5&  CH4 LLO LO L 5KJMNC           g  frame
		\ g  depth			\ g  finish-trap		.	\  g  filenamef  system/vm/traps.scm
2		3			3		5		 7		+7		.8		1H		SG		XJ		ZI	 		\  g  nameg  
apply-hook C   h   f   ] L 6^       g  disable
		  g  filenamef  system/vm/traps.scm
_		_	$ 		   Ch    n   -  . , 3  #   L4L  56f       g  frame
		   g  filenamef  system/vm/traps.scm
[		\	)	 \	
 		 
   C       hH      -  . , 3  #   4 O M>  "  G  N4L 5L O C           g  frame
		D g  trap	8	D  g  filenamef  system/vm/traps.scm
^		_		/a	#	1a		2b	&	8b	 		D
   C   h      ]L  LO C  |       g  trap
		  g  filenamef  system/vm/traps.scm
Y	 		  g  nameg  with-pending-finish-disablers C(     h     - /   0   3 #  45 4 5$  "  4>  "  G  45$  "  4>  "  G  45$  "  4	>  "  G  H
O O Q Q 4 56             g  proc
	  g  apply-handler	  g  return-handler		  g  vm		  g  pending-finish-traps	   g  
apply-hook	   g  with-pending-finish-disablers	    g  filenamef  system/vm/traps.scm
+
	,	,	!-		F.		k/	 0	 0	 e	 d	 
	 	
g  vmS	   g  nameg  trap-calls-to-procedure C1Ras  h      ]4L 5$  L  6C          g  frame
		  g  filenamef  system/vm/traps.scm
n		o	
	o		p	
 		  g  nameg  	next-hook C}  h   m   ]4L5L 6 e       g  frame
		  g  filenamef  system/vm/traps.scm
t		u		u	 		   C   h   m   ]4L5L 6 e       g  frame
		  g  filenamef  system/vm/traps.scm
v		w		w	 		   C        h      - /   0   3 #  45 4 5$  "  4>  "  G  45$  "  4>  "  G  	O  Q 
O O 6            g  
frame-pred
	  g  handler	  g  vm		  g  	next-hook		s   g  filenamef  system/vm/traps.scm
i
	j	/	!k		Fl	 r	 	 	
g  vmS	   g  nameg  trap-matching-instructions C2RC             g  m
		,  g  filenamef  system/vm/traps.scm		8
	V
	k
	[	n
P	~
 
 
! 
! 
#
$
,
,=
2z@
5^
6=m
;w
B*
I
R(
W-
_+
ci
 	c
   C6                                                                                                                                                                                                                                                                                                                                                              ccache/system/vm/inspect.go                                                                         0000644                 00000023373 15154557173 0011741 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0&      ] t 4  h      ] g  guile	 	g  define-module*	 	 	g  system	g  vm	g  inspect		 	
g  filenameS	f  system/vm/inspect.scm	g  importsS	g  base	g  pmatch	 	 	g  syntax	 	 	 	 	g  frame	 	 	g  language	g  assembly	g  disassemble	 	g  selectS	g  %disassemble		  	!  	"g  ice-9	#g  rdelim	$"# 	%$ 	&g  pretty-print	'"& 	(' 	)g  format	*") 	+* 	,g  program	-, 	.- 	/!%(+. 		0g  exportsS	1 	2g  set-current-module	32 	42 	5g  make-hash-table	6g  hash-for-each	7g  
hashq-set!	8g  	hashq-ref	9g  reverse-hashq	:g  catch	;g  wrong-number-of-args	<g  keyword-argument-error	=g  catch-bad-arguments	>g  eof-object?	?g  char=?	@g  	read-char	Ag  repl-reader	Bg  char-whitespace?	Cg  unread-char	Dg  read	Eg  reverse	Fg  	read-args	Gg  make-module	Hg  throw	Ig  quit	Jg  set-procedure-property!	Kg  name	Lg  module-define!	Mg  module-add!	Ng  q	Og  module-local-variable	Pg  continue	Qg  cont	Rg  c	Sg  print	Tg  p	Ug  write	Vg  w	Wg  display	Xg  d	Yf  Error disassembling object: ~a
	Zg  x	[g  module-obarray	\g  procedure-name	]f  ~a~{ ~:@(~a~)~}~?~%~a~&~%	^g  program-lambda-list	_f  "~#[~:;~40t(aliases: ~@{~a~^, ~})~]	`g  delq	ag  procedure-documentation	bf  Invalid command ~s.~%	cf  #Try `help' for a list of commands~%	dg  sort	eg  hash-map->list	fg  string<?	gg  symbol->string	hf  Available commands:~%~%	ig  for-each	jg  help	kg  h	lg  ?	mg  apply	ng  current-error-port	of  )Invalid arguments to ~a. Try `help ~a'.~%	pg  newline	qf  $~&Unknown command: ~a. Try `help'.~%	rg  save-module-excursion	sf  ~20@y inspect> C 5      h   y   ]4	
/015 44 >  "  G   5678       h      ]L  4L 56        g  k
		 g  v		  g  filenamef  system/vm/inspect.scm
	%			&	!		&	2		&	!		&			&	 			   C      h(      ]	45 4O  >  "  G  C          g  h
		% g  ret		%  g  filenamef  system/vm/inspect.scm
	"
		#			#		
	$	 		%  g  nameg  reverse-hashq C9R:;:<h   s   - 1 3 L 6    k       g  k
			 g  args			  g  filenamef  system/vm/inspect.scm
	/			0	
 			
   C  h   X   ] LL O 6       P       g  filenamef  system/vm/inspect.scm
	,			-			-	 		
   C      h   s   - 1 3 L 6    k       g  k
			 g  args			  g  filenamef  system/vm/inspect.scm
	1			2	 			
   C  h      ] O O 6       g  thunk
		 g  bad-args-thunk		  g  filenamef  system/vm/inspect.scm
	*
		+				+	 			  g  nameg  catch-bad-arguments C=R>?@ABCDE 	 h@    ]!"  45$   C4
5$  4 5"45$  4 5"4>  "  G  4 5 4 5"  "  45$  64
5$  645$  4 5"4>  "  G  4 54 5"v4 5"      g  prompt
	@ g  chr	  g  reader		&	4 g  reader		G	U g  reader		o	} g  tok		}  g  reader	   g  out * g  chr	 * g  reader	   g  reader	  g  tok	* g  reader	" g  reader,:  g  filenamef  system/vm/inspect.scm
	4
		9			;			:			;			<		$	:		&	8		)	6		:	<		;	=		E	:		G	8		J	6		[	=		\	?		o	@		r	6		}	@	 	A	 	8	 	6	 	A	 	B	 	D	 	C	 	D	 	E	 	C	 	E	 	F	 	C	 	8	 	6	 	F	 	H	 	I	 	6		I		J		8		6	*	J	,	8	/	6	@	K	 /	@  g  nameg  	read-args CFRGHI       h      ] 6       g  filenamef  system/vm/inspect.scm
	a			c			c	 		
  g  nameg  cg  documentationf  Quit the inspector. CJKILMNOPQR&       h      ] L 6       g  filenamef  system/vm/inspect.scm
	e			g	 		
  g  nameg  cg  documentationf  .Print the current object using `pretty-print'. CSTh      ] ML 6       g  filenamef  system/vm/inspect.scm
	i			k	 		
  g  nameg  cg  documentationf  'Print the current object using `write'. CUV       h      ] ML 6       g  filenamef  system/vm/inspect.scm
	m			o	 		
  g  nameg  cg  documentationf  )Print the current object using `display'. CWX:      h   P   ] L 6H       g  filenamef  system/vm/inspect.scm
	t			u	
 		
   C)Y        h   m   -  1  3  6      e       g  args
			  g  filenamef  system/vm/inspect.scm
	v			w			w	
 			


   C        h      ] L O 6       g  filenamef  system/vm/inspect.scm
	q			s	 		
  g  nameg  cg  documentationf  GDisassemble the current object, which should be objcode or a procedure. CZ9[O\)]^_`8a 
     hH      ]4L  5454544L554	56          g  cmd
		D g  v		D g  p			D g  canonical-name			D  g  filenamef  system/vm/inspect.scm
	|			}			}	
		~			}	
			!		}	
	  		# 	#	+ 		, 		1 	)	; 		< 		D 	 		D  g  nameg  help-cmd C)bcO\]^_`8ade\        h   z   ] 6       r       g  k
			 g  v			  g  filenamef  system/vm/inspect.scm
 		 	+		 	 				   Cfg      h      ]4 5456    {       g  x
		 g  y		  g  filenamef  system/vm/inspect.scm
 		 	$	 	$	 	 			   Chi      h   i  -  . , 3  #   44L 55O L Q  $  ~"  4 >  "  G  6 $  S4L  5$  B4L  545	4
54455456""44554>  "  G  6    a      g  cmd
	  g  rhash	!  g  help-cmd		,  g  v		v  g  p		{  g  canonical-name	   g  names	    g  filenamef  system/vm/inspect.scm
	y			{			{	"	!	{		!	{		9 		> 		C 		J 		W 		Y 		Y 	
	\ 		` 	
	a 		m 		n	}		v	}	
	{	~		{	}	
	~		! 	}	
  	  	#  	  	  	)  	  	  	  	  	  	  	
  	  	  	  	 '	 
  g  nameg  cg  documentationf  Show this help message. Cjkl:mO=     h   [   ] LL @       S       g  filenamef  system/vm/inspect.scm
 		 			 	 			
   C)no\ h    v   ] 45 4L 54L 56     n       g  filenamef  system/vm/inspect.scm
 		 		 		 		 	0	 	 		
   C>pHI)nq h   2  - 1 3  $  4L  5"  $  O O 64 5$  4>   "  G  64	4
5  >  "  G  C     *      g  cmd
			{ g  args			{ g  t			{ g  proc		)	?  g  filenamef  system/vm/inspect.scm
 		 		 		 		 		) 		) 		? 		@ 		J 		K 		^ 		` 		a 		d 		j 		q 	 			{
  g  nameg  handle Cr2F)s       h   k   ] L 6     c       g  filenamef  system/vm/inspect.scm
	^			_			_	 		
  g  nameg  prompt C  h    [   ] 4L>  "  G  L O 6 S       g  filenamef  system/vm/inspect.scm
 		 		 	 		
   C  h8      ] "  )4L O 4LL O 5>  "  G  ""     w       g  filenamef  system/vm/inspect.scm
 		 		 	
	 		# 	
	/ 	
	/ 	 		3
   C       h   u   - 1 3 E   m       g  k
			 g  args			  g  filenamef  system/vm/inspect.scm
 		 	 			
   C         h    ]A45 HHHHHH4>  "  G  4>  "  G  44	5>  "  G  4
4	5>  "  G  44	5>  "  G  44	5>  "  G  KO  Q 4>  "  G  4>  "  G  44	5>  "  G  KO  Q 4>  "  G  4>  "  G  44	5>  "  G  KO  Q 4>  "  G  4>  "  G  44	5>  "  G  KO  Q 4>  "  G  4>  "  G  44	5>  "  G  KO Q 4>  "  G  4>  "  G  44	5>  "  G  44	5>  "  G  K O 6           g  x
	 g  commands	 g  quit		 g  print		 g  write		 g  display		 g  disassemble		 g  help		 g  c		  g  c	 ! g  c	, g  c	 g  c	> g  c	H  g  filenamef  system/vm/inspect.scm
	R
		]			]			a	 	e	,	i		m		q	H	y	 	 	 	  g  nameg  inspect CRC    q       g  m
		,  g  filenamef  system/vm/inspect.scm		
	"
:	*
	4
	R
 	
   C6                                                                                                                                                                                                                                                                      ccache/system/vm/coverage.go                                                                        0000644                 00000113372 15154557173 0012066 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]X 4      h?      ] g  guile	 	g  define-module*	 	 	g  system	g  vm	g  coverage		 	
g  filenameS	f  system/vm/coverage.scm	g  importsS	 	 	g  frame	 	 	g  program	 	 	g  srfi	g  srfi-1	 	 	g  srfi-9	 	 	g  srfi-11	 	 	g  srfi-26	  	!  	"! 	#g  exportsS	$g  with-code-coverage	%g  coverage-data?	&g  instrumented-source-files	'g  instrumented/executed-lines	(g  line-execution-counts	)g  procedure-execution-count	*g  coverage-data->lcov	+$%&'()* 	,g  set-current-module	-, 	., 	/g  hashq	0g  program-objcode	1g  
hashq-proc	2g  find	3g  	assq-proc	4g  frame-procedure	5g  frame-instruction-pointer	6g  hashx-create-handle!	7g  hashv-create-handle!	8g  make-hash-table	9g  vm-trace-level	:g  vm-next-hook	;g  set-vm-trace-level!	<g  	add-hook!	=g  remove-hook!	>g  call-with-vm	?g  make-coverage-data	@g  <coverage-data>	Ag  %%make-coverage-data-procedure	Bg  make-syntax-transformer	CB 	DB 	Eg  %make-coverage-data	Fg  macro	Gg  $sc-dispatch	HG 	IG 	Jg  _	Kg  any	LJKKKK 	Mg  syntax-object	Ng  lambda	Og  m-8d25f648290-30	Pg  top	QOP 	Rg  ribcage	Sg  t-8d25f648290-2c	Tg  t-8d25f648290-2d	Ug  t-8d25f648290-2e	Vg  t-8d25f648290-2f	WSTUV 	XQQQQ 	Yf  l-8d25f648290-35	Zf  l-8d25f648290-36	[f  l-8d25f648290-37	\f  l-8d25f648290-38	]YZ[\ 	^RWX] 	_R 	`g  x	a` 	bQ 	cf  l-8d25f648290-32	dc 	eRabd 	fg  shift	gg  	proc-name	hg  args	igh 	jP 	kjj 	lf  l-1e8ba8b5a-2ba	mf  l-1e8ba8b5a-2bb	nlm 	oRikn 	pg  key	qg  value	rg  name	sg  formals	tg  body	upqrst 	vjjjjj 	wf  l-1e8ba8b5a-2ad	xf  l-1e8ba8b5a-2ae	yf  l-1e8ba8b5a-2af	zf  l-1e8ba8b5a-2b0	{f  l-1e8ba8b5a-2b1	|wxyz{ 	}Ruv| 	~g  make-procedure-name	~  j  f  l-1e8ba8b5a-29d   R  j  f  l-1e8ba8b5a-29c   Ra  Q^_ef____o}  g  hygiene   MN  g  procedure->ip-counts j^_e    M  g  procedure->sources M  g  file->procedures M  g  file->line-counts M    g  make-struct g  m-8d25f648290-2a P  g  t-1e8ba8b5a-38d g  t-1e8ba8b5a-38c g  t-1e8ba8b5a-38b   g  m-1e8ba8b5a-38e P    f  l-1e8ba8b5a-392 f  l-1e8ba8b5a-393 f  l-1e8ba8b5a-394   R  g  	ctor-args   f  l-1e8ba8b5a-37a   R  g  ctor g  field   f  l-1e8ba8b5a-376 f  l-1e8ba8b5a-377   Rk  g  form g  	type-name g  constructor-spec g  field-names   jjjj  f  l-1e8ba8b5a-36b f  l-1e8ba8b5a-36c f  l-1e8ba8b5a-36d f  l-1e8ba8b5a-36e   R  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers   jjjjjjjj  f  l-1e8ba8b5a-343 f  l-1e8ba8b5a-341 f  l-1e8ba8b5a-33f f  l-1e8ba8b5a-33d f  l-1e8ba8b5a-33b f  l-1e8ba8b5a-339 f  l-1e8ba8b5a-337 f  l-1e8ba8b5a-335   R  f  l-1e8ba8b5a-334   Ra  ^_ef_____  M  M@  M
      g  each-any Jی g  syntax-violation     f  Wrong number of arguments g  identifier?     j_e  MA      f  -source expression failed to match any pattern g  record-type-vtable     g  pwpwpwpw g  default-record-printer       g  set-struct-vtable-name!     g  vtable-offset-user     g  %coverage-data?-procedure JK  g  m-8d25f648290-43 P  g  t-8d25f648290-42     f  l-8d25f648290-48   R f  l-8d25f648290-45 Ra  _f____o} MN g  objg  t-1e8ba8b5a-47eg  t-1e8ba8b5a-478	g  t-1e8ba8b5a-479
g  t-1e8ba8b5a-47ag  t-1e8ba8b5a-47dg  t-1e8ba8b5a-47cg  t-1e8ba8b5a-47b	
 g  m-1e8ba8b5a-47fP  f  l-1e8ba8b5a-483f  l-1e8ba8b5a-484f  l-1e8ba8b5a-485f  l-1e8ba8b5a-486f  l-1e8ba8b5a-487f  l-1e8ba8b5a-488f  l-1e8ba8b5a-489 R g  	copier-id f  l-1e8ba8b5a-476 R  g  	ctor-name!  "f  l-1e8ba8b5a-46e#" $R!# % &f  l-1e8ba8b5a-46c'& (R%' )g  layout*) +f  l-1e8ba8b5a-46a,+ -R*, .g  
immutable?/. 0f  l-1e8ba8b5a-46810 2R/1 3g  field-count43 5f  l-1e8ba8b5a-46665 7R46 8g  
getter-ids98 :f  l-1e8ba8b5a-463;: <R9; =g  	field-ids>= ?f  l-1e8ba8b5a-460@? AR>@ Bg  predicate-nameCg  
field-specD.BC Ejjjjjj Ff  l-1e8ba8b5a-453Gf  l-1e8ba8b5a-454Hf  l-1e8ba8b5a-455If  l-1e8ba8b5a-456Jf  l-1e8ba8b5a-457Kf  l-1e8ba8b5a-458LFGHIJK MRDEL N _f______$_(_-_2_7_<_AM OMN PO Qg  andRMQN Sg  struct?TMSN UTO Vg  eq?WMVN Xg  struct-vtableYMXN ZYO [j _ \M@[ ]WZ\ ^RU] _P^ `j_ aM` bg  throw-bad-structcb db eg  data-procedure->ip-countsfg  $%data-procedure->ip-counts-proceduregg  free-idhg  
%%on-errorig  m-8d25f648290-4fjiP kj lf  l-8d25f648290-51ml nRakm oj_nf____o} pMho qgp rqK sg  %%typetg  t-1e8ba8b5a-3a5ug  t-1e8ba8b5a-3a6vg  t-1e8ba8b5a-3a7wg  t-1e8ba8b5a-3a8xg  t-1e8ba8b5a-3a9yg  t-1e8ba8b5a-3aazg  t-1e8ba8b5a-3ab{tuvwxyz |g  m-1e8ba8b5a-3ac}|P ~}}}}}}} f  l-1e8ba8b5a-3b0f  l-1e8ba8b5a-3b1f  l-1e8ba8b5a-3b2f  l-1e8ba8b5a-3b3f  l-1e8ba8b5a-3b4f  l-1e8ba8b5a-3b5f  l-1e8ba8b5a-3b6 R{~ g  getterg  index f  l-1e8ba8b5a-3a3f  l-1e8ba8b5a-3a4 Rk 8 jjj f  l-1e8ba8b5a-39ef  l-1e8ba8b5a-39ff  l-1e8ba8b5a-3a0 R _nf_____ Ms g JrK g  ckg  errg  s jj f  l-8d25f648290-54f  l-8d25f648290-55 R j_nf____o} M g  quoteM j_n M@   g  %%indexM g JrK f  l-8d25f648290-59f  l-8d25f648290-5a R j_nf____o} M M _n M
   g  %%copierM g JrK f  l-8d25f648290-5ef  l-8d25f648290-5f R j_nf____o} M M g  %%<coverage-data>-set-fieldsj_n M   g  t-8d25f648290-4e f  l-8d25f648290-63 Rk j_nf____o} MN _nf_____ M  g  ifM MV MX  j_n M@  g  
struct-refM _n M
  Mb M Me     j_n Mf g  data-procedure->sourcesg  "%data-procedure->sources-procedureg  m-8d25f648290-6aP  f  l-8d25f648290-6c Ra _f____o} Mh g K _f_____ Ms g JK  f  l-8d25f648290-6ff  l-8d25f648290-70 R _f____o}  M M j_ M@   M g JK 	f  l-8d25f648290-74
f  l-8d25f648290-75	
 R _f____o} M M _ M   M g JK f  l-8d25f648290-79f  l-8d25f648290-7a R _f____o} M M j_ M   !  "g  t-8d25f648290-69#" $f  l-8d25f648290-7e%$ &R#% '&_f____o} (MN' )&_f_____ *M) +* ,M) -MV) .MX) /.* 0j&_ 1M@0 2-/1 3M) 4&_ 5M4 63*5 7Mb) 8M) 9M0 :89 ;7*: <,26; =(+< >j_ ?M> @g  data-file->proceduresAg   %data-file->procedures-procedureBg  m-8d25f648290-85CBP DC Ef  l-8d25f648290-87FE GRaDF HC_Gf____o} IMhH JgI KJK L_Gf_____ MMsL NgM OJKNK PCC Qf  l-8d25f648290-8aRf  l-8d25f648290-8bSQR TRPS UCT_Gf____o} VMU WMU XjT_G YM@X ZWY [Z \ML ]g\ ^JK]K _f  l-8d25f648290-8f`f  l-8d25f648290-90a_` bRPa cCb_Gf____o} dMc eMc fb_G gM	f heg ih jML kgj lJKkK mf  l-8d25f648290-94nf  l-8d25f648290-95omn pRPo qCp_Gf____o} rMq sMq tjp_G uMt vsu wv xg  t-8d25f648290-84yx zf  l-8d25f648290-99{z |RyD{ }C|_Gf____o} ~MN} |_Gf_____ M  M MV MX  j|_G M@  M |_G M	  Mb M M@    ~ j_G MA g  data-file->line-countsg  !%data-file->line-counts-procedureg  m-8d25f648290-a0P  f  l-8d25f648290-a2 Ra _f____o} Mh g K _f_____ Ms g JK  f  l-8d25f648290-a5f  l-8d25f648290-a6 R _f____o} M M j_ M@   M g JK f  l-8d25f648290-aaf  l-8d25f648290-ab R _f____o} M M _ M	   M g JK f  l-8d25f648290-aff  l-8d25f648290-b0 R _f____o} M M j_ M   g  t-8d25f648290-9f f  l-8d25f648290-b4 R _f____o} MN _f_____ M  M MV MX  j_ M@  M _ M	  Mb M M     j_ M g  eachKK  KKKg  %%set-fieldsg  dummyg  check?g  expr g  m-8d25f648290-bbP  f  l-8d25f648290-c0f  l-8d25f648290-c1f  l-8d25f648290-c2f  l-8d25f648290-c3f  l-8d25f648290-c4  R  f  l-8d25f648290-bd Ra g  t-1e8ba8b5a-3c4g  t-1e8ba8b5a-3c6g  t-1e8ba8b5a-3c5 	g  m-1e8ba8b5a-3c7
	P 


 f  l-1e8ba8b5a-3cbf  l-1e8ba8b5a-3ccf  l-1e8ba8b5a-3cd R f  l-1e8ba8b5a-3c1f  l-1e8ba8b5a-3c2f  l-1e8ba8b5a-3c3 R  _f____ M j _ M@ Me M M@ M  g  map  ! "g  list#g  hash-for-each$g  program-sources*%g  source:file&g  for-each'g  source:line(g  hash-create-handle!)g  max*g  
append-map+g  closed-over-procedures,g  closest-source-line-g  	hashq-ref.g  source:addr/g  module-procedures0g  loaded-modules1g  and=>2g  	hashx-ref3g  	hashv-ref4g  program?5g  program-sources6g  
hashq-set!7g  hash-ref8g  file-procedures9g  	hash-fold:

;g  
alist-cons<g  module-submodules=g  resolve-module>g  
procedure??g  module-obarray@g  memqAg  foldBg  appendCg  vector->listDg  program-objectsE  Fg  program-free-variablesGg  formatHf  TN:~%Ig  search-pathJg  
%load-pathKg  string?Lf  SF:~A~%Mg  source:line-for-userNg  procedure-nameOf  anonymous-l~aPf  
FN:~A,~A~%Qf  FNDA:~A,~A~%Rf  
DA:~A,~A~%Sf  LH: ~A~%Tf  LF: ~A~%Uf  end_of_record~%Vg  current-error-portWf  "skipping unknown source file: ~a~%C 5   hpR     ]4	
"#+5 4. >  "  G   /0    h      ]4 56        g  proc
		 g  n		  g  filenamef  system/vm/coverage.scm
	0
		2				2	 			  g  nameg  
hashq-proc C1R020 h   |   ]L 4 5C  t       g  pair
		  g  filenamef  system/vm/coverage.scm
	:	
		;		
	;	'		;			;	 		   C h      ]
4 5O 6       g  proc
		 g  alist		 g  code				  g  filenamef  system/vm/coverage.scm
	4
		9				9			:	 			  g  nameg  	assq-proc C3R4561378    h`   h  ])4 54 54M 5"  /HKJ$  4J
5C45 ""     `      g  frame
		[ g  proc			[ g  ip			[ g  
proc-entry		"	[ g  	ip-counts		)	W g  ip-entry		@	K  g  filenamef  system/vm/coverage.scm
	G			I				I			J			I			K		"	I		(	M		.	N		6	O		7	P		@	P		G	Q	$	H	Q	!	I	Q		N	S	#	S	S		W	T		W	M	 		[  g  nameg  collect! C89:;<  h    i   ] 4LL>  "  G  L L6 a       g  filenamef  system/vm/coverage.scm
	]			^		
	^	4		^			_	 		
   C;=       h    Y   ] 4LL>  "  G  L L6  Q       g  filenamef  system/vm/coverage.scm
	b			c			d	 		
   C>? 	       h   *  ]2HO Q 45K4 54 5O O  Q  Q 4>   "  G  V4 >  X4>   "  G  "  G4J5E      "      g  vm
	  g  thunk	  g  procedure->ip-counts		  g  collect!		  g  level		*  g  hook		*  g  pre		D  g  post		D  g  args	    	g  filenamef  system/vm/coverage.scm
	>
		E			Z	%	$	[	%	*	Z		9	\		p	a		~	\	 	Y	 	f	 	f	 	 	  g  nameg  with-code-coverageg  documentationf  Run THUNK, a zero-argument procedure, using VM; instrument VM to collect code
coverage data.  Return code coverage data and the values returned by THUNK. C$R@     h      ]  C       g  procedure->ip-counts
		 g  procedure->sources		 g  file->procedures			 g  file->line-counts			  g  filenamef  system/vm/coverage.scm
	m
 			  g  nameg  %%make-coverage-data-procedure CAR4DEFIL        h      ]  C       g  t-8d25f648290-2c
		 g  t-8d25f648290-2d		 g  t-8d25f648290-2e			 g  t-8d25f648290-2f			  			   CE  h   Y   ]L 6    Q       g  a
		  g  filenamef  system/vm/coverage.scm		m
 		   CJ       h   I   ] L 6A       g  filenamef  system/vm/coverage.scm		m
 		
   C h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/vm/coverage.scm
	m
 		n   C5ER@  4 @>  "  G   	Ai  @R@   h      ] $   CC      x       g  obj
		  g  filenamef  system/vm/coverage.scm
	m
 		  g  nameg  %coverage-data?-procedure CR4D%FI_  h   8   ]  C      0       g  t-8d25f648290-42
		
  		
   C%    h   Y   ]L 6    Q       g  a
		  g  filenamef  system/vm/coverage.scm		m
 		   CJ       h   I   ] L 6A       g  filenamef  system/vm/coverage.scm		m
 		
   Ca        h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  system/vm/coverage.scm
	m
 		n   C5%R@de     h      ] &   
C 6       g  s
		  g  filenamef  system/vm/coverage.scm
	m
 		  g  nameg  $%data-procedure->ip-counts-procedure CfR4DeFI   h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   8   ]  C      0       g  t-8d25f648290-4e
		
  		
   Ce   h   Y   ]L 6    Q       g  a
		  g  filenamef  system/vm/coverage.scm		m
 		   CJ       h   I   ] L 6A       g  filenamef  system/vm/coverage.scm		m
 		
   C        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/vm/coverage.scm
	m
 	    C5eR@d        h      ] &   C 6       g  s
		  g  filenamef  system/vm/coverage.scm
	m
 		  g  nameg  "%data-procedure->sources-procedure CR4DFI      h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C! h   :   ]C     2       g  err
		 g  s		  			   C=     h   8   ]  C      0       g  t-8d25f648290-69
		
  		
   C   h   Y   ]L 6    Q       g  a
		  g  filenamef  system/vm/coverage.scm		m
 		   CJ       h   I   ] L 6A       g  filenamef  system/vm/coverage.scm		m
 		
   C?        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/vm/coverage.scm
	m
 	    C5R@d@        h       ] &   	C 6       }       g  s
		  g  filenamef  system/vm/coverage.scm
	m
 		  g  nameg   %data-file->procedures-procedure CAR4D@FIOV[       h   :   ]C     2       g  err
		 g  s		  			   C^di h   :   ]C     2       g  err
		 g  s		  			   Clrw h   :   ]C     2       g  err
		 g  s		  			   C     h   8   ]  C      0       g  t-8d25f648290-84
		
  		
   C@   h   Y   ]L 6    Q       g  a
		  g  filenamef  system/vm/coverage.scm		m
 		   CJ       h   I   ] L 6A       g  filenamef  system/vm/coverage.scm		m
 		
   C        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/vm/coverage.scm
	m
 	    C5@R@d        h       ] &   	C 6       ~       g  s
		  g  filenamef  system/vm/coverage.scm
	m
 		  g  nameg  !%data-file->line-counts-procedure CR4DFI      h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   8   ]  C      0       g  t-8d25f648290-9f
		
  		
   C   h   Y   ]L 6    Q       g  a
		  g  filenamef  system/vm/coverage.scm		m
 		   CJ       h   I   ] L 6A       g  filenamef  system/vm/coverage.scm		m
 		
   C        h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  system/vm/coverage.scm
	m
 	    C5R4DFI!"   h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  system/vm/coverage.scm
	m
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R8@#$%&%'(87)        hX   K  ]!4 54 54L 5$  "  454
54
5C       C      g  source
		Q g  file		Q g  line			Q g  
file-entry			Q g  
line-entry		A	Q  g  filenamef  system/vm/coverage.scm
 		 	-	
 	-	 	!	 		 		# 		' 		. 	!	6 		7 		< 	0	A 		A 		F 		K 	$	N 		O 	
 		Q   C*$   h   j   ]L  6      b       g  t-8d25f648290-118
		
  g  filenamef  system/vm/coverage.scm
 	+ 		
   C+#,(87)       hP   @  ]4L  54LL5$  "  454
545C     8      g  ip
		K g  count		K g  line			K g  
file-entry			K g  
line-entry		:	K  g  filenamef  system/vm/coverage.scm
 		 	-	 	!	 		 		 		  		' 	!	/ 		0 		5 	0	: 		: 		? 		D 	$	H 		I 	
 		K	   C 
    hh   "  ]4L 5$  45"  $  ;4L O 4LO 4 55>  "  G  	L O 6C        g  proc
		f g  	ip-counts		f g  sources			f g  file		!	f  g  filenamef  system/vm/coverage.scm
 		 	%	 		 	*	 	%	 	*	 	7	 	*	! 		) 		* 		4 		> 	+	F 		K 		d 	 		f	   C&-&$%&,(87) hP   ,  ]4L  54LL5$  "  454
54
5C      $      g  ip
		J g  line		J g  
file-entry			J g  
line-entry		:	J  g  filenamef  system/vm/coverage.scm
 	)	 	7	 	+	 		 		 		  		' 	!	/ 		0 		5 	0	: 		: 		? 		D 	$	G 		H 	
 		J   C.   hH      ]4L  5$  45"  $  LO 456C            g  proc
		C g  sources		C g  file		!	C  g  filenamef  system/vm/coverage.scm
 		 	1	 	!	 	6	 	1	 	6	 	C	 	6	! 	!	) 	#	7 	)	A 	( 		C   C+    h(      ]4L 5$  CLL O 4 56   y       g  proc
		%  g  filenamef  system/vm/coverage.scm
 		 		 		 		% 	 		%   C*/0 
  hx   w  ]!454	d54	d5  4O  >  "  G  4O 44	5 5>  "  G  C      o      g  procedure->ip-counts
		r g  procedure->sources	
	r g  file->procedures			r g  file->line-counts			r g  data		+	r  g  filenamef  system/vm/coverage.scm
 
	 		
 		 		 		 		 		+ 		+ 		. 		I 		W 		\ 	,	b 		g 	 		r  g  nameg  make-coverage-data C?R$1213@de.3      h      ]	4L 5 
6          g  	ip-counts
		 g  entry-ip	
	  g  filenamef  system/vm/coverage.scm
 		 	"	 	/	
 	"	
 		 	 		   C 
hH     ]
4 5$  04 &   
"  	4 55	O 6C        g  data
		F g  proc		F g  sources			F  g  filenamef  system/vm/coverage.scm
 
	 		 		 			 		 		  		; 		D 		 
		F	  g  nameg  procedure-execution-countg  documentationf Return the number of times PROC's code was executed, according to DATA, or #f
if PROC was not executed.  When PROC is a closure, the number of times its code
was executed is returned, not the number of times this code associated with this
particular closure was executed. C)R-@d45@%(6      h     ]*4 &   "  	4 55$  C45$  45 &   "  	4 5 &  	 	"  	4 5$  8454	54
>  "  G  CCC       g  data
	  g  proc	  g  t		#  g  sources		u  g  p->s		u  g  f->p		u  g  file	   g  entry	    g  filenamef  system/vm/coverage.scm
 
	 		 		# 		# 		/ 		9 		: 		C 		] 		u 		~ 	  	  	  	,  	  	  	  	>  	  	  	  	.  	#  	 	 	  g  nameg  program-sources* C$R7@d@     h(      ] &  	 	"  	4 56           g  data
		$ g  file		$  g  filenamef  system/vm/coverage.scm
 
	 		" 	.	$ 	 		$	  g  nameg  file-procedures C8R17@d9  h(      ]
$  "  C             g  line
		" g  count		" g  
instr+exec			" g  instr			" g  exec			"  g  filenamef  system/vm/coverage.scm
 		 	'	 	'	 		 	"	 	&	 	"	 	&	! 	 
		"	   C:     h   v   ] 6    n       g  line-counts
		  g  filenamef  system/vm/coverage.scm
 		 		 	 		   C       h8   p  ]
H44 &  	 	"  	4 555KJJDh      g  data
		8 g  file		8 g  
instr+exec			8  g  filenamef  system/vm/coverage.scm
 
	 			 		 		* 		. 		3 	
	6 		8 	 
		8	  g  nameg  instrumented/executed-linesg  documentationf  dReturn the number of instrumented and the number of executed source lines in
FILE according to DATA. C'R17@d9;    h   v   ] 6     n       g  line-counts
		  g  filenamef  system/vm/coverage.scm
 			 	!	 	 		   C       h0   <  ]4 &  	 	"  	4 556      4      g  data
		* g  file		*  g  filenamef  system/vm/coverage.scm
 
	 			
 		& 			* 	 		*	  g  nameg  line-execution-countsg  documentationf  rReturn a list of line number/execution count pairs for FILE, or #f if FILE
is not among the files covered by DATA. C(R9   h      ] C       g  file
		 g  counts		 g  files			  g  filenamef  system/vm/coverage.scm
			 			   C@d        h(   +  ] &  	 	"  	4 56    #      g  data
		$  g  filenamef  system/vm/coverage.scm
 
			
		$	 		$  g  nameg  instrumented-source-filesg  documentationf  xReturn the list of `instrumented' source files, i.e., source files whose code
was loaded at the time DATA was collected. C&R89-6<      h8      ]4M5$  C4M>  "  G  L 456        g  name
		7 g  module		7 g  result			7  g  filenamef  system/vm/coverage.scm
								*		5		7	 		7	   C  h      ]L LO  6            g  modules
		 g  result		  g  filenamef  system/vm/coverage.scm
			 			  g  nameg  loop C<= h0      ]H 45 K O  Q 44556          g  seen
		- g  loop		-  g  filenamef  system/vm/coverage.scm

							"	)	%	9	(	)	*		+		-	 		-
  g  nameg  loaded-modules C0R9>        h(      ]$  45$  CCC          g  binding
		% g  var		% g  result			% g  value			"  g  filenamef  system/vm/coverage.scm
								 			 		 		!	 			%	   C?   h      ]4 56       g  module
		  g  filenamef  system/vm/coverage.scm

	$		%			 		  g  nameg  module-procedures C/R.'   hX   c  ]"  1(  C45$  C45"  $  4 5"  "   [      g  sources
		U g  ip		U g  sources			7 g  line			7 g  source			7  g  filenamef  system/vm/coverage.scm
'
	+		-		/		/		0		0		"0	
	(2		)2	"	72		7+		<,		@,		A,	+	F,	8	H,	+	U+	 		U	  g  nameg  closest-source-line C,R4@ABCDEF 	   hX     ]
4 5$  F4 5$  CL  444 5$  "  54 556C        g  proc
		V g  result		V g  t		3	F  g  filenamef  system/vm/coverage.scm
6		8		8		8	"	8		&9		':		*:		-:	(	3:	$	C:	?	H:		I;		Q:		S9	 		V	  g  nameg  loop C4ABCDEF 	hX     ]O Q 4 5$  6  444 5$  "  54 556C            g  proc
		R g  loop	
	R g  t		0	C  g  filenamef  system/vm/coverage.scm
4
	
6		8		8		#7		$:		':		*:	(	0:	$	@:	?	E:		F;		N:		P9		Q7	 		R  g  nameg  closed-over-procedures C+RGH&8IJKGL&4$MNGOP1)GQ  h   p   ]L L 6  h       g  count
		  g  filenamef  system/vm/coverage.scm
S		T	(	T	 		   C     h   {  ]4 5$  p4L  5$  \454 5$  "  
454L>  "  G  4	L  5
LO 6CC s      g  proc
		 g  sources		} g  line		'	{ g  t		0	K g  name		K	{  g  filenamef  system/vm/coverage.scm
I		K			K		L		L			M		M		 N		%N	3	'N		'N		*O	!	0O		?P	!	DP	,	HP	!	KN		NQ		TQ		]Q		hR		{R	 		  g  nameg  dump-function CGR   h       ]  L 6              g  
line+count
		 g  line		 g  count			  g  filenamef  system/vm/coverage.scm
_	 	`	/	a	/	`	"	b	1	c	,	b	$ 		   C('STUVW     h     ]!4L 54 545$  4L >  "  G  4LL O >  "  G  4	L O 4
L 5>  "  G  4L >  G 4L >  "  G  4L >  "  G  L 645  6       g  file
	  g  procs	  g  path		  g  instr	   g  exec	    g  filenamef  system/vm/coverage.scm
X		Y		Z		Y		[		#[		$]		*]	#	1]		:^		U_		_d	 	l_		uf	$ e	 g	 g	% g	 h	 h	% h	 i	# i	 k	 l	 k	 	    C&        h0     ]4>  "  G   O 4 56            g  data
		* g  port		*  g  filenamef  system/vm/coverage.scm
C
	W			W		W		"n		*X	 		*	  g  nameg  coverage-data->lcovg  documentationf Traverse code coverage information DATA, as obtained with
`with-code-coverage', and write coverage information in the LCOV format to PORT.
The report will include all the modules loaded at the time coverage data was
gathered, even if their code was not executed. C*RC           g  m
		, g  rtd
t  g  filenamef  system/vm/coverage.scm		
 	0
Y	4
]	>
	v	m
1B 
4 
7t 
8a 
; 
> 
@6 
C
D
F'
I4
RjC
 	Rl
   C6                                                                                                                                                                                                                                                                       ccache/system/vm/vm.go                                                                              0000644                 00000002044 15154557173 0010706 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] ' 4       h      ] g  guile	 	g  define-module*	 	 	g  system	g  vm	 		g  filenameS	
f  system/vm/vm.scm	g  exportsS	g  vm?	g  make-vm	g  the-vm	g  call-with-vm	g  vm:ip	g  vm:sp	g  vm:fp	g  vm-trace-level	g  set-vm-trace-level!	g  	vm-engine	g  set-vm-engine!	g  set-default-vm-engine!	g  vm-push-continuation-hook	g  vm-pop-continuation-hook	g  vm-apply-hook	g  vm-next-hook	g  vm-abort-continuation-hook	g  vm-restore-continuation-hook	 	g  set-current-module	  	! 	"g  load-extension	#g  string-append	$f  	libguile-	%g  effective-version	&f  scm_init_vmC 5       h@      ]4	
5 4! >  "  G   "i4#i$4%i5 5&6z       g  m
		(  g  filenamef  system/vm/vm.scm		
	-	 		3	 		4	 	+	<	 		>	!		@	 
 		@
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                             ccache/system/vm/instruction.go                                                                     0000644                 00000001515 15154557173 0012647 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.05      ]  4 h)      ] g  guile	 	g  define-module*	 	 	g  system	g  vm	g  instruction		 	
g  filenameS	f  system/vm/instruction.scm	g  exportsS	g  instruction-list	g  instruction?	g  instruction-length	g  instruction-pops	g  instruction-pushes	g  instruction->opcode	g  opcode->instruction	 	g  set-current-module	 	 	g  load-extension	g  string-append	f  	libguile-	g  effective-version	f  scm_init_instructionsC 5  h@      ]4	
5 4 >  "  G   i4i4i5 56       g  m
		(  g  filenamef  system/vm/instruction.scm		
	-			3			4		+	<			>			@	
 		@
   C6                                                                                                                                                                                    ccache/system/vm/trace.go                                                                           0000644                 00000017500 15154557173 0011365 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0(      ] h 4      h      ] g  guile	 	g  define-module*	 	 	g  system	g  vm	g  trace		 	
g  filenameS	f  system/vm/trace.scm	g  importsS	g  base	g  syntax	 	 	 	 	g  frame	 	 	g  program	 	 	g  objcode	 	 	g  traps	 	 	g  rnrs	 g  bytevectors	!  	"! 	#g  instruction	$# 	%$ 	&g  ice-9	'g  format	(&' 	)( 	*"%) 		+g  exportsS	,g  trace-calls-in-procedure	-g  trace-calls-to-procedure	.g  trace-instructions-in-procedure	/g  call-with-trace	0,-./ 	1g  set-current-module	21 	31 	4g  *objcode-header-len*	5g  string-append	6g  string-length	7f   	8g  build-prefix	9f  |  	:f  ~d> 	;g  current-error-port	<f  ~a~v:@y
	=g  frame-call-representation	>g  print-application	?g  frame-num-locals	@g  frame-local-ref	Af  ~d< 	Bf  ~ano values
	Cf  ~a~d values:~{ ~a~}
	Dg  map	Ef  ~v:@y	Fg  frame-return-values	Gg  print-return	Hg  widthS	IH	Jg  vmS	KJ		Lg  prefixS	ML		Ng  
max-indentS	ON		PIKMO 	Qg  the-vm	Rf  trace: 	Sg  trap-calls-to-procedure	Tg  trap-calls-in-dynamic-extent	UN		VIKU 	Wg  #trap-instructions-in-dynamic-extent	Xg  frame-instruction-pointer	Yg  program-objcode	Zg  frame-procedure	[g  objcode->bytecode	\f  ~8d: ~a
	]g  opcode->instruction	^g  calls?S	_^	`g  instructions?S	a`		bH		cJ		dN		e_abcd 	fg  set-vm-trace-level!	gg  vm-trace-levelC 5 h@     ]4	
*+05 43 >  "  G   	4R56'7   h`   x  ]"  M$   64545$  45" 456
"  p      g  prefix
		^ g  depth		^ g  infix			^ g  numeric-format			^ g  
max-indent			^ g  indent			S g  n			S  g  filenamef  system/vm/trace.scm
	&
		'			)			(			*			+			+	#	&	+			)	+		-	(		.	,	
	9	,	'	A	,		H	.	#	S	.		S	'		U	'		^	'	 		^	  g  nameg  build-prefix C8R89:';<=   h0   %  ]4545 4 56             g  frame
		) g  depth		) g  width			) g  prefix			) g  
max-indent			) g  prefix			)  g  filenamef  system/vm/trace.scm
	0
		1			1	+		1	1		1			1			2			2	!	!	5		)	2	 		)	  g  nameg  print-application C>R?@89A';B<CD'E h   h   ]L  6   `       g  val
		  g  filenamef  system/vm/trace.scm
	H			I	!		I	 		   CF   h     ]4 54 545
$  45 6$  45 	4 	5645 
4O 4 556            g  frame
	  g  depth	  g  width		  g  prefix		  g  
max-indent		  g  len			  g  nvalues		  g  prefix		&   g  filenamef  system/vm/trace.scm
	7
		8				8			9			9	)		9			8			:		 	:	,	"	:	2	&	:		&	8		0	;		3	=		9	=	$	=	=		E	;		H	?		N	?	$	S	B		\	B	&	^	B		`	?		c	F		i	F	$	n	H		x	J	 	H	 	F	 	 	  g  nameg  print-return CGRPQRS>     h      ] LLL 6       g  frame
		 g  depth		  g  filenamef  system/vm/trace.scm
	O			P	 			  g  nameg  apply-handler CG   h      ] LLL 6       g  frame
		 g  depth		  g  filenamef  system/vm/trace.scm
	Q			R	 			  g  nameg  return-handler CJ   hh   '  - /   0   3 #  	P#  45 #  #  	( O O 6             g  proc
		a g  width		a g  vm			a g  prefix			a g  
max-indent			a  g  filenamef  system/vm/trace.scm
	L
	$	L	=	2	M	+	?	N	/	a	S	 		a
g  widthSg  vmS	g  prefixS	g  
max-indentS	   g  nameg  trace-calls-to-procedure C-RPQRT>       h      ] LLL 6       g  frame
		 g  depth		  g  filenamef  system/vm/trace.scm
	Y			Z	 			  g  nameg  apply-handler CG   h      ] LLL 6       g  frame
		 g  depth		  g  filenamef  system/vm/trace.scm
	[			\	 			  g  nameg  return-handler CJ   hh   '  - /   0   3 #  	P#  45 #  #  	( O O 6             g  proc
		a g  width		a g  vm			a g  prefix			a g  
max-indent			a  g  filenamef  system/vm/trace.scm
	V
	$	V	=	2	W	+	?	X	/	a	]	 		a
g  widthSg  vmS	g  prefixS	g  
max-indentS	   g  nameg  trace-calls-in-procedure C,RVQWXYZ[4'\] 	  h8     ]4 544 5545456	      g  frame
		8 g  ip			8 g  objcode			8 g  opcode		&	8  g  filenamef  system/vm/trace.scm
	b			c				c			d			d	%		d			c			e	&	%	f	&	&	e		&	c		-	g		0	g	 	8	g	 		8  g  nameg  
trace-next CJ  hH     - /   0   3 #  	P#  45 #  	( 6            g  proc
		C g  width		C g  vm			C g  
max-indent			C  g  filenamef  system/vm/trace.scm
	`
	$	`	D	5	a	6	C	i	 		C
g  widthSg  vmS	g  
max-indentS	   g  nameg  trace-instructions-in-procedure C.ReQ,JHN.fg  hP      ] L$  4LLLL5N"   L $  4LLLL5N"   L4L56         g  filenamef  system/vm/trace.scm
	t			u				w			v		'	y		(	{		<	z		E	}	$	L	}	 	N	}	 		N
   Cfg  hX      ] 4L4L5>  "  G  M$  4M>   "  G  "   M $  4M >   "  G  "   NN C       g  filenamef  system/vm/trace.scm
			 		 	$	 	 	 		" 		# 		< 		= 		S 		V 	 		X
   C,JHN.fg      hP      ] L$  4LLLL5N"   L $  4LLLL5N"   L4L56         g  filenamef  system/vm/trace.scm
	t			u				w			v		'	y		(	{		<	z		E	}	$	L	}	 	N	}	 		N
   Cfg  hX      ] 4L4L5>  "  G  M$  4M>   "  G  "   M $  4M >   "  G  "   NN C       g  filenamef  system/vm/trace.scm
			 		 	$	 	 	 		" 		# 		< 		= 		S 		V 	 		X
   Cfg        hX      ] 4L4L5>  "  G  M$  4M>   "  G  "   M $  4M >   "  G  "   NN C       g  filenamef  system/vm/trace.scm
			 		 	$	 	 	 		" 		# 		< 		= 		S 		V 	 		X
   C     h     - /   0   3 #  #  #  	P#  45 #  	(HH O O 4 O >   "  G  V4 >   X4O >   "  G  CX4O >   "  G  F       ~      g  thunk
	  g  calls?	  g  instructions?		  g  width		  g  vm		  g  
max-indent		  g  	call-trap		K  g  	inst-trap		K   g  filenamef  system/vm/trace.scm
	o
	6	p	)	G	p	?	K	q		p	s	 	 
g  calls?Sg  instructions?S	g  widthS	g  vmS	g  
max-indentS	   g  nameg  call-with-trace C/RC            g  m
		,  g  filenamef  system/vm/trace.scm		
	1	$
#	&
	0
	7
		L
	V
	`
9	o
 
	;
   C6                                                                                                                                                                                                 ccache/system/vm/program.go                                                                         0000644                 00000036773 15154557173 0011753 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       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$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJ '	Lg  set-current-module	ML 	NL 	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	vu 	wu 	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-programC 5  hH1    ]4	
"#K5 4N >  "  G   4Oi4PiQ4Ri5 5S>  "  G        h      ]  C       g  name
		 g  boxed?		 g  index			 g  start			 g  end			  g  filenamef  system/vm/program.scm
	5
		6	 			  g  nameg  make-binding C%RT h   x   ] 
6       p       g  b
			  g  filenamef  system/vm/program.scm
	7
			7	 			  g  nameg  binding:name C&RT       h   z   ] 6       r       g  b
			  g  filenamef  system/vm/program.scm
	8
			8	 			  g  nameg  binding:boxed? C'RT     h   y   ] 	6      q       g  b
		
  g  filenamef  system/vm/program.scm
	9
	
	9	 		
  g  nameg  binding:index C(RT      h   y   ] 	6      q       g  b
		
  g  filenamef  system/vm/program.scm
	:
	
	:	 		
  g  nameg  binding:start C)RT      h   w   ] 	6      o       g  b
		
  g  filenamef  system/vm/program.scm
	;
	
	;	 		
  g  nameg  binding:end C*R    h   |   ] C  t       g  source
		  g  filenamef  system/vm/program.scm
	=
		>	 		  g  nameg  source:addr C+R       h   |   ] C t       g  source
		  g  filenamef  system/vm/program.scm
	?
		@	 		  g  nameg  source:file C.R       h   |   ] Ct       g  source
		  g  filenamef  system/vm/program.scm
	A
		B	 		  g  nameg  source:line C,R       h   ~   ] Cv       g  source
		  g  filenamef  system/vm/program.scm
	C
		D	 		  g  nameg  source:column C-R, h      ]4 5C            g  source
		  g  filenamef  system/vm/program.scm
	I
		J		
	J	 		  g  nameg  source:line-for-user C/R	URUVWX       hh     ]4 5&    	"  645
$  " 	 		 	"  45C      g  bytecode
		h g  ip		h g  idx			h g  inst			h  g  filenamef  system/vm/program.scm
	Q
		R			R		
	S			S	$		S			R			V			U		"	W	1	#	W		*	X	1	+	X		,	W	
	1	Y		9	Y	
	=	U		B	\	.	C	\		F	\		M	]	.	N	]		Q	]		R	\	
	Y	^	)	Z	^		[	\	
	`	a	
	g	U	 		h	  g  nameg  bytecode-instruction-length CYRZB[Y\]0  h     ]I44 55"  n(  6$  P"  6	$  		4	5	"	"	"64 5
"         g  proc
	  g  bv	  g  in		  g  out		  g  ip		  g  v		#  g  vx		2	| g  vy		2	| g  ip		:	p g  next			:	p  
g  filenamef  system/vm/program.scm
	m
		n			n			n			n			o			r		 	t		#	v		#	v		:	x		?	z		C	z		H	{	#	Q	{		Y	{		\	|		a	}		p	|		p	x	  	  	 	o	 	o	 	p	 	o	 	   g  nameg  program-sources-pre-retire C1R^_`   h      ] C      {       g  x
		
 g  y		
  g  filenamef  system/vm/program.scm
 		 	)	 	1		 	& 		
	   Ca(b    h     ]!"  n(  4564455$  $4 >  "  G  "45 " " ~      g  locs
		 g  ret		t g  locs			t g  b			t g  t		.	t  g  filenamef  system/vm/program.scm
 
	 		 		 		 		 		 		! 		& 		. 		. 	
	7 		@ 	#	E 		R 		Z 		[ 		f 	)	i 		l 		t 		t 		u 		 	 		  g  nameg  collapse-locals CcR3c       h       ]	4 5$  6C              g  prog
		 g  t			  g  filenamef  system/vm/program.scm
 
	 				 		 	 		  g  nameg  program-bindings-by-index C4R[)*4       h     ]"  m(  6"  I(  "  F"  	"45$  45$  
"  """"4 5"           g  prog
	  g  ip	  g  in			s g  out			s g  binds			b  g  filenamef  system/vm/program.scm
 
	 		 		 		 		 		 		, 	!	2 		2 		3 		8 	(	: 		= 		A 		D 		I 	&	K 		L 		S 		V 		b 		e 		k 		s 		s 		t 		{ 	6  	 	 	  g  nameg  program-bindings-for-ip C5R\d  h8      ] $  $  $  C 6 6          g  a
		5 g  vx		- g  vy			-  g  filenamef  system/vm/program.scm
 
	 		) 	3	- 	,	1 	3	5 	, 		5  g  nameg  arity:start C8R\d h8      ]	 $     $  C 6 6              g  a
		1 g  vy		)  g  filenamef  system/vm/program.scm
 
	 		% 	1	) 	*	- 	1	1 	* 		1  g  nameg  	arity:end C9R h8      ] $  ,  $  $  C
C
C
C        g  a
		7 g  vy		5 g  vy			3  g  filenamef  system/vm/program.scm
 
	 	 		7  g  nameg  
arity:nreq C:R    hP      ] $  >  $  ,$  $  C
C
C
C
C              g  a
		I g  vy		G g  vy			E g  vy		,	C  g  filenamef  system/vm/program.scm
 
	 	 		I  g  nameg  
arity:nopt C;R    h`      ]! $  P  $  >$  ,$  $  CCCCCC            g  a
		[ g  vy		Y g  vy			W g  vy		,	U g  vy		<	S  g  filenamef  system/vm/program.scm
 
	 	 		[  g  nameg  arity:rest? C<R   h     ]A $    $  o$  ]$  K$  9$  '$  (  CCCCCCCCC           g  a
	  g  vy	  g  vy		  g  vy		,  g  vy		<  g  vy		L  g  vx		_  g  vy		_  g  vy		m	~  	g  filenamef  system/vm/program.scm
 
	 		} 	: 	   g  nameg  arity:kw C=R    h     ]A $    $  o$  ]$  K$  9$  '$  (  CCCCCCCCC          g  a
	  g  vy	  g  vy		  g  vy		,  g  vy		<  g  vy		L  g  vx		_  g  vy		_  g  vx		m	~  	g  filenamef  system/vm/program.scm
 
	 	 	   g  nameg  arity:allow-other-keys? C>R689      hh   l  ]4 5$  U"  I(  C$  7"  	"45$  45$  C""C"Cd      g  prog
		h g  ip		h g  arities				h g  arities			^  g  filenamef  system/vm/program.scm
 
	 			 		 		 			 		* 		0 		0 		1 		6 	'	8 		; 		? 		B 		G 	)	I 		J 		N 		Q 		] 		^ 		 		h	  g  nameg  program-arity C7Refghij h   8  ]Q $  x  $  e$  R$  ?$  ,
		
 CCCCCC     0      g  arglist
	  g  vx	  g  vy		  g  vx		 	 g  vy		 	 g  vx		1	} g  vy		1	} g  vx		B	{ g  vy		B	{ g  vx			S	y g  vy	
	S	y  g  filenamef  system/vm/program.scm
 
	 		Y 	 	   g  nameg  arglist->arguments-alist CkRlm    h   k   ]6c       g  i
		  g  filenamef  system/vm/program.scm
 	"	 	>	 	. 		   C^(&   h   t   ]4 54 5C      l       g  x
		  g  filenamef  system/vm/program.scm
 		 		
 	1	 	 		   C58a  h       ]	4L  5$  CL 6    z       g  i
		 g  t		  g  filenamef  system/vm/program.scm
 		 		 		 	 		   Cn=e[fgh>i:;<   h@     - . , 3 #  H44 4555O K"  
$  *4J
5	

	"
$  *4J
5	

	"$  24J
44555

	"d	4
54
54545	 C454545

	"            g  prog
	: g  arity	: g  make-placeholder		: g  var-by-index		: g  rbinds		.	< g  nreq		B g  req		B g  nopt		B g  opt		B g  rest?		B g  rest			B g  n	
	B  g  filenamef  system/vm/program.scm
 
	 		 		$ 	0	, 		. 		. 		B 		F 		J 		M 	
	N 		W 		b 		t 		x 		| 	  	
  	  	  	  	  	  	  	   	(  	   	  	  	
  	  	  	  	  	  	  	  	  	 	 	 	 	* 	 	*  	: 	 0	:	  g  nameg  arity->arguments-alist CoR7o     h0   ,  - . , 3 #  4 5$   6C$      g  prog
		0 g  ip		0 g  arity			0  g  filenamef  system/vm/program.scm
 
	 		 		& 		. 		 		0  g  nameg  program-arguments-alistg  documentationf  PReturns the signature of the given procedure in the form of an association list. C?Rp?q       h(      - . , 3 #  4 56           g  prog
		$ g  ip		$  g  filenamef  system/vm/program.scm
 
	 			$ 	 		$  g  nameg  program-lambda-listg  documentationf  MReturns the signature of the given procedure in the form of an argument list. C@Rref^stgiwxy   h   `  ]!4 5$  "  4 5$  "  444 5$  "  554 5$  "  	4	$  	
"  4	$  	"  556X      g  arguments-alist
	  g  t		 g  t	&	8 g  t	K	] g  t	j	| g  req	|  g  opt		|  g  key		|  g  rest		|   	g  filenamef  system/vm/program.scm
 
	 			 	+	 		 		 	6	 		$ 	+	& 		& 		5 	6	9 		> 		C 		I 	9	K 		K 		Z 	C	_ 		a 		b 		h 	,	j 		j 		y 	3	| 	  	  	  	  	  	.  	 	 	 	 	)  	 &	   g  nameg  arguments-alist->lambda-list CqRHz      h   b   ] L CZ       g  i
		  g  filenamef  system/vm/program.scm
			 		   CI        h   h   ]L  6      `       g  t-46b52c6efc-47d
		
  g  filenamef  system/vm/program.scm
	 		
   C{   h       ]	4 5O  O 
6       g  prog
		  g  count			   g  filenamef  system/vm/program.scm

						 	 		   g  nameg  program-free-variablesg  documentationf  *Return the list of free variables of PROG. CGR|}~p2|./- 
hP      ]	44L 5	54 5$  "   $  "  4 54	 56            g  s
		K g  t		;  g  filenamef  system/vm/program.scm
			"				/				#			0	#	2	)	8	;	<		C	8	K	 		K   C6P^qo   h   }   ]44L  556    u       g  a
		  g  filenamef  system/vm/program.scm
	'		*		+		*		) 		   C      h     ]
4 5$  "  344 
5 O 5$  "  44 5	54	 5$  "  $  
"  444 O 5556         g  prog
	  g  port	  g  t			S g  t		1	P g  arities		Z   g  filenamef  system/vm/program.scm

							
			!		1		1	
	@		C		M		T		Z	
	b		e	"	j		n		p		u		y		z		}	"  	" 	 	 	 	 	  g  nameg  write-program CRC      g  m
		,  g  filenamef  system/vm/program.scm		
	-	2
	2	2		8	2		9	2	+	A	2		C	3		H	2
9	5
	7
u	8
	9
	:
R	;
	=
	?
	A
	C
`	I
e	M
		Q
$	m
 
 
6 
? 
5 
 
 
C 
 
 
 
c 
$ 
&? 
' 
* 
,
1F
 )	1H
   C6      ccache/system/vm/objcode.go                                                                         0000644                 00000001471 15154557173 0011674 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0!      ]  4        h      ] g  guile	 	g  define-module*	 	 	g  system	g  vm	g  objcode		 	
g  filenameS	f  system/vm/objcode.scm	g  exportsS	g  objcode?	g  objcode-meta	g  bytecode->objcode	g  objcode->bytecode	g  load-objcode	g  write-objcode	g  	word-size	g  
byte-order	 	g  set-current-module	 	 	g  load-extension	g  string-append	f  	libguile-	g  effective-version	f  scm_init_objcodesC 5h@      ]4	
5 4 >  "  G   i4i4i5 56       g  m
		(  g  filenamef  system/vm/objcode.scm		
	-			3			4		+	<			>			@	
 		@
   C6                                                                                                                                                                                                        ccache/web/response.go                                                                              0000644                 00000146032 15154557173 0010737 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]{ 4   hU      ] g  guile	 	g  define-module*	 	 	g  web	g  response	 		g  filenameS	
f  web/response.scm	g  importsS	g  rnrs	g  bytevectors	 	 	g  ice-9	g  binary-ports	 	 	g  rdelim	 	 	g  match	 	 	g  srfi	g  srfi-9	 	 	g  http	 	  	!  	"g  exportsS	#g  	response?	$g  response-version	%g  response-code	&g  response-reason-phrase	'g  response-headers	(g  response-port	)g  read-response	*g  build-response	+g  adapt-response-version	,g  write-response	-g  response-must-not-include-body?	.g  response-body-port	/g  read-response-body	0g  write-response-body	1g  response-cache-control	2g  response-connection	3g  response-date	4g  response-pragma	5g  response-trailer	6g  response-transfer-encoding	7g  response-upgrade	8g  response-via	9g  response-warning	:g  response-allow	;g  response-content-encoding	<g  response-content-language	=g  response-content-length	>g  response-content-location	?g  response-content-md5	@g  response-content-range	Ag  response-content-type	Bg  text-content-type?	Cg  response-expires	Dg  response-last-modified	Eg  response-accept-ranges	Fg  response-age	Gg  response-etag	Hg  response-location	Ig  response-proxy-authenticate	Jg  response-retry-after	Kg  response-server	Lg  response-vary	Mg  response-www-authenticate	N#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLM +	Og  set-current-module	PO 	QO 	Rg  
<response>	Sg  %make-response-procedure	Tg  make-syntax-transformer	UT 	VT 	Wg  make-response	Xg  macro	Yg  $sc-dispatch	ZY 	[Y 	\g  _	]g  any	^\]]]]] 	_g  syntax-object	`g  lambda	ag  m-a15fd730aa5-8	bg  top	cab 	dg  ribcage	eg  t-a15fd730aa5-3	fg  t-a15fd730aa5-4	gg  t-a15fd730aa5-5	hg  t-a15fd730aa5-6	ig  t-a15fd730aa5-7	jefghi 	kccccc 	lf  l-a15fd730aa5-d	mf  l-a15fd730aa5-e	nf  l-a15fd730aa5-f	of  l-a15fd730aa5-10	pf  l-a15fd730aa5-11	qlmnop 	rdjkq 	sd 	tg  x	ut 	vc 	wf  l-a15fd730aa5-a	xw 	yduvx 	zg  shift	{g  	proc-name	|g  args	}{| 	~b 	~~  f  l-1e8ba8b5a-2ba f  l-1e8ba8b5a-2bb   d}  g  key g  value g  name g  formals g  body   ~~~~~  f  l-1e8ba8b5a-2ad f  l-1e8ba8b5a-2ae f  l-1e8ba8b5a-2af f  l-1e8ba8b5a-2b0 f  l-1e8ba8b5a-2b1   d  g  make-procedure-name   ~  f  l-1e8ba8b5a-29d   d  ~  f  l-1e8ba8b5a-29c   du  crsyzssss  g  hygiene   _`  g  version ~rsy    _  g  code _  g  reason-phrase _  g  headers _  g  port _    g  make-struct g  m-a15fd730aa5-1 b  g  t-1e8ba8b5a-38d g  t-1e8ba8b5a-38c g  t-1e8ba8b5a-38b   g  m-1e8ba8b5a-38e b    f  l-1e8ba8b5a-392 f  l-1e8ba8b5a-393 f  l-1e8ba8b5a-394   d  g  	ctor-args   f  l-1e8ba8b5a-37a   d  g  ctor g  field   f  l-1e8ba8b5a-376 f  l-1e8ba8b5a-377   d  g  form g  	type-name g  constructor-spec g  field-names   ~~~~  f  l-1e8ba8b5a-36b f  l-1e8ba8b5a-36c f  l-1e8ba8b5a-36d f  l-1e8ba8b5a-36e   d  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers   ~~~~~~~~  f  l-1e8ba8b5a-343 f  l-1e8ba8b5a-341 f  l-1e8ba8b5a-33f f  l-1e8ba8b5a-33d f  l-1e8ba8b5a-33b f  l-1e8ba8b5a-339 f  l-1e8ba8b5a-337 f  l-1e8ba8b5a-335   d  f  l-1e8ba8b5a-334   du  rsyzsssss  _  _R  _
      g  each-any \ g  syntax-violation     f  Wrong number of arguments g  identifier?     ~sy  _S      f  -source expression failed to match any pattern g  record-type-vtable   g  
pwpwpwpwpwg  default-record-printer   g  set-struct-vtable-name! 	 
g  vtable-offset-user
 
 g  %response?-procedure\] g  m-a15fd730aa5-1db g  t-a15fd730aa5-1c  f  l-a15fd730aa5-22 d f  l-a15fd730aa5-1f du szssss _` g  objg  t-1e8ba8b5a-47eg  t-1e8ba8b5a-478g  t-1e8ba8b5a-479 g  t-1e8ba8b5a-47a!g  t-1e8ba8b5a-47d"g  t-1e8ba8b5a-47c#g  t-1e8ba8b5a-47b$ !"# %g  m-1e8ba8b5a-47f&%b '&&&&&&& (f  l-1e8ba8b5a-483)f  l-1e8ba8b5a-484*f  l-1e8ba8b5a-485+f  l-1e8ba8b5a-486,f  l-1e8ba8b5a-487-f  l-1e8ba8b5a-488.f  l-1e8ba8b5a-489/()*+,-. 0d$'/ 1g  	copier-id21 3f  l-1e8ba8b5a-47643 5d24 6g  	ctor-name76 8f  l-1e8ba8b5a-46e98 :d79 ; <f  l-1e8ba8b5a-46c=< >d;= ?g  layout@? Af  l-1e8ba8b5a-46aBA Cd@B Dg  
immutable?ED Ff  l-1e8ba8b5a-468GF HdEG Ig  field-countJI Kf  l-1e8ba8b5a-466LK MdJL Ng  
getter-idsON Pf  l-1e8ba8b5a-463QP RdOQ Sg  	field-idsTS Uf  l-1e8ba8b5a-460VU WdTV Xg  predicate-nameYg  
field-specZDXY [~~~~~~ \f  l-1e8ba8b5a-453]f  l-1e8ba8b5a-454^f  l-1e8ba8b5a-455_f  l-1e8ba8b5a-456`f  l-1e8ba8b5a-457af  l-1e8ba8b5a-458b\]^_`a cdZ[b dszs0ssss5s:s>sCsHsMsRsWc e_d fe gg  andh_gd ig  struct?j_id kje lg  eq?m_ld ng  struct-vtableo_nd poe q~s r_Rq smpr thks uft v~s w_v xg  throw-bad-structyx zx {g  %response-version-procedure|g  free-id}g  
%%on-error~g  m-a15fd730aa5-29~b  f  l-a15fd730aa5-2b du szssss _} | ] g  %%typeg  t-1e8ba8b5a-3a5g  t-1e8ba8b5a-3a6g  t-1e8ba8b5a-3a7g  t-1e8ba8b5a-3a8g  t-1e8ba8b5a-3a9g  t-1e8ba8b5a-3aag  t-1e8ba8b5a-3ab g  m-1e8ba8b5a-3acb  f  l-1e8ba8b5a-3b0f  l-1e8ba8b5a-3b1f  l-1e8ba8b5a-3b2f  l-1e8ba8b5a-3b3f  l-1e8ba8b5a-3b4f  l-1e8ba8b5a-3b5f  l-1e8ba8b5a-3b6 d g  getterg  index f  l-1e8ba8b5a-3a3f  l-1e8ba8b5a-3a4 d N1 ~~~ f  l-1e8ba8b5a-39ef  l-1e8ba8b5a-39ff  l-1e8ba8b5a-3a0 d szsssss _ | \] g  ckg  errg  s  f  l-a15fd730aa5-2ef  l-a15fd730aa5-2f d szssss _ g  quote_ ~s _R   g  %%index_ | \] f  l-a15fd730aa5-33f  l-a15fd730aa5-34 d szssss _ _ s _
   g  %%copier_ | \] f  l-a15fd730aa5-38f  l-a15fd730aa5-39 d szssss _ _ g  %%<response>-set-fields~s _   g  t-a15fd730aa5-28 f  l-a15fd730aa5-3d d szssss _` szsssss _  g  if_ _l _n  ~s _R  g  
struct-ref_ s _
  _x _ _$     ~s _{ g  %response-code-procedure g  m-a15fd730aa5-44 b  f  l-a15fd730aa5-46 du szssss _} | 	] 
szsssss _
 | \	]  f  l-a15fd730aa5-49f  l-a15fd730aa5-4a d szssss _ _ ~s _R   _
 | \	] f  l-a15fd730aa5-4ef  l-a15fd730aa5-4f  d ! szssss "_! #_! $ s %_$ &#% '& (_
 )|( *\	)] +f  l-a15fd730aa5-53,f  l-a15fd730aa5-54-+, .d- /.szssss 0_/ 1_/ 2~.s 3_2 413 54 6g  t-a15fd730aa5-4376 8f  l-a15fd730aa5-5898 :d79 ;:szssss <_`; =:szsssss >_= ?> @_= A_l= B_n= CB> D~:s E_RD FACE G_= H:s I_H JG>I K_x= L_= M_%D NLM OK>N P@FJO Q<?P R~s S_R Tg  %response-reason-phraseUg  "%%response-reason-phrase-procedureVg  m-a15fd730aa5-5fWVb XW Yf  l-a15fd730aa5-61ZY [duXZ \Ws[zssss ]_}\ ^|] _^] `s[zsssss a_` b|a c\_b] dWW ef  l-a15fd730aa5-64ff  l-a15fd730aa5-65gef hddg iWhs[zssss j_i k_i l~hs[ m_Rl nkm on p_` q|p r\_q] sf  l-a15fd730aa5-69tf  l-a15fd730aa5-6aust vddu wWvs[zssss x_w y_w zvs[ {_	z |y{ }| ~_` |~ \_] f  l-a15fd730aa5-6ef  l-a15fd730aa5-6f dd Ws[zssss _ _ ~s[ _   g  t-a15fd730aa5-5e f  l-a15fd730aa5-73 dX Ws[zssss _` s[zsssss _  _ _l _n  ~s[ _R  _ s[ _	  _x _ _T     ~s[ _U g  %response-headers-procedureg  m-a15fd730aa5-7ab  f  l-a15fd730aa5-7c du szssss _} | ] szsssss _ | \]  f  l-a15fd730aa5-7ff  l-a15fd730aa5-80 d szssss _ _ ~s _R   _ | \] f  l-a15fd730aa5-84f  l-a15fd730aa5-85 d szssss _ _ s _	   _ | \] f  l-a15fd730aa5-89f  l-a15fd730aa5-8a d szssss _ _ ~s _   g  t-a15fd730aa5-79 f  l-a15fd730aa5-8e d szssss _` szsssss _  _ _l _n  ~s _R  _ s _	  _x _ _'     ~s _ g  %response-port-procedure g  m-a15fd730aa5-95 b  f  l-a15fd730aa5-97 du szssss _} | 	] 
szsssss _
 | \	]  f  l-a15fd730aa5-9af  l-a15fd730aa5-9b d szssss _ _ ~s _R   _
 | \	] f  l-a15fd730aa5-9ff  l-a15fd730aa5-a0  d ! szssss "_! #_! $ s %_	$ &#% '& (_
 )|( *\	)] +f  l-a15fd730aa5-a4,f  l-a15fd730aa5-a5-+, .d- /.szssss 0_/ 1_/ 2~.s 3_2 413 54 6g  t-a15fd730aa5-9476 8f  l-a15fd730aa5-a998 :d79 ;:szssss <_`; =:szsssss >_= ?> @_= A_l= B_n= CB> D~:s E_RD FACE G_= H:s I_	H JG>I K_x= L_= M_(D NLM OK>N P@FJO Q<?P R~s S_R Tg  eachU]] VTU W]VX]WY]XZg  %%set-fields[g  dummy\g  check?]g  expr^[\] _g  m-a15fd730aa5-b0`_b a` bf  l-a15fd730aa5-b5cf  l-a15fd730aa5-b6df  l-a15fd730aa5-b7ef  l-a15fd730aa5-b8ff  l-a15fd730aa5-b9gbcdef hd^ag i` jf  l-a15fd730aa5-b2kj lduik mg  t-1e8ba8b5a-3c4ng  t-1e8ba8b5a-3c6og  t-1e8ba8b5a-3c5pmno qg  m-1e8ba8b5a-3c7rqb srrr tf  l-1e8ba8b5a-3cbuf  l-1e8ba8b5a-3ccvf  l-1e8ba8b5a-3cdwtuv xdpsw yf  l-1e8ba8b5a-3c1zf  l-1e8ba8b5a-3c2{f  l-1e8ba8b5a-3c3|yz{ }d| ~hslzsxsss} _Z~ ~hsl _R _$ _% _T _' _(  g  map  g  listg  throwg  bad-responseg  number?g  exact?g  integer?g  non-negative-integer?g  valid-header?g  validate-headersf  Bad value for header ~a: ~sf  Header not a pair: ~af  Headers not a list: ~ag  versionS
g  codeSg  reason-phraseS	g  headersS	g  portS	g  validate-headers?S	 f  Bad version: ~af  Bad code: ~ag  string?f  Bad reason phrasef  Continue	df  Switching Protocols	ef  OK f  Created f  Accepted f  Non-Authoritative Information f  
No Content f  Reset Content f  Partial Content f  Multiple Choices,f  Moved Permanently-f  Found.f  	See Other/f  Not Modified0Ìf  	Use Proxy1Ōf  Temporary Redirect3ǌf  Bad RequestɌf  Unauthorizedˌf  Payment Required͌f  	Forbiddenόf  	Not Foundьf  Method Not Allowedӌf  Not AcceptableՌf  Proxy Authentication Required׌f  Request Timeoutٌf  Conflictیf  Gone݌f  Length Requiredߌf  Precondition Failedጤf  Request Entity Too Large㌤f  Request-URI Too Long匤f  Unsupported Media Type猤f  Requested Range Not Satisfiable錤f  Expectation Failed댤f  Internal Server Error팤f  Not Implementedf  Bad Gatewayf  Service Unavailablef  Gateway Timeoutf  HTTP Version Not Supported (g  *reason-phrases*g  assv-reff  	(Unknown)g  code->reason-phraseg  symbol->stringg  string-prefix? f  text/g  string-suffix?f  /xmlf  +xmlg  set-port-encoding!f  
ISO-8859-1g  read-response-lineg  read-headersg  write-response-line	g  write-headers
g  displayf  
g  
close-portg  make-custom-binary-input-portf  delimited input portg  ming  eof-object?f  /EOF while reading response body: ~a bytes of ~ag  get-bytevector-n!g  make-delimited-input-portg  decode?Sg  keep-alive?S	 g  memberg  chunked g  make-chunked-input-portg  memqg  close
 g  
keep-alive!g  assq-ref"g  charset#g  and=>$g  get-bytevector-all%g  vu8
	   j   &g  put-bytevector'g  define-response-accessor( )f  l-a15fd730aa5-22a*) +d(* ,f  l-a15fd730aa5-227-, .du- /~+s. 0_'/ 1_/ 21 3\]] 4g  datum->syntax5g  symbol-append6g  	response-7g  syntax->datum8g  define*9g  t-a15fd730aa5-235:9 ;g  m-a15fd730aa5-236<;b =< >f  l-a15fd730aa5-239?> @d:=? Ag  defBA Cf  l-a15fd730aa5-231Df  l-a15fd730aa5-232ECD FdBE G~s@Fs. H_8G I_G Jg  optionalSK_JG Lg  defaultM_LG Ng  condO_NG Pg  assqQ_PG R_G S_'G TSI UT Vg  =>W_VG Xg  cdrY_XG ZWY [g  else\_[G ]\M ^] _g  cache-control`g  
connectionag  datebg  pragmacg  trailerdg  transfer-encodingeg  upgradefg  viagg  warninghg  allowig  content-encodingjg  content-languagekg  content-lengthlg  content-locationmg  content-md5ng  content-rangeog  content-typepg  expiresqg  last-modifiedrg  accept-rangessg  agetg  etagug  locationvg  proxy-authenticatewg  retry-afterxg  serveryg  varyzg  www-authenticateC 5      h`o     ]4	
!"N5 4Q >  "  G   R      h      ]  C             g  version
		 g  code		 g  reason-phrase			 g  headers			 g  port			  g  filenamef  web/response.scm
	S
 			  g  nameg  %make-response-procedure CSR4VWX[^  h      ]  C             g  t-a15fd730aa5-3
		 g  t-a15fd730aa5-4		 g  t-a15fd730aa5-5			 g  t-a15fd730aa5-6			 g  t-a15fd730aa5-7			  			   CW h   S   ]L 6    K       g  a
		  g  filenamef  web/response.scm		S
 		   C\     h   C   ] L 6;       g  filenamef  web/response.scm		S
 		
   C       h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  web/response.scm
	S
 		n   C5WRR  4	 R>  "  G   	Si  RRR   h   u   ] $   CC      m       g  obj
		  g  filenamef  web/response.scm
	S
 		  g  nameg  %response?-procedure CR4V#X[u   h   8   ]  C      0       g  t-a15fd730aa5-1c
		
  		
   C#    h   S   ]L 6    K       g  a
		  g  filenamef  web/response.scm		S
 		   C\     h   C   ] L 6;       g  filenamef  web/response.scm		S
 		
   Cw      h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  |       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  web/response.scm
	S
 		n   C5#RRz$    h   z   ] &   
C 6r       g  s
		  g  filenamef  web/response.scm
	S
 		  g  nameg  %response-version-procedure C{R4V$X[   h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C    h   8   ]  C      0       g  t-a15fd730aa5-28
		
  		
   C$    h   S   ]L 6    K       g  a
		  g  filenamef  web/response.scm		S
 		   C\     h   C   ] L 6;       g  filenamef  web/response.scm		S
 		
   C      h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/response.scm
	S
 	    C5$RRz%        h   w   ] &   C 6o       g  s
		  g  filenamef  web/response.scm
	S
 		  g  nameg  %response-code-procedure CR4V%X[      h   :   ]C     2       g  err
		 g  s		  			   C"' h   :   ]C     2       g  err
		 g  s		  			   C*05 h   :   ]C     2       g  err
		 g  s		  			   CQ    h   8   ]  C      0       g  t-a15fd730aa5-43
		
  		
   C%    h   S   ]L 6    K       g  a
		  g  filenamef  web/response.scm		S
 		   C\     h   C   ] L 6;       g  filenamef  web/response.scm		S
 		
   CS      h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/response.scm
	S
 	    C5%RRzT       h       ] &   	C 6       y       g  s
		  g  filenamef  web/response.scm
	S
 		  g  nameg  "%%response-reason-phrase-procedure CUR4VTX[cjo   h   :   ]C     2       g  err
		 g  s		  			   Crx} h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C    h   8   ]  C      0       g  t-a15fd730aa5-5e
		
  		
   CT   h   S   ]L 6    K       g  a
		  g  filenamef  web/response.scm		S
 		   C\     h   C   ] L 6;       g  filenamef  web/response.scm		S
 		
   C      h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/response.scm
	S
 	    C5TRRz'       h    z   ] &   	C 6       r       g  s
		  g  filenamef  web/response.scm
	S
 		  g  nameg  %response-headers-procedure CR4V'X[   h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C    h   8   ]  C      0       g  t-a15fd730aa5-79
		
  		
   C'    h   S   ]L 6    K       g  a
		  g  filenamef  web/response.scm		S
 		   C\     h   C   ] L 6;       g  filenamef  web/response.scm		S
 		
   C      h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/response.scm
	S
 	    C5'RRz(        h    w   ] &   	C 6       o       g  s
		  g  filenamef  web/response.scm
	S
 		  g  nameg  %response-port-procedure CR4V(X[      h   :   ]C     2       g  err
		 g  s		  			   C"' h   :   ]C     2       g  err
		 g  s		  			   C*05 h   :   ]C     2       g  err
		 g  s		  			   CQ    h   8   ]  C      0       g  t-a15fd730aa5-94
		
  		
   C(    h   S   ]L 6    K       g  a
		  g  filenamef  web/response.scm		S
 		   C\     h   C   ] L 6;       g  filenamef  web/response.scm		S
 		
   CS      h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/response.scm
	S
 	    C5(R4VX[Y  h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  web/response.scm
	S
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R  h      - 1 3  6            g  message
			 g  args			  g  filenamef  web/response.scm
	\
		]				]	 			
  g  nameg  bad-response CR   h0      ]4 5$   
$  4 5$   6CCC           g  n
		,  g  filenamef  web/response.scm
	_
		`			`			`			`			`		 	`		&	`	' 			,  g  nameg  non-negative-integer? CR  hX   A  ] $  < $  (45$   666 (  C 6   9      g  headers
		U g  h		E g  k			= g  v			=  g  filenamef  web/response.scm
	b
		c				c			d			d			e			e			f			f	!		f		 	g		,	g		1	h	$	3	h		7	i	 	=	i		A	j		E	j		K	k		Q	l		U	l	
 		U  g  nameg  validate-headers CRR  hP    -  /     0   3  #   #   #  #  #  #  "  4 >  "  G  "   $  4 5$  4 5$  "  4>  "  G  "  ~45$  oX$  ]"   $  4>  "  @G  "  9"  5$  +45$  ""  4	>  "  G  "  ""  "r"  "j"  "'"  ""  "
  C             g  version
	I g  code	I g  reason-phrase		I g  headers		I g  port		I g  validate-headers?		I  g  filenamef  web/response.scm
	n
		n	(	8	o	"	Q	v		U	v		\	v		h	r		k	s		o	r		p	t		u	t	%	w	t		{	s			|	u	 	u	% 	u	 	s		 	x	 	x	 	x	 	r	 	w	 	r	 	w	+ 	w		 	|	 	}	 	r	 	y	 	y	 	z	 	z		z	H	~	 #	I

g  versionS
g  codeSg  reason-phraseS	g  headersS	g  portS	g  validate-headers?S	   g  nameg  build-responseg  documentationf  ~Construct an HTTP response object. If VALIDATE-HEADERS? is true,
the headers are each run through their respective validators. C*RR     h       ]	4 5$  CC              g  code
		 g  t		  g  filenamef  web/response.scm
 
	 		 		 	 		  g  nameg  code->reason-phrase CRRzT%    hH   '  ]	 &  	 	"  	4 5$  C &   "  	4 56        g  response
		F g  t		F  g  filenamef  web/response.scm
 
	 		 		- 		F 	 		F  g  nameg  response-reason-phraseg  documentationf  bReturn the reason phrase given in RESPONSE, or the standard
reason phrase for the response's code. C&R         h@     ]4 545$  C45$  C6           g  type
		; g  type			; g  t			; g  t		(	;  g  filenamef  web/response.scm
 
	 			 		 		 		 		 		  		$ 		( 		( 		7 		; 	 		;  g  nameg  text-content-type?g  documentationf  sReturn #t if TYPE, a symbol as returned by `response-content-type',
represents a textual type such as `text/plain'. CBRR  hH     ]!4 >  "  G  4 >  G 4 5  C           g  port
		C g  version	!	C g  code		!	C g  reason-phrase		!	C g  headers		1	C  g  filenamef  web/response.scm
 
	 			 		 		 		$ 		+ 	0	1 	 			C  g  nameg  read-responseg  documentationf  Read an HTTP response from PORT.

As a side effect, sets the encoding on PORT to
ISO-8859-1 (latin-1), so that reading one character reads one byte.  See
the discussion of character sets in "HTTP Responses" in the manual,
for more information. C)R*Rz%'(  h`   I  ] &   "  	4 5 &  	 	"  	4 5	 &  	 	"  	4 
56A      g  response
		` g  version		`  g  filenamef  web/response.scm
 
		 		) 		F 		` 	 		`	  g  nameg  adapt-response-versiong  documentationf }Adapt the given response to a different HTTP version.  Returns a new
HTTP response.

The idea is that many applications might just build a response for the
default HTTP version, and this method could handle a number of
programmatic transformations to respond to older HTTP versions (0.9 and
1.0).  But currently this function is a bit heavy-handed, just updating
the version field. C+RRz$%&	'
(     h(    ]"4 &   
"  	4 5 &   "  	4 54 5>  "  G  4 &  	 	"  	4 5>  "  G  4	
>  "  G   &  	 	"  	4 5&   C &   
"  	4 5 &   "  	4 54 5 &  	 	"  	4 5 C            g  r
	" g  port	" g  version	
" g  code	
" g  reason-phrase	
" g  headers	
"  g  filenamef  web/response.scm
 
	 		 		" 	,	: 		G 		P 		U 		t 		} 	  	  	  	  	  	  	*  	  	0
 	 	"	  g  nameg  write-responseg  documentation  k hW   r   i   t   e       t   h   e       g   i   v   e   n       H   T   T   P       r   e   s   p   o   n   s   e       t   o       P   O   R   T   .   
   
   R   e   t   u   r   n   s       a       n   e   w       r   e   s   p   o   n   s   e   ,       w   h   o   s   e          r   e   s   p   o   n   s   e   -   p   o   r   t          w   i   l   l       c   o   n   t   i   n   u   e       w   r   i   t   i   n   g   
   o   n       P   O   R   T   ,       p   e   r   h   a   p   s       u   s   i   n   g       s   o   m   e       t   r   a   n   s   f   e   r       e   n   c   o   d   i   n   g   .    C,RRz%     h     ]	 &   "  	4 5	d$  
 Ǔ"  $  C &   "  	4 5 ̑$  C &   "  	4 50C      g  r
	  g  b		5 g  t	5  g  t	^   g  filenamef  web/response.scm
 
	 		 		5 		C 			^ 		^ 		l 		  	 
	   g  nameg  response-must-not-include-body?g  documentation k  R   e   t   u   r   n   s          #   t          i   f       t   h   e       r   e   s   p   o   n   s   e       R       i   s       n   o   t       p   e   r   m   i   t   t   e   d       t   o       h   a   v   e       a       b   o   d   y   .   
   
   T   h   i   s       i   s       t   r   u   e       f   o   r       s   o   m   e       r   e   s   p   o   n   s   e       t   y   p   e   s   ,       l   i   k   e       t   h   o   s   e       w   i   t   h       c   o   d   e       3   0   4   .    C-R        h   M   ] L 6E       g  filenamef  web/response.scm

				 		
   C  h     ]4L M5"  Y45$  ML $  
CML 6"  
MNC
$  
$  4L 5"""4L 5"~      g  bv
	  g  start	  g  count		  g  count		  g  ret			m  g  filenamef  web/response.scm
 		 		 		 		 		 		 		 		$ 		( 		. 		4 		=	 	?		B 		E		J 		N	 	R		S		e		m 		n 	  	 	 	  g  nameg  read! C       h8     ]HH
K$  "   O K O J6          g  port
		4 g  len		4 g  keep-alive?			4 g  
bytes-read			4 g  close			4  g  filenamef  web/response.scm
 
				#	!	2			4	 		4	  g  nameg  make-delimited-input-portg  documentationf  Return an input port that reads from PORT, and makes sure that
exactly LEN bytes are available from PORT.  Closing the returned port
closes PORT, unless KEEP-ALIVE? is true. CR6Rz(=-2$ AB!" h    - /   0   3 #  #  H44 55$  (4 &  	 	"  	4 5	5"  4
 5$  (4 &  	 	"  	4 55"  4 5$  "  44 55$  "  5 &   
"  	4 5$  44 55"  $   &  	 	"  	4 5"   &  	 	"  	4 5K$  rJ$  h4 5$  Q45$  24J45$  "  >  "  G  "   "   "   "   JC            g  r
	 g  decode?	 g  keep-alive?		 g  port		& g  t		i= g  t	   g  v	R g  w	a g  x	a g  t	~  
g  filenamef  web/response.scm

	)		-		.		6		:		;		@		^		c		i		r		w	& 	  	 	 "	
 "	 "	 "	
 "	 #	 #	, #	 #	
 $	 $	 $	& $	 $	 	%	"+	E-	K-	L.	q0	v1	|1	/~1	~1	2	0	 ,	
g  decode?Sg  keep-alive?S	   g  nameg  response-body-portg  documentation k R   e   t   u   r   n       a   n       i   n   p   u   t       p   o   r   t       f   r   o   m       w   h   i   c   h       t   h   e       b   o   d   y       o   f       R       c   a   n       b   e       r   e   a   d   .           T   h   e   
   e   n   c   o   d   i   n   g       o   f       t   h   e       r   e   t   u   r   n   e   d       p   o   r   t       i   s       s   e   t       a   c   c   o   r   d   i   n   g       t   o       R   '   s          c   o   n   t   e   n   t   -   t   y   p   e      
   h   e   a   d   e   r   ,       w   h   e   n       i   t   '   s       t   e   x   t   u   a   l   ,       e   x   c   e   p   t       i   f       D   E   C   O   D   E   ?       i   s          #   f      .           R   e   t   u   r   n       #   f       w   h   e   n   
   n   o       b   o   d   y       i   s       a   v   a   i   l   a   b   l   e   .   
   
   W   h   e   n       K   E   E   P   -   A   L   I   V   E   ?       i   s          #   f      ,       c   l   o   s   i   n   g       t   h   e       r   e   t   u   r   n   e   d       p   o   r   t       a   l   s   o       c   l   o   s   e   s       R   '   s   
   r   e   s   p   o   n   s   e       p   o   r   t   .    C.R#.$%       h(   M  ]	44 5545$  CC  E      g  r
		& g  body		&  g  filenamef  web/response.scm
7
	:		:		:		:		>		 >		"?	 			&  g  nameg  read-response-bodyg  documentation k tR   e   a   d   s       t   h   e       r   e   s   p   o   n   s   e       b   o   d   y       f   r   o   m       R   ,       a   s       a       b   y   t   e   v   e   c   t   o   r   .           R   e   t   u   r   n   s   
      #   f          i   f       t   h   e   r   e       w   a   s       n   o       r   e   s   p   o   n   s   e       b   o   d   y   .    C/R&Rz(  h(      ] &  	 	"  	4 56            g  r
		# g  bv		#  g  filenamef  web/response.scm
B
	E		#E	 		#	  g  nameg  write-response-bodyg  documentationf  IWrite BV, a bytevector, to the port corresponding to the HTTP
response R. C0R4V'X[02 h   -   ] C     %       g  field
		  		   C3      h   j   ] 6b       g  field
		 g  def		  g  filenamef  web/response.scm	L	 			   C4567HIKMOQRUZ^        hH      ]
4 44 555  	
   C          g  field
		E g  def		E g  tmp			E  g  filenamef  web/response.scm	M		O		O	%	O	0	O		M		M	 		E	   C 	   hP   u   ]4 5$  @4 5"  	 6$  4?$  @""m       g  x
		P g  tmp		P g  tmp		"	P  g  filenamef  web/response.scm
H	 		P   C5'RP_Rz'    hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
X
	X	(	X
 		F  g  nameg  response-cache-control C1RP`Rz'  hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
Y
	Y	%	Y
 		F  g  nameg  response-connection C2RPaRz'     hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
Z
 		F  g  nameg  response-date C3RPbRz'    hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
[
	[	!	[
 		F  g  nameg  response-pragma C4RPcRz' hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
\
	\	"	\
 		F  g  nameg  response-trailer C5RPdRz'        hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
]
	]	,	]
 		F  g  nameg  response-transfer-encoding C6RPeRz'      hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
^
	^	"	^
 		F  g  nameg  response-upgrade C7RPfRz'        hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
_
	_		_
 		F  g  nameg  response-via C8RPgRz'    hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
`
	`	"	`
 		F  g  nameg  response-warning C9RPhRz'        hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
d
	d	 	d
 		F  g  nameg  response-allow C:RPiRz'  hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
e
	e	+	e
 		F  g  nameg  response-content-encoding C;RPjRz'       hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
f
	f	+	f
 		F  g  nameg  response-content-language C<RPkRz'       hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
g
 		F  g  nameg  response-content-length C=RPlRz'  hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
h
 		F  g  nameg  response-content-location C>RPmRz'        hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
i
 		F  g  nameg  response-content-md5 C?RPnRz'     hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
j
 		F  g  nameg  response-content-range C@RPoRz'   hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
k
 		F  g  nameg  response-content-type CARPpRz'    hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
l
 		F  g  nameg  response-expires CCRPqRz' hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
m
 		F  g  nameg  response-last-modified CDRPrRz'   hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
q
 		F  g  nameg  response-accept-ranges CERPsRz'   hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
r
 		F  g  nameg  response-age CFRPtRz'     hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
s
 		F  g  nameg  response-etag CGRPuRz'    hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
t
 		F  g  nameg  response-location CHRPvRz'        hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
u
 		F  g  nameg  response-proxy-authenticate CIRPwRz'      hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
v
 		F  g  nameg  response-retry-after CJRPxRz'     hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
w
 		F  g  nameg  response-server CKRPyRz'  hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
x
	x		x
 		F  g  nameg  response-vary CLRPzRz'   hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  response
		F g  default		F g  t		7	F  g  filenamef  web/response.scm
y
 		F  g  nameg  response-www-authenticate CMRC             g  m
		, g  rtd
:d  g  filenamef  web/response.scm		
,	S
"	\
#	_
%E	b
)	n
) 	) 
* 
,: 
.< 
0 
3 
8 
< 
A4 
K
M7
NB
RX
TY
UZ
V[
W'\
XI]
Y_^
Zs_
[`
\d
]e
^f
_g
`h
ai
cj
dk
el
fm
gq
hr
is
jt
k1u
l:v
m=w
nLx
oWy
 0	oY
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                       ccache/web/server/http.go                                                                           0000644                 00000071001 15154557173 0011357 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0q      ]\ 4  h=      ] g  guile	 	g  define-module*	 	 	g  web	g  server	g  http		 	
g  filenameS	f  web/server/http.scm	g  importsS	g  srfi	g  srfi-1	 	g  selectS	g  fold	 	 	g  srfi-9	 	 	g  rnrs	g  bytevectors	 	 	g  request	 	 	g  response	 	  	! 	"! 	#g  ice-9	$g  poll	%#$ 	&% 	' "& 	(g  exportsS	) 	*g  set-current-module	+* 	,* 	-g  socket	.g  PF_INET	/g  SOCK_STREAM	0g  
setsockopt	1g  
SOL_SOCKET	2g  SO_REUSEADDR	3g  bind	4g  make-default-socket	5g  <http-server>	6g  %make-http-server-procedure	7g  make-syntax-transformer	87 	97 	:g  make-http-server	;g  macro	<g  $sc-dispatch	=< 	>< 	?g  _	@g  any	A?@@@ 	Bg  syntax-object	Cg  lambda	Dg  m-1e74a72e9-e	Eg  top	FDE 	Gg  ribcage	Hg  t-1e74a72e9-b	Ig  t-1e74a72e9-c	Jg  t-1e74a72e9-d	KHIJ 	LFFF 	Mf  l-1e74a72e9-13	Nf  l-1e74a72e9-14	Of  l-1e74a72e9-15	PMNO 	QGKLP 	RG 	Sg  x	TS 	UF 	Vf  l-1e74a72e9-10	WV 	XGTUW 	Yg  shift	Zg  	proc-name	[g  args	\Z[ 	]E 	^]] 	_f  l-1e8ba8b5a-2ba	`f  l-1e8ba8b5a-2bb	a_` 	bG\^a 	cg  key	dg  value	eg  name	fg  formals	gg  body	hcdefg 	i]]]]] 	jf  l-1e8ba8b5a-2ad	kf  l-1e8ba8b5a-2ae	lf  l-1e8ba8b5a-2af	mf  l-1e8ba8b5a-2b0	nf  l-1e8ba8b5a-2b1	ojklmn 	pGhio 	qg  make-procedure-name	rq 	s] 	tf  l-1e8ba8b5a-29d	ut 	vGrsu 	w] 	xf  l-1e8ba8b5a-29c	yx 	zGTwy 	{FQRXYRRRRbpvz 	|g  hygiene	}| 	~BC{} 	]QRX  |  B-  g  poll-idx B  g  poll-set B    g  make-struct g  m-1e74a72e9-9 E  g  t-1e8ba8b5a-38d g  t-1e8ba8b5a-38c g  t-1e8ba8b5a-38b   g  m-1e8ba8b5a-38e E    f  l-1e8ba8b5a-392 f  l-1e8ba8b5a-393 f  l-1e8ba8b5a-394   G  g  	ctor-args   f  l-1e8ba8b5a-37a   Gw  g  ctor g  field   f  l-1e8ba8b5a-376 f  l-1e8ba8b5a-377   G^  g  form g  	type-name g  constructor-spec g  field-names   ]]]]  f  l-1e8ba8b5a-36b f  l-1e8ba8b5a-36c f  l-1e8ba8b5a-36d f  l-1e8ba8b5a-36e   G  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers   ]]]]]]]]  f  l-1e8ba8b5a-343 f  l-1e8ba8b5a-341 f  l-1e8ba8b5a-33f f  l-1e8ba8b5a-33d f  l-1e8ba8b5a-33b f  l-1e8ba8b5a-339 f  l-1e8ba8b5a-337 f  l-1e8ba8b5a-335   G  f  l-1e8ba8b5a-334   GTw  QRXYRRRRR  B}  B5  B
}    ~  g  each-any ?ˌ g  syntax-violation     f  Wrong number of arguments g  identifier?     ]RX  B6      f  -source expression failed to match any pattern g  record-type-vtable     g  pwpwpw g  default-record-printer     -  g  set-struct-vtable-name!     g  vtable-offset-user     g  %http-server?-procedure g  http-server? ?@  g  m-1e74a72e9-1f E  g  t-1e74a72e9-1e     f  l-1e74a72e9-24   G  f  l-1e74a72e9-21   GT  RYRRRRbpvz  BC}  g  obj g  t-1e8ba8b5a-47e g  t-1e8ba8b5a-478 g  t-1e8ba8b5a-479 g  t-1e8ba8b5a-47a g  t-1e8ba8b5a-47d g  t-1e8ba8b5a-47c g  t-1e8ba8b5a-47b   g  m-1e8ba8b5a-47f E  f  l-1e8ba8b5a-483f  l-1e8ba8b5a-484f  l-1e8ba8b5a-485f  l-1e8ba8b5a-486f  l-1e8ba8b5a-487f  l-1e8ba8b5a-488	f  l-1e8ba8b5a-489
	 G
 g  	copier-id f  l-1e8ba8b5a-476 Gw g  	ctor-name f  l-1e8ba8b5a-46e Gw  f  l-1e8ba8b5a-46c Gw g  layout f  l-1e8ba8b5a-46a Gw g  
immutable?  !f  l-1e8ba8b5a-468"! #G w" $g  field-count%$ &f  l-1e8ba8b5a-466'& (G%w' )g  
getter-ids*) +f  l-1e8ba8b5a-463,+ -G*w, .g  	field-ids/. 0f  l-1e8ba8b5a-46010 2G/w1 3g  predicate-name4g  
field-spec534 6]]]]]] 7f  l-1e8ba8b5a-4538f  l-1e8ba8b5a-4549f  l-1e8ba8b5a-455:f  l-1e8ba8b5a-456;f  l-1e8ba8b5a-457<f  l-1e8ba8b5a-458=789:;< >G56= ?RYRRRRRRRRR#R(R-R2> @B?} A@ Bg  andCBB?} Dg  struct?EBD?} FE@ Gg  eq?HBG?} Ig  struct-vtableJBI?} KJ@ L]R MB5L NHKM OCFN PAO Q]R RBQ Sg  throw-bad-structTS US Vg  http-socketWg  %http-socket-procedureXg  free-idYg  
%%on-errorZg  m-1e74a72e9-2b[ZE \[ ]f  l-1e74a72e9-2d^] _GT\^ `[R_YRRRRbpvz aBY`} bXa cb@ dg  %%typeeg  t-1e8ba8b5a-3a5fg  t-1e8ba8b5a-3a6gg  t-1e8ba8b5a-3a7hg  t-1e8ba8b5a-3a8ig  t-1e8ba8b5a-3a9jg  t-1e8ba8b5a-3aakg  t-1e8ba8b5a-3ablefghijk mg  m-1e8ba8b5a-3acnmE onnnnnnn pf  l-1e8ba8b5a-3b0qf  l-1e8ba8b5a-3b1rf  l-1e8ba8b5a-3b2sf  l-1e8ba8b5a-3b3tf  l-1e8ba8b5a-3b4uf  l-1e8ba8b5a-3b5vf  l-1e8ba8b5a-3b6wpqrstuv xGlow yg  getterzg  index{yz |f  l-1e8ba8b5a-3a3}f  l-1e8ba8b5a-3a4~|} G{^~ ) ]]] f  l-1e8ba8b5a-39ef  l-1e8ba8b5a-39ff  l-1e8ba8b5a-3a0 G R_YRxRRRR Bd} X ?c@ g  ckg  errg  s [[ f  l-1e74a72e9-30f  l-1e74a72e9-31 G [R_YRRRRbpvz B} g  quoteB} ]R_ B5   g  %%indexB} X ?c@ f  l-1e74a72e9-35f  l-1e74a72e9-36 G [R_YRRRRbpvz B} B} R_ B
   g  %%copierB} X ?c@ f  l-1e74a72e9-3af  l-1e74a72e9-3b G [R_YRRRRbpvz B} B} g  %%<http-server>-set-fields]R_ B   g  t-1e74a72e9-2a f  l-1e74a72e9-3f G\ [R_YRRRRbpvz BC} R_YRxRRRR B}  g  ifB} BG} BI}  ]R_ B5  g  
struct-refB} R_ B
  BS} B} BV     ]R_ BW g  http-poll-idxg  %http-poll-idx-procedureg  m-1e74a72e9-46E  f  l-1e74a72e9-48 GT RYRRRRbpvz BY} X @ RYRxRRRR Bd} X ?@  f  l-1e74a72e9-4bf  l-1e74a72e9-4c G RYRRRRbpvz B} B} ]R B5   B} X ?@ f  l-1e74a72e9-50f  l-1e74a72e9-51 G RYRRRRbpvz B}  B} R B    B} X ?@ f  l-1e74a72e9-55	f  l-1e74a72e9-56
	 G
 RYRRRRbpvz B} B} ]R B   g  t-1e74a72e9-45 f  l-1e74a72e9-5a G RYRRRRbpvz BC} RYRxRRRR B}  B} BG} BI}   !]R "B5! # " $B} %R &B% '$& (BS} )B} *B! +)* ,(+ -#', .- /]R 0B/ 1g  http-poll-set2g  %http-poll-set-procedure3g  m-1e74a72e9-6143E 54 6f  l-1e74a72e9-6376 8GT57 94R8YRRRRbpvz :BY9} ;X: <;@ =R8YRxRRRR >Bd=} ?X> @?<?@ A44 Bf  l-1e74a72e9-66Cf  l-1e74a72e9-67DBC EGAD F4ER8YRRRRbpvz GBF} HBF} I]ER8 JB5I KHJ LK MB=} NXM O?<N@ Pf  l-1e74a72e9-6bQf  l-1e74a72e9-6cRPQ SGAR T4SR8YRRRRbpvz UBT} VBT} WSR8 XB	W YVX ZY [B=} \X[ ]?<\@ ^f  l-1e74a72e9-70_f  l-1e74a72e9-71`^_ aGA` b4aR8YRRRRbpvz cBb} dBb} e]aR8 fBe gdf hg ig  t-1e74a72e9-60ji kf  l-1e74a72e9-75lk mGj5l n4mR8YRRRRbpvz oBCn} pmR8YRxRRRR qBp} rq sBp} tBGp} uBIp} vuq w]mR8 xB5w ytvx zBp} {mR8 |B	{ }zq| ~BSp} Bp} B1w  ~q sy} or ]R8 B2 g  each@@  @@@g  %%set-fieldsg  dummyg  check?g  expry g  m-1e74a72e9-7cE  f  l-1e74a72e9-81f  l-1e74a72e9-82f  l-1e74a72e9-83f  l-1e74a72e9-84f  l-1e74a72e9-85 G  f  l-1e74a72e9-7e GT g  t-1e8ba8b5a-3c4g  t-1e8ba8b5a-3c6g  t-1e8ba8b5a-3c5 g  m-1e8ba8b5a-3c7E  f  l-1e8ba8b5a-3cbf  l-1e8ba8b5a-3ccf  l-1e8ba8b5a-3cd G f  l-1e8ba8b5a-3c1f  l-1e8ba8b5a-3c2f  l-1e8ba8b5a-3c3 G RYRRRR B} ]R B5 BV B B1  g  map  g  listg  set-http-poll-idx!g  %set-http-poll-idx!-procedure?@@ g  m-1e74a72e9-90E g  t-1e74a72e9-8eg  t-1e74a72e9-8f  f  l-1e74a72e9-95f  l-1e74a72e9-96 G  f  l-1e74a72e9-92 GT RYRRRRbpvz BC} g  t-1e8ba8b5a-3e6g  t-1e8ba8b5a-3e7 g  m-1e8ba8b5a-3e8E  f  l-1e8ba8b5a-3ecf  l-1e8ba8b5a-3ed G g  setterey f  l-1e8ba8b5a-3e0f  l-1e8ba8b5a-3e1f  l-1e8ba8b5a-3e2 G 4z f  l-1e8ba8b5a-3d7f  l-1e8ba8b5a-3d8 G^ g  field-specs f  l-1e8ba8b5a-3d3f  l-1e8ba8b5a-3d4 G^ RYRRR B} g  valB}  B} BG} BI}  ]R B5  g  struct-set!B} R B  BS} B} B       ]R B g  POLLHUPg  POLLERRg  *error-events*	g  POLLIN
g  *read-events*g  *events*g  hostS
g  familySg  addrS	g  portS	g  socketS	 g  AF_INETg  	inet-ptong  INADDR_LOOPBACKg  listeng  	sigactiong  SIGPIPEg  SIG_IGNg  make-empty-poll-setg  poll-set-add! g  	http-open!g  write-response"g  build-response#g  versionS$
%g  codeS&g  headersS'g  content-length('
)( *g  bad-request+g  poll-set-revents,g  
<poll-set>-%, .%, /g  poll-set-nfds0g  accept1g  poll-set-port2g  setvbuf3g  _IOFBF4g  	SO_SNDBUF5g  throw6g  	interrupt7g  poll-set-remove!8g  eof-object?9g  	peek-char:g  
close-port;g  with-throw-handler<g  read-request=g  read-request-body>g  catch?g  format@g  current-error-portAf  In ~a:
Bg  portC*B Dg  print-exceptionE:B Fg  	http-readGg  
<response>HG IG Jg  response-versionKg  response-codeLg  memqMg  closeNg  response-connectionOg  
keep-alivePg  keep-alive?Qg  response-portRg  bytevector?Sg  write-response-bodyTg  errorUf  Expected a bytevector for bodyVg  force-outputWg  
http-writeXg  
http-closeYg  server-implZ!Y [!Y C 5   hh/  /  ] 4	
'()5 4, >  "  G   -./0123  h@      ]4
54>  "  G  4 >  "  G  C       g  family
		@ g  addr		@ g  port			@ g  sock			@  g  filenamef  web/server/http.scm
	(
		)			)			*		&	+	 		@	  g  nameg  make-default-socket C4R5       h      ]  C         g  socket
		 g  poll-idx		 g  poll-set			  g  filenamef  web/server/http.scm
	.
 			  g  nameg  %make-http-server-procedure C6R49:;>A     h   k   ]  C  c       g  t-1e74a72e9-b
		 g  t-1e74a72e9-c		 g  t-1e74a72e9-d			  			   C: h   V   ]L 6    N       g  a
		  g  filenamef  web/server/http.scm		.
 		   C?  h   F   ] L 6>       g  filenamef  web/server/http.scm		.
 		
   C    h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  web/server/http.scm
	.
 		n   C5:R5  4 5>  "  G   	6i  5R5      h   {   ] $   CC      s       g  obj
		  g  filenamef  web/server/http.scm
	.
 		  g  nameg  %http-server?-procedure CR49;>P       h   6   ]  C      .       g  t-1e74a72e9-1e
		
  		
   C      h   V   ]L 6    N       g  a
		  g  filenamef  web/server/http.scm		.
 		   C?  h   F   ] L 6>       g  filenamef  web/server/http.scm		.
 		
   CR   h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  web/server/http.scm
	.
 		n   C5R5UV        h   x   ] &   
C 6p       g  s
		  g  filenamef  web/server/http.scm
	.
 		  g  nameg  %http-socket-procedure CWR49V;>    h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   6   ]  C      .       g  t-1e74a72e9-2a
		
  		
   CV     h   V   ]L 6    N       g  a
		  g  filenamef  web/server/http.scm		.
 		   C?  h   F   ] L 6>       g  filenamef  web/server/http.scm		.
 		
   C   h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/server/http.scm
	.
 	    C5VR5U   h   z   ] &   C 6r       g  s
		  g  filenamef  web/server/http.scm
	.
 		  g  nameg  %http-poll-idx-procedure CR49;>  h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C.     h   6   ]  C      .       g  t-1e74a72e9-45
		
  		
   C     h   V   ]L 6    N       g  a
		  g  filenamef  web/server/http.scm		.
 		   C?  h   F   ] L 6>       g  filenamef  web/server/http.scm		.
 		
   C0   h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/server/http.scm
	.
 	    C5R5U1   h    z   ] &   	C 6       r       g  s
		  g  filenamef  web/server/http.scm
	.
 		  g  nameg  %http-poll-set-procedure C2R491;>@GL  h   :   ]C     2       g  err
		 g  s		  			   COUZ h   :   ]C     2       g  err
		 g  s		  			   C]ch h   :   ]C     2       g  err
		 g  s		  			   C     h   6   ]  C      .       g  t-1e74a72e9-60
		
  		
   C1     h   V   ]L 6    N       g  a
		  g  filenamef  web/server/http.scm		.
 		   C?  h   F   ] L 6>       g  filenamef  web/server/http.scm		.
 		
   C   h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/server/http.scm
	.
 	    C51R49;>      h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  web/server/http.scm
	.
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R5U     h       ] &   C 6             g  s
		 g  val		  g  filenamef  web/server/http.scm
	.
 			  g  nameg  %set-http-poll-idx!-procedure CR49;>       h   R   ]  C    J       g  t-1e74a72e9-8e
		 g  t-1e74a72e9-8f		  			   C h   V   ]L 6    N       g  a
		  g  filenamef  web/server/http.scm		.
 		   C?  h   F   ] L 6>       g  filenamef  web/server/http.scm		.
 		
   C   h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  web/server/http.scm
	.
 		n   C5RiiR	i
Ri
iR45   h   g  -  /     0   3  #   #  #   $  4 5"  #  #  454 >  "  G  4	>  "  G  4
5 4>  "  G  
 C      _      g  host
	  g  family	  g  addr		  g  port		  g  socket		  g  poll-set	    g  filenamef  web/server/http.scm
	:
	2	=		3	>		U	A		b	B		w	C	 	D	 	D	 	E	 	F	 	 

g  hostS
g  familySg  addrS	g  portS	g  socketS	   g  nameg  	http-open C R!"#$%&)    h       ]45 6             g  port
		  g  filenamef  web/server/http.scm
	H
		I			I	,		J	,		I			I	 		  g  nameg  bad-request C*R5U1+$./012301456789:;<=  h   y   ]4L 5 L  4 5Dq       g  req
			  g  filenamef  web/server/http.scm
	}			~				~		 				 		
   C>*    h   P   ] L 6H       g  filenamef  web/server/http.scm
 		 	  		
   C?@ACD     h0   j   - 1 3 445 >  "  G  45  6b       g  k
			0 g  args			0  g  filenamef  web/server/http.scm
 	 			0
   C:       h   P   ] L 6H       g  filenamef  web/server/http.scm
 		 	  		
   C?@AED     h0   j   - 1 3 445 >  "  G  45  6b       g  k
			0 g  args			0  g  filenamef  web/server/http.scm
 	 			0
   C   h8   |   - 1 3 4L O >  "  G  L O 6       t       g  k
			1 g  args			1  g  filenamef  web/server/http.scm
 		
 		1 	 			1
   C      h    ]) &  	 	"  	4 5" 45
$  
$  34>  "  G  &  "  	45"
$  4	4
554>  "  G  40 >  "  G  4>  "  G  4>  "  G  &  "  	45" &   "  4 >  "  G  6
$  	"45 &   "  4 >  "  G  4455$  4>  "  G  "yO O 6 &   "  	4 5"F         g  server
	 g  poll-set	 g  idx		# g  revents		, g  client	  g  port	M g  val	R  g  filenamef  web/server/http.scm
	N
		O			O		#	P		$	Q		,	Q		1	S	
	6	R		9	V		>	U	
	?	X		S	Y		k	Y		q	Y		v	Z		w	Z		|	U	
	}	b	 	b	" 	b	 	b	 	d	 	d	 	d	 	f	 	f	 	f	< 	f	 	g	 	g	& 	g	 	h	 	i	 	i		i		\	1	]	3	]	6	j	
;	R	>	l	D	l	
E	p	M	p	
R	s	'R	s		u		u		u		t		w		x		x		{		P		P		P	 :	  g  nameg  	http-read CFRIUJKLMNO 	   h     ] &   
"  	4 5 &   "  	4 5$  "   &   "  	4 5$  C$  4$  44 55C
$  4 56CCC     w      g  response
	  g  v	  g  t		<	j g  key		q  g  key		~   g  filenamef  web/server/http.scm
 
	 		 		! 		< 		< 			L 		g 		n 		q 		q 			~ 		~ 	  	  	  	%  	  	  	  	  	%  	 	   g  nameg  keep-alive? CPR!IUQRSTUPV51:     h     ]45&  		"  	45$  ;45$  4>  "  G  "  4>  "  G  "   4	5$  E4
>  "  G  4 &  	 	"  	4 5>  "  G  "  4>  "  G  D        g  server
	  g  client	  g  response		  g  body		  g  response		  g  port		(   g  filenamef  web/server/http.scm
 
	 		 		 		( 		0 		1 		; 		< 		T 		X 		_ 		l 		v 		w 	  	  	  	  	  	 	 	  g  nameg  
http-write CWR5U1:7./       hp     ] &  	 	"  	4 5"  -
$  #445>  "  G  "C&  "  	45"      g  server
		p g  poll-set		p g  n		#	P  g  filenamef  web/server/http.scm
 
	 		 		# 		& 	
	+ 		, 		/ 		6 	3	8 		= 		H 		N 		P 		S 		p 	 		p  g  nameg  
http-close CXR iFiWiXi [   RC  '      g  m
		, g  rtd
! g  open
/=/a g  read/=/a g  write	/=/a g  close	/=/a  g  filenamef  web/server/http.scm		
[	(
1	.
P	5	T	5
]	6
h	7	l	7
	:
	H
(p	N
* 
-q 
/) 
/= 
 	/f
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                ccache/web/client.go                                                                                0000644                 00000102527 15154557173 0010360 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0?      ] 4  hh      ] g  guile	 	g  define-module*	 	 	g  web	g  client	 		g  filenameS	
f  web/client.scm	g  importsS	g  rnrs	g  bytevectors	 	 	g  ice-9	g  binary-ports	 	 	g  iconv	 	 	g  rdelim	 	 	g  request	 	 	g  response	 	 	 g  uri	!  	"! 	#g  http	$# 	%$ 	&g  srfi	'g  srfi-1	(&' 	)( 	*g  srfi-9	+&* 	,+ 	-g  gnu	.&*- 	/. 	0"%),/ 	1g  exportsS	2g  current-http-proxy	3g  open-socket-for-uri	4g  http-get	5g  	http-get*	6g  	http-head	7g  	http-post	8g  http-put	9g  http-delete	:g  
http-trace	;g  http-options	<23456789:; 
	=g  set-current-module	>= 	?= 	@g  make-parameter	Ag  getenv	Bf  
http_proxy	Cf   	Dg  string?	Eg  string->uri	Fg  error	Gf  Invalid URI	Hg  <uri>	I!H 	J!H 	Kg  
ensure-uri	Lg  throw-bad-struct	M+L 	N+L 	Og  uri-port	Pg  delete-duplicates	Qg  getaddrinfo	Rg  uri-host	Sg  number->string	Tg  symbol->string	Ug  
uri-scheme	Vg  AI_NUMERICSERV	Wg  addrinfo:addr	Xg  %default-port-encoding	Yg  socket	Zg  addrinfo:fam	[g  SOCK_STREAM	\g  
IPPROTO_IP	]g  catch	^g  system-error	_g  connect	`g  setvbuf	ag  _IOFBF	bg  set-http-proxy-port?!	cg  close	dg  throw	eg  	<request>	fe 	ge 	hg  
assoc-set!	ig  	copy-tree	jg  %%<request>-set-fields	kg  extend-request	lg  request-content-type	mg  
text/plain	nm 	og  assq-ref	pg  charset	qg  sanitize-request	rg  content-type	sg  append	ts 	us 	vf  utf-8	wg  string->bytevector	xg  
procedure?	yg  call-with-encoded-output-string	zg  bytevector?	{g  request-content-length	|g  bytevector-length	}f  bad content-length	~g  content-length	f  unexpected body type f  content-length, but no body g  assq g  transfer-encoding g  request-headers f  *transfer-encoding not allowed with no body g  vu8
	  j    g  response-content-length g  response-content-type g  text-content-type? g  bytevector->string f  
iso-8859-1 g  decode-response-body g  bodyS  g  portS 	 g  methodS 	 g  versionS 	 g  keep-alive?S 	 g  headersS 	 g  decode-body?S 	 g  
streaming?S 	 g  requestS 		  	 g  GET  g  build-request g  
connection c  g  write-request g  write-request-body g  force-output g  request-port g  read-response g  request-method g  HEAD g  
close-port g  response-body-port g  decode?S g  read-response-body 	 	 g  extra-headersS 	   g  issue-deprecation-warning f  HThe #:extra-headers argument to http-get has been renamed to #:headers.  f  Please update your code.   f  "`http-get*' has been deprecated.   f  BInstead, use `http-get' with the #:streaming? #t keyword argument. g  make-syntax-transformer     g  define-http-verb g  macro g  $sc-dispatch     g  any   g  syntax-object g  define* g  top   g  ribcage g  dummy g  	http-verb g  method g  doc   g  m-1a596c681-fb     f  l-1a596c681-100 f  l-1a596c681-101 f  l-1a596c681-102 f  l-1a596c681-103       g  x     f  l-1a596c681-fd       g  hygiene        g  keyS   g  body       g  port   3      g  version   g  quote          g  keep-alive?     g  headers       g  decode-body?      g  
streaming?    	    	 
    	
 g  syntax-violation  f  -source expression failed to match any pattern			 g  POSTg  PUTg  DELETEg  TRACEg  OPTIONSC 5   hho  -  ]4	
01<5 4? >  "  G   4@i4AiB5  C$  "    52RDEFGJ      h@      ]4 5$   6"   6 $   &   C""             g  uri-or-string
		:  g  filenamef  web/client.scm
	=
		?			>			?			A			A				>		"	@		&	>		)	@	 		:  g  nameg  
ensure-uri CKR2KJNOPQRSTUVW   h   |   ]4 545C      t       g  ai1
		 g  ai2		  g  filenamef  web/client.scm
	P			Q		
	Q	%		Q		 			   CXYZ[\]^_W`ab       hP   q   ] 4L4L5>  "  G  4L>  "  G  M $  4L>  "  G  "   LC i       g  filenamef  web/client.scm
	Y			Z	
		Z			Z	
		]	
	5	_	
	6	_	 		O
   Ccd       h0      -  1  3 4L>  "  G  L (   @LL 6 ~       g  args
			/  g  filenamef  web/client.scm
	a		
	c	
		d		"	d	
	(	e		-	f		/	f	 			/


   C 
      h@      ] Y4455ZLO 	 L O 6            g  	addresses
		; g  ai		; g  s			;  g  filenamef  web/client.scm
	S			T			T			W			W			W			T		#	X		;	X	 
		;  g  nameg  loop C     h     ]!HHH45 K4J$  J"   5KJ&  	J	"  	4J544J&  	J	"  	4J5$  4	5"  4
J&  J
"  	4J55$  "  
55KO Q J6           g  uri-or-string
	  g  
http-proxy	  g  uri		  g  	addresses		  g  port		B  g  loop	    g  filenamef  web/client.scm
	C
		E			F			F		%	F		*	H		B	H		E	I		H	J		M	J		k	K		w	L	 	|	L	0 	L	  	M	 	J	 	I	 	S	 	   g  nameg  open-socket-for-urig  documentationf  9Return an open input/output port for a connection to URI. C3RghiNjk  hh     - 1 3  &  3 
  	44 	55 	 	 "  	4 5(  C@              g  r
			a g  k			a g  v				a g  
additional				a g  r		N	a  g  filenamef  web/client.scm
	h
		i		"	j		%	j	"	,	j	-	.	j	"	4	j		9	i		N	i		V	l		a	n	 			a	
	  g  nameg  extend-request CkRDlnopqkruvwxyz{|F}~gN      h    ]$ 45$  T4 545$   "  4 4	
 554$  "  
5645$  T4 545$   "  4 4	
 554$  "  
5645$  K4 545$  $   "  45"  4 5D64 5$  "
$  "  4>  "  G  "  <4 &  	 	"  	4 55$  4>  "  G  "    D   }      g  request
	 g  body	 g  type			g g  declared-charset		(	g g  type		{  g  declared-charset	   g  rlen	  g  blen	  g  length	)  	g  filenamef  web/client.scm
	q
	 			 		 		 		 	/	 		 		 		$ 	'	& 	2	( 		( 		2 		9 		? 	#	@ 		H 	)	I 		P 		Q 		[ 		c 	)	e 		g 		h 		r 		s 		y 	(	{ 		{ 		~ 	  	'  	2  	  	  	  	  	#  	  	)  	  	  	  	  	)  	  	  		  	  	  	  	  	  	  	  	  	  	 	 	- 	 	  	" 	# 	) 	1 	4 	9 	
> 	B 	G 	T 	X 	[ 	)u 	y 	
z 	~ 	 	 	 	 T		  g  nameg  sanitize-requestg  documentation k 0"   S   a   n   i   t   i   z   e   "       t   h   e       g   i   v   e   n       r   e   q   u   e   s   t       a   n   d       b   o   d   y   ,       e   n   s   u   r   i   n   g       t   h   a   t       t   h   e   y       a   r   e   
   c   o   m   p   l   e   t   e       a   n   d       c   o   h   e   r   e   n   t   .           T   h   i   s       m   e   t   h   o   d       i   s       m   o   s   t       u   s   e   f   u   l       f   o   r       m   e   t   h   o   d   s       t   h   a   t       s   e   n   d   
   d   a   t   a       t   o       t   h   e       s   e   r   v   e   r   ,       l   i   k   e       P   O   S   T   ,       b   u   t       c   a   n       b   e       u   s   e   d       f   o   r       a   n   y       m   e   t   h   o   d   .           R   e   t   u   r   n   
   t   w   o       v   a   l   u   e   s   :       a       r   e   q   u   e   s   t       a   n   d       a       b   y   t   e   v   e   c   t   o   r   ,       p   o   s   s   i   b   l   y       t   h   e       s   a   m   e       o   n   e   s       t   h   a   t       w   e   r   e   
   p   a   s   s   e   d       a   s       a   r   g   u   m   e   n   t   s   .   
   
   I   f       B   O   D   Y       i   s       a       s   t   r   i   n   g   ,       e   n   c   o   d   e   s       t   h   e       s   t   r   i   n   g       t   o       a       b   y   t   e   v   e   c   t   o   r   ,       i   n       a   n       e   n   c   o   d   i   n   g   
   a   p   p   r   o   p   r   i   a   t   e       f   o   r       R   E   Q   U   E   S   T   .           A   d   d   s       a          c   o   n   t   e   n   t   -   l   e   n   g   t   h          a   n   d          c   o   n   t   e   n   t   -   t   y   p   e      
   h   e   a   d   e   r   ,       a   s       n   e   c   e   s   s   a   r   y   .   
   
   I   f       B   O   D   Y       i   s       a       p   r   o   c   e   d   u   r   e   ,       i   t       i   s       c   a   l   l   e   d       w   i   t   h       a       p   o   r   t       a   s       a   n       a   r   g   u   m   e   n   t   ,       a   n   d       t   h   e   
   o   u   t   p   u   t       c   o   l   l   e   c   t   e   d       a   s       a       b   y   t   e   v   e   c   t   o   r   .           I   n       t   h   e       f   u   t   u   r   e       w   e       m   i   g   h   t       t   r   y       t   o       i   n   s   t   e   a   d   
   u   s   e       a       c   o   m   p   r   e   s   s   i   n   g   ,       c   h   u   n   k   -   e   n   c   o   d   e   d       p   o   r   t   ,       a   n   d       c   a   l   l       t   h   i   s       p   r   o   c   e   d   u   r   e       l   a   t   e   r   .   
   A   u   t   h   o   r   s       a   r   e       a   d   v   i   s   e   d       n   o   t       t   o       r   e   l   y       o   n       t   h   e       p   r   o   c   e   d   u   r   e       b   e   i   n   g       c   a   l   l   e   d       a   t       a   n   y   
   p   a   r   t   i   c   u   l   a   r       t   i   m   e   .   
   
   N   o   t   e       t   h   a   t       w   e       r   e   l   y       o   n       t   h   e       r   e   q   u   e   s   t       i   t   s   e   l   f       a   l   r   e   a   d   y       h   a   v   i   n   g       b   e   e   n       v   a   l   i   d   a   t   e   d   ,   
   a   s       i   s       t   h   e       c   a   s   e       b   y       d   e   f   a   u   l   t       w   i   t   h       a       r   e   q   u   e   s   t       r   e   t   u   r   n   e   d       b   y       `   b   u   i   l   d   -   r   e   q   u   e   s   t   '   .    CqRz|opF}    h     ]"$  45$  {4 545"  D4 5$  245$  #45$  "  	6CC$  $  "
6"
6C             g  response
	  g  body	  g  rlen		!  g  blen		!  g  t		0	m g  t		R	e  g  filenamef  web/client.scm
 
	 			 		 		 		 		! 		* 		0 		9 		> 	#	@ 		D 		I 	,	N 	6	P 	A	R 	,	R 	(	b 	,	g 		m 		x 		| 	  	  	  	  	 	 	  g  nameg  decode-response-body CR3KqgN   h    - /   
0  
 3 #  #  	4 5#  #  #  #  #  #  	#  -44 5	$  "  
5		4	>  G 
4
5$  4>  "  G  "   4&  		"  	45>  "  G  45&  
"  	45&  !$  "  4>  "  G  D$  45D45$  "  4>  "  G  $  45"  D       g  uri
	 g  body	 g  port		 g  method		 g  version		 g  keep-alive?		 g  headers		 g  decode-body?		 g  
streaming?		 g  request			 g  request	
  g  body	  g  request	  g  response	 g  body	h  g  filenamef  web/client.scm
 
	# 		3 		= 		O 		j 		m 	  	  	(  	"  	  	  	  	  	  	  	
  	  	  	  	 	
 	# 	*' 	
- 	2 	H 	N 	
Q 	a 	b 	h 	p 	u 	 	 	 	 '	
g  bodySg  portS	g  methodS	g  versionS	g  keep-alive?S	g  headersS	g  decode-body?S	g  
streaming?S	g  requestS		 
  g  nameg  request CR3   h   )  - /   	0  	 3 	#  #  	4 5#  #  #  #  $  "  #  #  $  4>  "  G  "    	
6      !      g  uri
	  g  body	  g  port		  g  version		  g  keep-alive?		  g  extra-headers		  g  headers		  g  decode-body?		  g  
streaming?		   	g  filenamef  web/client.scm
 
	# 		3 		S 	/	Z 	A	t		u		y		{	 	 	 	 	 
g  bodySg  portS	g  versionS	g  keep-alive?S	g  extra-headersS	g  headersS	g  decode-body?S	g  
streaming?S	 	  g  nameg  http-getg  documentation   k C   o   n   n   e   c   t       t   o       t   h   e       s   e   r   v   e   r       c   o   r   r   e   s   p   o   n   d   i   n   g       t   o       U   R   I       a   n   d       a   s   k       f   o   r       t   h   e   
   r   e   s   o   u   r   c   e   ,       u   s   i   n   g       t   h   e          G   E   T          m   e   t   h   o   d   .           I   f       y   o   u       a   l   r   e   a   d   y       h   a   v   e       a       p   o   r   t       o   p   e   n   ,   
   p   a   s   s       i   t       a   s       P   O   R   T   .           T   h   e       p   o   r   t       w   i   l   l       b   e       c   l   o   s   e   d       a   t       t   h   e       e   n   d       o   f       t   h   e   
   r   e   q   u   e   s   t       u   n   l   e   s   s       K   E   E   P   -   A   L   I   V   E   ?       i   s       t   r   u   e   .           A   n   y       e   x   t   r   a       h   e   a   d   e   r   s       i   n       t   h   e   
   a   l   i   s   t       H   E   A   D   E   R   S       w   i   l   l       b   e       a   d   d   e   d       t   o       t   h   e       r   e   q   u   e   s   t   .   
   
   I   f       B   O   D   Y       i   s       n   o   t          #   f      ,       a       m   e   s   s   a   g   e       b   o   d   y       w   i   l   l       a   l   s   o       b   e       s   e   n   t       w   i   t   h       t   h   e       H   T   T   P   
   r   e   q   u   e   s   t   .           I   f       B   O   D   Y       i   s       a       s   t   r   i   n   g   ,       i   t       i   s       e   n   c   o   d   e   d       a   c   c   o   r   d   i   n   g       t   o       t   h   e   
   c   o   n   t   e   n   t   -   t   y   p   e       i   n       H   E   A   D   E   R   S   ,       d   e   f   a   u   l   t   i   n   g       t   o       U   T   F   -   8   .           O   t   h   e   r   w   i   s   e       B   O   D   Y       s   h   o   u   l   d       b   e   
   a       b   y   t   e   v   e   c   t   o   r   ,       o   r          #   f          f   o   r       n   o       b   o   d   y   .           A   l   t   h   o   u   g   h       i   t   '   s       a   l   l   o   w   e   d       t   o       s   e   n   d       a   
   m   e   s   s   a   g   e       b   o   d   y       a   l   o   n   g       w   i   t   h       a   n   y       r   e   q   u   e   s   t   ,       u   s   u   a   l   l   y       o   n   l   y       P   O   S   T       a   n   d       P   U   T       r   e   q   u   e   s   t   s   
   h   a   v   e       b   o   d   i   e   s   .           S   e   e          h   t   t   p   -   p   u   t          a   n   d          h   t   t   p   -   p   o   s   t          d   o   c   u   m   e   n   t   a   t   i   o   n   ,       f   o   r       m   o   r   e   .   
   
   I   f       D   E   C   O   D   E   -   B   O   D   Y   ?       i   s       t   r   u   e   ,       a   s       i   s       t   h   e       d   e   f   a   u   l   t   ,       t   h   e       b   o   d   y       o   f       t   h   e   
   r   e   s   p   o   n   s   e       w   i   l   l       b   e       d   e   c   o   d   e   d       t   o       s   t   r   i   n   g   ,       i   f       i   t       i   s       a       t   e   x   t   u   a   l       c   o   n   t   e   n   t   -   t   y   p   e   .   
   O   t   h   e   r   w   i   s   e       i   t       w   i   l   l       b   e       r   e   t   u   r   n   e   d       a   s       a       b   y   t   e   v   e   c   t   o   r   .   
   
   H   o   w   e   v   e   r   ,       i   f       S   T   R   E   A   M   I   N   G   ?       i   s       t   r   u   e   ,       i   n   s   t   e   a   d       o   f       e   a   g   e   r   l   y       r   e   a   d   i   n   g       t   h   e       r   e   s   p   o   n   s   e   
   b   o   d   y       f   r   o   m       t   h   e       s   e   r   v   e   r   ,       t   h   i   s       f   u   n   c   t   i   o   n       o   n   l   y       r   e   a   d   s       o   f   f       t   h   e       h   e   a   d   e   r   s   .           T   h   e   
   r   e   s   p   o   n   s   e       b   o   d   y       w   i   l   l       b   e       r   e   t   u   r   n   e   d       a   s       a       p   o   r   t       o   n       w   h   i   c   h       t   h   e       d   a   t   a       m   a   y       b   e       r   e   a   d   .   
   U   n   l   e   s   s       K   E   E   P   -   A   L   I   V   E   ?       i   s       t   r   u   e   ,       t   h   e       p   o   r   t       w   i   l   l       b   e       c   l   o   s   e   d       a   f   t   e   r       t   h   e       f   u   l   l   
   r   e   s   p   o   n   s   e       b   o   d   y       h   a   s       b   e   e   n       r   e   a   d   .   
   
   R   e   t   u   r   n   s       t   w   o       v   a   l   u   e   s   :       t   h   e       r   e   s   p   o   n   s   e       r   e   a   d       f   r   o   m       t   h   e       s   e   r   v   e   r   ,       a   n   d       t   h   e       r   e   s   p   o   n   s   e   
   b   o   d   y       a   s       a       s   t   r   i   n   g   ,       b   y   t   e   v   e   c   t   o   r   ,       #   f       v   a   l   u   e   ,       o   r       a   s       a       p   o   r   t       (   i   f       S   T   R   E   A   M   I   N   G   ?       i   s   
   t   r   u   e   )   .    C4R34    h     - /   0   3 #  #  	4 5#  #  #  #  $  "  #  4>  "  G   	
6             g  uri
	  g  body	  g  port		  g  version		  g  keep-alive?		  g  extra-headers		  g  headers		  g  decode-body?		   g  filenamef  web/client.scm
!
	##		3$		S&	0	Z&	B	f)		j*		l+		q)	 ,	 	 
g  bodySg  portS	g  versionS	g  keep-alive?S	g  extra-headersS	g  headersS	g  decode-body?S	   g  nameg  	http-get*g  documentationf  2Deprecated in favor of (http-get #:streaming? #t). C5R4 	 h(   i   ] C     a       g  dummy
		# g  	http-verb		# g  method			# g  doc			#  		#	   C      h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  web/client.scm
0
 		"  g  
macro-typeg  syntax-rulesg  patternsg  	http-verbg  methodg  doc   C5R3    h     - /   0   3 #  #  	4 5#  #  #  #  #   	
6       g  uri
		 g  body		 g  port			 g  version			 g  keep-alive?			 g  headers			 g  decode-body?			 g  
streaming?			  g  filenamef  web/client.scm
@
	eA		@
 		
g  bodySg  portS	g  versionS	g  keep-alive?S	g  headersS	g  decode-body?S	g  
streaming?S	   g  nameg  	http-headg  documentation k @F   e   t   c   h       m   e   s   s   a   g   e       h   e   a   d   e   r   s       f   o   r       t   h   e       g   i   v   e   n       U   R   I       u   s   i   n   g       t   h   e       H   T   T   P       "   H   E   A   D   "   
   m   e   t   h   o   d   .   
   
   T   h   i   s       f   u   n   c   t   i   o   n       i   s       s   i   m   i   l   a   r       t   o          h   t   t   p   -   g   e   t      ,       e   x   c   e   p   t       i   t       u   s   e   s       t   h   e       "   H   E   A   D   "   
   m   e   t   h   o   d   .           S   e   e          h   t   t   p   -   g   e   t          f   o   r       f   u   l   l       d   o   c   u   m   e   n   t   a   t   i   o   n       o   n       t   h   e       v   a   r   i   o   u   s       k   e   y   w   o   r   d   
   a   r   g   u   m   e   n   t   s       t   h   a   t       a   r   e       a   c   c   e   p   t   e   d       b   y       t   h   i   s       f   u   n   c   t   i   o   n   .   
   
   R   e   t   u   r   n   s       t   w   o       v   a   l   u   e   s   :       t   h   e       r   e   s   u   l   t   i   n   g       r   e   s   p   o   n   s   e   ,       a   n   d          #   f      .           R   e   s   p   o   n   s   e   s       t   o       H   E   A   D   
   r   e   q   u   e   s   t   s       d   o       n   o   t       h   a   v   e       a       b   o   d   y   .           T   h   e       s   e   c   o   n   d       v   a   l   u   e       i   s       o   n   l   y       r   e   t   u   r   n   e   d       s   o       t   h   a   t   
   o   t   h   e   r       p   r   o   c   e   d   u   r   e   s       c   a   n       t   r   e   a   t       a   l   l       o   f       t   h   e       h   t   t   p   -   f   o   o       v   e   r   b   s       i   d   e   n   t   i   c   a   l   l   y   .    C6R3        h   i  - /   0   3 #  #  	4 5#  #  #  #  #   	
6 a      g  uri
		 g  body		 g  port			 g  version			 g  keep-alive?			 g  headers			 g  decode-body?			 g  
streaming?			  g  filenamef  web/client.scm
M
	eN		M
 		
g  bodySg  portS	g  versionS	g  keep-alive?S	g  headersS	g  decode-body?S	g  
streaming?S	   g  nameg  	http-postg  documentation k P   o   s   t       d   a   t   a       t   o       t   h   e       g   i   v   e   n       U   R   I       u   s   i   n   g       t   h   e       H   T   T   P       "   P   O   S   T   "       m   e   t   h   o   d   .   
   
   T   h   i   s       f   u   n   c   t   i   o   n       i   s       s   i   m   i   l   a   r       t   o          h   t   t   p   -   g   e   t      ,       e   x   c   e   p   t       i   t       u   s   e   s       t   h   e       "   P   O   S   T   "   
   m   e   t   h   o   d   .           S   e   e          h   t   t   p   -   g   e   t          f   o   r       f   u   l   l       d   o   c   u   m   e   n   t   a   t   i   o   n       o   n       t   h   e       v   a   r   i   o   u   s       k   e   y   w   o   r   d   
   a   r   g   u   m   e   n   t   s       t   h   a   t       a   r   e       a   c   c   e   p   t   e   d       b   y       t   h   i   s       f   u   n   c   t   i   o   n   .   
   
   R   e   t   u   r   n   s       t   w   o       v   a   l   u   e   s   :       t   h   e       r   e   s   u   l   t   i   n   g       r   e   s   p   o   n   s   e   ,       a   n   d       t   h   e       r   e   s   p   o   n   s   e       b   o   d   y   .    C7R3    h   ]  - /   0   3 #  #  	4 5#  #  #  #  #   	
6 U      g  uri
		 g  body		 g  port			 g  version			 g  keep-alive?			 g  headers			 g  decode-body?			 g  
streaming?			  g  filenamef  web/client.scm
W
	eX		W
 		
g  bodySg  portS	g  versionS	g  keep-alive?S	g  headersS	g  decode-body?S	g  
streaming?S	   g  nameg  http-putg  documentation  k P   u   t       d   a   t   a       a   t       t   h   e       g   i   v   e   n       U   R   I       u   s   i   n   g       t   h   e       H   T   T   P       "   P   U   T   "       m   e   t   h   o   d   .   
   
   T   h   i   s       f   u   n   c   t   i   o   n       i   s       s   i   m   i   l   a   r       t   o          h   t   t   p   -   g   e   t      ,       e   x   c   e   p   t       i   t       u   s   e   s       t   h   e       "   P   U   T   "   
   m   e   t   h   o   d   .           S   e   e          h   t   t   p   -   g   e   t          f   o   r       f   u   l   l       d   o   c   u   m   e   n   t   a   t   i   o   n       o   n       t   h   e       v   a   r   i   o   u   s       k   e   y   w   o   r   d   
   a   r   g   u   m   e   n   t   s       t   h   a   t       a   r   e       a   c   c   e   p   t   e   d       b   y       t   h   i   s       f   u   n   c   t   i   o   n   .   
   
   R   e   t   u   r   n   s       t   w   o       v   a   l   u   e   s   :       t   h   e       r   e   s   u   l   t   i   n   g       r   e   s   p   o   n   s   e   ,       a   n   d       t   h   e       r   e   s   p   o   n   s   e       b   o   d   y   .    C8R3        h     - /   0   3 #  #  	4 5#  #  #  #  #   	
6 }      g  uri
		 g  body		 g  port			 g  version			 g  keep-alive?			 g  headers			 g  decode-body?			 g  
streaming?			  g  filenamef  web/client.scm
a
	eb		a
 		
g  bodySg  portS	g  versionS	g  keep-alive?S	g  headersS	g  decode-body?S	g  
streaming?S	   g  nameg  http-deleteg  documentation   k D   e   l   e   t   e       d   a   t   a       a   t       t   h   e       g   i   v   e   n       U   R   I       u   s   i   n   g       t   h   e       H   T   T   P       "   D   E   L   E   T   E   "       m   e   t   h   o   d   .   
   
   T   h   i   s       f   u   n   c   t   i   o   n       i   s       s   i   m   i   l   a   r       t   o          h   t   t   p   -   g   e   t      ,       e   x   c   e   p   t       i   t       u   s   e   s       t   h   e       "   D   E   L   E   T   E   "   
   m   e   t   h   o   d   .           S   e   e          h   t   t   p   -   g   e   t          f   o   r       f   u   l   l       d   o   c   u   m   e   n   t   a   t   i   o   n       o   n       t   h   e       v   a   r   i   o   u   s       k   e   y   w   o   r   d   
   a   r   g   u   m   e   n   t   s       t   h   a   t       a   r   e       a   c   c   e   p   t   e   d       b   y       t   h   i   s       f   u   n   c   t   i   o   n   .   
   
   R   e   t   u   r   n   s       t   w   o       v   a   l   u   e   s   :       t   h   e       r   e   s   u   l   t   i   n   g       r   e   s   p   o   n   s   e   ,       a   n   d       t   h   e       r   e   s   p   o   n   s   e       b   o   d   y   .    C9R3        h     - /   0   3 #  #  	4 5#  #  #  #  #   	
6       g  uri
		 g  body		 g  port			 g  version			 g  keep-alive?			 g  headers			 g  decode-body?			 g  
streaming?			  g  filenamef  web/client.scm
k
	el		k
 		
g  bodySg  portS	g  versionS	g  keep-alive?S	g  headersS	g  decode-body?S	g  
streaming?S	   g  nameg  
http-traceg  documentationk dS   e   n   d       a   n       H   T   T   P       "   T   R   A   C   E   "       r   e   q   u   e   s   t   .   
   
   T   h   i   s       f   u   n   c   t   i   o   n       i   s       s   i   m   i   l   a   r       t   o          h   t   t   p   -   g   e   t      ,       e   x   c   e   p   t       i   t       u   s   e   s       t   h   e       "   T   R   A   C   E   "   
   m   e   t   h   o   d   .           S   e   e          h   t   t   p   -   g   e   t          f   o   r       f   u   l   l       d   o   c   u   m   e   n   t   a   t   i   o   n       o   n       t   h   e       v   a   r   i   o   u   s       k   e   y   w   o   r   d   
   a   r   g   u   m   e   n   t   s       t   h   a   t       a   r   e       a   c   c   e   p   t   e   d       b   y       t   h   i   s       f   u   n   c   t   i   o   n   .   
   
   R   e   t   u   r   n   s       t   w   o       v   a   l   u   e   s   :       t   h   e       r   e   s   u   l   t   i   n   g       r   e   s   p   o   n   s   e   ,       a   n   d       t   h   e       r   e   s   p   o   n   s   e       b   o   d   y   .    C:R3    h     - /   0   3 #  #  	4 5#  #  #  #  #   	
6       g  uri
		 g  body		 g  port			 g  version			 g  keep-alive?			 g  headers			 g  decode-body?			 g  
streaming?			  g  filenamef  web/client.scm
u
	ev		u
 		
g  bodySg  portS	g  versionS	g  keep-alive?S	g  headersS	g  decode-body?S	g  
streaming?S	   g  nameg  http-optionsg  documentation  k  Q   u   e   r   y       c   h   a   r   a   c   t   e   r   i   s   t   i   c   s       o   f       a   n       H   T   T   P       r   e   s   o   u   r   c   e       u   s   i   n   g       t   h   e       H   T   T   P       "   O   P   T   I   O   N   S   "   
   m   e   t   h   o   d   .   
   
   T   h   i   s       f   u   n   c   t   i   o   n       i   s       s   i   m   i   l   a   r       t   o          h   t   t   p   -   g   e   t      ,       e   x   c   e   p   t       i   t       u   s   e   s       t   h   e       "   O   P   T   I   O   N   S   "   
   m   e   t   h   o   d   .           S   e   e          h   t   t   p   -   g   e   t          f   o   r       f   u   l   l       d   o   c   u   m   e   n   t   a   t   i   o   n       o   n       t   h   e       v   a   r   i   o   u   s       k   e   y   w   o   r   d   
   a   r   g   u   m   e   n   t   s       t   h   a   t       a   r   e       a   c   c   e   p   t   e   d       b   y       t   h   i   s       f   u   n   c   t   i   o   n   .   
   
   R   e   t   u   r   n   s       t   w   o       v   a   l   u   e   s   :       t   h   e       r   e   s   u   l   t   i   n   g       r   e   s   p   o   n   s   e   ,       a   n   d       t   h   e       r   e   s   p   o   n   s   e       b   o   d   y   .    C;RC  %      g  m
		, g  proxy
	:	O  g  filenamef  web/client.scm		!
	-	9		2	9		8	9	'	:	9		:	9		@	:	,	A	:		E	:		Q	9		T	8
n	=
	C
	&	h
	q
  
% 
= 
@!
K@
RM
ZW
a@a
gk
odu
 	of
   C6                                                                                                                                                                          ccache/web/server.go                                                                                0000644                 00000140721 15154557173 0010406 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] 4      hI      ] g  guile	 	g  define-module*	 	 	g  web	g  server	 		g  filenameS	
f  web/server.scm	g  importsS	g  srfi	g  srfi-9	 	 	g  gnu	 	 	g  rnrs	g  bytevectors	 	 	g  ice-9	g  binary-ports	 	 	g  request	 	 	g  response	 	  	!g  system	"g  repl	#g  error-handling	$!"# 	%$ 	&g  control	'& 	(' 	)g  iconv	*) 	+* 	, %(+ 		-g  exportsS	.g  define-server-impl	/g  lookup-server-impl	0g  make-server-impl	1g  server-impl?	2g  server-impl-name	3g  server-impl-open	4g  server-impl-read	5g  server-impl-write	6g  server-impl-close	7g  open-server	8g  read-client	9g  handle-request	:g  sanitize-response	;g  write-client	<g  close-server	=g  serve-one-client	>g  
run-server	?./0123456789:;<=> 	@g  set-current-module	A@ 	B@ 	Cg  gettimeofday	Dg  *timer*	Eg  pk	Fg  print-elapsed	Gg  make-syntax-transformer	HG 	IG 	Jg  debug-elapsed	Kg  macro	Lg  $sc-dispatch	ML 	NL 	Og  _	Pg  any	QOP 	Rg  *time-debug?*	Sg  syntax-object	Tg  top	UT 	Vg  ribcage	Wg  who	XW 	YU 	Zf  l-1e6f79399-8	[Z 	\VXY[ 	]V 	^g  x	_^ 	`f  l-1e6f79399-5	a` 	bV_Ya 	cU\]b 	dg  hygiene	ed 	fSFce 	gg  *unspecified*	hSgce 	ig  syntax-violation	ji 	ki 	lf  -source expression failed to match any pattern	mg  server-impl	ng  %make-server-impl-procedure	oOPPPPP 	pg  lambda	qg  m-1e6f79399-12	rqT 	sg  t-1e6f79399-d	tg  t-1e6f79399-e	ug  t-1e6f79399-f	vg  t-1e6f79399-10	wg  t-1e6f79399-11	xstuvw 	yrrrrr 	zf  l-1e6f79399-17	{f  l-1e6f79399-18	|f  l-1e6f79399-19	}f  l-1e6f79399-1a	~f  l-1e6f79399-1b	z{|}~  Vxy  r  f  l-1e6f79399-14   V_  g  shift g  	proc-name g  args   UU  f  l-1e8ba8b5a-2ba f  l-1e8ba8b5a-2bb   V  g  key g  value g  name g  formals g  body   UUUUU  f  l-1e8ba8b5a-2ad f  l-1e8ba8b5a-2ae f  l-1e8ba8b5a-2af f  l-1e8ba8b5a-2b0 f  l-1e8ba8b5a-2b1   V  g  make-procedure-name   U  f  l-1e8ba8b5a-29d   V  f  l-1e8ba8b5a-29c   V_Y  r]]]]]  d  Sp  U]  Se  g  open Se  g  read Se  g  write Se  g  close Se    g  make-struct g  m-1e6f79399-b T  g  t-1e8ba8b5a-38d g  t-1e8ba8b5a-38c g  t-1e8ba8b5a-38b   g  m-1e8ba8b5a-38e T    f  l-1e8ba8b5a-392 f  l-1e8ba8b5a-393 f  l-1e8ba8b5a-394   V  g  	ctor-args   f  l-1e8ba8b5a-37a   VY  g  ctor g  field   f  l-1e8ba8b5a-376 f  l-1e8ba8b5a-377   V  g  form g  	type-name g  constructor-spec g  field-names   UUUU  f  l-1e8ba8b5a-36b f  l-1e8ba8b5a-36c f  l-1e8ba8b5a-36d f  l-1e8ba8b5a-36e   V  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers   UUUUUUUU  f  l-1e8ba8b5a-343 f  l-1e8ba8b5a-341 f  l-1e8ba8b5a-33f f  l-1e8ba8b5a-33d f  l-1e8ba8b5a-33b f  l-1e8ba8b5a-339 f  l-1e8ba8b5a-337 f  l-1e8ba8b5a-335   V  f  l-1e8ba8b5a-334   V_Y  ]]]]]]  S  Sme  S
      g  each-any O i  i  f  Wrong number of arguments g  identifier?     U]  Sne g  record-type-vtable  g  
pwpwpwpwpwg  default-record-printer   	g  set-struct-vtable-name!
	 	 g  vtable-offset-user  g  %server-impl?-procedureg  m-1e6f79399-27T g  t-1e6f79399-26  f  l-1e6f79399-2c V f  l-1e6f79399-29 V_ ]]]]] Sp g  objg  t-1e8ba8b5a-47eg  t-1e8ba8b5a-478 g  t-1e8ba8b5a-479!g  t-1e8ba8b5a-47a"g  t-1e8ba8b5a-47d#g  t-1e8ba8b5a-47c$g  t-1e8ba8b5a-47b% !"#$ &g  m-1e8ba8b5a-47f'&T (''''''' )f  l-1e8ba8b5a-483*f  l-1e8ba8b5a-484+f  l-1e8ba8b5a-485,f  l-1e8ba8b5a-486-f  l-1e8ba8b5a-487.f  l-1e8ba8b5a-488/f  l-1e8ba8b5a-4890)*+,-./ 1V%(0 2g  	copier-id32 4f  l-1e8ba8b5a-47654 6V3Y5 7g  	ctor-name87 9f  l-1e8ba8b5a-46e:9 ;V8Y: < =f  l-1e8ba8b5a-46c>= ?V<Y> @g  layoutA@ Bf  l-1e8ba8b5a-46aCB DVAYC Eg  
immutable?FE Gf  l-1e8ba8b5a-468HG IVFYH Jg  field-countKJ Lf  l-1e8ba8b5a-466ML NVKYM Og  
getter-idsPO Qf  l-1e8ba8b5a-463RQ SVPYR Tg  	field-idsUT Vf  l-1e8ba8b5a-460WV XVUYW Yg  predicate-nameZg  
field-spec[EYZ \UUUUUU ]f  l-1e8ba8b5a-453^f  l-1e8ba8b5a-454_f  l-1e8ba8b5a-455`f  l-1e8ba8b5a-456af  l-1e8ba8b5a-457bf  l-1e8ba8b5a-458c]^_`ab dV[\c e]]1]]]]6];]?]D]I]N]S]Xd fSe gf hg  andiShe jg  struct?kSje lkf mg  eq?nSme og  struct-vtablepSoe qpf rU] sSmre tnqs uilt vgu wU] xSwe yg  throw-bad-structzy {y |g  %server-impl-name-procedure}g  free-id~g  
%%on-errorg  m-1e6f79399-33T  f  l-1e6f79399-35 V_ ]]]]] S~ } P g  %%typeg  t-1e8ba8b5a-3a5g  t-1e8ba8b5a-3a6g  t-1e8ba8b5a-3a7g  t-1e8ba8b5a-3a8g  t-1e8ba8b5a-3a9g  t-1e8ba8b5a-3aag  t-1e8ba8b5a-3ab g  m-1e8ba8b5a-3acT  f  l-1e8ba8b5a-3b0f  l-1e8ba8b5a-3b1f  l-1e8ba8b5a-3b2f  l-1e8ba8b5a-3b3f  l-1e8ba8b5a-3b4f  l-1e8ba8b5a-3b5f  l-1e8ba8b5a-3b6 V g  getterg  index f  l-1e8ba8b5a-3a3f  l-1e8ba8b5a-3a4 V O2 UUU f  l-1e8ba8b5a-39ef  l-1e8ba8b5a-39ff  l-1e8ba8b5a-3a0 V ]]]]]] S } OP g  ckg  errg  s  f  l-1e6f79399-38f  l-1e6f79399-39 V ]]]]] S g  quoteS U] Sme   g  %%indexS } OP f  l-1e6f79399-3df  l-1e6f79399-3e V ]]]]] S S ] S
e   g  %%copierS } OP f  l-1e6f79399-42f  l-1e6f79399-43 V ]]]]] S S g  %%server-impl-set-fieldsU] Se   g  t-1e6f79399-32 f  l-1e6f79399-47 V ]]]]] Sp ]]]]]] S  g  ifS Sm So  U] Sme  g  
struct-refS ] S
e  Sy S S2e     U] S|e  g  %server-impl-open-procedureg  m-1e6f79399-4eT  f  l-1e6f79399-50 V_ ]]]]] S~ 	} 
	P ]]]]]] S } O
P  f  l-1e6f79399-53f  l-1e6f79399-54 V ]]]]] S S U] Sme   S } O
P f  l-1e6f79399-58f  l-1e6f79399-59  !V  "!]]]]] #S" $S" %!] &S%e '$& (' )S *}) +O
*P ,f  l-1e6f79399-5d-f  l-1e6f79399-5e.,- /V. 0/]]]]] 1S0 2S0 3U/] 4S3e 524 65 7g  t-1e6f79399-4d87 9f  l-1e6f79399-62:9 ;V8: <;]]]]] =Sp< >;]]]]]] ?S> @? AS> BSm> CSo> DC? EU;] FSmEe GBDF HS> I;] JSIe KH?J LSy> MS> NS3Ee OMN PL?O QAGKP R=@Q SU] TS Se Ug  %server-impl-read-procedureVg  m-1e6f79399-69WVT XW Yf  l-1e6f79399-6bZY [V_XZ \W][]]]] ]S~\ ^}] _^P `][]]]]] aS` b}a cO_bP dWW ef  l-1e6f79399-6eff  l-1e6f79399-6fgef hVdg iWh][]]]] jSi kSi lUh][ mSmle nkm on pS` q}p rO_qP sf  l-1e6f79399-73tf  l-1e6f79399-74ust vVdu wWv][]]]] xSw ySw zv][ {S	ze |y{ }| ~S` }~ O_P f  l-1e6f79399-78f  l-1e6f79399-79 Vd W][]]]] S S U][ Se   g  t-1e6f79399-68 f  l-1e6f79399-7d VX W][]]]] Sp ][]]]]] S  S Sm So  U][ Sme  S ][ S	e  Sy S S4e     U][ SUe g  %server-impl-write-procedureg  m-1e6f79399-84T  f  l-1e6f79399-86 V_ ]]]]] S~ } P ]]]]]] S } OP  f  l-1e6f79399-89f  l-1e6f79399-8a V ]]]]] S S U] Sme   S } OP f  l-1e6f79399-8ef  l-1e6f79399-8f V ]]]]] S S ] S	e   S } OP f  l-1e6f79399-93f  l-1e6f79399-94 V ]]]]] S S U] Se   g  t-1e6f79399-83 f  l-1e6f79399-98 V ]]]]] Sp ]]]]]] S  S Sm So  U] Sme  S ] S	e  Sy S S5e     U] Se g  %server-impl-close-procedure g  m-1e6f79399-9f T  f  l-1e6f79399-a1 V_ ]]]]] S~ } 	P 
]]]]]] S
 } O	P  f  l-1e6f79399-a4f  l-1e6f79399-a5 V ]]]]] S S U] Sme   S
 } O	P f  l-1e6f79399-a9f  l-1e6f79399-aa  V ! ]]]]] "S! #S! $ ] %S	$e &#% '& (S
 )}( *O	)P +f  l-1e6f79399-ae,f  l-1e6f79399-af-+, .V- /.]]]]] 0S/ 1S/ 2U.] 3S2e 413 54 6g  t-1e6f79399-9e76 8f  l-1e6f79399-b398 :V79 ;:]]]]] <Sp; =:]]]]]] >S= ?> @S= ASm= BSo= CB> DU:] ESmDe FACE GS= H:] IS	He JG>I KSy= LS= MS6De NLM OK>N P@FJO Q<?P RU] SSRe Tg  eachUPP VTU WPVXPWYPXZg  %%set-fields[g  dummy\g  check?]g  expr^[\] _g  m-1e6f79399-ba`_T a` bf  l-1e6f79399-bfcf  l-1e6f79399-c0df  l-1e6f79399-c1ef  l-1e6f79399-c2ff  l-1e6f79399-c3gbcdef hV^ag i` jf  l-1e6f79399-bckj lV_ik mg  t-1e8ba8b5a-3c4ng  t-1e8ba8b5a-3c6og  t-1e8ba8b5a-3c5pmno qg  m-1e8ba8b5a-3c7rqT srrr tf  l-1e8ba8b5a-3cbuf  l-1e8ba8b5a-3ccvf  l-1e8ba8b5a-3cdwtuv xVpsw yf  l-1e8ba8b5a-3c1zf  l-1e8ba8b5a-3c2{f  l-1e8ba8b5a-3c3|yz{ }V| ~h]l]x]]]} SZ~ Uh]l Sme S2e S3e S4e S5e S6e  g  map  g  listPPPPPP g  define[ g  m-1e6f79399-e7T UUUUU f  l-1e6f79399-ecf  l-1e6f79399-edf  l-1e6f79399-eef  l-1e6f79399-eff  l-1e6f79399-f0f  l-1e6f79399-f1 V  f  l-1e6f79399-e9 V_ U] Se S0e Se g  
module-refg  resolve-moduleg  errorf   expected a server impl in modulef  "expected a server-impl or a symbolg  call-with-error-handlingg  	pass-keysSg  quitg  	interrupt g  on-errorSg  batch-mode?g  	backtraceg  debugg  
post-errorSg  
<response>  g  
assoc-set!g  	copy-treeg  %%<response>-set-fieldsg  extend-responseg  build-responseg  versionSg  	<request>  g  request-versiong  headersSg  response-versiong  string?g  response-content-typeg  
text/plain g  assq-refg  charsetg  content-typeg  append  f  utf-8g  string->bytevectorg  
procedure?g  call-with-encoded-output-stringg  bytevector?g  response-content-lengthg  bytevector-lengthf  bad content-lengthg  content-lengthg  request-methodg  HEADg  response-must-not-include-body?f  4response with this status code must not include bodyf  unexpected body typeg  vu8
	         j   g  adapt-response-versiong  with-stack-and-promptg  codeSg  	provided?g  posixg  catchg  	sigactiong  SIGINTg  throwg  call-with-sigintg  default-prompt-tagg  %start-stack  g  httpC 5       h s    ]4	
,-?5 4B >  "  G   4Ci5 DRCED        h@      ]	45 4      B@>  "  G   C             g  who
		: g  t		:  g  filenamef  web/server.scm
	i
		j			j		
	k			k			k			k			k		"	l		%	l		&	l		'	k		,	k		8	m	 		:  g  nameg  print-elapsed CFR4IJKNQRfh     h   T   ]$    CC     L       g  who
		  g  filenamef  web/server.scm		v	 		   Ckl     h(   a   ]	4 5$  @ 6      Y       g  x
		" g  tmp		"  g  filenamef  web/server.scm
	s	 		"   C5JRm    h      ]  C             g  name
		 g  open		 g  read			 g  write			 g  close			  g  filenamef  web/server.scm
	z
 			  g  nameg  %make-server-impl-procedure CnR4I0KNo      h      ]  C             g  t-1e6f79399-d
		 g  t-1e6f79399-e		 g  t-1e6f79399-f			 g  t-1e6f79399-10			 g  t-1e6f79399-11			  			   C0 h   Q   ]L 6    I       g  a
		  g  filenamef  web/server.scm		z
 		   CO       h   A   ] L 69       g  filenamef  web/server.scm		z
 		
   C         h      ] C          		
   Ckl        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  z       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  web/server.scm
	z
 		n   C50Rm  4 m>  "  G   	ni  mRm     h   v   ] $   CC      n       g  obj
		  g  filenamef  web/server.scm
	z
 		  g  nameg  %server-impl?-procedure CR4I1KNQv   h   6   ]  C      .       g  t-1e6f79399-26
		
  		
   C1      h   Q   ]L 6    I       g  a
		  g  filenamef  web/server.scm		z
 		   CO       h   A   ] L 69       g  filenamef  web/server.scm		z
 		
   Cx        h      ] C          		
   Ckl        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  z       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  web/server.scm
	z
 		n   C51Rm{2      h   x   ] &   
C 6p       g  s
		  g  filenamef  web/server.scm
	z
 		  g  nameg  %server-impl-name-procedure C|R4I2KN     h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   CQ     h   6   ]  C      .       g  t-1e6f79399-32
		
  		
   C2      h   Q   ]L 6    I       g  a
		  g  filenamef  web/server.scm		z
 		   CO       h   A   ] L 69       g  filenamef  web/server.scm		z
 		
   C        h      ] C          		
   Ckl        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/server.scm
	z
 	    C52Rm{3  h   x   ] &   C 6p       g  s
		  g  filenamef  web/server.scm
	z
 		  g  nameg  %server-impl-open-procedure C R4I3KN     h   :   ]C     2       g  err
		 g  s		  			   C#( h   :   ]C     2       g  err
		 g  s		  			   C+16 h   :   ]C     2       g  err
		 g  s		  			   CQR     h   6   ]  C      .       g  t-1e6f79399-4d
		
  		
   C3      h   Q   ]L 6    I       g  a
		  g  filenamef  web/server.scm		z
 		   CO       h   A   ] L 69       g  filenamef  web/server.scm		z
 		
   CT        h      ] C          		
   Ckl        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/server.scm
	z
 	    C53Rm{4  h    x   ] &   	C 6       p       g  s
		  g  filenamef  web/server.scm
	z
 		  g  nameg  %server-impl-read-procedure CUR4I4KNcjo     h   :   ]C     2       g  err
		 g  s		  			   Crx} h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   CQ     h   6   ]  C      .       g  t-1e6f79399-68
		
  		
   C4      h   Q   ]L 6    I       g  a
		  g  filenamef  web/server.scm		z
 		   CO       h   A   ] L 69       g  filenamef  web/server.scm		z
 		
   C        h      ] C          		
   Ckl        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/server.scm
	z
 	    C54Rm{5  h    y   ] &   	C 6       q       g  s
		  g  filenamef  web/server.scm
	z
 		  g  nameg  %server-impl-write-procedure CR4I5KN    h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   CQ     h   6   ]  C      .       g  t-1e6f79399-83
		
  		
   C5      h   Q   ]L 6    I       g  a
		  g  filenamef  web/server.scm		z
 		   CO       h   A   ] L 69       g  filenamef  web/server.scm		z
 		
   C        h      ] C          		
   Ckl        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/server.scm
	z
 	    C55Rm{6  h    y   ] &   	C 6       q       g  s
		  g  filenamef  web/server.scm
	z
 		  g  nameg  %server-impl-close-procedure CR4I6KN    h   :   ]C     2       g  err
		 g  s		  			   C"' h   :   ]C     2       g  err
		 g  s		  			   C*05 h   :   ]C     2       g  err
		 g  s		  			   CQQ     h   6   ]  C      .       g  t-1e6f79399-9e
		
  		
   C6      h   Q   ]L 6    I       g  a
		  g  filenamef  web/server.scm		z
 		   CO       h   A   ] L 69       g  filenamef  web/server.scm		z
 		
   CS        h      ] C          		
   Ckl        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/server.scm
	z
 	    C56R4IKNY    h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   Ckl   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  web/server.scm
	z
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R4I.KN    h       ]   C         g  dummy
		 g  name		 g  open			 g  read			 g  write			 g  close			  			   Ckl        h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  web/server.scm
 
 		"  g  
macro-typeg  syntax-rulesg  patternsg  nameg  openg  readg  writeg  close   C5.Rm 	     hx     ]	"  T $  E44  5 5"   6$  &  C"" 6 $   &   C""         g  impl
		u g  impl	"	R  g  filenamef  web/server.scm
 
		 		 		 		 		 	,	 		" 		" 		, 		. 	4	7 	
	7 		: 	
	> 		A 	
	V 		Z 		Z 		] 		a 		d 	 		u  g  nameg  lookup-server-implg  documentation  k L   o   o   k       u   p       a       s   e   r   v   e   r       i   m   p   l   e   m   e   n   t   a   t   i   o   n   .           I   f       I   M   P   L       i   s       a       s   e   r   v   e   r   
   i   m   p   l   e   m   e   n   t   a   t   i   o   n       a   l   r   e   a   d   y   ,       i   t       i   s       r   e   t   u   r   n   e   d       d   i   r   e   c   t   l   y   .           I   f       i   t       i   s       a       s   y   m   b   o   l   ,       t   h   e   
   b   i   n   d   i   n   g       n   a   m   e   d       I   M   P   L       i   n       t   h   e          (   w   e   b       s   e   r   v   e   r       I   M   P   L   )          m   o   d   u   l   e       i   s   
   l   o   o   k   e   d       u   p   .           O   t   h   e   r   w   i   s   e       a   n       e   r   r   o   r       i   s       s   i   g   n   a   l   e   d   .   
   
   C   u   r   r   e   n   t   l   y       a       s   e   r   v   e   r       i   m   p   l   e   m   e   n   t   a   t   i   o   n       i   s       a       s   o   m   e   w   h   a   t       o   p   a   q   u   e       t   y   p   e   ,       u   s   e   f   u   l       o   n   l   y   
   f   o   r       p   a   s   s   i   n   g       t   o       o   t   h   e   r       p   r   o   c   e   d   u   r   e   s       i   n       t   h   i   s       m   o   d   u   l   e   ,       l   i   k   e   
      r   e   a   d   -   c   l   i   e   n   t      .    C/Rm{3 h    i  ] &   "  	4 5@a      g  impl
		  g  open-params		   g  filenamef  web/server.scm
 
	 			  	 		 	  g  nameg  open-serverg  documentationk O   p   e   n       a       s   e   r   v   e   r       f   o   r       t   h   e       g   i   v   e   n       i   m   p   l   e   m   e   n   t   a   t   i   o   n   .           R   e   t   u   r   n       o   n   e       v   a   l   u   e   ,       t   h   e   
   n   e   w       s   e   r   v   e   r       o   b   j   e   c   t   .           T   h   e       i   m   p   l   e   m   e   n   t   a   t   i   o   n   '   s          o   p   e   n          p   r   o   c   e   d   u   r   e       i   s   
   a   p   p   l   i   e   d       t   o       O   P   E   N   -   P   A   R   A   M   S   ,       w   h   i   c   h       s   h   o   u   l   d       b   e       a       l   i   s   t   .    C7Rm{4     h(   K   ] L&  	L	"  	4L5L 6       C       g  filenamef  web/server.scm
 		 	 		!
   C      h   ]   -  1  3 D  U       g  _
			  g  filenamef  web/server.scm
 		 	 			


   C        h0   	  ] O 45 $  "  	
6            g  impl
		* g  server		*  g  filenamef  web/server.scm
 
	 		 		 		 	 	$ 	+	* 	 		*	  g  nameg  read-clientg  documentation k <R   e   a   d       a       n   e   w       c   l   i   e   n   t       f   r   o   m       S   E   R   V   E   R   ,       b   y       a   p   p   l   y   i   n   g       t   h   e       i   m   p   l   e   m   e   n   t   a   t   i   o   n   '   s   
      r   e   a   d          p   r   o   c   e   d   u   r   e       t   o       t   h   e       s   e   r   v   e   r   .           I   f       s   u   c   c   e   s   s   f   u   l   ,       r   e   t   u   r   n       t   h   r   e   e   
   v   a   l   u   e   s   :       a   n       o   b   j   e   c   t       c   o   r   r   e   s   p   o   n   d   i   n   g       t   o       t   h   e       c   l   i   e   n   t   ,       a       r   e   q   u   e   s   t       o   b   j   e   c   t   ,       a   n   d       t   h   e   
   r   e   q   u   e   s   t       b   o   d   y   .           I   f       a   n   y       e   x   c   e   p   t   i   o   n       o   c   c   u   r   s   ,       r   e   t   u   r   n          #   f          f   o   r       a   l   l       t   h   r   e   e   
   v   a   l   u   e   s   .    C8R{      h`     - 1 3  &  . 
  	44 	55 	 "  	4 5(  C@          g  r
			\ g  k			\ g  v				\ g  
additional				\ g  r		I	\  g  filenamef  web/server.scm
 
	 		" 		% 	"	, 	-	. 	"	4 		9 		I 		Q 		\ 	 			\	
	  g  nameg  extend-response CR:{ #   h  M  ]$  . 4 &  	 	"  	4 556 &  	 	"  	4 5&  
"  	4	5$ {$ o4
5$  V4545 $  "  44 554$  "  5645$  V4545 $  "  44 554$  "  5645$  "  p4545$  $  "  45"  45 &   
"  	4 5&  "  D45$  45
$  "t6"h 6!D 4" &  	 	"  	4 556  E      g  request
	 g  response	 g  body		 g  type	   g  declared-charset	   g  type	 9 g  declared-charset	 9 g  rlen	V g  blen	V  	g  filenamef  web/server.scm
 
	 			 		 		 	1	3 		7 		: 		U 	+	m 			q 		x 	  	  	  	(  	  	  	  	'  	2  	  	  	  	  	%  	  	)  	  	  	  	  	)  	  	  	  	  	  	(  	  	  	  	'  	2  	  	 	 	 	% 	 	) 	" 	# 	+ 	3 	)7 	9 	: 		D 	I 	P 	V 	` 	e 	i 	p 	t 	 z 	 	 	/ 	 	 	. 	 	 	 		 	 	 	 	 	 	 	 	 	 	 	 	/ 	 	 \		  g  nameg  sanitize-responseg  documentation k "   S   a   n   i   t   i   z   e   "       t   h   e       g   i   v   e   n       r   e   s   p   o   n   s   e       a   n   d       b   o   d   y   ,       m   a   k   i   n   g       t   h   e   m       a   p   p   r   o   p   r   i   a   t   e       f   o   r   
   t   h   e       g   i   v   e   n       r   e   q   u   e   s   t   .   
   
   A   s       a       c   o   n   v   e   n   i   e   n   c   e       t   o       w   e   b       h   a   n   d   l   e   r       a   u   t   h   o   r   s   ,       R   E   S   P   O   N   S   E       m   a   y       b   e       g   i   v   e   n       a   s   
   a   n       a   l   i   s   t       o   f       h   e   a   d   e   r   s   ,       i   n       w   h   i   c   h       c   a   s   e       i   t       i   s       u   s   e   d       t   o       c   o   n   s   t   r   u   c   t       a       d   e   f   a   u   l   t   
   r   e   s   p   o   n   s   e   .           E   n   s   u   r   e   s       t   h   a   t       t   h   e       r   e   s   p   o   n   s   e       v   e   r   s   i   o   n       c   o   r   r   e   s   p   o   n   d   s       t   o       t   h   e       r   e   q   u   e   s   t   
   v   e   r   s   i   o   n   .           I   f       B   O   D   Y       i   s       a       s   t   r   i   n   g   ,       e   n   c   o   d   e   s       t   h   e       s   t   r   i   n   g       t   o       a       b   y   t   e   v   e   c   t   o   r   ,   
   i   n       a   n       e   n   c   o   d   i   n   g       a   p   p   r   o   p   r   i   a   t   e       f   o   r       R   E   S   P   O   N   S   E   .           A   d   d   s       a   
      c   o   n   t   e   n   t   -   l   e   n   g   t   h          a   n   d          c   o   n   t   e   n   t   -   t   y   p   e          h   e   a   d   e   r   ,       a   s       n   e   c   e   s   s   a   r   y   .   
   
   I   f       B   O   D   Y       i   s       a       p   r   o   c   e   d   u   r   e   ,       i   t       i   s       c   a   l   l   e   d       w   i   t   h       a       p   o   r   t       a   s       a   n       a   r   g   u   m   e   n   t   ,   
   a   n   d       t   h   e       o   u   t   p   u   t       c   o   l   l   e   c   t   e   d       a   s       a       b   y   t   e   v   e   c   t   o   r   .           I   n       t   h   e       f   u   t   u   r   e       w   e       m   i   g   h   t       t   r   y       t   o   
   i   n   s   t   e   a   d       u   s   e       a       c   o   m   p   r   e   s   s   i   n   g   ,       c   h   u   n   k   -   e   n   c   o   d   e   d       p   o   r   t   ,       a   n   d       c   a   l   l       t   h   i   s       p   r   o   c   e   d   u   r   e   
   l   a   t   e   r   ,       i   n       t   h   e       w   r   i   t   e   -   c   l   i   e   n   t       p   r   o   c   e   d   u   r   e   .           A   u   t   h   o   r   s       a   r   e       a   d   v   i   s   e   d       n   o   t       t   o       r   e   l   y   
   o   n       t   h   e       p   r   o   c   e   d   u   r   e       b   e   i   n   g       c   a   l   l   e   d       a   t       a   n   y       p   a   r   t   i   c   u   l   a   r       t   i   m   e   .    C:R      h   K   ] LLLL @    C       g  filenamef  web/server.scm
			 		
   C:        h@      ](4L LLLO >  G 4L >  G D        g  response
		? g  body		? g  state			? g  response		0	? g  body		0	?  g  filenamef  web/server.scm
						"		3			?	 		?
   C       h   f   -  1  3 45L D^       g  _
			  g  filenamef  web/server.scm
 		
!		!	 			


   C       h8     ] O 45 $  "  	
O 6           g  handler
		3 g  request		3 g  body			3 g  state			3  g  filenamef  web/server.scm

					 		"	 	(	+	3	 		3	  g  nameg  handle-requestg  documentationf "Handle a given request, returning the response and body.

The response and response body are produced by calling the given
HANDLER with REQUEST and BODY as arguments.

The elements of STATE are also passed to HANDLER as
arguments, and may be returned as additional values.  The new
STATE, collected from the HANDLER's return values, is then
returned as a list.  The idea is that a server loop receives a handler
from the user, along with whatever state values the user is interested
in, allowing the user's handler to explicitly manage its state. C9Rm{5    h(   K   ] L&  	L	"  	4L5LLLL 6 C       g  filenamef  web/server.scm
*		+	 		'
   C      h   ]   -  1  3 D      U       g  _
			  g  filenamef  web/server.scm
.		.	 			


   C        h0     ] O 45 $  "  	
6      g  impl
		0 g  server		0 g  client			0 g  response			0 g  body			0  g  filenamef  web/server.scm
$
	,		-		"-		$-	 	*-	+	0)	 		0	  g  nameg  write-clientg  documentationf  Write an HTTP response and body to CLIENT.  If the server and
client support persistent connections, it is the implementation's
responsibility to keep track of the client thereafter, presumably by
attaching it to the SERVER argument somehow. C;Rm{6        h(     ] &  	 	"  	4 56             g  impl
		! g  server		!  g  filenamef  web/server.scm
1
	4	 		!	  g  nameg  close-serverg  documentation k R   e   l   e   a   s   e       r   e   s   o   u   r   c   e   s       a   l   l   o   c   a   t   e   d       b   y       a       p   r   e   v   i   o   u   s       i   n   v   o   c   a   t   i   o   n       o   f   
      o   p   e   n   -   s   e   r   v   e   r      .    C<R4i5$     h   f   ]6^       g  sig
		  g  filenamef  web/server.scm
@	*	@	?	@	8 		   C       h   T   ] 45N C L       g  filenamef  web/server.scm
>		@		?	 		
   C  h    o   ] M $  M M 66     g       g  filenamef  web/server.scm
B		C		E	(	E	6	E		G	 		
   C       h    o   ] M $  M M 66     g       g  filenamef  web/server.scm
B		C		E	(	E	6	E		G	 		
   C       h    o   ] M $  M M 66     g       g  filenamef  web/server.scm
B		C		E	(	E	6	E		G	 		
   C      h`   K   ] L O L O 4L O >   "  G  V4L>   X4L O >   "  G  CX4L O >   "  G  F    C       g  filenamef  web/server.scm
<		=	 		\
   C   h   k   - 1 3 L 6    c       g  k
			 g  _			  g  filenamef  web/server.scm
H		H	 			
   C  h       ]
H O O 6            g  thunk
		 g  handler-thunk		 g  handler			  g  filenamef  web/server.scm
9		:			;		;	
 			   C"   h   z   ] 6   r       g  thunk
		 g  handler-thunk		  g  filenamef  web/server.scm
8		8	$ 			   CRh   K   ] L 6   C       g  filenamef  web/server.scm
L		L	/ 		
   C  h   C   ] L O 6  ;       g  filenamef  web/server.scm	L	 		
   Ch   K   ] LL 6C       g  filenamef  web/server.scm
N	-	N	8 		
   C  h8      ]45 U   4 O >   XCXFG O 6              g  thunk
		1 g  k		1 g  proc			1  g  filenamef  web/server.scm
J
	K		K		1N	 		1  g  nameg  with-stack-and-prompt CR89;        hX     ]44>  G $  74 >  G 	4>  "  G  	CC	      g  handler
		X g  impl		X g  server			X g  state			X g  client			X g  request			X g  body			X g  response		/	U g  body		/	U g  state			/	U  
g  filenamef  web/server.scm
Q
	X		V		[		^		2\	
	9a	 		X	  g  nameg  serve-one-clientg  documentationf  Read one request from SERVER, call HANDLER on the request
and body, and write the response to the client.  Return the new state
produced by the handler procedure. C=R/7=   h(   z   ]"  4LLL  5 "L "       r       g  state
		  g  filenamef  web/server.scm
										 		!
   C<        h   T   ] 4LL >  "  G  D L       g  filenamef  web/server.scm
					 		
   C hP     - . 1 3 #  #  4545 O O 6         g  handler
		M g  impl		M g  open-params			M g  state			M g  impl		&	M g  server		1	M  g  filenamef  web/server.scm
f
	f	.	f	B	 		&		)		1		M	 			M		  g  nameg  
run-serverg  documentation   k R   u   n       G   u   i   l   e   '   s       b   u   i   l   t   -   i   n       w   e   b       s   e   r   v   e   r   .   
   
   H   A   N   D   L   E   R       s   h   o   u   l   d       b   e       a       p   r   o   c   e   d   u   r   e       t   h   a   t       t   a   k   e   s       t   w   o       o   r       m   o   r   e       a   r   g   u   m   e   n   t   s   ,   
   t   h   e       H   T   T   P       r   e   q   u   e   s   t       a   n   d       r   e   q   u   e   s   t       b   o   d   y   ,       a   n   d       r   e   t   u   r   n   s       t   w   o       o   r       m   o   r   e       v   a   l   u   e   s   ,       t   h   e   
   r   e   s   p   o   n   s   e       a   n   d       r   e   s   p   o   n   s   e       b   o   d   y   .   
   
   F   o   r       e   x   a   m   p   l   e   ,       h   e   r   e       i   s       a       s   i   m   p   l   e       "   H   e   l   l   o   ,       W   o   r   l   d   !   "       s   e   r   v   e   r   :   
   
   @   e   x   a   m   p   l   e   
       (   d   e   f   i   n   e       (   h   a   n   d   l   e   r       r   e   q   u   e   s   t       b   o   d   y   )   
               (   v   a   l   u   e   s       '   (   (   c   o   n   t   e   n   t   -   t   y   p   e       .       (   t   e   x   t   /   p   l   a   i   n   )   )   )   
                                               "   H   e   l   l   o   ,       W   o   r   l   d   !   "   )   )   
       (   r   u   n   -   s   e   r   v   e   r       h   a   n   d   l   e   r   )   
   @   e   n   d       e   x   a   m   p   l   e   
   
   T   h   e       r   e   s   p   o   n   s   e       a   n   d       b   o   d   y       w   i   l   l       b   e       r   u   n       t   h   r   o   u   g   h          s   a   n   i   t   i   z   e   -   r   e   s   p   o   n   s   e      
   b   e   f   o   r   e       s   e   n   d   i   n   g       b   a   c   k       t   o       t   h   e       c   l   i   e   n   t   .   
   
   A   d   d   i   t   i   o   n   a   l       a   r   g   u   m   e   n   t   s       t   o       H   A   N   D   L   E   R       a   r   e       t   a   k   e   n       f   r   o   m   
   S   T   A   T   E   .           A   d   d   i   t   i   o   n   a   l       r   e   t   u   r   n       v   a   l   u   e   s       a   r   e       a   c   c   u   m   u   l   a   t   e   d       i   n   t   o       a       n   e   w   
   S   T   A   T   E   ,       w   h   i   c   h       w   i   l   l       b   e       u   s   e   d       f   o   r       s   u   b   s   e   q   u   e   n   t       r   e   q   u   e   s   t   s   .           I   n       t   h   i   s       w   a   y       a   
   h   a   n   d   l   e   r       c   a   n       e   x   p   l   i   c   i   t   l   y       m   a   n   a   g   e       i   t   s       s   t   a   t   e   .   
   
   T   h   e       d   e   f   a   u   l   t       s   e   r   v   e   r       i   m   p   l   e   m   e   n   t   a   t   i   o   n       i   s          h   t   t   p      ,       w   h   i   c   h       a   c   c   e   p   t   s   
   O   P   E   N   -   P   A   R   A   M   S       l   i   k   e          (   #   :   p   o   r   t       8   0   8   1   )      ,       a   m   o   n   g       o   t   h   e   r   s   .           S   e   e       "   W   e   b   
   S   e   r   v   e   r   "       i   n       t   h   e       m   a   n   u   a   l   ,       f   o   r       m   o   r   e       i   n   f   o   r   m   a   t   i   o   n   .    C>RC        g  m
		, g  rtd
  g  filenamef  web/server.scm		J
	-	h		6	h
u	i
	z
- 
14 
7 
9; 
M 
R
V%$
X$1
X%7	X-7	X/7	X37	]6
_J
b|Q
rf
 	r
   C6                                                ccache/web/request.go                                                                               0000644                 00000147053 15154557173 0010575 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] 4 h9W      ] g  guile	 	g  define-module*	 	 	g  web	g  request	 		g  filenameS	
f  web/request.scm	g  importsS	g  rnrs	g  bytevectors	 	 	g  ice-9	g  binary-ports	 	 	g  rdelim	 	 	g  srfi	g  srfi-9	 	 	g  uri	 	 	g  http	 	  	!  	"g  exportsS	#g  request?	$g  request-method	%g  request-uri	&g  request-version	'g  request-headers	(g  request-meta	)g  request-port	*g  read-request	+g  build-request	,g  write-request	-g  read-request-body	.g  write-request-body	/g  request-cache-control	0g  request-connection	1g  request-date	2g  request-pragma	3g  request-trailer	4g  request-transfer-encoding	5g  request-upgrade	6g  request-via	7g  request-warning	8g  request-allow	9g  request-content-encoding	:g  request-content-language	;g  request-content-length	<g  request-content-location	=g  request-content-md5	>g  request-content-range	?g  request-content-type	@g  request-expires	Ag  request-last-modified	Bg  request-accept	Cg  request-accept-charset	Dg  request-accept-encoding	Eg  request-accept-language	Fg  request-authorization	Gg  request-expect	Hg  request-from	Ig  request-host	Jg  request-if-match	Kg  request-if-modified-since	Lg  request-if-none-match	Mg  request-if-range	Ng  request-if-unmodified-since	Og  request-max-forwards	Pg  request-proxy-authorization	Qg  request-range	Rg  request-referer	Sg  
request-te	Tg  request-user-agent	Ug  request-absolute-uri	V#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTU 3	Wg  set-current-module	XW 	YW 	Zg  	<request>	[g  %make-request-procedure	\g  make-syntax-transformer	]\ 	^\ 	_g  make-request	`g  macro	ag  $sc-dispatch	ba 	ca 	dg  _	eg  any	fdeeeeee 	gg  syntax-object	hg  lambda	ig  m-45c8615977-9	jg  top	kij 	lg  ribcage	mg  t-45c8615977-3	ng  t-45c8615977-4	og  t-45c8615977-5	pg  t-45c8615977-6	qg  t-45c8615977-7	rg  t-45c8615977-8	smnopqr 	tkkkkkk 	uf  l-45c8615977-e	vf  l-45c8615977-f	wf  l-45c8615977-10	xf  l-45c8615977-11	yf  l-45c8615977-12	zf  l-45c8615977-13	{uvwxyz 	|lst{ 	}l 	~g  x	~  k  f  l-45c8615977-b   l  g  shift g  	proc-name g  args   j    f  l-1e8ba8b5a-2ba f  l-1e8ba8b5a-2bb   l  g  key g  value g  name g  formals g  body     f  l-1e8ba8b5a-2ad f  l-1e8ba8b5a-2ae f  l-1e8ba8b5a-2af f  l-1e8ba8b5a-2b0 f  l-1e8ba8b5a-2b1   l  g  make-procedure-name     f  l-1e8ba8b5a-29d   l    f  l-1e8ba8b5a-29c   l  k|}}}}}  g  hygiene   gh  g  method |}    g  g  g  version g  g  headers g  g  meta g  g  port g    g  make-struct g  m-45c8615977-1 j  g  t-1e8ba8b5a-38d g  t-1e8ba8b5a-38c g  t-1e8ba8b5a-38b   g  m-1e8ba8b5a-38e j    f  l-1e8ba8b5a-392 f  l-1e8ba8b5a-393 f  l-1e8ba8b5a-394   l  g  	ctor-args   f  l-1e8ba8b5a-37a   l  g  ctor g  field   f  l-1e8ba8b5a-376 f  l-1e8ba8b5a-377   l  g  form g  	type-name g  constructor-spec g  field-names     f  l-1e8ba8b5a-36b f  l-1e8ba8b5a-36c f  l-1e8ba8b5a-36d f  l-1e8ba8b5a-36e   l  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers     f  l-1e8ba8b5a-343 f  l-1e8ba8b5a-341 f  l-1e8ba8b5a-33f f  l-1e8ba8b5a-33d f  l-1e8ba8b5a-33b f  l-1e8ba8b5a-339 f  l-1e8ba8b5a-337 f  l-1e8ba8b5a-335   l  f  l-1e8ba8b5a-334   l  |}}}}}}  g  gZ  g
   	   g  each-any d g  syntax-violation    f  Wrong number of argumentsg  identifier?  } g[   	f  -source expression failed to match any pattern
g  record-type-vtable
 
 g  pwpwpwpwpwpwg  default-record-printer   g  set-struct-vtable-name!  g  vtable-offset-user  g  %request?-procedurede g  m-45c8615977-20j g  t-45c8615977-1f  f  l-45c8615977-25  !l  "f  l-45c8615977-22#" $l# %!}$}}}} &gh% 'g  obj(g  t-1e8ba8b5a-47e)g  t-1e8ba8b5a-478*g  t-1e8ba8b5a-479+g  t-1e8ba8b5a-47a,g  t-1e8ba8b5a-47d-g  t-1e8ba8b5a-47c.g  t-1e8ba8b5a-47b/()*+,-. 0g  m-1e8ba8b5a-47f10j 21111111 3f  l-1e8ba8b5a-4834f  l-1e8ba8b5a-4845f  l-1e8ba8b5a-4856f  l-1e8ba8b5a-4867f  l-1e8ba8b5a-4878f  l-1e8ba8b5a-4889f  l-1e8ba8b5a-489:3456789 ;l/2: <g  	copier-id=< >f  l-1e8ba8b5a-476?> @l=? Ag  	ctor-nameBA Cf  l-1e8ba8b5a-46eDC ElBD F Gf  l-1e8ba8b5a-46cHG IlFH Jg  layoutKJ Lf  l-1e8ba8b5a-46aML NlKM Og  
immutable?PO Qf  l-1e8ba8b5a-468RQ SlPR Tg  field-countUT Vf  l-1e8ba8b5a-466WV XlUW Yg  
getter-idsZY [f  l-1e8ba8b5a-463\[ ]lZ\ ^g  	field-ids_^ `f  l-1e8ba8b5a-460a` bl_a cg  predicate-namedg  
field-speceOcd f gf  l-1e8ba8b5a-453hf  l-1e8ba8b5a-454if  l-1e8ba8b5a-455jf  l-1e8ba8b5a-456kf  l-1e8ba8b5a-457lf  l-1e8ba8b5a-458mghijkl nlefm o!}$};}}}}@}E}I}N}S}X}]}bn pg'o qp rg  andsgro tg  struct?ugto vup wg  eq?xgwo yg  struct-vtablezgyo {zp |!}$ }gZ| ~x{} sv~ &q }$ g g  throw-bad-struct  g  %request-method-procedureg  free-idg  
%%on-errorg  m-45c8615977-2cj  f  l-45c8615977-2e l }}}}} g  e g  %%typeg  t-1e8ba8b5a-3a5g  t-1e8ba8b5a-3a6g  t-1e8ba8b5a-3a7g  t-1e8ba8b5a-3a8g  t-1e8ba8b5a-3a9g  t-1e8ba8b5a-3aag  t-1e8ba8b5a-3ab g  m-1e8ba8b5a-3acj  f  l-1e8ba8b5a-3b0f  l-1e8ba8b5a-3b1f  l-1e8ba8b5a-3b2f  l-1e8ba8b5a-3b3f  l-1e8ba8b5a-3b4f  l-1e8ba8b5a-3b5f  l-1e8ba8b5a-3b6 l g  getterg  index f  l-1e8ba8b5a-3a3f  l-1e8ba8b5a-3a4 l Y<  f  l-1e8ba8b5a-39ef  l-1e8ba8b5a-39ff  l-1e8ba8b5a-3a0 l }}}}}} g  de g  ckg  errg  s  f  l-45c8615977-31f  l-45c8615977-32 l }}}}} g g  quoteg } gZ   g  %%indexg  de f  l-45c8615977-36f  l-45c8615977-37 l }}}}} g g } g
   g  %%copierg  de f  l-45c8615977-3bf  l-45c8615977-3c l }}}}} g g g  %%<request>-set-fields} g   g  t-45c8615977-2b f  l-45c8615977-40 l }}}}} gh }}}}}} g  g  ifg gw gy  } gZ  g  
struct-refg } g
   g g g$      } 	g 
g  %request-uri-procedureg  m-45c8615977-47j  f  l-45c8615977-49 l }}}}} g  e }}}}}} g  de  f  l-45c8615977-4cf  l-45c8615977-4d l }}}}} g  g !} "gZ! # " $# %g &% 'd&e (f  l-45c8615977-51)f  l-45c8615977-52*() +l* ,+}}}}} -g, .g, /+} 0g/ 1.0 21 3g 43 5d4e 6f  l-45c8615977-567f  l-45c8615977-57867 9l8 :9}}}}} ;g: <g: =9} >g= ?<> @? Ag  t-45c8615977-46BA Cf  l-45c8615977-5bDC ElBD FE}}}}} GghF HE}}}}}} IgH JI KgH LgwH MgyH NMI OE} PgZO QLNP RgH SE} TgS URIT VgH WgH Xg%O YWX ZVIY [KQUZ \GJ[ ]} ^g
] _g  %request-version-procedure`g  m-45c8615977-62a`j ba cf  l-45c8615977-64dc elbd fa}e}}}} ggf hg ihe j}e}}}}} kgj lk mdile naa of  l-45c8615977-67pf  l-45c8615977-68qop rlnq sar}e}}}} tgs ugs vr}e wgZv xuw yx zgj {z |di{e }f  l-45c8615977-6c~f  l-45c8615977-6d}~ ln a}e}}}} g g }e g	   gj  die f  l-45c8615977-71f  l-45c8615977-72 ln a}e}}}} g g }e g   g  t-45c8615977-61 f  l-45c8615977-76 lb a}e}}}} gh }e}}}}} g  g gw gy  }e gZ  g }e g	  g g g&     }e g_ g  %request-headers-procedureg  m-45c8615977-7dj  f  l-45c8615977-7f l }}}}} g  e }}}}}} g  de  f  l-45c8615977-82f  l-45c8615977-83 l }}}}} g g } gZ   g  de f  l-45c8615977-87f  l-45c8615977-88 l }}}}} g g } g	   g  de f  l-45c8615977-8cf  l-45c8615977-8d l }}}}} g g } g   g  t-45c8615977-7c f  l-45c8615977-91 l }}}}} gh }}}}}} g  g gw gy  } gZ  g } g	   g g g'      } g 	g  %request-meta-procedure
g  m-45c8615977-98
j  f  l-45c8615977-9a l }}}}} g  e }}}}}} g  de  f  l-45c8615977-9df  l-45c8615977-9e l }}}}} g g  } !gZ  "! #" $g %$ &d%e 'f  l-45c8615977-a2(f  l-45c8615977-a3)'( *l) +*}}}}} ,g+ -g+ .*} /g	. 0-/ 10 2g 32 4d3e 5f  l-45c8615977-a76f  l-45c8615977-a8756 8l7 98}}}}} :g9 ;g9 <8} =g< >;= ?> @g  t-45c8615977-97A@ Bf  l-45c8615977-acCB DlAC ED}}}}} FghE GD}}}}}} HgG IH JgG KgwG LgyG MLH ND} OgZN PKMO QgG RD} Sg	R TQHS UgG VgG Wg(N XVW YUHX ZJPTY [FIZ \} ]g	\ ^g  %request-port-procedure_g  m-45c8615977-b3`_j a` bf  l-45c8615977-b5cb dlac e`}d}}}} fge gf hge i}d}}}}} jgi kj ldhke m`` nf  l-45c8615977-b8of  l-45c8615977-b9pno qlmp r`q}d}}}} sgr tgr uq}d vgZu wtv xw ygi zy {dhze |f  l-45c8615977-bd}f  l-45c8615977-be~|} lm~ `}d}}}} g g }d g	   gi  dhe f  l-45c8615977-c2f  l-45c8615977-c3 lm `}d}}}} g g }d g   g  t-45c8615977-b2 f  l-45c8615977-c7 la `}d}}}} gh }d}}}}} g  g gw gy  }d gZ  g }d g	  g g g)     }d g^ g  eachee  eeeg  %%set-fieldsg  dummyg  check?g  expr g  m-45c8615977-cej  f  l-45c8615977-d3f  l-45c8615977-d4f  l-45c8615977-d5f  l-45c8615977-d6f  l-45c8615977-d7 l  f  l-45c8615977-d0 l g  t-1e8ba8b5a-3c4g  t-1e8ba8b5a-3c6g  t-1e8ba8b5a-3c5 g  m-1e8ba8b5a-3c7j  f  l-1e8ba8b5a-3cbf  l-1e8ba8b5a-3ccf  l-1e8ba8b5a-3cd l f  l-1e8ba8b5a-3c1f  l-1e8ba8b5a-3c2f  l-1e8ba8b5a-3c3 l }}}}} g } gZ g$ g% g& g' g( g)  g  map  g  listg  throwg  bad-requestg  displayf  Bad request: g  applyg  formatg  newlineg  bad-request-printerg  set-exception-printer!g  number?g  exact?g  integer?g  non-negative-integer?g  valid-header?g  validate-headersf  Bad value for header ~a: ~sf  Header not a pair: ~af  Headers not a list: ~ag  methodS g  versionS 	g  headersS	g  portS	g  metaS	g  validate-headers?S		
	 g  GETg  assq-refg  hostf  Bad version: ~af  Bad uri: ~ag  <uri>  g  POSTg  PUTf  Missing port for message ~af  ;HTTP/1.1 request without Host header and no host in URI: ~af  Bad metadata alistg  uri-hostg  uri-portg  set-port-encoding!f  
ISO-8859-1g  read-request-lineg  read-headersg  write-request-line g  write-headers!f  
"g  get-bytevector-n#g  bytevector-length$f  .EOF while reading request body: ~a bytes of ~a%g  put-bytevector&g  define-request-accessor' (f  l-45c8615977-1b1)( *l') +f  l-45c8615977-1ae,+ -l, .*}- /g&. 0g. 10 2dee 3g  datum->syntax4g  symbol-append5g  request-6g  syntax->datum7g  define*8g  t-45c8615977-1bc98 :g  m-45c8615977-1bd;:j <; =f  l-45c8615977-1c0>= ?l9<> @g  defA@ Bf  l-45c8615977-1b8Cf  l-45c8615977-1b9DBC ElAD F}?E}- Gg7F HgF Ig  optionalSJgIF Kg  defaultLgKF Mg  condNgMF Og  assqPgOF QgF Rg'F SRH TS Ug  =>VgUF Wg  cdrXgWF YVX Zg  else[gZF \[L ]\ ^g  cache-control_g  
connection`g  dateag  pragmabg  trailercg  transfer-encodingdg  upgradeeg  viafg  warninggg  allowhg  content-encodingig  content-languagejg  content-lengthkg  content-locationlg  content-md5mg  content-rangeng  content-typeog  expirespg  last-modifiedqg  acceptrg  accept-charsetsg  accept-encodingtg  accept-languageug  authorizationvg  expectwg  fromxg  if-matchyg  if-modified-sincezg  if-none-match{g  if-range|g  if-unmodified-since}g  max-forwards~g  proxy-authorizationg  rangeg  refererg  teg  
user-agentf  4URI not absolute, no Host header, and no default: ~sg  	build-urig  
uri-schemeg  hostSg  pathSg  uri-pathg  querySg  	uri-queryg  fragmentSg  uri-fragmentC 5  ho  9  ]4	
!"V5 4Y >  "  G   Z      h      ]  C           g  method
		 g  uri		 g  version			 g  headers			 g  meta			 g  port			  g  filenamef  web/request.scm
	x
 			  g  nameg  %make-request-procedure C[R4^_`cf  h      ]  C           g  t-45c8615977-3
		 g  t-45c8615977-4		 g  t-45c8615977-5			 g  t-45c8615977-6			 g  t-45c8615977-7			 g  t-45c8615977-8			  			   C _        h   R   ]L 6    J       g  a
		  g  filenamef  web/request.scm		x
 		   Cd     h   B   ] L 6:       g  filenamef  web/request.scm		x
 		
   C       h      ] C          		
   C	      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  {       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  web/request.scm
	x
 		n   C5_RZ  4 Z>  "  G   	[i  ZRZ    h   s   ] $   CC      k       g  obj
		  g  filenamef  web/request.scm
	x
 		  g  nameg  %request?-procedure CR4^#`c     h   7   ]  C      /       g  t-45c8615977-1f
		
  		
   C #   h   R   ]L 6    J       g  a
		  g  filenamef  web/request.scm		x
 		   Cd     h   B   ] L 6:       g  filenamef  web/request.scm		x
 		
   C       h      ] C          		
   C	      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  {       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  web/request.scm
	x
 		n   C5#RZ$     h   w   ] &   
C 6o       g  s
		  g  filenamef  web/request.scm
	x
 		  g  nameg  %request-method-procedure CR4^$`c      h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C    h   7   ]  C      /       g  t-45c8615977-2b
		
  		
   C $   h   R   ]L 6    J       g  a
		  g  filenamef  web/request.scm		x
 		   Cd     h   B   ] L 6:       g  filenamef  web/request.scm		x
 		
   C	       h      ] C          		
   C	      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/request.scm
	x
 	    C5$RZ% h   t   ] &   C 6l       g  s
		  g  filenamef  web/request.scm
	x
 		  g  nameg  %request-uri-procedure C
R4^%`c$ h   :   ]C     2       g  err
		 g  s		  			   C'-2 h   :   ]C     2       g  err
		 g  s		  			   C5;@ h   :   ]C     2       g  err
		 g  s		  			   C\    h   7   ]  C      /       g  t-45c8615977-46
		
  		
   C %   h   R   ]L 6    J       g  a
		  g  filenamef  web/request.scm		x
 		   Cd     h   B   ] L 6:       g  filenamef  web/request.scm		x
 		
   C^       h      ] C          		
   C	      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/request.scm
	x
 	    C5%RZ& h    x   ] &   	C 6       p       g  s
		  g  filenamef  web/request.scm
	x
 		  g  nameg  %request-version-procedure C_R4^&`cmty     h   :   ]C     2       g  err
		 g  s		  			   C| h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C    h   7   ]  C      /       g  t-45c8615977-61
		
  		
   C &   h   R   ]L 6    J       g  a
		  g  filenamef  web/request.scm		x
 		   Cd     h   B   ] L 6:       g  filenamef  web/request.scm		x
 		
   C       h      ] C          		
   C	      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/request.scm
	x
 	    C5&RZ' h    x   ] &   	C 6       p       g  s
		  g  filenamef  web/request.scm
	x
 		  g  nameg  %request-headers-procedure CR4^'`c     h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C    h   7   ]  C      /       g  t-45c8615977-7c
		
  		
   C '   h   R   ]L 6    J       g  a
		  g  filenamef  web/request.scm		x
 		   Cd     h   B   ] L 6:       g  filenamef  web/request.scm		x
 		
   C       h      ] C          		
   C	      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/request.scm
	x
 	    C5'RZ( h    u   ] &   	C 6       m       g  s
		  g  filenamef  web/request.scm
	x
 		  g  nameg  %request-meta-procedure C	R4^(`c#        h   :   ]C     2       g  err
		 g  s		  			   C&,1 h   :   ]C     2       g  err
		 g  s		  			   C4:? h   :   ]C     2       g  err
		 g  s		  			   C[    h   7   ]  C      /       g  t-45c8615977-97
		
  		
   C (   h   R   ]L 6    J       g  a
		  g  filenamef  web/request.scm		x
 		   Cd     h   B   ] L 6:       g  filenamef  web/request.scm		x
 		
   C]       h      ] C          		
   C	      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/request.scm
	x
 	    C5(RZ) h    u   ] &   	C 6       m       g  s
		  g  filenamef  web/request.scm
	x
 		  g  nameg  %request-port-procedure C^R4^)`clsx        h   :   ]C     2       g  err
		 g  s		  			   C{ h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C    h   7   ]  C      /       g  t-45c8615977-b2
		
  		
   C )   h   R   ]L 6    J       g  a
		  g  filenamef  web/request.scm		x
 		   Cd     h   B   ] L 6:       g  filenamef  web/request.scm		x
 		
   C       h      ] C          		
   C	      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/request.scm
	x
 	    C5)R4^`c   h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C	 h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  web/request.scm
	x
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R   h      - 1 3  6            g  message
			 g  args			  g  filenamef  web/request.scm
 
	 			 	 			
  g  nameg  bad-request CR   hH      )   53 4L>  "  G  4L >  "  G  L6-  1  3 L 6        g  msg
			; g  args			; g  _
	D	H  g  filenamef  web/request.scm
 			
 		 		 		 		; 		D 			H 	 				;	 	D	H


   C       h      ] O @        g  port
		 g  key		 g  args			 g  default-printer			  g  filenamef  web/request.scm
 
	 	 			  g  nameg  bad-request-printer CR4ii>  "  G        h0      ]4 5$   
$  4 5$   6CCC           g  n
		,  g  filenamef  web/request.scm
 
	 		 		 		 		 		  		& 	' 			,  g  nameg  non-negative-integer? CR   hX   U  ] $  < $  (45$   666 (  C 6   M      g  headers
		U g  h		E g  k			= g  v			=  g  filenamef  web/request.scm
 
	 			 		 		 		 		 		 		 	!	 		  		, 		1 	$	3 		7 		= 		A 		E 		K 		Q 		U 	
 		U  g  nameg  validate-headers CR
Z        h   [  - /   0   3 	#  #  #  #  #  #  $  45"  "  4>  " )G  " "$ 45$ 45$  "  4	 >  "  G  "   $   
&  $  "  &  "  $  4>  "  G  "  v$  ["   $  4>  "  >G  "  7"  3$  ) 	$  ""  4 >  "  G  "  ""  4>  "  G  "  "!"  ""  ""  ""  "$  A 
&  	 	"  	4 5 
&  	 	"  	4 5"    CS      g  uri
	  g  method	  g  version		  g  headers		  g  port		  g  meta		  g  validate-headers?		  g  needs-host?		c  g  headers	   	g  filenamef  web/request.scm
 
	 	*	% 	9	. 	!	@ 	1	O 	*	P 		T 		U 		[ 	1	] 		^ 		c 		j 		n 		u 	  	  	  	  	  	'  	  	  	  	'  	  	  	  	  	  	  	  	  	  	  	  	  	  	  	 	 	 	 	
0 	; 	? 	H 	L 	S 	h 	l 	s 	 	 	 	) 	8 	# 	 	 =	 
g  methodSg  versionS	g  headersS	g  portS	g  metaS	g  validate-headers?S	   g  nameg  build-requestg  documentationf  }Construct an HTTP request object. If VALIDATE-HEADERS? is true,
the headers are each run through their respective validators. C+RZ        hX     - . , 3 #  4 >  "  G  4 >  G 4 5  C      g  port
		X g  meta		X g  method		4	X g  uri		4	X g  version		4	X g  headers		D	X  g  filenamef  web/request.scm
 
	 	-	 		 		! 		* 		7 		> 	'	D 	 
		X  g  nameg  read-requestg  documentationf Read an HTTP request from PORT, optionally attaching the given
metadata, META.

As a side effect, sets the encoding on PORT to
ISO-8859-1 (latin-1), so that reading one character reads one byte.  See
the discussion of character sets in "HTTP Requests" in the manual, for
more information.

Note that the body is not part of the request.  Once you have read a
request, you may read the body separately, and likewise for writing
requests. C*RZ$%& '!)(   hp    ]*4 &   
"  	4 5 &   "  	4 5 &  	 	"  	4 5>  "  G  4 &  	 	"  	4 5>  "  G  4	
>  "  G   &  	 	"  	4 5&   C &   
"  	4 5 &   "  	4 5 &  	 	"  	4 5 &  	 	"  	4 5 &  	 	"  	4 5 C       	      g  r
	i g  port	i g  method	Mi g  uri	Mi g  version	Mi g  headers	Mi g  meta	Mi  g  filenamef  web/request.scm
 
	 		 		" 	)	< 		[ 		d 		i 	  	  	  	  	  	  	  	  	'  	7 	5 	(M 	 	i	  g  nameg  write-requestg  documentationk XW   r   i   t   e       t   h   e       g   i   v   e   n       H   T   T   P       r   e   q   u   e   s   t       t   o       P   O   R   T   .   
   
   R   e   t   u   r   n       a       n   e   w       r   e   q   u   e   s   t   ,       w   h   o   s   e          r   e   q   u   e   s   t   -   p   o   r   t          w   i   l   l       c   o   n   t   i   n   u   e       w   r   i   t   i   n   g   
   o   n       P   O   R   T   ,       p   e   r   h   a   p   s       u   s   i   n   g       s   o   m   e       t   r   a   n   s   f   e   r       e   n   c   o   d   i   n   g   .    C,R;"Z)#$ 	  hX     ]4 5$  D4 &  	 	"  	4 5545$  C456C       g  r
		W g  nbytes			W g  bv		3	U  g  filenamef  web/request.scm
 
	 			 		 		 		 	%	3 		3 			6 		? 		C 		J 		K 		U 	 		W  g  nameg  read-request-bodyg  documentation   k hR   e   a   d   s       t   h   e       r   e   q   u   e   s   t       b   o   d   y       f   r   o   m       R   ,       a   s       a       b   y   t   e   v   e   c   t   o   r   .           R   e   t   u   r   n          #   f      
   i   f       t   h   e   r   e       w   a   s       n   o       r   e   q   u   e   s   t       b   o   d   y   .    C-R%Z)      h(      ] &  	 	"  	4 56            g  r
		# g  bv		#  g  filenamef  web/request.scm
 
	 		# 	 		#	  g  nameg  write-request-bodyg  documentationf  HWrite BV, a bytevector, to the port corresponding to the HTTP
request R. C.R4^&`c/1    h   -   ] C     %       g  field
		  		   C2	   h   i   ] 6a       g  field
		 g  def		  g  filenamef  web/request.scm	 	 			   C3456GHJLNPQTY] hH      ]
4 44 555  	
   C          g  field
		E g  def		E g  tmp			E  g  filenamef  web/request.scm	 		 		 	%	 	/	 		 		 	 		E	   C 	    hP   t   ]4 5$  @4 5"  	 6$  4?$  @""l       g  x
		P g  tmp		P g  tmp		"	P  g  filenamef  web/request.scm
 	 		P   C5&RO^Z'     hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm
 
	 	'	 
 		F  g  nameg  request-cache-control C/RO_Z'     hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm
 
	 	$	 
 		F  g  nameg  request-connection C0RO`Z'        hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

 		F  g  nameg  request-date C1ROaZ'       hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

		 	
 		F  g  nameg  request-pragma C2RObZ'    hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

		!	
 		F  g  nameg  request-trailer C3ROcZ'   hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

		+	
 		F  g  nameg  request-transfer-encoding C4ROdZ' hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

		!	
 		F  g  nameg  request-upgrade C5ROeZ'   hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

			
 		F  g  nameg  request-via C6ROfZ'       hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

		!	
 		F  g  nameg  request-warning C7ROgZ'   hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

			
 		F  g  nameg  request-allow C8ROhZ'     hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

		*	
 		F  g  nameg  request-content-encoding C9ROiZ'  hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

		*	
 		F  g  nameg  request-content-language C:ROjZ'  hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

 		F  g  nameg  request-content-length C;ROkZ'     hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

 		F  g  nameg  request-content-location C<ROlZ'   hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

 		F  g  nameg  request-content-md5 C=ROmZ'        hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

 		F  g  nameg  request-content-range C>ROnZ'      hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

 		F  g  nameg  request-content-type C?ROoZ'       hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

 		F  g  nameg  request-expires C@ROpZ'    hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

 		F  g  nameg  request-last-modified CAROqZ'      hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

		 	
 		F  g  nameg  request-accept CBROrZ'    hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

		(	
 		F  g  nameg  request-accept-charset CCROsZ'    hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

		)	
 		F  g  nameg  request-accept-encoding CDROtZ'   hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

		)	
 		F  g  nameg  request-accept-language CEROuZ'   hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

 		F  g  nameg  request-authorization CFROvZ'      hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

		 	
 		F  g  nameg  request-expect CGROwZ'    hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

 		F  g  nameg  request-from CHROZ'       hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm

 		F  g  nameg  request-host CIROxZ'       hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm
!
 		F  g  nameg  request-if-match CJROyZ'   hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm
"
 		F  g  nameg  request-if-modified-since CKROzZ'  hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm
#
 		F  g  nameg  request-if-none-match CLRO{Z'      hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm
$
 		F  g  nameg  request-if-range CMRO|Z'   hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm
%
 		F  g  nameg  request-if-unmodified-since CNRO}Z'        hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm
&
 		F  g  nameg  request-max-forwards CORO~Z'       hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm
'
 		F  g  nameg  request-proxy-authorization CPROZ'        hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm
(
 		F  g  nameg  request-range CQROZ'      hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm
)
 		F  g  nameg  request-referer CRROZ'    hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm
*
	*		*
 		F  g  nameg  
request-te CSROZ'        hH      - . , 3 #  4 &  	 	"  	4 55$  CC         g  request
		F g  default		F g  t		7	F  g  filenamef  web/request.scm
+
 		F  g  nameg  request-user-agent CTRZ%I   h  }  - . , 3 #  #   &   "  	4 5&  		"  	45$  C4 5$  "  $  	"  	45	&  
"  	4
5&  		"  	45&  		"  	45&  		"  	456   u      g  r
	 g  default-host	 g  default-port		 g  uri		8 g  t		c  g  host	   g  filenamef  web/request.scm
.
	!1		81		=2		Y2		]5		c5		w6		|7	 8	 9	 8	 4	 ;	 <	 =	 >	 ?	 @	 ;	
 		  g  nameg  request-absolute-urig  documentation   k A       h   e   l   p   e   r       r   o   u   t   i   n   e       t   o       d   e   t   e   r   m   i   n   e       t   h   e       a   b   s   o   l   u   t   e       U   R   I       o   f       a       r   e   q   u   e   s   t   ,       u   s   i   n   g       t   h   e   
      h   o   s   t          h   e   a   d   e   r       a   n   d       t   h   e       d   e   f   a   u   l   t       h   o   s   t       a   n   d       p   o   r   t   .    CURC      1      g  m
		, g  rtd
a  g  filenamef  web/request.scm		
4	x
'i 
)r 
)s 
){ 	) 
* 
,a 
3 
6l 
< 
?$ 
@\ 
Dj 
E 
F
G
H
I
J
K
L
M
O
P-
Q2
R<
S?
TI
UP
VS
WY
Xk
Y
Z
[
\
]
^
_
`!
a"
b#
c$
d%
e&
f'
h(
i)
j*
k+
o.
 6	o
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                      ccache/web/uri.go                                                                                   0000644                 00000157503 15154557173 0007705 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0+      ] 4       hX      ] g  guile	 	g  define-module*	 	 	g  web	g  uri	 		g  filenameS	
f  web/uri.scm	g  importsS	g  srfi	g  srfi-9	 	 	g  ice-9	g  regex	 	 	g  rdelim	 	 	g  control	 	 	g  rnrs	g  bytevectors	 	 	g  binary-ports	 	  	!  	"g  exportsS	#g  uri?	$g  
uri-scheme	%g  uri-userinfo	&g  uri-host	'g  uri-port	(g  uri-path	)g  	uri-query	*g  uri-fragment	+g  	build-uri	,g  declare-default-port!	-g  string->uri	.g  uri->string	/g  
uri-decode	0g  
uri-encode	1g  split-and-decode-uri-path	2g  encode-and-join-uri-path	3#$%&'()*+,-./012 	4g  set-current-module	54 	64 	7g  <uri>	8g  %make-uri-procedure	9g  make-syntax-transformer	:9 	;9 	<g  make-uri	=g  macro	>g  $sc-dispatch	?> 	@> 	Ag  _	Bg  any	CABBBBBBB 	Dg  syntax-object	Eg  lambda	Fg  	m-50eea-a	Gg  top	HFG 	Ig  ribcage	Jg  	t-50eea-3	Kg  	t-50eea-4	Lg  	t-50eea-5	Mg  	t-50eea-6	Ng  	t-50eea-7	Og  	t-50eea-8	Pg  	t-50eea-9	QJKLMNOP 	RHHHHHHH 	Sf  	l-50eea-f	Tf  
l-50eea-10	Uf  
l-50eea-11	Vf  
l-50eea-12	Wf  
l-50eea-13	Xf  
l-50eea-14	Yf  
l-50eea-15	ZSTUVWXY 	[IQRZ 	\I 	]g  x	^] 	_H 	`f  	l-50eea-c	a` 	bI^_a 	cg  shift	dg  	proc-name	eg  args	fde 	gG 	hgg 	if  l-1e8ba8b5a-2ba	jf  l-1e8ba8b5a-2bb	kij 	lIfhk 	mg  key	ng  value	og  name	pg  formals	qg  body	rmnopq 	sggggg 	tf  l-1e8ba8b5a-2ad	uf  l-1e8ba8b5a-2ae	vf  l-1e8ba8b5a-2af	wf  l-1e8ba8b5a-2b0	xf  l-1e8ba8b5a-2b1	ytuvwx 	zIrsy 	{g  make-procedure-name	|{ 	}g 	~f  l-1e8ba8b5a-29d	~  I|}  g  f  l-1e8ba8b5a-29c   I^  H[\bc\\\\lz  g  hygiene   DE  g  scheme g[\b    D  g  userinfo D  g  host D  g  port D  g  path D  g  query D  g  fragment D    g  make-struct g  	m-50eea-1 G  g  t-1e8ba8b5a-38d g  t-1e8ba8b5a-38c g  t-1e8ba8b5a-38b   g  m-1e8ba8b5a-38e G    f  l-1e8ba8b5a-392 f  l-1e8ba8b5a-393 f  l-1e8ba8b5a-394   I  g  	ctor-args   f  l-1e8ba8b5a-37a   I  g  ctor g  field   f  l-1e8ba8b5a-376 f  l-1e8ba8b5a-377   Ih  g  form g  	type-name g  constructor-spec g  field-names   gggg  f  l-1e8ba8b5a-36b f  l-1e8ba8b5a-36c f  l-1e8ba8b5a-36d f  l-1e8ba8b5a-36e   I  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers   gggggggg  f  l-1e8ba8b5a-343 f  l-1e8ba8b5a-341 f  l-1e8ba8b5a-33f f  l-1e8ba8b5a-33d f  l-1e8ba8b5a-33b f  l-1e8ba8b5a-339 f  l-1e8ba8b5a-337 f  l-1e8ba8b5a-335   I  f  l-1e8ba8b5a-334   I^  [\bc\\\\\  D  D7  D
   
   g  each-any Aތ g  syntax-violation     f  Wrong number of arguments g  identifier?     g\b  D8      f  -source expression failed to match any pattern g  record-type-vtable     g  pwpwpwpwpwpwpw g  default-record-printer       g  set-struct-vtable-name!     g  vtable-offset-user     g  %uri?-procedure AB  g  
m-50eea-23 G  g  
t-50eea-22    f  
l-50eea-28 I  f  
l-50eea-25 I^  \c\\\\lz DE 	g  obj
g  t-1e8ba8b5a-47eg  t-1e8ba8b5a-478g  t-1e8ba8b5a-479g  t-1e8ba8b5a-47ag  t-1e8ba8b5a-47dg  t-1e8ba8b5a-47cg  t-1e8ba8b5a-47b
 g  m-1e8ba8b5a-47fG  f  l-1e8ba8b5a-483f  l-1e8ba8b5a-484f  l-1e8ba8b5a-485f  l-1e8ba8b5a-486f  l-1e8ba8b5a-487f  l-1e8ba8b5a-488f  l-1e8ba8b5a-489 I g  	copier-id  f  l-1e8ba8b5a-476!  "I! #g  	ctor-name$# %f  l-1e8ba8b5a-46e&% 'I$& ( )f  l-1e8ba8b5a-46c*) +I(* ,g  layout-, .f  l-1e8ba8b5a-46a/. 0I-/ 1g  
immutable?21 3f  l-1e8ba8b5a-46843 5I24 6g  field-count76 8f  l-1e8ba8b5a-46698 :I79 ;g  
getter-ids<; =f  l-1e8ba8b5a-463>= ?I<> @g  	field-idsA@ Bf  l-1e8ba8b5a-460CB DIAC Eg  predicate-nameFg  
field-specG1EF Hgggggg If  l-1e8ba8b5a-453Jf  l-1e8ba8b5a-454Kf  l-1e8ba8b5a-455Lf  l-1e8ba8b5a-456Mf  l-1e8ba8b5a-457Nf  l-1e8ba8b5a-458OIJKLMN PIGHO Q\c\\\\\"\'\+\0\5\:\?\DP RD	Q SR Tg  andUDTQ Vg  struct?WDVQ XWR Yg  eq?ZDYQ [g  struct-vtable\D[Q ]\R ^g\ _D7^ `Z]_ aUX` bSa cg\ dDc eg  throw-bad-structfe ge hg  %uri-scheme-procedureig  free-idjg  
%%on-errorkg  
m-50eea-2flkG ml nf  
l-50eea-31on pI^mo ql\pc\\\\lz rDjq sir tsB ug  %%typevg  t-1e8ba8b5a-3a5wg  t-1e8ba8b5a-3a6xg  t-1e8ba8b5a-3a7yg  t-1e8ba8b5a-3a8zg  t-1e8ba8b5a-3a9{g  t-1e8ba8b5a-3aa|g  t-1e8ba8b5a-3ab}vwxyz{| ~g  m-1e8ba8b5a-3ac~G  f  l-1e8ba8b5a-3b0f  l-1e8ba8b5a-3b1f  l-1e8ba8b5a-3b2f  l-1e8ba8b5a-3b3f  l-1e8ba8b5a-3b4f  l-1e8ba8b5a-3b5f  l-1e8ba8b5a-3b6 I} g  getterg  index f  l-1e8ba8b5a-3a3f  l-1e8ba8b5a-3a4 Ih ; ggg f  l-1e8ba8b5a-39ef  l-1e8ba8b5a-39ff  l-1e8ba8b5a-3a0 I \pc\\\\\ Du i AtB g  ckg  errg  s ll f  
l-50eea-34f  
l-50eea-35 I l\pc\\\\lz D g  quoteD g\p D7   g  %%indexD i AtB f  
l-50eea-39f  
l-50eea-3a I l\pc\\\\lz D D \p D
   g  %%copierD i AtB f  
l-50eea-3ef  
l-50eea-3f I l\pc\\\\lz D D g  %%<uri>-set-fieldsg\p D   g  
t-50eea-2e f  
l-50eea-43 Im l\pc\\\\lz DE \pc\\\\\ D  g  ifD DY D[  g\p D7  g  
struct-refD \p D
  De D D$     g\p Dh g  %uri-userinfo-procedureg  
m-50eea-4aG  f  
l-50eea-4c I^ \c\\\\lz Dj i B \c\\\\\ Du i AB  f  
l-50eea-4ff  
l-50eea-50 I  \c\\\\lz D  D  g\ D7   D i 	AB 
f  
l-50eea-54f  
l-50eea-55
 I \c\\\\lz D D \ D   D i AB f  
l-50eea-59f  
l-50eea-5a I \c\\\\lz D D g\  D !  "! #g  
t-50eea-49$# %f  
l-50eea-5e&% 'I$& ('\c\\\\lz )DE( *'\c\\\\\ +D* ,+ -D* .DY* /D[* 0/+ 1g'\ 2D71 3.02 4D* 5'\ 6D5 74+6 8De* 9D* :D%1 ;9: <8+; =-37< >),= ?g\ @D? Ag  %uri-host-procedureBg  
m-50eea-65CBG DC Ef  
l-50eea-67FE GI^DF HC\Gc\\\\lz IDjH JiI KJB L\Gc\\\\\ MDuL NiM OAKNB PCC Qf  
l-50eea-6aRf  
l-50eea-6bSQR TIPS UCT\Gc\\\\lz VDU WDU XgT\G YD7X ZWY [Z \DL ]i\ ^AK]B _f  
l-50eea-6f`f  
l-50eea-70a_` bIPa cCb\Gc\\\\lz dDc eDc fb\G gD	f heg ih jDL kij lAKkB mf  
l-50eea-74nf  
l-50eea-75omn pIPo qCp\Gc\\\\lz rDq sDq tgp\G uDt vsu wv xg  
t-50eea-64yx zf  
l-50eea-79{z |IyD{ }C|\Gc\\\\lz ~DE} |\Gc\\\\\ D  D DY D[  g|\G D7  D |\G D	  De D D&    ~ g\G DA g  %uri-port-procedureg  
m-50eea-80G  f  
l-50eea-82 I^ \c\\\\lz Dj i B \c\\\\\ Du i AB  f  
l-50eea-85f  
l-50eea-86 I \c\\\\lz D D g\ D7   D i AB f  
l-50eea-8af  
l-50eea-8b I \c\\\\lz D D \ D	   D i AB f  
l-50eea-8ff  
l-50eea-90 I \c\\\\lz D D g\ D   g  
t-50eea-7f f  
l-50eea-94 I \c\\\\lz DE \c\\\\\ D  D DY D[  g\ D7  D \ D	  De D D'     g\ D g  %uri-path-procedureg  
m-50eea-9bG  f  
l-50eea-9d I^ \c\\\\lz Dj i B \c\\\\\ Du i AB  f  
l-50eea-a0f  
l-50eea-a1 I \c\\\\lz  D D g\ D7   D i AB 	f  
l-50eea-a5
f  
l-50eea-a6	
 I \c\\\\lz D D \ D	   D i AB f  
l-50eea-aaf  
l-50eea-ab I \c\\\\lz D D g\ D   !  "g  
t-50eea-9a#" $f  
l-50eea-af%$ &I#% '&\c\\\\lz (DE' )&\c\\\\\ *D) +* ,D) -DY) .D[) /.* 0g&\ 1D70 2-/1 3D) 4&\ 5D	4 63*5 7De) 8D) 9D(0 :89 ;7*: <,26; =(+< >g\ ?D> @g  %uri-query-procedureAg  
m-50eea-b6BAG CB Df  
l-50eea-b8ED FI^CE GB\Fc\\\\lz HDjG IiH JIB K\Fc\\\\\ LDuK MiL NAJMB OBB Pf  
l-50eea-bbQf  
l-50eea-bcRPQ SIOR TBS\Fc\\\\lz UDT VDT WgS\F XD7W YVX ZY [DK \i[ ]AJ\B ^f  
l-50eea-c0_f  
l-50eea-c1`^_ aIO` bBa\Fc\\\\lz cDb dDb ea\F fD	e gdf hg iDK jii kAJjB lf  
l-50eea-c5mf  
l-50eea-c6nlm oIOn pBo\Fc\\\\lz qDp rDp sgo\F tDs urt vu wg  
t-50eea-b5xw yf  
l-50eea-cazy {IxCz |B{\Fc\\\\lz }DE| ~{\Fc\\\\\ D~  D~ DY~ D[~  g{\F D7  D~ {\F D	  De~ D~ D)    } g\F D@ g  %uri-fragment-procedureg  
m-50eea-d1G  f  
l-50eea-d3 I^ \c\\\\lz Dj i B \c\\\\\ Du i AB  f  
l-50eea-d6f  
l-50eea-d7 I \c\\\\lz D D g\ D7   D i AB f  
l-50eea-dbf  
l-50eea-dc I \c\\\\lz D D \ D	   D i AB f  
l-50eea-e0f  
l-50eea-e1 I \c\\\\lz D D g\ D   g  
t-50eea-d0 f  
l-50eea-e5 I \c\\\\lz DE \c\\\\\ D  D DY D[  g\ D7  D \ D	  De D D*     g\ D g  eachBB  B쌤B팤Bg  %%set-fieldsg  dummyg  check?g  expr g  
m-50eea-ecG  f  
l-50eea-f1f  
l-50eea-f2f  
l-50eea-f3f  
l-50eea-f4f  
l-50eea-f5 I   f  
l-50eea-ee  I^ g  t-1e8ba8b5a-3c4g  t-1e8ba8b5a-3c6g  t-1e8ba8b5a-3c5 g  m-1e8ba8b5a-3c7G 	 
f  l-1e8ba8b5a-3cbf  l-1e8ba8b5a-3ccf  l-1e8ba8b5a-3cd
 I	 f  l-1e8ba8b5a-3c1f  l-1e8ba8b5a-3c2f  l-1e8ba8b5a-3c3 I \c\\\\ D g\ D7 D$ D% D& D' D( D) D*   g  map!  "  #g  list$g  absolute-uri?%g  throw&g  	uri-error'g  number?(g  exact?)g  integer?*g  positive-exact-integer?+g  string?,g  string-null?-g  
string-ref.f  3Expected path of absolute URI to start with a /: ~a/f  Expected string for path: ~s0f   Expected string for userinfo: ~s1g  valid-host?2f  Expected valid host: ~s3f  "Expected port to be an integer: ~s4f  'Expected a host, given userinfo or port5f  (Expected a symbol for the URI scheme: ~s6g  validate-uri7g  userinfoS879g  hostS:9	;g  portS<;	=g  pathS>=	?g  queryS@?	Ag  fragmentSBA	Cg  	validate?SDC	E8:<>@BD Ff   Gg  make-regexpHf  ^([0-9.]+)$Ig  ipv4-regexpJf  ^([0-9a-fA-F:.]+)$Kg  ipv6-regexpLf  (^[a-zA-Z0-9]([a-zA-Z0-9-]*[a-zA-Z0-9])?$Mg  domain-label-regexpNf  %^[a-zA-Z]([a-zA-Z0-9-]*[a-zA-Z0-9])?$Og  top-label-regexpPg  regexp-execQg  catchRQ SQ Tg  	inet-ptonUg  AF_INETVg  AF_INET6Wg  string-indexXg  	substringYf  [a-zA-Z0-9_.!~*'();:&=+$,-]+Zg  userinfo-pat[f  [a-zA-Z0-9.-]+\g  host-pat]f  [0-9a-fA-F:.]+^g  ipv6-host-pat_f  [0-9]*`g  port-patag  formatbf  %^//((~a)@)?((~a)|(\[(~a)\]))(:(~a))?$cg  authority-regexpdf  //eg  match:substringfg  string->numbergg  parse-authorityhf  [a-zA-Z][a-zA-Z0-9+.-]*ig  
scheme-patjf  [^/?#]*kg  authority-patlf  [^?#]*mg  path-patnf  [^#]*og  	query-patpf  .*qg  fragment-patrf  &^((~a):)?(//~a)?(~a)(\?(~a))?(#(~a))?$sg  uri-pattg  
uri-regexpug  default-prompt-tagvu wu xg  abortyg  string->symbolzg  string-downcase{g  string->uri*|g  make-hash-table}g  *default-ports*~g  
hashq-set!g  	hashq-refg  default-port?g  httpg  httpsg  string-appendg  symbol->stringf  :f  @f  [f  ]g  number->stringf  ?f  #g  open-output-stringg  get-output-stringg  
close-portg  call-with-output-string*g  open-bytevector-output-portg  call-with-output-bytevector*g  string-ci=?f  utf-8g  string->utf8g  set-port-encoding!g  call-with-encoded-output-stringg  displayg  encode-stringg  utf8->stringg  open-bytevector-input-portg  read-stringg  decode-stringg  string->char-setf  0123456789abcdefABCDEFg  	hex-charsg  encodingSg  decode-plus-to-space?S	 g  string-lengthg  char-set-contains?g  stringg  put-u8g  char->integerf  'Invalid character in encoded URI ~a: ~sf  >abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789g  ascii-alnum-charsf  :/?#[]@g  
gen-delimsf  !$&'()*+,l=g  
sub-delimsg  char-set-uniong  reserved-charsf  -._~g  unreserved-charsg  unescaped-charsS	 g  string-for-eachg  bytevector-lengthg  string-upcaseg  filterg  string-splitg  string-joinf  /C 5    h}    ]4	
!"35 46 >  "  G   7      h      ]  C         g  scheme
		 g  userinfo		 g  host			 g  port			 g  path			 g  query			 g  fragment			  g  filenamef  web/uri.scm
	,
 			  g  nameg  %make-uri-procedure C8R4;<=@C    h      ]  C         g  	t-50eea-3
		 g  	t-50eea-4		 g  	t-50eea-5			 g  	t-50eea-6			 g  	t-50eea-7			 g  	t-50eea-8			 g  	t-50eea-9			  			   C< h   N   ]L 6    F       g  a
		  g  filenamef  web/uri.scm		,
 		   CA  h   >   ] L 66       g  filenamef  web/uri.scm		,
 		
   C    h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  w       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  web/uri.scm
	,
 		n   C5<R7  4 7>  "  G   	8i  7R7      h   k   ] $   CC      c       g  obj
		  g  filenamef  web/uri.scm
	,
 		  g  nameg  %uri?-procedure CR4;#=@b       h   2   ]  C      *       g  
t-50eea-22
		
  		
   C#  h   N   ]L 6    F       g  a
		  g  filenamef  web/uri.scm		,
 		   CA  h   >   ] L 66       g  filenamef  web/uri.scm		,
 		
   Cd   h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  w       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  web/uri.scm
	,
 		n   C5#R7g$ h   o   ] &   
C 6g       g  s
		  g  filenamef  web/uri.scm
	,
 		  g  nameg  %uri-scheme-procedure ChR4;$=@      h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   2   ]  C      *       g  
t-50eea-2e
		
  		
   C$  h   N   ]L 6    F       g  a
		  g  filenamef  web/uri.scm		,
 		   CA  h   >   ] L 66       g  filenamef  web/uri.scm		,
 		
   C   h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/uri.scm
	,
 	    C5$R7g%     h   q   ] &   C 6i       g  s
		  g  filenamef  web/uri.scm
	,
 		  g  nameg  %uri-userinfo-procedure CR4;%=@    h   :   ]C     2       g  err
		 g  s		  			   C	 h   :   ]C     2       g  err
		 g  s		  			   C" h   :   ]C     2       g  err
		 g  s		  			   C>     h   2   ]  C      *       g  
t-50eea-49
		
  		
   C%  h   N   ]L 6    F       g  a
		  g  filenamef  web/uri.scm		,
 		   CA  h   >   ] L 66       g  filenamef  web/uri.scm		,
 		
   C@   h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/uri.scm
	,
 	    C5%R7g&     h    m   ] &   	C 6       e       g  s
		  g  filenamef  web/uri.scm
	,
 		  g  nameg  %uri-host-procedure CAR4;&=@OV[        h   :   ]C     2       g  err
		 g  s		  			   C^di h   :   ]C     2       g  err
		 g  s		  			   Clrw h   :   ]C     2       g  err
		 g  s		  			   C     h   2   ]  C      *       g  
t-50eea-64
		
  		
   C&  h   N   ]L 6    F       g  a
		  g  filenamef  web/uri.scm		,
 		   CA  h   >   ] L 66       g  filenamef  web/uri.scm		,
 		
   C   h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/uri.scm
	,
 	    C5&R7g'     h    m   ] &   	C 6       e       g  s
		  g  filenamef  web/uri.scm
	,
 		  g  nameg  %uri-port-procedure CR4;'=@        h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   2   ]  C      *       g  
t-50eea-7f
		
  		
   C'  h   N   ]L 6    F       g  a
		  g  filenamef  web/uri.scm		,
 		   CA  h   >   ] L 66       g  filenamef  web/uri.scm		,
 		
   C   h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/uri.scm
	,
 	    C5'R7g(     h    m   ] &   	C 6       e       g  s
		  g  filenamef  web/uri.scm
	,
 		  g  nameg  %uri-path-procedure CR4;(=@         h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C! h   :   ]C     2       g  err
		 g  s		  			   C=     h   2   ]  C      *       g  
t-50eea-9a
		
  		
   C(  h   N   ]L 6    F       g  a
		  g  filenamef  web/uri.scm		,
 		   CA  h   >   ] L 66       g  filenamef  web/uri.scm		,
 		
   C?   h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/uri.scm
	,
 	    C5(R7g)     h    n   ] &   	C 6       f       g  s
		  g  filenamef  web/uri.scm
	,
 		  g  nameg  %uri-query-procedure C@R4;)=@NUZ       h   :   ]C     2       g  err
		 g  s		  			   C]ch h   :   ]C     2       g  err
		 g  s		  			   Ckqv h   :   ]C     2       g  err
		 g  s		  			   C     h   2   ]  C      *       g  
t-50eea-b5
		
  		
   C)  h   N   ]L 6    F       g  a
		  g  filenamef  web/uri.scm		,
 		   CA  h   >   ] L 66       g  filenamef  web/uri.scm		,
 		
   C   h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/uri.scm
	,
 	    C5)R7g*     h    q   ] &   	C 6       i       g  s
		  g  filenamef  web/uri.scm
	,
 		  g  nameg  %uri-fragment-procedure CR4;*=@    h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C     h   2   ]  C      *       g  
t-50eea-d0
		
  		
   C*  h   N   ]L 6    F       g  a
		  g  filenamef  web/uri.scm		,
 		   CA  h   >   ] L 66       g  filenamef  web/uri.scm		,
 		
   C   h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/uri.scm
	,
 	    C5*R4;=@"#       h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  web/uri.scm
	,
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R7   h(      ] $   &   
$  CCCC             g  obj
		"  g  filenamef  web/uri.scm
	7
		8				8			8			8			8	 		"  g  nameg  absolute-uri? C$R%& h      - 1 3  6            g  message
			 g  args			  g  filenamef  web/uri.scm
	:
		;				;	 			
  g  nameg  	uri-error C&R'()   h0      ]4 5$  4 5$  4 5$   
CCCC         g  port
		.  g  filenamef  web/uri.scm
	=
		>			>			>			>			>	$	#	>		&	>	4 			.  g  nameg  positive-exact-integer? C*R+,-&./012*345     h   E  ] $  "  E45$  2$  *45$  "  4
5/$  6CC6"  !$  45$  "6""  2$  (45$  45"  $  	6"""  !$  4
5$  "6"$  "  $  $  "6" 6 =      g  scheme
	  g  userinfo	  g  host		  g  port		  g  path		  g  query		  g  fragment		   g  filenamef  web/uri.scm
	@
		B					A			L				A			N		)	N		/	O		9	O		:	O			>	N		B	P		F	P		N	M		R	M		R	A		]	J		g	J		o	K		s	K		w	A	 	H	 	H	 	H	, 	H	' 	H	 	H	 	I	 	I	 	A	 	F	 	F	 	G	 	G	 	A	 	D		 	A	 	D	 	E	 	E	 	C	 	C	 +	 	  g  nameg  validate-uri C6REF67        h     - /   0   3 #  #  #  #  #  #  #  $  "4 >  "  G  "     C       g  scheme
	  g  userinfo	  g  host		  g  port		  g  path		  g  query		  g  fragment		  g  	validate?		   g  filenamef  web/uri.scm
	R
	6	R	:	Y	Y		Z	Z	 	[	 	 
g  userinfoSg  hostS	g  portS	g  pathS	g  queryS	g  fragmentS	g  	validate?S	   g  nameg  	build-urig  documentation   k C   o   n   s   t   r   u   c   t       a       U   R   I       o   b   j   e   c   t   .           S   C   H   E   M   E       s   h   o   u   l   d       b   e       a       s   y   m   b   o   l   ,       P   O   R   T   
   e   i   t   h   e   r       a       p   o   s   i   t   i   v   e   ,       e   x   a   c   t       i   n   t   e   g   e   r       o   r          #   f      ,       a   n   d       t   h   e       r   e   s   t       o   f       t   h   e   
   f   i   e   l   d   s       a   r   e       e   i   t   h   e   r       s   t   r   i   n   g   s       o   r          #   f      .           I   f       V   A   L   I   D   A   T   E   ?       i   s       t   r   u   e   ,   
   a   l   s   o       r   u   n       s   o   m   e       c   o   n   s   i   s   t   e   n   c   y       c   h   e   c   k   s       t   o       m   a   k   e       s   u   r   e       t   h   a   t       t   h   e       c   o   n   s   t   r   u   c   t   e   d       U   R   I   
   i   s       v   a   l   i   d   .    C+R4GiH5IR4GiJ5KR4GiL5MR4GiN5ORPISTU    h   F   ] L 6      >       g  filenamef  web/uri.scm
	l		
	l	 		

   Ch   S   -  1  3 C     K       g  args
			  g  filenamef  web/uri.scm
	l	 			


   CKTV        h   F   ] L 6      >       g  filenamef  web/uri.scm
	n		
	n	 		

   Ch   S   -  1  3 C     K       g  args
			  g  filenamef  web/uri.scm
	n	 			


   CWMXO      h     ]4 5$   O 64 5$   O 6"  >4	 .5$  !4
4 55$  	"C 6
"             g  host
	  g  start	<	z g  end		G	z  g  filenamef  web/uri.scm
	i
		k			j			l			m		*	j		8	n		<	p		=	q		G	q		O	r		P	s		U	t		a	s		e	s		h	u		n	u		z	v		z	p	 	   g  nameg  valid-host? C1RYZR[\R]^R_`R4Gi4aibZi\i^i`i55cRdPc1e,f      h     ] $  D4 5$  44	5$  "  	4	55$  ^4	54	5$  "  	4	54	5$  45$  "  45"  D6 6            g  	authority
	  g  fail	  g  m		  g  t		-	G g  t		_	y g  port	    g  filenamef  web/uri.scm
 
	 		 		 		 		 		 		! 		" 		% 	$	- 	 	< 	$	I 		M 		N 		W 		_ 		n 		z 	   	  	  	%  	  	  	  	 	 	  g  nameg  parse-authority CgRhiRjkRlmRnoRpqR4airiikimioiqi5sR4Gisi5tRwPtxeyzg7 
       h   i  ]I45 U  4 5$  "  4>   "  G  4	5$  4455"  4	54	54	54	5$  4>  "  		"  G 			 XCXFG C     a      g  string
	  g  m	  g  str		:	V g  scheme		z  g  	authority		z  g  path		z  g  query		z  g  fragment		z  g  userinfo	   g  host	   g  port		   g  k    g  filenamef  web/uri.scm
 
	 		 		 		 		" 		2 	 	: 		B 		C 	 	F 	0	N 	 	W 		` 		i 		r 		z 	  	  	  	  		  	  	 	   g  nameg  string->uri*g  documentation  k <P   a   r   s   e       S   T   R   I   N   G       i   n   t   o       a       U   R   I       o   b   j   e   c   t   .           R   e   t   u   r   n          #   f          i   f       t   h   e       s   t   r   i   n   g   
   c   o   u   l   d       n   o   t       b   e       p   a   r   s   e   d   .    C{R{7g$     h8     ]	4 5$  #&  
"  	45$  CCC        g  string
		6 g  uri			6  g  filenamef  web/uri.scm
 
	 			 		 		 		/ 	 		6  g  nameg  string->urig  documentation   k <P   a   r   s   e       S   T   R   I   N   G       i   n   t   o       a       U   R   I       o   b   j   e   c   t   .           R   e   t   u   r   n          #   f          i   f       t   h   e       s   t   r   i   n   g   
   c   o   u   l   d       n   o   t       b   e       p   a   r   s   e   d   .    C-R4|i5 }R~}  h      ] 6           g  scheme
		 g  port		  g  filenamef  web/uri.scm
 
	 	 			  g  nameg  declare-default-port!g  documentationf  0Declare a default port for the given URI scheme. C,R}     h      ]$  4 5CC        g  scheme
		 g  port		  g  filenamef  web/uri.scm
 
	 		 		 		 	 			  g  nameg  default-port? CR4,i	P>  "  G  4,i>  "  G  7g$%&'()*FdW    h    ]9 &   
"  	4 5 &   "  	4 5 &  	 	"  	4 5 &  	 	"  	4 5 &  	 	"  	4 5 &  	 	"  	4 5 &  	 	"  	4 	5
$  4
455"  $  w4
$  4
5"  4:5$  4
5"  4 &   
"  	4 55$  "  4
4555"  $  4
5"  $  4
5"  6          g  uri
	 g  scheme	 g  userinfo		8 g  host		U g  port		r g  path	  g  query	  g  fragment	   g  filenamef  web/uri.scm
 
	 		 		! 		8 		= 		U 		Z 		r 		w 	  	  	  	  	  	  	  		  	  	0  		  		  	  		  	  	  	%  	= 	% 	 	 	 	 	+ 	4 	& 	+ 	+F 	J 	L 	Q 	U 	+V 	/^ 	` 		f 		n 	o 		s 	w 		} 		 	 		 	 		 		 	 :	  g  nameg  uri->stringg  documentationf  Serialize URI to a string.  If the URI has a port that is the
default port for its scheme, the port is not included in the
serialization. C.R      h@      ]45 4 >  "  G  454>  "  G  C              g  proc
		9 g  port		9 g  str		"	9  g  filenamef  web/uri.scm
 
	 		 		
 		 		" 		% 	 		9  g  nameg  call-with-output-string* CR    h@      ]4>   G 4 >  "  G  45 4>  "  G  C       g  proc
		@ g  port		@ g  get-bytevector			@ g  bv		)	@  g  filenamef  web/uri.scm

							%		)		,		 		@  g  nameg  call-with-output-bytevector* CR        h    d   ]4 L>  "  G  L  6    \       g  port
		  g  filenamef  web/uri.scm
							 		   C h(      ]4 5$  456 O 6        g  encoding
		' g  proc		'  g  filenamef  web/uri.scm

														'	 			'	  g  nameg  call-with-encoded-output-string CR      h   [   ]L  6      S       g  port
		
  g  filenamef  web/uri.scm
	'	
	) 		
   C  h(      ]45$   6 O 6             g  str
		" g  encoding		"  g  filenamef  web/uri.scm

												"	 		"	  g  nameg  encode-string CR     hP     ]45$   64 54>  "  G  454>  "  G  C       g  bv
		P g  encoding		P g  p			P g  res		9	P  g  filenamef  web/uri.scm

																		3 		9 		<!	
 		P	  g  nameg  decode-string CR4i5R-f& 
      h0  m  ]!" #L $ 4L5"  	L $  f%$  X4L54L	545$  &45$  445	5"  "  "  "  $  4 >  "  G  	"N45 $  "4 45>  "  G  "	L6+$  'L$  4 	 >  "  G  """C
"e      g  port
	0 g  i	) g  ch		' g  a		I  g  b		I  g  t	    g  filenamef  web/uri.scm
K		L		M		M		N		N		#S		&S		*S		/S	,	3S		4T	%	;T	5	=T	%	>U	%	GU	5	IU	%	IT		NV	#	ZV		[W	#	gV		hX	#	kX	3	wX	# O	 Z	 [	  [	 \	 \	 O	 ]	 ]	$ ]	 ^	 ^	 `	" `	 O	 P	 O	P	Q		Q	$Q	R	R	)L	 2	0   C     hX     - /   0   3 #  #  4 54 O 5$  6C            g  str
		R g  encoding		R g  decode-plus-to-space?			R g  len		-	R g  bv		?	R  g  filenamef  web/uri.scm
2
	2	)	'H		-H		0J	
	?H		Gb		Oc	 			R
g  encodingSg  decode-plus-to-space?S	   g  nameg  
uri-decodeg  documentation  k P   e   r   c   e   n   t   -   d   e   c   o   d   e       t   h   e       g   i   v   e   n       S   T   R   ,       a   c   c   o   r   d   i   n   g       t   o       E   N   C   O   D   I   N   G   ,   
   w   h   i   c   h       s   h   o   u   l   d       b   e       t   h   e       n   a   m   e       o   f       a       c   h   a   r   a   c   t   e   r       e   n   c   o   d   i   n   g   .   
   
   N   o   t   e       t   h   a   t       t   h   i   s       f   u   n   c   t   i   o   n       s   h   o   u   l   d       n   o   t       g   e   n   e   r   a   l   l   y       b   e       a   p   p   l   i   e   d       t   o       a       f   u   l   l       U   R   I   
   s   t   r   i   n   g   .       F   o   r       p   a   t   h   s   ,       u   s   e          s   p   l   i   t   -   a   n   d   -   d   e   c   o   d   e   -   u   r   i   -   p   a   t   h          i   n   s   t   e   a   d   .       F   o   r       q   u   e   r   y   
   s   t   r   i   n   g   s   ,       s   p   l   i   t       t   h   e       q   u   e   r   y       o   n          &          a   n   d          =          b   o   u   n   d   a   r   i   e   s   ,       a   n   d       d   e   c   o   d   e   
   t   h   e       c   o   m   p   o   n   e   n   t   s       s   e   p   a   r   a   t   e   l   y   .   
   
   N   o   t   e       a   l   s   o       t   h   a   t       p   e   r   c   e   n   t   -   e   n   c   o   d   e   d       s   t   r   i   n   g   s       e   n   c   o   d   e       _   b   y   t   e   s   _   ,       n   o   t       c   h   a   r   a   c   t   e   r   s   .   
   T   h   e   r   e       i   s       n   o       g   u   a   r   a   n   t   e   e       t   h   a   t       a       g   i   v   e   n       b   y   t   e       s   e   q   u   e   n   c   e       i   s       a       v   a   l   i   d       s   t   r   i   n   g   
   e   n   c   o   d   i   n   g   .       T   h   e   r   e   f   o   r   e       t   h   i   s       r   o   u   t   i   n   e       m   a   y       s   i   g   n   a   l       a   n       e   r   r   o   r       i   f       t   h   e       d   e   c   o   d   e   d   
   b   y   t   e   s       a   r   e       n   o   t       v   a   l   i   d       f   o   r       t   h   e       g   i   v   e   n       e   n   c   o   d   i   n   g   .       P   a   s   s          #   f          f   o   r       E   N   C   O   D   I   N   G       i   f   
   y   o   u       w   a   n   t       d   e   c   o   d   e   d       b   y   t   e   s       a   s       a       b   y   t   e   v   e   c   t   o   r       d   i   r   e   c   t   l   y   .              s   e   t   -   p   o   r   t   -   e   n   c   o   d   i   n   g   !      ,   
   f   o   r       m   o   r   e       i   n   f   o   r   m   a   t   i   o   n       o   n       c   h   a   r   a   c   t   e   r       e   n   c   o   d   i   n   g   s   .   
   
   I   f       D   E   C   O   D   E   -   P   L   U   S   -   T   O   -   S   P   A   C   E   ?       i   s       t   r   u   e   ,       w   h   i   c   h       i   s       t   h   e       d   e   f   a   u   l   t   ,       a   l   s   o       r   e   p   l   a   c   e   
   i   n   s   t   a   n   c   e   s       o   f       t   h   e       p   l   u   s       c   h   a   r   a   c   t   e   r       (   +   )       w   i   t   h       a       s   p   a   c   e       c   h   a   r   a   c   t   e   r   .           T   h   i   s       i   s   
   n   e   e   d   e   d       w   h   e   n       p   a   r   s   i   n   g       a   p   p   l   i   c   a   t   i   o   n   /   x   -   w   w   w   -   f   o   r   m   -   u   r   l   e   n   c   o   d   e   d       d   a   t   a   .   
   
   R   e   t   u   r   n   s       a       s   t   r   i   n   g       o   f       t   h   e       d   e   c   o   d   e   d       c   h   a   r   a   c   t   e   r   s   ,       o   r       a       b   y   t   e   v   e   c   t   o   r       i   f   
   E   N   C   O   D   I   N   G       w   a   s          #   f      .    C/R4i5R4i5R4i5R4iii5R4ii4i55RW     h   }   ]4L  5C   u       g  ch
		  g  filenamef  web/uri.scm
						 		  g  nameg  needs-escaped? C   h     ]!4L 5$   L644 5L 545"  p$  e4%L>  "  G  	$  40L>  "  G  "   444	55L>  "  G  "C
"           g  ch
	  g  bv	%  g  len		.  g  i		4  g  byte		B   g  filenamef  web/uri.scm
	
										*	%		%		(		.		4		9		=		B	$	B		E		]	 	a		b		z		}	# 	2 	# 	 	 	 	 	    C      h   [   ]L LO L 6     S       g  port
		  g  filenamef  web/uri.scm
				 		   C  hP   e  - /   0   3 #  #  4 O 5$   O 6 C     ]      g  str
		K g  encoding		K g  unescaped-chars			K  g  filenamef  web/uri.scm
{
	{	)	(		9		H	 		K
g  encodingSg  unescaped-charsS	   g  nameg  
uri-encodeg  documentation  k dP   e   r   c   e   n   t   -   e   n   c   o   d   e       a   n   y       c   h   a   r   a   c   t   e   r       n   o   t       i   n       t   h   e       c   h   a   r   a   c   t   e   r       s   e   t   ,   
   U   N   E   S   C   A   P   E   D   -   C   H   A   R   S   .   
   
   T   h   e       d   e   f   a   u   l   t       c   h   a   r   a   c   t   e   r       s   e   t       i   n   c   l   u   d   e   s       a   l   p   h   a   n   u   m   e   r   i   c   s       f   r   o   m       A   S   C   I   I   ,       a   s       w   e   l   l       a   s   
   t   h   e       s   p   e   c   i   a   l       c   h   a   r   a   c   t   e   r   s          -      ,          .      ,          _      ,       a   n   d          ~      .           A   n   y       o   t   h   e   r       c   h   a   r   a   c   t   e   r       w   i   l   l   
   b   e       p   e   r   c   e   n   t   -   e   n   c   o   d   e   d   ,       b   y       w   r   i   t   i   n   g       o   u   t       t   h   e       c   h   a   r   a   c   t   e   r       t   o       a       b   y   t   e   v   e   c   t   o   r       w   i   t   h   i   n   
   t   h   e       g   i   v   e   n       E   N   C   O   D   I   N   G   ,       t   h   e   n       e   n   c   o   d   i   n   g       e   a   c   h       b   y   t   e       a   s          %   H   H      ,       w   h   e   r   e       H   H       i   s       t   h   e   
   u   p   p   e   r   c   a   s   e       h   e   x   a   d   e   c   i   m   a   l       r   e   p   r   e   s   e   n   t   a   t   i   o   n       o   f       t   h   e       b   y   t   e   .    C0R,     h   a   ]4 5C     Y       g  x
		  g  filenamef  web/uri.scm
	
			
	 		   C /   h   X   ] 6     P       g  s
		  g  filenamef  web/uri.scm
			 		   C  h   e  ]44 /556]      g  path
		  g  filenamef  web/uri.scm

		
				
		 		  g  nameg  split-and-decode-uri-pathg  documentationk S   p   l   i   t       P   A   T   H       i   n   t   o       i   t   s       c   o   m   p   o   n   e   n   t   s   ,       a   n   d       d   e   c   o   d   e       e   a   c   h       c   o   m   p   o   n   e   n   t   ,   
   r   e   m   o   v   i   n   g       e   m   p   t   y       c   o   m   p   o   n   e   n   t   s   .   
   
   F   o   r       e   x   a   m   p   l   e   ,          "   /   f   o   o   /   b   a   r   %   2   0   b   a   z   /   "          d   e   c   o   d   e   s       t   o       t   h   e       t   w   o   -   e   l   e   m   e   n   t       l   i   s   t   ,   
      (   "   f   o   o   "       "   b   a   r       b   a   z   "   )      .    C1R 0 h   I  ]4 56       A      g  parts
		  g  filenamef  web/uri.scm

				&		 		  g  nameg  encode-and-join-uri-pathg  documentation k U   R   I   -   e   n   c   o   d   e       e   a   c   h       e   l   e   m   e   n   t       o   f       P   A   R   T   S   ,       w   h   i   c   h       s   h   o   u   l   d       b   e       a       l   i   s   t       o   f   
   s   t   r   i   n   g   s   ,       a   n   d       j   o   i   n       t   h   e       p   a   r   t   s       t   o   g   e   t   h   e   r       w   i   t   h          /          a   s       a       d   e   l   i   m   i   t   e   r   .   
   
   F   o   r       e   x   a   m   p   l   e   ,       t   h   e       l   i   s   t          (   "   s   c   r   a   m   b   l   e   d       e   g   g   s   "       "   b   i   s   c   u   i   t   s   &   g   r   a   v   y   "   )      
   e   n   c   o   d   e   s       a   s          "   s   c   r   a   m   b   l   e   d   %   2   0   e   g   g   s   /   b   i   s   c   u   i   t   s   %   2   6   g   r   a   v   y   "      .    C2RC        g  m
		, g  rtd
Iq  g  filenamef  web/uri.scm		
B	,
+5	7
+	:
,	=
0i	@
6	R
6	a	6	a	6	a	6	`
6	c	6	c	6	c	6	b
6	e	6	e	6	e	6	d
6	g	6	g	6	g	6	f
:	i
:	y	:	x
:	{	:	z
:	}	:	|
:		:	~
: 	: 	: 	: 	: 	: 
=] 
=` 	=d 
=g 	=k 
=n 	=r 
=u 	=y 
=| 	= 
= 	= 	= 	= 
= 	= 
B% 
Dx 
Dy 	D 
E 
FW 
FX 
F_ 	Ff 
Fo 
Fv 	F~ 
L- 
MZ 
N
PV
Q
SN
SO0	SW0	SY0	S]/
h2
hh	hi	hh	hg
hm	hm	hm	hl
ho	ho	ho	hn
hq	hp
hu	hv	iv	$i	v	iu	it
th{
y 
}|
 f	}~
   C6                                                                                                                                                                                              ccache/web/http.go                                                                                  0000644                 00000364241 15154557173 0010064 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0     ]} 4 hg      ] g  guile	 	g  define-module*	 	 	g  web	g  http	 		g  filenameS	
f  web/http.scm	g  importsS	g  srfi	g  srfi-1	 	g  selectS	g  append-map!	g  map!	 	 	g  srfi-9	 	 	g  srfi-19	 	 	g  ice-9	g  rdelim	 	 	g  match	 	  	!g  q	"! 	#" 	$g  binary-ports	%$ 	&% 	'g  rnrs	(g  bytevectors	)'( 	*) 	+g  uri	,+ 	-, 	. #&*- 		/g  exportsS	0g  string->header	1g  header->string	2g  declare-header!	3g  declare-opaque-header!	4g  known-header?	5g  header-parser	6g  header-validator	7g  header-writer	8g  read-header	9g  parse-header	:g  valid-header?	;g  write-header	<g  read-headers	=g  write-headers	>g  parse-http-method	?g  parse-http-version	@g  parse-request-uri	Ag  read-request-line	Bg  write-request-line	Cg  read-response-line	Dg  write-response-line	Eg  make-chunked-input-port	Fg  make-chunked-output-port	Gg  http-proxy-port?	Hg  set-http-proxy-port?!	I0123456789:;<=>?@ABCDEFGH 	Jg  set-current-module	KJ 	LJ 	Mg  string->symbol	Ng  string-downcase	Og  <header-decl>	Pg  %make-header-decl-procedure	Qg  make-syntax-transformer	RQ 	SQ 	Tg  make-header-decl	Ug  macro	Vg  $sc-dispatch	WV 	XV 	Yg  _	Zg  any	[YZZZZZ 	\g  syntax-object	]g  lambda	^g  
m-556baa-a	_g  top	`^_ 	ag  ribcage	bg  
t-556baa-5	cg  
t-556baa-6	dg  
t-556baa-7	eg  
t-556baa-8	fg  
t-556baa-9	gbcdef 	h````` 	if  
l-556baa-f	jf  l-556baa-10	kf  l-556baa-11	lf  l-556baa-12	mf  l-556baa-13	nijklm 	oaghn 	pa 	qg  x	rq 	s` 	tf  
l-556baa-c	ut 	varsu 	wg  shift	xg  	proc-name	yg  args	zxy 	{_ 	|{{ 	}f  l-1e8ba8b5a-2ba	~f  l-1e8ba8b5a-2bb	}~  az|  g  key g  value g  name g  formals g  body   {{{{{  f  l-1e8ba8b5a-2ad f  l-1e8ba8b5a-2ae f  l-1e8ba8b5a-2af f  l-1e8ba8b5a-2b0 f  l-1e8ba8b5a-2b1   a  g  make-procedure-name   {  f  l-1e8ba8b5a-29d   a  {  f  l-1e8ba8b5a-29c   ar  `opvwpppp  g  hygiene   \]  {opv    \  g  parser \  g  	validator \  g  writer \  g  	multiple? \    g  make-struct g  
m-556baa-3 _  g  t-1e8ba8b5a-38d g  t-1e8ba8b5a-38c g  t-1e8ba8b5a-38b   g  m-1e8ba8b5a-38e _    f  l-1e8ba8b5a-392 f  l-1e8ba8b5a-393 f  l-1e8ba8b5a-394   a  g  	ctor-args   f  l-1e8ba8b5a-37a   a  g  ctor g  field   f  l-1e8ba8b5a-376 f  l-1e8ba8b5a-377   a|  g  form g  	type-name g  constructor-spec g  field-names   {{{{  f  l-1e8ba8b5a-36b f  l-1e8ba8b5a-36c f  l-1e8ba8b5a-36d f  l-1e8ba8b5a-36e   a  g  record-layout g  functional-setters g  setters g  copier g  getters g  constructor g  getter-identifiers g  field-identifiers   {{{{{{{{  f  l-1e8ba8b5a-343 f  l-1e8ba8b5a-341 f  l-1e8ba8b5a-33f f  l-1e8ba8b5a-33d f  l-1e8ba8b5a-33b f  l-1e8ba8b5a-339 f  l-1e8ba8b5a-337 f  l-1e8ba8b5a-335   a  f  l-1e8ba8b5a-334   ar  opvwppppp  \  \O  \
      g  each-any Y팤 g  syntax-violation     f  Wrong number of arguments g  identifier?     {pv  \P      f  -source expression failed to match any pattern g  record-type-vtable     g  
pwpwpwpwpw g  default-record-printer    g  set-struct-vtable-name!  g  vtable-offset-user  	g  %header-decl?-procedure
g  header-decl?YZ g  m-556baa-1f_ g  t-556baa-1e  f  l-556baa-24 a f  l-556baa-21 ar pwpppp \] g  objg  t-1e8ba8b5a-47eg  t-1e8ba8b5a-478g  t-1e8ba8b5a-479g  t-1e8ba8b5a-47ag  t-1e8ba8b5a-47dg  t-1e8ba8b5a-47c g  t-1e8ba8b5a-47b!  "g  m-1e8ba8b5a-47f#"_ $####### %f  l-1e8ba8b5a-483&f  l-1e8ba8b5a-484'f  l-1e8ba8b5a-485(f  l-1e8ba8b5a-486)f  l-1e8ba8b5a-487*f  l-1e8ba8b5a-488+f  l-1e8ba8b5a-489,%&'()*+ -a!$, .g  	copier-id/. 0f  l-1e8ba8b5a-47610 2a/1 3g  	ctor-name43 5f  l-1e8ba8b5a-46e65 7a46 8 9f  l-1e8ba8b5a-46c:9 ;a8: <g  layout=< >f  l-1e8ba8b5a-46a?> @a=? Ag  
immutable?BA Cf  l-1e8ba8b5a-468DC EaBD Fg  field-countGF Hf  l-1e8ba8b5a-466IH JaGI Kg  
getter-idsLK Mf  l-1e8ba8b5a-463NM OaLN Pg  	field-idsQP Rf  l-1e8ba8b5a-460SR TaQS Ug  predicate-nameVg  
field-specWAUV X{{{{{{ Yf  l-1e8ba8b5a-453Zf  l-1e8ba8b5a-454[f  l-1e8ba8b5a-455\f  l-1e8ba8b5a-456]f  l-1e8ba8b5a-457^f  l-1e8ba8b5a-458_YZ[\]^ `aWX_ apwp-pppp2p7p;p@pEpJpOpT` b\a cb dg  ande\da fg  struct?g\fa hgb ig  eq?j\ia kg  struct-vtablel\ka mlb n{p o\On pjmo qehp rcq s{p t\	s ug  throw-bad-structvu wu xg  header-decl-nameyg  %header-decl-name-procedurezg  free-id{g  
%%on-error|g  m-556baa-2b}|_ ~} f  l-556baa-2d ar~ }pwpppp \{ z Z g  %%typeg  t-1e8ba8b5a-3a5g  t-1e8ba8b5a-3a6g  t-1e8ba8b5a-3a7g  t-1e8ba8b5a-3a8g  t-1e8ba8b5a-3a9g  t-1e8ba8b5a-3aag  t-1e8ba8b5a-3ab g  m-1e8ba8b5a-3ac_  f  l-1e8ba8b5a-3b0f  l-1e8ba8b5a-3b1f  l-1e8ba8b5a-3b2f  l-1e8ba8b5a-3b3f  l-1e8ba8b5a-3b4f  l-1e8ba8b5a-3b5f  l-1e8ba8b5a-3b6 a g  getterg  index f  l-1e8ba8b5a-3a3f  l-1e8ba8b5a-3a4 a| K. {{{ f  l-1e8ba8b5a-39ef  l-1e8ba8b5a-39ff  l-1e8ba8b5a-3a0 a pwppppp \ z YZ g  ckg  errg  s }} f  l-556baa-30f  l-556baa-31 a }pwpppp \ g  quote\ {p \O   g  %%index\ z YZ f  l-556baa-35f  l-556baa-36 a }pwpppp \ \ p \
   g  %%copier\ z YZ f  l-556baa-3af  l-556baa-3b a }pwpppp \ \ g  %%<header-decl>-set-fields{p \   g  t-556baa-2a f  l-556baa-3f a~ }pwpppp \] pwppppp \  g  if\ \i \k  {p \O  g  
struct-ref\ p \
  \u \ \x     {p \y g  header-decl-parserg  %header-decl-parser-procedureg  m-556baa-46 _   f  l-556baa-48 ar  pwpppp \{ z Z 	pwppppp 
\	 z
 YZ    f  l-556baa-4bf  l-556baa-4c a  pwpppp \ \ {p \O   \	 z YZ f  l-556baa-50f  l-556baa-51 a   pwpppp !\  "\  #p $\# %"$ &% '\	 (z' )Y(Z *f  l-556baa-55+f  l-556baa-56,*+ -a, . -pwpppp /\. 0\. 1{-p 2\1 302 43 5g  t-556baa-4565 7f  l-556baa-5a87 9a68 : 9pwpppp ;\]: <9pwppppp =\< >= ?\< @\i< A\k< BA= C{9p D\OC E@BD F\< G9p H\G IF=H J\u< K\< L\C MKL NJ=M O?EIN P;>O Q{p R\Q Sg  header-decl-validatorTg   %header-decl-validator-procedureUg  m-556baa-61VU_ WV Xf  l-556baa-63YX ZarWY [VpZwpppp \\{[ ]z\ ^]Z _pZwppppp `\_ az` bY^aZ cVV df  l-556baa-66ef  l-556baa-67fde gacf hVgpZwpppp i\h j\h k{gpZ l\Ok mjl nm o\_ pzo qY^pZ rf  l-556baa-6bsf  l-556baa-6ctrs uact vVupZwpppp w\v x\v yupZ z\	y {xz |{ }\_ ~z} Y^~Z f  l-556baa-70f  l-556baa-71 ac VpZwpppp \ \ {pZ \   g  t-556baa-60 f  l-556baa-75 aW VpZwpppp \] pZwppppp \  \ \i \k  {pZ \O  \ pZ \	  \u \ \S     {pZ \T g  header-decl-writerg  %header-decl-writer-procedureg  m-556baa-7c_  f  l-556baa-7e ar pwpppp \{ z Z pwppppp \ z YZ  f  l-556baa-81f  l-556baa-82 a pwpppp \ \ {p \O   \ z YZ f  l-556baa-86f  l-556baa-87 a pwpppp \ \ p \	   \ z YZ f  l-556baa-8bf  l-556baa-8c a pwpppp \ \ {p \   g  t-556baa-7b f  l-556baa-90 a pwpppp \] pwppppp \  \ \i \k  {p \O  \ p \	  \u \ \     {p \ g  header-decl-multiple? g   %header-decl-multiple?-procedureg  m-556baa-97_  f  l-556baa-99 ar pwpppp \{ 	z 
	Z pwppppp \ z Y
Z  f  l-556baa-9cf  l-556baa-9d a pwpppp \ \ {p \O   \ z Y
Z f  l-556baa-a1f  l-556baa-a2  !a  "!pwpppp #\" $\" %!p &\	% '$& (' )\ *z) +Y
*Z ,f  l-556baa-a6-f  l-556baa-a7.,- /a. 0/pwpppp 1\0 2\0 3{/p 4\3 524 65 7g  t-556baa-9687 9f  l-556baa-ab:9 ;a8: <;pwpppp =\]< >;pwppppp ?\> @? A\> B\i> C\k> DC? E{;p F\OE GBDF H\> I;p J\	I KH?J L\u> M\> N\E OMN PL?O QAGKP R=@Q S{p T\ S Ug  eachVZZ WUV XZWYZXZZY[g  %%set-fields\g  dummy]g  check?^g  expr_\]^ `g  m-556baa-b2a`_ ba cf  l-556baa-b7df  l-556baa-b8ef  l-556baa-b9ff  l-556baa-bagf  l-556baa-bbhcdefg ia_bh ja kf  l-556baa-b4lk marjl ng  t-1e8ba8b5a-3c4og  t-1e8ba8b5a-3c6pg  t-1e8ba8b5a-3c5qnop rg  m-1e8ba8b5a-3c7sr_ tsss uf  l-1e8ba8b5a-3cbvf  l-1e8ba8b5a-3ccwf  l-1e8ba8b5a-3cdxuvw yaqtx zf  l-1e8ba8b5a-3c1{f  l-1e8ba8b5a-3c2|f  l-1e8ba8b5a-3c3}z{| ~a} ipmwpyppp~ \[ {ipm \O \x \ \S \ \  g  map  g  listg  make-hash-tableg  *declared-headers*g  	hashq-refg  lookup-header-declg  	multiple?S	 g  errorf  bad header declg  string?g  
hashq-set!g  string-titlecaseg  symbol->stringg  displayg  
%read-lineg  string-suffix?f  g  string-drop-rightg  
bad-headerg  read-header-line  f  no matching patterng  	peek-charg  read-continuation-lineg  string-appendg  call-with-input-stringf   g  readg  *eof*g  string-null?g  string=?g  string-indexg  %readg  	substringg  string-trim-bothg  char-set:whitespacef  header name not a symbolf  : f  
g  eof-object?g  reverse!g  throwg  bad-header-componentg  formatf  Bad ~a header: ~a
g  bad-header-printerf  Bad ~a header component: ~a
g  bad-header-component-printerg  set-exception-printer!g  parse-opaque-stringg  validate-opaque-stringg  write-opaque-stringg  string->char-setf  [^][()<>@,;:\"?= 	]g  separators-without-slashg  string-rindexg  validate-media-typeg  
media-typeg  parse-media-typeg  string-lengthg  char-whitespace?g  
string-refg  skip-whitespaceg  trim-whitespaceg  split-and-trimg  list-of?g  list-of-strings?g  
write-listf  , g  write-list-of-stringsg  split-header-namesg  symbol?g  list-of-header-names?g  write-header-listg  make-stringg  substring-move!g  string-set!g  collect-escaped-stringg  incremental?S	 g  qstringg  parse-qstringg  string-splitf  \"g  write-qstringg  string=f  1f  1.f  1.0f  1.00f  1.000g  qualityf  0f  0.g  char->integerg  parse-qualityg  non-negative-integer?g  valid-quality?g  integer->charg  write-qualityg  string-prefix?f  q=g  parse-quality-listg  validate-quality-listf  ;q=f  ,g  write-quality-listg  non-negative-integerg  parse-non-negative-integerg  number?g  exact?g  integer?g  default-val-parser g  default-val-validatorg  default-val-writerg  ming  key-value-listg  parse-key-value-listg  key-value-list?g  write-key-value-listg  char-setg  param-delimiters	g  char-set-adjoin
g  param-value-delimitersg  parse-param-componentg  
param-listg  parse-param-listg  validate-param-listf  ;g  write-param-listg  string-match?YZZ g  syntax->datumg  char-numeric?g  t-556baa-43c g  m-556baa-43d_  f  l-556baa-440 a  g  m-556baa-439_   !f  l-556baa-43a"! #a " $g  c%$ &f  l-556baa-437'& (a%' )g  lp*g  i+g  tests,)*+ -f  l-556baa-431.f  l-556baa-432/f  l-556baa-4330-./ 1a,0 2g  p32 4f  l-556baa-42454 6a35 7g  str8g  pat978 :f  l-556baa-420;f  l-556baa-421<:; =a9|< >f  l-556baa-419?> @ar? A{pp#p(p1ppp6=p@ B\A C\A D\A Eg  char-alphabetic?Fg  t-556baa-442GF Hg  m-556baa-443IH_ JI Kf  l-556baa-446LK MaGJL N{pMp#p(p1ppp6=p@ O\EN P\N Q\N Rg  eqv?Sg  t-556baa-448Tg  t-556baa-449UST Vg  m-556baa-44aWV_ XWW Yf  l-556baa-44eZf  l-556baa-44f[YZ \aUX[ ]{p\p#p(p1ppp6=p@ ^\R] _\] `\] aZ bg  letcg  t-556baa-426dg  t-556baa-427ecd fg  m-556baa-428gf_ hgg if  l-556baa-42cjf  l-556baa-42dkij laehk m{plppp6=p@ 
n\bm o\m p\dm qg  =r\qm s\m tso ug  monthvg  parse-monthwf  GMTxf  UTCyg  zone-offsetzg  parse-zone-offset{g  date|{ }{ ~g  parse-rfc-822-dateg  current-dateg  	date-yearg  parse-rfc-850-dateg  parse-asctime-dateg  date-zone-offsetg  time-utc->dateg  date->time-utcg  normalize-dateg  catch  g  
parse-dateg  	truncate/g  floor/g  exptg  time-tai->dateg  date->time-taig  date-week-dayf  Sun, f  Mon, f  Tue, f  Wed, f  Thu, f  Fri, f  Sat, f  bad dateg  date-dayg  
date-monthf   Jan f   Feb f   Mar f   Apr f   May f   Jun f   Jul f   Aug f   Sep f   Oct f   Nov f   Dec g  	date-hourg  date-minuteg  date-secondf   GMTg  
write-datef  W/f  "g  parse-entity-tagg  entity-tag?g  write-entity-tagg  parse-entity-tag-listg  entity-tag-listg  entity-tag-list?g  write-entity-tag-listg  authorizationg  basicg  credentialsg  parse-credentialsg  validate-credentialsg  write-credentialsg  	challengeg  parse-challengeg  reverseg  parse-challengesg  validate-challengesg  write-challengeg  write-challengesg  bad-requestg  bad-responseg  *known-versions*g  http-versionf  HTTP/g  write-http-versiong  for-eachf  HTTP/1.0f  HTTP/1.1 f  GETg  GETf  HEADg  HEADf  POSTg  POSTf  PUTg  PUTf  DELETEg  DELETEf  OPTIONSg  OPTIONSf  TRACEg  TRACEf  Invalid method: ~af  Missing Request-URIf  *g  	build-urig  pathSg  querySg  fragmentSg  string->urif  Invalid URI: ~af  Bad Request-Line: ~sg  <uri>, , g  uri-hostg  
uri-schemef  ://g  uri-userinfog  uri-portg  uri-pathf  "Empty path and no host for URI: ~sf  Non-absolute URI path: ~sg  	uri-queryg  	write-urig  default-port?, , f  /f  ?f  Bad Response-Line: ~sg  %date?-procedure  g  declare-date-header!g  declare-string-list-header!g  declare-symbol-list-header!g  declare-header-list-header!g  declare-integer-header!g  absolute-uri? , , g  declare-uri-header!g  string->uri*, , g  %uri?-procedure, , 	g  declare-relative-uri-header!
g  declare-quality-list-header!g  declare-param-list-header!g  declare-key-value-list-header!g  *g  declare-entity-tag-list-header!g  declare-credentials-header!g  declare-challenge-list-header!f  Cache-Controlg  max-ageg  	min-freshg  s-maxageg  	max-staleg  privateg  no-cacheg  no-storeg  no-transformg  only-if-cacheg  must-revalidateg  proxy-revalidateg  cache-controlf  
Connectiong  close f  close!f  Date"f  Pragma#f  Trailer$f  Transfer-Encoding%f  Upgrade&f  Via'f  Warning(g  warning)g  length*f  Allow+f  Content-Disposition,g  content-disposition-f  Content-Encoding.f  Content-Language/f  Content-Length0f  Content-Location1f  Content-MD52f  Content-Range3g  content-range4f  bytes 5g  bytes6f  Content-Type7g  content-type8g  string-trim9g  string-trim-right:f  Thu, 01 Jan 1970 00:00:00 GMT;g  *date-in-the-past*<f  Expires=g  member>f  -1?> @f  Last-ModifiedAf  AcceptBf  Accept-CharsetCf  Accept-EncodingDf  Accept-LanguageEf  AuthorizationFf  ExpectGf  FromHf  HostIg  hostJf  If-MatchKf  If-Modified-SinceLf  If-None-MatchMf  If-RangeNf  If-Unmodified-SinceOf  Max-ForwardsPf  Proxy-AuthorizationQf  RangeRf  bytes=Sg  rangeTf  RefererUf  TEVf  
User-AgentWf  Accept-RangesXf  AgeYf  ETagZf  Location[f  Proxy-Authenticate\f  Retry-After]f  Server^f  Vary_f  WWW-Authenticate`g  	read-lineag  char=?bg  string->numbercg  read-chunk-headerdg  keep-alive?Sedfe gg  get-bytevector-n!hg  get-u8ig  make-custom-binary-input-portjf  chunked input portkg  
close-portlg  q-empty?mg  deq!ng  q-lengthog  number->stringpg  
write-charqg  make-qrg  make-soft-portsg  enq!tg  string-for-eachuf  0
vg  force-outputwf  wxg  make-object-propertyyg  %http-proxy-port?zg  setter{z |z C 5     hHk   ]4	
./I5 4L >  "  G   MN    h      ]4 56          g  name
		  g  filenamef  web/http.scm
	K
		M			M	 		  g  nameg  string->headerg  documentationf  %Parse NAME to a symbolic header name. C0RO        h      ]  C             g  name
		 g  parser		 g  	validator			 g  writer			 g  	multiple?			  g  filenamef  web/http.scm
	O
 			  g  nameg  %make-header-decl-procedure CPR4STUX[    h      ]  C             g  
t-556baa-5
		 g  
t-556baa-6		 g  
t-556baa-7			 g  
t-556baa-8			 g  
t-556baa-9			  			   CT  h   O   ]L 6    G       g  a
		  g  filenamef  web/http.scm		O
 		   CY h   ?   ] L 67       g  filenamef  web/http.scm		O
 		
   C   h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  x       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  web/http.scm
	O
 		n   C5TRO  4 O>  "  G   	Pi  ORO h   t   ] $   CC      l       g  obj
		  g  filenamef  web/http.scm
	O
 		  g  nameg  %header-decl?-procedure C	R4S
UXr   h   3   ]  C      +       g  t-556baa-1e
		
  		
   C
        h   O   ]L 6    G       g  a
		  g  filenamef  web/http.scm		O
 		   CY h   ?   ] L 67       g  filenamef  web/http.scm		O
 		
   Ct  h      ] C          		
   C        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6  x       g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  web/http.scm
	O
 		n   C5
ROwx      h   v   ] &   
C 6n       g  s
		  g  filenamef  web/http.scm
	O
 		  g  nameg  %header-decl-name-procedure CyR4SxUX      h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C    h   3   ]  C      +       g  t-556baa-2a
		
  		
   Cx        h   O   ]L 6    G       g  a
		  g  filenamef  web/http.scm		O
 		   CY h   ?   ] L 67       g  filenamef  web/http.scm		O
 		
   C  h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/http.scm
	O
 	    C5xROw  h   x   ] &   C 6p       g  s
		  g  filenamef  web/http.scm
	O
 		  g  nameg  %header-decl-parser-procedure CR4SUX    h   :   ]C     2       g  err
		 g  s		  			   C!& h   :   ]C     2       g  err
		 g  s		  			   C)/4 h   :   ]C     2       g  err
		 g  s		  			   CP    h   3   ]  C      +       g  t-556baa-45
		
  		
   C        h   O   ]L 6    G       g  a
		  g  filenamef  web/http.scm		O
 		   CY h   ?   ] L 67       g  filenamef  web/http.scm		O
 		
   CR  h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/http.scm
	O
 	    C5ROwS  h    {   ] &   	C 6       s       g  s
		  g  filenamef  web/http.scm
	O
 		  g  nameg   %header-decl-validator-procedure CTR4SSUXbin h   :   ]C     2       g  err
		 g  s		  			   Cqw| h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C    h   3   ]  C      +       g  t-556baa-60
		
  		
   CS        h   O   ]L 6    G       g  a
		  g  filenamef  web/http.scm		O
 		   CY h   ?   ] L 67       g  filenamef  web/http.scm		O
 		
   C  h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/http.scm
	O
 	    C5SROw  h    x   ] &   	C 6       p       g  s
		  g  filenamef  web/http.scm
	O
 		  g  nameg  %header-decl-writer-procedure CR4SUX    h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C    h   3   ]  C      +       g  t-556baa-7b
		
  		
   C        h   O   ]L 6    G       g  a
		  g  filenamef  web/http.scm		O
 		   CY h   ?   ] L 67       g  filenamef  web/http.scm		O
 		
   C  h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/http.scm
	O
 	    C5ROw  h    {   ] &   	C 6       s       g  s
		  g  filenamef  web/http.scm
	O
 		  g  nameg   %header-decl-multiple?-procedure C R4SUX h   :   ]C     2       g  err
		 g  s		  			   C#( h   :   ]C     2       g  err
		 g  s		  			   C+16 h   :   ]C     2       g  err
		 g  s		  			   CR    h   3   ]  C      +       g  t-556baa-96
		
  		
   C        h   O   ]L 6    G       g  a
		  g  filenamef  web/http.scm		O
 		   CY h   ?   ] L 67       g  filenamef  web/http.scm		O
 		
   CT  h      ] C          		
   C        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  web/http.scm
	O
 	    C5R4SUXZ     h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  web/http.scm
	O
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5R4i5 R  h   w   ] 6      o       g  sym
		
  g  filenamef  web/http.scm
	[
	
	\	 		
  g  nameg  lookup-header-decl CRO0 	  h     - /   0   3 #  "   64 5$  M$  C$  9$  /  44 5>  "  G  C""""          g  name
	  g  parser	  g  	validator		  g  writer		  g  	multiple?		  g  decl		\	|  g  filenamef  web/http.scm
	^
	$	h		0	h		0	d		1	d		;	d		A	d		\	e		\	e		_	f		d	f	'	q	f	 	 	
g  	multiple?S	   g  nameg  declare-header!g  documentationf  ;Declare a parser, validator, and writer for a given header. C2ROwx     h8      ]	4 5$  &  
C64 56             g  sym
		2 g  decl			2  g  filenamef  web/http.scm
	j
		l				l			m			n		*	o		2	o	 		2  g  nameg  header->stringg  documentationf  0Return the string form for the header named SYM. C1R    h     ]4 5$  CC             g  sym
		  g  filenamef  web/http.scm
	q
		t			t	 		  g  nameg  known-header?g  documentation k pR   e   t   u   r   n          #   t          i   f   f       S   Y   M       i   s       a       k   n   o   w   n       h   e   a   d   e   r   ,       w   i   t   h       a   s   s   o   c   i   a   t   e   d   
   p   a   r   s   e   r   s       a   n   d       s   e   r   i   a   l   i   z   a   t   i   o   n       p   r   o   c   e   d   u   r   e   s   .    C4ROw      h   O   ] C   G       g  x
		  g  filenamef  web/http.scm
	~	 		   C      h0     ]	4 5$  &  C6C            g  sym
		* g  decl			*  g  filenamef  web/http.scm
	v
		{				{			|			}	 		*  g  nameg  header-parserg  documentationf  Return the value parser for headers named SYM.  The result is a
procedure that takes one argument, a string, and returns the parsed
value.  If the header isn't known to Guile, a default parser is returned
that passes through the string unchanged. C5ROwS    h0     ]	4 5$  &  	C6C           g  sym
		+ g  decl			+  g  filenamef  web/http.scm
 
	 			 		 		 	 		+  g  nameg  header-validatorg  documentationk DR   e   t   u   r   n       a       p   r   e   d   i   c   a   t   e       w   h   i   c   h       r   e   t   u   r   n   s          #   t          i   f       t   h   e       g   i   v   e   n       v   a   l   u   e       i   s       v   a   l   i   d   
   f   o   r       h   e   a   d   e   r   s       n   a   m   e   d       S   Y   M   .           T   h   e       d   e   f   a   u   l   t       v   a   l   i   d   a   t   o   r       f   o   r       u   n   k   n   o   w   n       h   e   a   d   e   r   s   
   i   s          s   t   r   i   n   g   ?      .    C6ROw      h0   ]  ]	4 5$  &  	C6C     U      g  sym
		+ g  decl			+  g  filenamef  web/http.scm
 
	 			 		 		 	 		+  g  nameg  header-writerg  documentation   k R   e   t   u   r   n       a       p   r   o   c   e   d   u   r   e       t   h   a   t       w   r   i   t   e   s       v   a   l   u   e   s       f   o   r       h   e   a   d   e   r   s       n   a   m   e   d       S   Y   M       t   o       a   
   p   o   r   t   .           T   h   e       r   e   s   u   l   t   i   n   g       p   r   o   c   e   d   u   r   e       t   a   k   e   s       t   w   o       a   r   g   u   m   e   n   t   s   :       a       v   a   l   u   e       a   n   d       a       p   o   r   t   .   
   T   h   e       d   e   f   a   u   l   t       w   r   i   t   e   r       i   s          d   i   s   p   l   a   y      .    C7R       hp     ]!4 5$  M45$  ,
$  45$  6C664	
56           g  port
		l g  v			l g  w			_ g  x			_ g  w		I	S g  w		U	_  g  filenamef  web/http.scm
 
	 		1 			5 		9 			= 		D 			I 		O 		S 		U 		[ 		_ 		` 	 		l  g  nameg  read-header-lineg  documentationf  Read an HTTP header line and return it without its final CRLF or LF.
Raise a 'bad-header' exception if the line does not end in CRLF or LF,
or if EOF is reached. CR       hH      ]
4 5 $  "  
4 5	$   44 556C              g  port
		A g  val		A g  t			&  g  filenamef  web/http.scm
 
	 		 	
	 		 		# 	
	* 		/ 		4 	-	< 		> 	 		A	  g  nameg  read-continuation-line CR4ii5R09     h     ]4 545$  "  	45$  D4:5$  "  	454	4

5544 4555D             g  port
	  g  line		  g  t			+ g  t		>	X g  delim		X  g  sym		i   g  filenamef  web/http.scm
 
	 			 		 		 		  		& 		( 		/ 		5 		6 		> 		M 		Q 	&	U 		X 		[ 		^ 	$	i 		i 		n 		s 		x 	  	8  	  	  	  	
 	   g  nameg  read-headerg  documentationf Read one HTTP header from PORT. Return two values: the header
name and the parsed Scheme value. May raise an exception if the header
was known but the value was invalid.

Returns the end-of-file object for both values if the end of the message
body was reached (i.e., a blank line). C8R5     h     ]4 56          g  sym
		 g  val		  g  filenamef  web/http.scm
 
	 		 	 			  g  nameg  parse-headerg  documentationf  dParse VAL, a string, with the parser registered for the header
named SYM.  Returns the parsed value. C9R6  h      ] $  4 56 6          g  sym
		 g  val		  g  filenamef  web/http.scm
 
	 			 		
 		 		 		 	 			  g  nameg  valid-header?g  documentationf  RReturns a true value iff VAL is a valid Scheme value for the
header with name SYM. C:R17  hP   ]  ]44 5>  "  G  4>  "  G  44 5>  "  G  6U      g  sym
		P g  val		P g  port			P  g  filenamef  web/http.scm
 
	 		 		 		 		  		' 		0 		1 		@ 		L 		P 	 		P	  g  nameg  write-headerg  documentation   k TW   r   i   t   e       t   h   e       g   i   v   e   n       h   e   a   d   e   r       n   a   m   e       a   n   d       v   a   l   u   e       t   o       P   O   R   T   ,       u   s   i   n   g       t   h   e       w   r   i   t   e   r   
   f   r   o   m          h   e   a   d   e   r   -   w   r   i   t   e   r      .    C;R8   h8      ]4L>  G 45$   6  "            g  headers
		3 g  k		3 g  v			3  g  filenamef  web/http.scm
 		 	!	 		 		 		% 		* 		3 	 			3  g  nameg  lp C    h      ]	O  Q 6        g  port
		 g  lp		  g  filenamef  web/http.scm
 
	 		 		 	 		  g  nameg  read-headersg  documentationf  RRead the headers of an HTTP message from PORT, returning them
as an ordered alist. C<R;  h@     ]
"  ,$  #4>  "  G  "C "            g  headers
		: g  port		: g  headers			2  g  filenamef  web/http.scm
 
	 			 		 		 	
	 		 	'	 	
	* 		0 	
	2 	 		:	  g  nameg  write-headersg  documentation   k W   r   i   t   e       t   h   e       g   i   v   e   n       h   e   a   d   e   r       a   l   i   s   t       t   o       P   O   R   T   .           D   o   e   s   n   '   t       w   r   i   t   e       t   h   e       f   i   n   a   l   
      \   r   \   n      ,       a   s       t   h   e       u   s   e   r       m   i   g   h   t       w   a   n   t       t   o       a   d   d       a   n   o   t   h   e   r       h   e   a   d   e   r   .    C=R  h      ] 6           g  sym
		 g  val		  g  filenamef  web/http.scm
 
	 			 	 			  g  nameg  
bad-header CR       h      ] 6           g  sym
		 g  val		  g  filenamef  web/http.scm
 
	 			 	 			  g  nameg  bad-header-component CR1  h(      )   3 L4 56-  1  3 L 6         g  sym
			 g  val			 g  _
	#	'  g  filenamef  web/http.scm
 			 		 	/	 		# 			' 	 				 	#	'


   C     h      ] O @        g  port
		 g  key		 g  args			 g  default-printer			  g  filenamef  web/http.scm
 
	 	 			  g  nameg  bad-header-printer CR       h(      )   3 L 6-  1  3 L 6              g  sym
			 g  val			 g  _
		"  g  filenamef  web/http.scm
 			 		 		 			" 	 				 		"


   C      h      ] O @        g  port
		 g  key		 g  args			 g  default-printer			  g  filenamef  web/http.scm
 
	 	 			  g  nameg  bad-header-component-printer CR4ii>  "  G  4ii>  "  G  h   q   ] C   i       g  str
		  g  filenamef  web/http.scm

 		  g  nameg  parse-opaque-string CR    h   }   ] 6u       g  val
		  g  filenamef  web/http.scm

		 		  g  nameg  validate-opaque-string CR        h      ] 6             g  val
		
 g  port		
  g  filenamef  web/http.scm

	
	 		
	  g  nameg  write-opaque-string CR4i5R    h8      ]	4 /5$  4 /5$  4 5CCC             g  str
		2 g  idx		2  g  filenamef  web/http.scm

											#		$		-		 
		2  g  nameg  validate-media-type CRM    h       ]4 5$   6 6            g  str
		  g  filenamef  web/http.scm

										 		  g  nameg  parse-media-type CR    h`     - . , 3 #  
#  	4 5"  *$  44 55$  	"CC"             g  str
		Z g  start		Z g  end			Z g  i		(	R  g  filenamef  web/http.scm

		8	(		-		1		2		5	)	?		C		F		L		R	 		Z	  g  nameg  skip-whitespace CR   h`     - . , 3 #  
#  	4 5"  +$  44 55$  	"CC"           g  str
		[ g  start		[ g  end			[ g  i		(	S  g  filenamef  web/http.scm

		8	(		-		1		2		5	+	<	;	>	+	@		D		G		M		S	 		[	  g  nameg  trim-whitespace CR   h   S  - . , 3 #  ,#  
#  	4 5$  H4 54 $  "  54 $  "  5CC       K      g  str
	  g  delim	  g  start		  g  end		  g  idx		D	 g  tok		_	  g  filenamef  web/http.scm
!
	&"	(	3$		7$		8%		D%		G&		U&	@	_&		_%		d'		p'	.	s'	6	}'		~'	
 (	 	 	  g  nameg  split-and-trim CR       h   w   ] 6      o       g  val
		
  g  filenamef  web/http.scm
*
	
+	 		
  g  nameg  list-of-strings? CR        h      ] 6         g  val
		 g  port		  g  filenamef  web/http.scm
-
	.		.	 			  g  nameg  write-list-of-strings CR0 h      ]4 56 z       g  str
		  g  filenamef  web/http.scm
0
	1		1	 		  g  nameg  split-header-names CR        h   |   ] 6      t       g  val
		
  g  filenamef  web/http.scm
3
	
4	 		
  g  nameg  list-of-header-names? CR1   h   t   ]4 56 l       g  x
		 g  port		  g  filenamef  web/http.scm
8		9		9	 			   C      h      ] 6         g  val
		 g  port		  g  filenamef  web/http.scm
6
	:		7	 			  g  nameg  write-header-list CR h     ]445"  (  #4 >  "  G  C		4 		>  "  G  44 	5>  "  G  	"x
"i        g  from
	  g  start	  g  len		  g  escapes		  g  to			  g  start		  g  i		  g  escapes		  g  e		;  g  
next-start			H   
g  filenamef  web/http.scm
<
	=			=		>		?		A		#A	1	$A	(	-A		;C		;C	
	DD	&	ED		HC	
	KE		VE	(	_E		hF		oF		vF	/	xF		}F	 G	 G	" G	 >	 	 	  g  nameg  collect-escaped-string CR  h     - /   0   3 	#  
#  4 5#  "   6$  4 5"$  "  $  x4 5\$  	""$  24 5$  D$  C 6" 6
"h"?";       g  str
	  g  start	  g  end		  g  incremental?		  g  i		_  g  qi		_  g  escapes		_  g  key		q  g  out	    	g  filenamef  web/http.scm
K
	#L	'	>^		B^		BN		GN		KN		LN		WN		[N		_O		dP		hP		iQ		qQ	 S	 S	 S	# S	 Q	 U	 U	6 U	 U	 V	 W	! W	 X	 X	 X	 Z	/ Z	 \	 \	 \	 ]	" ]	 O	 O	 O	. O	 *	 	g  incremental?S	   g  nameg  parse-qstring CR       hX   '  ] $  H"  <4>  "  G  $  4>  "  G  "C "C           g  l
		S g  port		S g  
write-item			S g  delim			S g  l			I  g  filenamef  web/http.scm
`
	a			a		b		c		c		c		%d		&d		*d		+f		Ag		Gg		Ib	 		S	  g  nameg  
write-list CR  hh      ]4">  "  G  4 "5$  #44 "5>  "  G  "  4 >  "  G  "6             g  str
		b g  port		b  g  filenamef  web/http.scm
i
	j		k		#k		$m		'm		5m	6	:m		Gn		bo	 		b	  g  nameg  write-qstring CR    h   J   ] L 6      B       g  filenamef  web/http.scm			
	 		

   C   h  6  - . , 3 
#  
#  	4 5$ 4 51$  4 5$  "  d4 5$  "  G4 5$  "  *4 5$  "  4 5$  C	
 64 50$ 4 5$  "  4 5$  
C	$  		"  $  "  $  4 5.$  C	
 6	
$  [4 545	0"  4	
 5"  #
$  	
$  "  ""  ""  "b	
"Q	
 6O  Q 4 5.$  $  		"  $  "  |$  C	
$  S4 545	0	
$  	
$  "  4	5 "  4	5 	"  "	
"s6 6 	
 6.      g  str
	 g  start	 g  end		 g  t		J  g  t		d  g  t		~  g  t	   g  t	  g  b	+ g  place	3 g  i	3 g  q	3 g  c	w g  i	 g  failure	 g  b	# g  place	+ g  i	+ g  q	+ g  c	U g  i	a g  failure		e  g  filenamef  web/http.scm
q
	q	6	)x			-w		.z	
	9z		=w		>{		D{		J{		J{		X|		^|		d|		d{		r}		x}		~}		~{	 ~	 ~	 ~	 {	 	 	 	 {	 	 	 	
 	 w	 	 	 	 	 	 					/	3	8	9	=	>	E	,G	J	N	U	,Y	^	a	#f	j	o	7w	(zs	s	"s	s	v	
v	 v	
t	t	t	t	t	
					"		"	w				w				'	+	0	
4	<	?	D	H	M	/U	 Xs	`s	"as	as	et	kt	ot	tt	xt	
			
			y	y	 r		  g  nameg  parse-quality CR       h      ]4 5$   CC  }       g  q
		  g  filenamef  web/http.scm

						! 		  g  nameg  valid-quality? CR     h     ]
4 	
4	05>  "  G  4.>  "  G  4 	d	
4	05>  "  G  4 	
	
4	05>  "  G   	
4	056          g  q
	  g  port	  g  d			 g  d		K	Z g  d		t  g  d	    g  filenamef  web/http.scm

				 													$		-		A		H	 	K		K		N		R		U		W		a		j		q	 	t		t		w		{		~	 	 	 	 	 	 	 	 	 	 %	 	  g  nameg  write-quality CR    h0      ] (  C $  4 5$  	 6CC             g  val
		* g  pred		*  g  filenamef  web/http.scm

																		"		&	 		*	  g  nameg  list-of? CR 	 h`     ]4 ;5$  :4 545$  4	54 
5C64 5C           g  part
		[ g  t		[ g  qpart			M  g  filenamef  web/http.scm
										H					"		&	&	*		.		/		8		D		I	,	M		Q		Z	 		[   C     h      ]4 ,56       z       g  str
		  g  filenamef  web/http.scm

				 		  g  nameg  parse-quality-list CR    h       ] $  4 5$   6CC       g  elt
		   g  filenamef  web/http.scm
							
			#								 
		    C   h   z   ] 6      r       g  l
		
  g  filenamef  web/http.scm

	
	 		
  g  nameg  validate-quality-list CR hH      ]  4>  "  G  $  4>  "  G  6C       g  x
		H g  port		H g  q			H g  str			H  g  filenamef  web/http.scm
										&		*		+		/	!	6		F	 		H	   C      h      ] 6         g  l
		 g  port		  g  filenamef  web/http.scm

				 			  g  nameg  write-quality-list CR       h     - . , 3 #  
#  	4 5$  }"  n$  b	
4 545	0"  4 5"  #
$  	
$  "  ""  ""C
" 6            g  val
	  g  start	  g  end		  g  i		1  g  out		1  g  c		K  g  i		W   g  filenamef  web/http.scm

		*	)		-		1		6		:		=		B		C	-	K		N		V	"	W		W		^	
	b	 	f	
	j		n		r		w		{	
 	 	 	 	 	 	 	  g  nameg  parse-non-negative-integer CR    h0      ]4 5$   
$  4 5$   6CCC           g  code
		,  g  filenamef  web/http.scm

										"	 		&	0 			,  g  nameg  non-negative-integer? CR       h      ]C   w       g  k
		 g  val		  g  filenamef  web/http.scm

 			  g  nameg  default-val-parser CR      h      ]$  6C       g  k
		 g  val		  g  filenamef  web/http.scm

						 			  g  nameg  default-val-validator C R  hX      ]4;5$  "  "4,5$  "  	4"5$  66              g  k
		Q g  val		Q g  port			Q g  t			= g  t		!	:  g  filenamef  web/http.scm

		
				
	!		/	
	A		I		Q	 
		Q	  g  nameg  default-val-writer CRM       h    ]R L$ 4L  L54L =L54L ,L54$  "  L$  "  L544L 4L 555"  		"  $  $  	"  $  4L L5"  44L 4L $  "  L55$  "  L	"  KL$  -4L 5"$  4L L	>  !"  ""  ""  "U"  "MG 4L54L L5
	
L$  "  4L 
5,$  
	$  		"   "s
4L LL566        g  i
	 g  out	 g  i		 g  eq		% g  comma		4 g  delim		W g  k		r g  i	  g  v-str	, g  next-i	, g  v		G g  i	
G g  t	Pl  g  filenamef  web/http.scm
												%		(		4		7		?		M	'	W		W		Z		]		d	$	p		r		r	 	 	 	 	, 	  	 	 	2 	 	 	" 	- 	> 	- 	" 	" 	  	  	  	  	/  	)  	 	/	
4	=		G	P
	P
	^
	(i
	"p
	s	y	%~	+			*	*		 ?		  g  nameg  lp C   hP      - . , 3 #  #  
#  	4 5O  Q 6         g  str
		N g  
val-parser		N g  start			N g  end			N g  lp		:	N  g  filenamef  web/http.scm

	&	.	:		L		N	 		N	  g  nameg  parse-key-value-list CR h8      ] $    $  L 6C $  L  6C           g  elt
		4 g  k		$ g  v			$  g  filenamef  web/http.scm
																	"		'		+		2	 		4   C   h(      - . , 3 #   O 6            g  list
		# g  valid?		#  g  filenamef  web/http.scm

	#	 		#  g  nameg  key-value-list? CR        h`      ] $   "    $   "  4>  "  G  $  4=>  "  G  L 6C        g  x
		_ g  port		_ g  k		!	_ g  v		!	_  g  filenamef  web/http.scm
!		"			"		"		#		#		#		!"		&$		?%		@'		](	 		_	   C  h8      - . , 3 #  #   O 6              g  list
		1 g  port		1 g  
val-writer			1 g  delim			1  g  filenamef  web/http.scm

		F	1	 		1		  g  nameg  write-key-value-list CR4i,;=5R4	ii,;5
RM
      h  k  ]J L$ 4L 544L 4L $  "  L555$  4L5"  =$ 4LL5"  54LL5$  "  L4L5	"  ;L$  -4L5"$  4	LL
>  "  ""  "G 4L5$  	"  4LL5		L$  4L	5"  

$  45LD
;$  4L	L5 "45	D;$  24L54LL5$  	"   "V4L54$  	"  5$  "  LD45LD      c      g  i
	 g  out	 g  delim		 g  k		Q g  delimc		Q g  i		j  g  t		}  g  delim	   g  v-str	 q g  next-i	 q g  v	 q g  x	q g  i		q g  key	
)q g  v	 g  v	  g  filenamef  web/http.scm
3		4		4		6		6		7		8		#8	%	/8	<	98	%	;8		=7		C9		D9	#	Q7	
	^:		_>		f>	3	j>		j>		qB	&	}B	" A	 E	% E	 ?	 ?	  ?	 ?	0 ?	* ?	 @	 <	 H	 H	 I	 I	#H	J	H	K	 K	K	*)K	4M	 ;M	*=M	 AM	JK	KO	RO	1VO	[P	cO	dR	 kR	*mR	 qR	z:	{T	T	U	U	*U	V	V	!V	U	Y	Y	Z	Z	)Z	/Z	#Z	[	Z	5	5	 P		  g  nameg  lp C  hP      - . , 3 #  #  
#  	4 5O  Q 6            g  str
		K g  
val-parser		K g  start			K g  end			K g  lp		9	K  g  filenamef  web/http.scm
0
	&2	/	93		I3		K3	 		K	  g  nameg  parse-param-component CR   h`   !  ]4LL L>  G L$  14L5,$  4LL5 "L66         g  i
		] g  out		] g  item			] g  i			]  g  filenamef  web/http.scm
`		b		a		d		#d		$e		/e		3e		4f		;f	)	?f		Dg		Lf		Ph	&	Th		[i		]i	 		]	  g  nameg  lp C    hP      - . , 3 #  #  
#  	4 5O  Q 6            g  str
		K g  
val-parser		K g  start			K g  end			K g  lp		9	K  g  filenamef  web/http.scm
]
	&_	*	9`		I`		K`	 		K	  g  nameg  parse-param-list CR        h   [   ] L 6      S       g  elt
		
  g  filenamef  web/http.scm
n		
o	 		
   C  h(      - . , 3 #   O 6            g  list
		# g  valid?		#  g  filenamef  web/http.scm
k
	#m	 		#  g  nameg  validate-param-list CR    h   w   ] L 6  o       g  item
		 g  port		  g  filenamef  web/http.scm
u		v	0	v	 			   C   h(      - . , 3 #   O 6        g  list
		' g  port		' g  
val-writer			'  g  filenamef  web/http.scm
q
	%w		's	 		'	  g  nameg  write-param-list CR4SUX    h   m   ]456   e       g  str
		 g  pat		  g  filenamef  web/http.scm	|		|	 			   CBCDOPQXV^_`     h   N   ]   C     F       g  t-556baa-448
		 g  t-556baa-449		  			   Canoprt        h(   N   ]L      C       F       g  t-556baa-426
		! g  t-556baa-427		!  		!	   C       h     ]24545"  45$  45.$  "  td$    "  Va$  	  "  8 4
5$  4?"  
45"Y"  

"F 4
5$   O @6            g  str
	  g  pat	  g  p			  g  i		  g  tests		  g  c		-  g  tmp	   g  tmp	   g  tmp	   g  tmp	    
g  filenamef  web/http.scm	}			}			%					 		$		%	 	-		2		;		[	 	h		y	  	' 	  	 	 	' 	 ~	
 	 	   C   h@   `   ]	4 5"  	 6$  4?$  @""       X       g  x
		9 g  tmp		9  g  filenamef  web/http.scm
z	 		9   C5Ru  h    ]	$ 4 
54 54 	5J$  ha$  n$  C4 56u$  )n$  	Cl$  	C4 564 56F$  7e$  b$  	C4 564 56M$  Ca$  )r$  	Cy$  	C4 564 56A$  ]p$  r$  	C4 56u$  g$  	C4 564 56S$  7e$  p$  		C4 564 56O$  7c$  t$  	
C4 564 56N$  7o$  v$  	C4 564 56D$  7e$  c$  	C4 564 564 564 56            g  str
	 g  start	 g  end		 g  a		/ g  b		/ g  c		/  g  filenamef  web/http.scm

			
												!		#		$		-		/		/		>		G		P		V		W	!	c		l		u	 	 	! 	 	 	! 	 	 	 	 	 	! 	 	 	! 	 	 				!!	%	&	!2	;	D	M	T	U	!a	j	s	z	{	!			!						!			!						!			!	!	*	3	:	;	!G	K	L	!X	a	j	s	z	{	!			!			!			!	 g		  g  nameg  parse-month CvRwxy    h     ]"4 545$  
C45$  
C"  645	$  44		55$  44		55$  44		55$  r44	55$  ]4	
5+$  "  -$  	"  	454
	54
		5	<	<C"B">":"6"2         g  str
	  g  start	  g  s		  g  key	   g  sign	   g  hours	   g  minutes	    g  filenamef  web/http.scm

															#		%		)		3		7		7		8		E		F	 	 	 	 	 	 	 	 	 	 	 	 	 	 	  g  nameg  parse-zone-offset CzREv}{  h
    ]34 
545	$ *44	55$ 44	55$ 4	5:$ 44	55$ 44	55$ 4	5:$ 44	55$ 44	55$ v4	5 $ a44	55$ J44	55$ 344	55$ 44	55$ 4	5 $  44	
55$  44		55$  44	55$  4	5 $  44	55$  44	55$  h4	5 $  S4	5,$  >44	55$  '4455$  44
55"  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  $  c4 		54 		54 		54 		54 		54 		5
 	C4 
545	$ 44	55$ 44	55$ 4	5:$ 44	55$ 44	55$ 4	5:$ 44	55$ v44	55$ _4	5 $ J44	55$ 344	55$ 44	55$ 44	55$  4	
5 $  44		55$  44	55$  44	55$  4	5 $  44	55$  h4	5 $  S4	5,$  >44	55$  '4455$  44
55"  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  $  c4 		54 		
54 		54 		54 		54 		5
 	C4 
545	$ (44	55$ 44	55$ 4	5:$ 44	55$ 44	55$ 4	5:$ 44	55$ 4	5 $ v4	5 $ a44	55$ J44	55$ 344	55$ 44	55$ 4	5 $  44	
55$  44		55$  44	55$  4	5 $  44	55$  44	55$  h4	5 $  S4	5,$  >44	55$  '4455$  44
55"  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  $  c4 		54 		54 		54 		54 		54 		5
 	C4 
545	$ 44	55$ 44	55$ 4	5:$ 44	55$ 44	55$ 4	5:$ 44	55$ t4	5 $ _4	5 $ J44	55$ 344	55$ 44	55$ 44	55$  4	
5 $  44		55$  44	55$  44	55$  4	5 $  44	55$  h4	5 $  S4	5,$  >44	55$  '4455$  44
55"  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  "  $  c4 		54 		
54 		54 		54 		54 		5
 	C4	
 >  "  G  C            g  str
	
 g  space	
 g  zone-offset		
 g  s		J g  date	 g  month	 g  year	 g  hour	 g  minute	 g  second	 g  s	 g  date	(I g  month	(I g  year	(I g  hour	(I g  minute	(I g  second	(I g  s	S g  date	 g  month	 g  year	 g  hour	 g  minute	 g  second	 g  s	 
% g  date	
k
 g  month	
k
 g  year	
k
 g  hour	
k
 g  minute	
k
 g  second	
k
  g  filenamef  web/http.scm

					N	O	Z	e	p	{															(		H	J	S													 		
)	
*	
5	
@	
K 	
V	
a	
k		
	
		
	
		 1	
	  g  nameg  parse-rfc-822-date C~R{Ev}w      h    ]L4 5"  4 >  " G  " 45	$ 44	55$ 44	55$ 4	5:$ 44	55$ ~44	55$ d4	5:$ L44	55$ 244	55$ 4	
5 $  44		55$  44	55$  4	5-$  44	55$  44	55$  44	55$  f4	5-$  N44	55$  44455$  4
5 $  "  ""  ""  "z"  "r"  "j"  "b"  "Z"  "R"  "J"  "B"  ":"  "2"  "*"  """  ""  ""  "
"  ""  ""  "4	54			54		
54		54		54		5
	4
5 &  		"  	45
	d	2$  		d"  	2$  		d"  

	 	C        g  str
	 g  comma	 g  space		 g  zone-offset		 g  tail		 g  date	c g  month	c g  year	c g  hour	c g  minute		c g  second	
c g  s	t g  now	 g  then	 g  year	  g  filenamef  web/http.scm

			
										 		,		-		:		;	#	-	8	C	N	Y	c	p	(t				*	-	*						.				.	 &		  g  nameg  parse-rfc-850-date CR{Ev} 
       h    ]1"  4 >  " eG  " ^4 5	$ L44 	55$ 244 	55$ 44 	55$ 44 	55$ 4 	5 $ 44 	55$ 44 	55$ 4 	5:$ 44 	55$ f44 	55$ L4 	5:$ 444 	55$ 44 	55$  4 	
5 $  44 		55$  4 	5 $  44 	55$  44 	55$  44 	55$  h4 	5 $  P44 	55$  644 55$  44 
55$  "  "B"  ":"  "2"  "*"  """  ""  ""  "
"  ""  ""  ""  ""  ""  ""  ""  ""  ""  ""  ""  ""  ""  ""  ""  "4 4 	5 $  		"  		
54 		54 		54 		54 		54 		5	

 	C          g  str
	 g  date g  month	 g  year	 g  hour	 g  minute	 g  second	  g  filenamef  web/http.scm
$
	&		&		&		%		%		,%		-%	}'	)	)	)	'	+	,	-	.	/	'	0	 	  g  nameg  parse-asctime-date CR}w    h8      ] &  	 	"  	4 5
$   C4 5
6             g  date
		2  g  filenamef  web/http.scm
3
	4		4		#4		)6		26	 		2  g  nameg  normalize-date CRz    h   R   ] LL 6     J       g  filenamef  web/http.scm
:	!		;	9	;	" 		
   C    h   U   -  1  3 C     M       g  args
			  g  filenamef  web/http.scm
:	! 			


   C~{   h   M  ]4  5$  4 O 5"  $  J4 ,5$  )	$  4 5"  4 5"  	4	
 5"  4 56  E      g  str
	  g  space	  g  zone-offset		)  g  comma		<	y  g  filenamef  web/http.scm
8
	9		9		:		:	!	)9		3=		4>		<>			D?		I@		M?		N@		]A		n?		r?	*	v?		~B		 <	 	   g  nameg  
parse-date CR   hX   E  ]"  ?
$  544	04 5	
5>  "  G  4	
5"C4	
5"   =      g  n
		U g  digits		U g  port			U g  tens			E  g  filenamef  web/http.scm
E		G		
H	
	H		J		J		F		J	4	"J	,	#J	$	%J		,J		5L		CL		EG		FG		MG		OG		UG	 		U	  g  nameg  display-digits C}w %      h    ] &  	 	"  	4 5
$   "  44 5
5445
$  	"  b$  
"  T	$  "  E	$  "  6	$  "  '	$  "  	$  "  	45>  "  G  4&  		"  	45	>  "  G  4&  		"  	45$  "  	$  "  	$  "  	$  "  	$  "  r	$  "  c	$  "  T	$  "  E		$  "  6	
$  "  '	$  "  	$  "  	45>  "  G  4&  		"  	4 5	>  "  G  4 >  "  G  4&  		"  	4!5	>  "  G  4:>  "  G  4&  		"  	4"5	>  "  G  4:>  "  G  4&  "  	4#5	>  "  G  $6        g  date
	 g  port	 g  display-digits		 g  date		: g  key		F  g  key	  g  filenamef  web/http.scm
D
		M		"M		'M		.O		1O	"	:O		:M		=P		@P		FP		RQ		^P		`Q	"	mP		oQ	0	|P		~R	 P	 R	" P	 R	0 P	 S	 S	# S	* S	# P	 U	 U	 U	 V	 V	V	#W	0V	2W	$?V	AW	3NV	PX	]V	_X	$lV	nX	3{V	}Y	V	Y	$V	Y	3V	Z	V	Z	$V	Z	3[	[	[	V	]	]	]	^	+_	0_	Q_	Z`	na	sa	a	b	c	c	c	d	d	 O		  g  nameg  
write-date CR        h8      ]4 5$  4 	5C4 5$  
4 5C C        g  val
		7  g  filenamef  web/http.scm
j
	l		l		l		k		l	$	l		m		 m		$m		(k		)m	$	1m		6n		 		7  g  nameg  parse-entity-tag CR  h      ] $   6C             g  val
		  g  filenamef  web/http.scm
p
	q			q		r		r	 		  g  nameg  entity-tag? CR  h0      ] $  "  4>  "  G   6             g  val
		* g  port		*  g  filenamef  web/http.scm
t
	u			u		v		v		v		&w		*w	 			*	  g  nameg  write-entity-tag CR   h     - . , 3 #  
#  	4 54 
	54 $  "  	>  G 4 5$  64 5,$  4 4 55"  	4	
 5"  C        g  val
	  g  start	  g  end		  g  strong?		5  g  tag		X  g  next		X  g  next		o   g  filenamef  web/http.scm
y
	z	/	%{		){	&	4{		5{		5{		8}		B}	+	M}	=	W}		[|		d		e		o		v		z		{	  	 	 	 	 	0 	 	 	 	0 	 	 	 	 	  g  nameg  parse-entity-tag-list CR       h   w   ] 6      o       g  val
		
  g  filenamef  web/http.scm

	
	 		
  g  nameg  entity-tag-list? CR        h      ] 6         g  val
		 g  port		  g  filenamef  web/http.scm

		)		 			  g  nameg  write-entity-tag-list CRMN    h   3  - . , 3 #  #  
#  	4 54 54 5$  "  $  4 >  "  G  "   44	4
 $  "  555$  -4 5$  4
 5C 64 5C+      g  str
	  g  
val-parser	  g  start		  g  end		  g  start		9  g  t		H	[ g  delim		[  g  scheme	   g  start	    	g  filenamef  web/http.scm

	&	+	/		9		<		H		[		b		f		g		k		r			 	 	$ 	9 	$ 	 	 	 	 	 		 	 	 	 	 	% 	 	 		  	 	  g  nameg  parse-credentials CR    h8      ]	 $  & $   $   6 6CC              g  val
		1 g  key		-  g  filenamef  web/http.scm

																$		&		+	 	-	 		1  g  nameg  validate-credentials CR  hP      ]
4 >  "  G  4 >  "  G   $  	 6 6            g  val
		K g  port		K g  key		.	K  g  filenamef  web/http.scm

									.		.		>		B		G	 	K	
 		K	  g  nameg  write-credentials CRMNM  h    ]R L$ 4L  L54L =L54L ,L54$  "  L$  "  L54L 54L  5$  45D44L 55"  		"  $  $  	"  $  4L L5"  44L 4L $  "  L55$  "  L	"  KL$  -4L 5"$  4	L L
>  !"  ""  ""  "U"  "MG 	4L 	L5

L$  "  4L 
5,$  
$  	"   "^4L LL5645LD      g  i
	 g  out	 g  i		 g  eq		% g  comma		4 g  delim		W g  	token-end		d g  k	  g  i	 ; g  v	L g  next-i		L g  i	
^ g  t	e  g  filenamef  web/http.scm
									
			%	
	(		4	
	7		?		M	)	W		W	
	Z		d	
	g		w		x	 	 	 	) 	 	 	 	 	$ 	4 	( 	 	% 	: 	% 	 	* 	+ 	< 	+ 	* 	*	"		'
		7	1	"	"O	T	^	e	 e	s	0~	*		 	-	3	'						
 C		  g  nameg  lp C 
     h     - . , 3 #  
#  	4 54 54  5$  444 555"  	4 5	O  Q  6     }      g  str
	  g  start	  g  end		  g  start		/  g  sp		>  g  scheme		h  g  lp		u   g  filenamef  web/http.scm

		)	%		/		2		>		F		G		J	%	M	6	Y	%	[		`		d	+	h		h		u	 	 	 	 	  g  nameg  parse-challenge CR   hH      ]4L  L5L$  %4L L>  G  "6            g  i
		C g  ret		C g  i			C g  	challenge		'	= g  i		'	=  g  filenamef  web/http.scm
							
				'	*	
	5		=		C	
 		C	  g  nameg  lp C       hH      - . , 3 #  #  
#  	4 5O  Q 6       g  str
		H g  
val-parser		H g  start			H g  end			H g  lp		8	H  g  filenamef  web/http.scm

	&	*	8		F		H	 		H	  g  nameg  parse-challenges CR  h       ] $   $   6CC           g  x
		  g  filenamef  web/http.scm
								*		!				(		 			   C      h   z   ] 6      r       g  val
		
  g  filenamef  web/http.scm

	
	 		
  g  nameg  validate-challenges CR        h8      ]4 >  "  G  4 >  "  G   6           g  val
		4 g  port		4  g  filenamef  web/http.scm

									0		4	 		4	  g  nameg  write-challenge CR  h      ] 6         g  val
		 g  port		  g  filenamef  web/http.scm

		'		 			  g  nameg  write-challenges CR        h      - 1 3  6            g  message
			 g  args			  g  filenamef  web/http.scm

					 			
  g  nameg  bad-request CR        h      - 1 3  6            g  message
			 g  args			  g  filenamef  web/http.scm

					 			
  g  nameg  bad-response CRR       h   E  - . , 3 #  
#  	4 5"  0$  $4 5$  "  ""  "$  C4 .5"  4 564	 
	5$  >$  44
 .5$  4 	54 5C"""   =      g  str
	  g  start	  g  end		  g  known		(	X g  t		`  g  dot-idx		x   g  filenamef  web/http.scm
	
			;	(		+		/		0		7		>		B		E		M		S		X		`		l		x	 	" 	0 	 	 	 	! 	 	 	 	 	 	 	 	2 	 	 	2 	 	 $	 	  g  nameg  parse-http-versiong  documentationk P   a   r   s   e       a   n       H   T   T   P       v   e   r   s   i   o   n       f   r   o   m       S   T   R   ,       r   e   t   u   r   n   i   n   g       i   t       a   s       a       m   a   j   o   r      m   i   n   o   r   
   p   a   i   r   .       F   o   r       e   x   a   m   p   l   e   ,          H   T   T   P   /   1   .   1          p   a   r   s   e   s       a   s       t   h   e       p   a   i   r       o   f       i   n   t   e   g   e   r   s   ,   
      (   1       .       1   )      .    C?R      hH     ]4>  "  G  4 >  "  G  4.>  "  G   6      g  val
		H g  port		H  g  filenamef  web/http.scm

											#		,		D		H	 		H	  g  nameg  write-http-versiong  documentationf  1Write the given major-minor version pair to PORT. CR4i?        h    |   ] 4 
4 55 C     t       g  v
		  g  filenamef  web/http.scm
"	$		$	*	$		$			#	 		   C>  "  G         h   Y  - . , 3 #  
#  	4 54 5$  C4 5$  C4 5$  C4 	5$  
C4 5$  C4 5$  C4 5$  C4 56       Q      g  str
	  g  start	  g  end		   g  filenamef  web/http.scm
/
	/	:	%3		+3		13		52		73	"	94		?4		E4		I2		K4	#	M5		S5		Y5		]2		_5	#	a6		g6		m6		q2		s6	"	u7		{7	 7	 2	 7	% 8	 8	 8	 2	 8	& 9	 9	 9	 2	 9	$ :	 :	+ :		 )	 	  g  nameg  parse-http-methodg  documentationk <P   a   r   s   e       a   n       H   T   T   P       m   e   t   h   o   d       f   r   o   m       S   T   R   .           T   h   e       r   e   s   u   l   t       i   s       a   n       u   p   p   e   r   -   c   a   s   e   
   s   y   m   b   o   l   ,       l   i   k   e          G   E   T      .    C>R    h8    - . , 3 #  
#  	4 5$  64 5$  C4 5/$  4 ?54 #5$  $  	"  $  "  "  	
4 $  "  $  "  5$  4 $  "  5"  $  4 5"  644 55$  C4 56             g  str
	1 g  start	1 g  end		1 g  q		c g  f		r g  q	  g  t	1  g  filenamef  web/http.scm
<
	<	:	)@		-?		1A		3A		4B		:B		@B		D?		GD	
	RD		V?		WE		cE		fF		rE		zG	 G	 G	! G	 G	 E	 H	 I	 I	- I	 J	 J	  J	/ J	6 J	  K	 K	# K	2 K	#H	M		M	M	M	$N	%N	'1N	 -	1	  g  nameg  parse-request-urig  documentationf  Parse a URI from an HTTP request line.  Note that URIs in requests do
not have to have a scheme or host name.  The result is a URI object. C@R>@?    h     ]4 54545"  6$  I$  ?$  24
544	554
455D"""      g  port
	  g  line		  g  d0		  g  d1		   g  filenamef  web/http.scm
P
	S			S		T		S		U		S		)Z		-Z		-V		9V		>V		BV		CW		MX		RX	(	YX	>	]X	(	aX		bY		iY	)	jY	1	rY		tW	 	   g  nameg  read-request-lineg  documentationf  oRead the first line of an HTTP request from PORT, returning
three values: the method, the URI, and the version. CARw  hx    ] &  	 	"  	4 5$ 14 &   
"  	4 5>  "  G  4>  "  G   &   "  	4 5$  D4 &   "  	4 5>  "  G  4@>  "  G  "   4 &  	 	"  	4 5>  "  G   &  	 	"  	4 5$  8	P&  "  (4:>  "  G  4>  "  G  "   "    &  	 	"  	4 	54
5"  4>  "  G  "  "  G
$  ; &  	 	"  	4 5$  "4 >  "  FG  "  ?"
$  /4
5/$  ""  4>  "  G  "  "~ &  	 	"  	4 5$  54?>  "  G   &  	 	"  	4 56C        g  uri
	v g  port	v g  p	N g  path	m  g  len	v  g  filenamef  web/http.scm
\
	]		!]		"_		'_		E_		N`		R`		Y`		da		a	 c	 c	 c	 d	 e	 e	 e	 f	f	g	
g	 i	4j	Uk	mk	pl	vk	}s	m	p	m	p	p	q	q	q	m	n	m	n	 n	n	o	o	
o	#t	?t	@v	Xw	tw	 4	v	  g  nameg  	write-uri CRGw        hH    ]4 >  "  G  4 >  "  G  45$ 9&  
"  	45&  		"  	45&  		"  	45$  $  4>  "  G  4>  "  G  4	:5$  @4[>  "  G  4>  "  G  4]>  "  G  "  4>  "  G  4
5$  "  (4:>  "  G  4>  "  G  "   "   "   &  		"  	45&  		"  	4545$  4>  "  G  "  4>  "  G  $  ,4>  "  G  4>  "  G  "   4 >  "  G  4>  "  G  6       g  method
	G g  uri	G g  version		G g  port		G g  scheme	 j g  host	 j g  	host-port	 j g  path	 g  query	  	g  filenamef  web/http.scm
y
	{		|		+}		5}		8~		R		m	 ~	 	 	 	 	 	 	 	 	 	 	 		!	#	)	-	2	
F	
q											
		
	
	,	C	G	 .	G	  g  nameg  write-request-lineg  documentationf  0Write the first line of an HTTP request to PORT. CBR? 
   h     ]4 545$  4455"  "  6$  5$  +4
544554	5D""      g  port
	  g  line		  g  d0		  g  d1		3   g  filenamef  web/http.scm

														$	#	.		3		=		A		A		M		N		X		]	1	k		l		x	 	   g  nameg  read-response-lineg  documentationf  Read the first line of an HTTP response from PORT, returning three
values: the HTTP version, the response code, and the (possibly empty)
"reason phrase". CCR       hp   :  ]4 >  "  G  4 >  "  G  4>  "  G  4 >  "  G  4>  "  G  6  2      g  version
		n g  code		n g  reason-phrase			n g  port			n  g  filenamef  web/http.scm

					+		?		S		j		n	 			n	  g  nameg  write-response-lineg  documentationf  1Write the first line of an HTTP response to PORT. CDR2    h     ] 6  	      g  name
		  g  filenamef  web/http.scm

		 		  g  nameg  declare-opaque-header!g  documentationf  }Declares a given header as "opaque", meaning that its value is not
treated specially, and is just returned as a plain string. C3R2     h   |   ] 6  t       g  name
		  g  filenamef  web/http.scm

		 		  g  nameg  declare-date-header! CR2 h      ] 6  {       g  name
		  g  filenamef  web/http.scm

		 		  g  nameg  declare-string-list-header! CR2M  h   d   ]4 56 \       g  str
		  g  filenamef  web/http.scm
					 		   C  h   Y   ] 6      Q       g  v
		
  g  filenamef  web/http.scm
		
	 		
   C  h   t   ] 6  l       g  v
		 g  port		  g  filenamef  web/http.scm
			!		 			   C h      ] 6  {       g  name
		  g  filenamef  web/http.scm

		 		  g  nameg  declare-symbol-list-header! CR2  h      ] 6  {       g  name
		  g  filenamef  web/http.scm

		 		  g  nameg  declare-header-list-header! CR2  h      ] 6  w       g  name
		  g  filenamef  web/http.scm

		 		  g  nameg  declare-integer-header! CR2+      h       ]	4 5$  C 6    |       g  str
		 g  t			  g  filenamef  web/http.scm
								>		( 		   C   h   {   ] 6  s       g  name
		  g  filenamef  web/http.scm

		 		  g  nameg  declare-uri-header! CR2+  h       ]	4 5$  C 6           g  str
		 g  t			  g  filenamef  web/http.scm
			
					
					 		
 		   C h      ] 6  |       g  name
		  g  filenamef  web/http.scm

		 		  g  nameg  declare-relative-uri-header! C	R2 h      ] 6  |       g  name
		  g  filenamef  web/http.scm

		 		  g  nameg  declare-quality-list-header! C
R 2     h   [   ] L 6      S       g  str
		
  g  filenamef  web/http.scm
		
	 		
   C      h   [   ] L 6      S       g  val
		
  g  filenamef  web/http.scm
		
	 		
   C      h   m   ] L 6    e       g  val
		 g  port		  g  filenamef  web/http.scm
			 			   C        hH      - . , 3 #  #  #   O O O 6          g  name
		E g  
val-parser		E g  val-validator			E g  
val-writer			E  g  filenamef  web/http.scm

	E	 		E	  g  nameg  declare-param-list-header! CR 2   h   [   ] L 6      S       g  str
		
  g  filenamef  web/http.scm
		
	 		
   C      h   [   ] L 6      S       g  val
		
  g  filenamef  web/http.scm
		
	 		
   C      h   m   ] L 6    e       g  val
		 g  port		  g  filenamef  web/http.scm
			 			   C        hH      - . , 3 #  #  #   O O O 6          g  name
		E g  
val-parser		E g  val-validator			E g  
val-writer			E  g  filenamef  web/http.scm

	E	 		E	  g  nameg  declare-key-value-list-header! CR2       h      ]4 5$  C 6       g  str
		  g  filenamef  web/http.scm

		
			
	$	
		
		
	)	
	, 		   C      h   v   ] &  C 6      n       g  val
		  g  filenamef  web/http.scm
				
					# 		   C  h       ] &  6 6             g  val
		 g  port		  g  filenamef  web/http.scm
				
					
		
 			   C    h      ] 6         g  name
		  g  filenamef  web/http.scm

			 		  g  nameg  declare-entity-tag-list-header! CR2      h      ] 6  {       g  name
		  g  filenamef  web/http.scm

		 		  g  nameg  declare-credentials-header! CR2  h      ] 6  ~       g  name
		  g  filenamef  web/http.scm

		 		  g  nameg  declare-challenge-list-header! CR4i 	hp      ] $  "   $  "   $  6 $  $  6C $  "   $  $  6CC           g  k
		l g  v-str		l  g  filenamef  web/http.scm
;		<		->		6<		<@		B@		M<		aB		gB	 
		l	   C       h      ] $  "   $  "   $  6 $  $  6C $  "   $  $  6C 	$  "  / 
$  "  ! $  "   $  "   $  C$  6C           g  k
	  g  v	   g  filenamef  web/http.scm
D		E		-G		6E		<I		BI		CI		ME		aK		gK		hK		rE	 M	 O	 O	 O	 	 	   C  hp      ]45$  
 6$  04">  "  G  4>  "  G  "645$  66              g  k
		i g  v		i g  port			i  g  filenamef  web/http.scm
P		R		Q		R		S		Q		T		3U		NV		OW		YQ		aX		eZ		iZ	 		i	   C>  "  G  42iii 1        h       ] &  "  4 56          g  x
		 g  port		  g  filenamef  web/http.scm
f		g	&	g		h		i		g	 			   C   h   v   ] 6  n       g  val
		 g  port		  g  filenamef  web/http.scm
d		k		e	 			   C>  "  G  4i!>  "  G  4i">  "  G  4i#>  "  G  4i$>  "  G  4i%>  "  G  42i&iii>  "  G  42i'( h     ]Y4L  54L 5$  $  4L 54L54L>  G L $  4L5"   $  -4L>  G 	45		"  "  	"  G 	 	L $  4L	5"  
$  
 C,$  
4L4L	55C	
L6CC          g  i
	 g  idx1	 g  idx2		 g  code		@ g  agent		@ g  text		U g  i		U g  c		s  g  date	   g  i		   g  text	  g  date	  g  i		  g  w	
  g  c	   g  filenamef  web/http.scm
									/					#	
	)		*		5		<	*	@		@		E		L	2	T		X		a	(	e	#	f	2	s		~			. 	A 	. 	 	0 	# 	 	 	! 	& 	! 	0 	 	 	" 	 	+	/
	D	/	+	#	.	" 0	  g  nameg  lp C     h0      ]4 5O  Q 4 
56             g  str
		* g  len			* g  lp			*  g  filenamef  web/http.scm
									!		*	 		*   C)}    hP      ]4 5$  > $  245$  %45$  $  $  CCCCCCC          g  code
		M g  host		M g  text			M g  date			M  g  filenamef  web/http.scm
			#				@				#	"		#	#	-		3	#	6	2	D	' 		M	   C h(      ] $  4 5	$   @CC              g  elt
		!  g  filenamef  web/http.scm
							
							 		!   C     h   [   ] 6      S       g  val
		
  g  filenamef  web/http.scm
		
	 		
   C   h      ]4 L >  "  G  4 L >  "  G  4L >  "  G  4 L >  "  G  4L >  "  G  $  4 L >  "  G  L 6C             g  code
	  g  host	  g  text		  g  date		   g  filenamef  web/http.scm
			
		
	+	
	?	
	S	
	l	
	m	 	 
	 	   C      h   k   ]O  @   c       g  w
		 g  port		  g  filenamef  web/http.scm
			 			   C       h   v   ] 6  n       g  val
		 g  port		  g  filenamef  web/http.scm
					 			   C>  "  G  4i*>  "  G  42i+,   hP      ]	4 5"  4 >  "  %G  "  $  (  "  ""  "C            g  str
		K g  disposition		K  g  filenamef  web/http.scm
												)		,		0		3		7		J	 		K   C        h       ] $   $   6CC           g  x
		  g  filenamef  web/http.scm
								-		$				?		6 			   C      h       ] $   $  	 6CC         g  val
		  g  filenamef  web/http.scm
																			 			   C        h   v   ]  6   n       g  val
		 g  port		  g  filenamef  web/http.scm
						 			   C>  "  G  4i->  "  G  4i.>  "  G  4i/>  "  G  4	i0>  "  G  43i1>  "  G  42i2345      h     ]4 -54 /5"   64 5$  r$  h$  4 	54 5"   4 		5$  
"  	4 54 	5$  
"  
4 5 C"y"u       g  str
	  g  dash	  g  slash		   g  filenamef  web/http.scm
								 -		$-	
	$		%		)		-		1		7	
	9 		?!		@$		K%		R%	3	V%		W#		\&		b&		h&		l!		n'		s)		w)		{)		|*	 *	! *	% *	 *	 +	 ,	 ,	4 ,	  	
 &	    C)    h   s  ]	 $  r4 5	$  b $  X &  "  %$  45$  45"  "  $   &  C6CCCC   k      g  val
		} g  x	#	Z g  x	c	u  g  filenamef  web/http.scm
.		/				/		
/		/		/		0		0			/		"1		#1			)2		-2		.2		53		93		:4		?4	+	A4		E3		F5		K5	+	M5		^/		a6		c6			i7		m7		n7		u8	 		}   C   h   +  ]4 >  "  G  4 >  "  G   &  4*>  "  G  "  B4 >  "  G  4->  "  G  4 >  "  G   &  *6 6   #      g  val
	  g  port	   g  filenamef  web/http.scm
9		:		:		:		;		.<		1<		5<		6=		N?	
	S?		\?	
	e@	
	yA	
	~A	 A	
 B	 B	 B	 C	 D	 D	 	 	   C>  "  G  42i67M89 	  hX      ]	4 =5"  L 6$  34 =5$  44 
554 5C""         g  x
		V g  eq		V  g  filenamef  web/http.scm
L		M		M		S	%	S		N		"N	'	+N	!	/N		0P		3Q		@P		AR		JR	C	LR		MO	 		V   C       h(      ]	4 ;5454 O 5C         g  str
		& g  parts		&  g  filenamef  web/http.scm
I		J		J		K		K		K		L		"T		$L		%K	 		&   C        h       ] $   $   6CC           g  x
		  g  filenamef  web/http.scm
Y		Z			Z		Z	-	Z	$	Z		Z	?	Z	6 			   C      h       ] $   $  	 6CC         g  val
		  g  filenamef  web/http.scm
U		V				V		W		W			V		X		X		 			   C      h8      ]4 >  "  G  4=>  "  G   6           g  pair
		4 g  port		4  g  filenamef  web/http.scm
b		c		c		c		d		0e		4e	 		4	   C  hH      ]4 >  "  G   $  !4>  "  G   6C             g  val
		B g  port		B  g  filenamef  web/http.scm
[		\		\		\		]		]		]		 _	
	$_		+_	
	8a		>f		@`	
 		B	   C>  "  G  4i:5;R42i<=?;    h      ]4 5$  C 6w       g  str
		  g  filenamef  web/http.scm
m		n			n		n		n		p	 		   Ci>  "  G  4i@>  "  G  4iA!    h   z   ] &  6C     r       g  k
		 g  v		  g  filenamef  web/http.scm
				
			 			   C!  h       ] &  6$  6C         g  k
		 g  v		  g  filenamef  web/http.scm
				
									 			   C!       h       ] &  6 6           g  k
		 g  v		 g  port			  g  filenamef  web/http.scm
				
					 			   C>  "  G  4
iB>  "  G  4
iC>  "  G  4
iD>  "  G  4iE>  "  G  4iF>  "  G  43iG>  "  G  42iHI     h   x  ]!4 ]54 :$  "  
5$  54 
5[$  "  4 >  "  G  4 5"  $  4 
5"   $  4 5"  C   p      g  str
	  g  rbracket	  g  colon		#  g  host		v  g  port	    g  filenamef  web/http.scm
									(	#		#		+		,	!	6		:		?		C	!	J		S		f		g		v		~			 	6 	 	 	 	    C      h0      ]	 $  $4 5$   $  C 6CC        g  val
		/ g  t		+  g  filenamef  web/http.scm
								
																	)	$	+	 		/   C   h     ]4 :5$  A4[>  "  G  4 >  "  G  4]>  "  G  "  4 >  "  G   $  4:>  "  G   6C           g  val
	  g  port	   g  filenamef  web/http.scm
											
	%	
	*		1	
	:	
	R		W		^		i		m		n	
 	 	
 	 	   C>  "  G  4iJ>  "  G  4iK>  "  G  4iL>  "  G  42iM    h8      ]	4 5$  "  	4 5$   6 6           g  str
		4 g  t		$  g  filenamef  web/http.scm
														!		(		.		4	 		4   C}    h(   {   ]	 $  
 "  $  C 6   s       g  val
		% g  t		%  g  filenamef  web/http.scm
						%	 		%   C}        h0      ]"   6 $   &   6""         g  val
		. g  port		.  g  filenamef  web/http.scm
												&	 		.	   C>  "  G  4iN>  "  G  4iO>  "  G  4iP>  "  G  42iQR5S       h`     ]	4 -5$  E
$  4 5C4 5$  4 
5C4 
54 5CL 6      g  x
		` g  dash		`  g  filenamef  web/http.scm
														%		)	 	0		1		5		6		A		C		M		T	8	V		W		\	 	`	 		`   CS 
   h8      ]4 5$   4 O 44 	5,55C	 6        g  str
		7  g  filenamef  web/http.scm
																 		 		+ 		-			.		3!		7!	 		7   C      hP      ] $  C  $  "  $  &$  45"  $  $  6CCCC         g  elt
		N g  x		L g  y			L  g  filenamef  web/http.scm
&		'			'		(	#	(	1	(		)	!	$)		**	!	+*	-	6*	%	:)		@+	!	F+	-	G+	% 		N   C        h       ] $   $  	 6CC         g  val
		  g  filenamef  web/http.scm
"		#				#		$		$			#		%		%		 			   C hH      ] $  4 >  "  G  "   4->  "  G   $  	 6C       g  pair
		H g  port		H  g  filenamef  web/http.scm
1		2			2		
3		3		3		#4		95		=5		B6		F6	 		H	   C   h8      ]4 >  "  G  4=>  "  G   6       g  val
		8 g  port		8  g  filenamef  web/http.scm
,		-		-		-		.		00		67		8/	 			8	   C>  "  G  4	iT>  "  G  4iU>  "  G  43iV>  "  G  4iW>  "  G  4iX>  "  G  42iYiii>  "  G  4	iZ>  "  G  4i[>  "  G  42i\        h0      ]4 5$  "  44 
55$   6 6        g  str
		/  g  filenamef  web/http.scm
i		j		j		k		k		k		#j		)l		/m	 
		/   C}    h(   {   ]	 $  
 "  $  C 6   s       g  val
		% g  t		%  g  filenamef  web/http.scm
n		o		o		%o	 		%   C}        h0      ]"   6 $   &   6""         g  val
		. g  port		.  g  filenamef  web/http.scm
p		s		q		q		q		q		&r	 		.	   C>  "  G  43i]>  "  G  42i^       h      ] $  C 6    w       g  str
		  g  filenamef  web/http.scm
|		}		}		}		~			 		   C       h   v   ] &  C 6      n       g  val
		  g  filenamef  web/http.scm
				
					 		   C  h       ] &  6 6             g  val
		 g  port		  g  filenamef  web/http.scm
				
							 			   C>  "  G  4i_>  "  G  `a   h    y   ]	4 ;5$  C 6  q       g  c
		 g  t		  g  filenamef  web/http.scm
	*		0		,		0 		   Cb      h@   8  ]4 545$  
C45$  4
5"  	6 0      g  port
		? g  v			? g  extension-start		!	?  g  filenamef  web/http.scm

					!		+		,		?	 		?  g  nameg  read-chunk-headerg  documentationf  QRead a chunk header from PORT and return the size in bytes of the
upcoming chunk. CcRfcgh     h   L  ]+"  M $  "  
$  CM
$  '4L5N
$  N C"4M54L 545$  N CMN
$  (4L>  "  G  4L>  "  G  "   "9
".D      g  bv
	  g  idx	  g  to-read		  g  to-read		  g  num-read		  g  t			 g  size		2	R g  ask-for		[  g  read		m  g  left	    
g  filenamef  web/http.scm
								 		&		+		,		2		8		;		@		C		R		S		[		^		i	8	m		m		p		z		}	 	 	 	 	 	 	 	% 	 	 	 	 #	 	  g  nameg  read! Cijk       h   d   ] L$  CL 6\       g  filenamef  web/http.scm
					 		
  g  nameg  close C hP   O  - /   0   3 #  HHO  Q 
KK O 6  G      g  port
		N g  keep-alive?		N g  	remaining			N g  	finished?			N g  read!		,	N  g  filenamef  web/http.scm

	?	!	N	 		N
g  keep-alive?S   g  nameg  make-chunked-input-portg  documentationf @Returns a new port which translates HTTP chunked transfer encoded
data from PORT into a non-encoded format. Returns eof when it has
read the final chunk from PORT. This does not necessarily mean
that there is no more data on PORT. When the returned port is
closed it will also close PORT, unless the KEEP-ALIVE? is true. CERflm        h@      ]"  0"  (45$  C4 45>  "  G  """             g  f
		: g  q		:  g  filenamef  web/http.scm
													&		2	 			:	  g  nameg  
q-for-each Clnop    h   \   ] L 6      T       g  elem
		
  g  filenamef  web/http.scm
		
	# 		
   C hh      ]4M5$  C4M5 44 	5L >  "  G  4L >  "  G  4LL O M>  "  G  L 6       g  len
		h  g  filenamef  web/http.scm
														+		4		8		?		H		d		h	 		h
  g  nameg  flush Cqrs  h   n   ]M  6      f       g  c
		
  g  filenamef  web/http.scm
		
	 		
  g  nameg  put-char Cts       h   Y   ]M  6      Q       g  c
		
  g  filenamef  web/http.scm
		
	! 		
   C    h   p   ]L O  6 h       g  s
		  g  filenamef  web/http.scm
			 		  g  nameg  
put-string Cuvk        hH      ] 4L>   "  G  4L>  "  G  4L>  "  G  L $  CL6         g  filenamef  web/http.scm
										'		>		F	 			F
  g  nameg  close Cw 
hh     - /   0   3 #  HO  Q 45 KO O  O  	6            g  port
		b g  keep-alive?		b g  queue			b g  
q-for-each		-	b g  flush		-	b  g  filenamef  web/http.scm

	7		^		`	>	b	 		b
g  keep-alive?S   g  nameg  make-chunked-output-portg  documentationf Returns a new port which translates non-encoded data into a HTTP
chunked transfer encoded data and writes this to PORT. Data
written to this port is buffered until the port is flushed, at which
point it is all sent as one chunk. Take care to close the port when
done, as it will output the remaining data, and encode the final zero
chunk. When the port is closed it will also close PORT, unless
KEEP-ALIVE? is true. CFR4xi5 yRy    h   x   ] 6p       g  port
		  g  filenamef  web/http.scm

		  		  g  nameg  http-proxy-port? CGR|y   h      ]45 6        g  port
		 g  flag		  g  filenamef  web/http.scm

		 			  g  nameg  set-http-proxy-port?! CHRC          g  m
		, g  rtd
  g  filenamef  web/http.scm		

	K

	O
!	Y	!	Y
"	[
$	^
&=	j
(l	q
*	v
. 
1 
4Q 
5 
5 	5 	&5 	5 
9u 
: 
; 
> 
@ 
D$ 
D 
E 
G^ 
I( 
I) 
I1 	I; 
ID
IL	IV
I
J
K8
K9	KA	KC	KG

Le
M?
N
PR
RO!
R*
S-
Tf0
U3
Vg6
Y8<
]K
^`
_i
iq
jQ
m
n6
p~
q
s
v
w
x;
y
zk
      
      
      p
      q.	      .
      /	      /
      p0
      []
      k
      8q
      
      4
      
      
      $
      3
      8
      hD
      ˧j
      ap
      kt
      Oy
      
      ѻ
      
      I
      נ
      ߉
      #
      
      
      N
      
      
      	      
      H	
      
      !
      &      !
      /
      <
      =P
      \
     6y
     
     	
     

     
     G
     
     ?
     
     O
     
     x
     B
     
     
     
     R
     S:
     [:	      ":
     "a
     "a	     #a
     #q
     #q	     #q
     #w
     #w	      #w
     #{
     #{	     #{
     #
     #	     #
     #
     #	     #
     $
     $		     $!
     $*
     $1	     .
     .
     .	     .
     .
     .	     2K
     2T 
     2\ 	     2a 
     2j
     2r	     2w
     2
     2	     2
     2
     2	     2
     2
     2	     2
     2
     2	     9h
     9qH
     9xH	     ?}H
     ?j	     ?j	'     ?j	     ?j
     ?l
     ?l	     @\l
     @ev
     @mv	     @rv
     @{
     @	     B
     B
     B	     B
     B
     B	     B
     B
     C	     C
     C
     C	     C"
     C+
     C3	     C8
     CA
     CH	     CM
     CV
     C]	     HG
     HP
     HX	!     H]
     Hf
     Hn	     Hs
     H|
     H	!     H
     H
     H	     KO
     KX
     K`	     Ke
     Kn
     Kv	     K{
     K
     K	     K
     K
     K	     R
     R;
     R;	     R;
     R@
     R@	     R@
     RD
     RD	     RD
     RP
     RP	     RP
     RU
     RU	     RU
     RY
     SY	     SY
     S"`
     S*`	     S/`
     S8d
     S@d	      SEd
     SNh
     SUh	     Uh
     Uw
     Uw	     Uw
     V{
     V{	     X6{
     X?
     XG	      XL
     Z
     a"
     i
     i	     i
     j
     kB
	     kD
   C6                                                                                                                                                                                                                                                                                                                                                                ccache/language/glil.go                                                                             0000644                 00000044020 15154557173 0011030 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0G      ]  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	~ !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|} 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 recordC 5  h4  v   ]4	
~5 4 >  "  G   }  h      ]4 56              g  x
		 g  port		  g  filenamef  language/glil.scm
	Q
		R				R			R	 			  g  nameg  
print-glil CR4ii5R h      - 1 3   C            g  meta
			 g  body			 g  defrec-98ee61a7034-32d				  g  filenamef  language/glil.scm
	T
 				
	  g  nameg  make-glil-program CR4ii5R4i4ii54ii55 R4i4ii54ii55!R4ii5"R"  h      - 1 3   C          g  nreq
			 g  nlocs			 g  
else-label				 g  defrec-98ee61a7034-32f				  g  filenamef  language/glil.scm
	T
 				
	  g  nameg  make-glil-std-prelude C#R4i"i5$R4i4i"i54i"i55%R4i4i"i54i"i55&R4i4i"i54i"i55'R4ii5(R( h       - 1 3   C              g  nreq
			 g  nopt			 g  rest				 g  nlocs				 g  
else-label				 g  defrec-98ee61a7034-331				  g  filenamef  language/glil.scm
	T
 				
	  g  nameg  make-glil-opt-prelude C)R4i(i5*R4i4i(i54i(i55+R4i4i(i54i(i55,R4i4i(i54i(i55-R4i4i(i54i(i55.R4i4i(i54i(i55/R4ii50R0     h      - 1 3   C         g  nreq
			 g  nopt			 g  rest				 g  kw				 g  allow-other-keys?				 g  nlocs				 g  
else-label				 g  defrec-98ee61a7034-333				  g  filenamef  language/glil.scm
	T
 				
	  g  nameg  make-glil-kw-prelude C1R4i0i52R4i4i0i54i0i553R4i4i0i54i0i554R4i4i0i54i0i557R4i4i0i54i0i555R4i4i0i54i0i556R4i4i0i54i0i558R4i4i0i54i0i559R4ii5:R:       h      - 1 3   C              g  vars
			 g  defrec-98ee61a7034-335			  g  filenamef  language/glil.scm
	T
 			
  g  nameg  make-glil-bind C;R4i:i5<R4i4i:i54i:i55=R4ii5>R>     h      - 1 3   C            g  vars
			 g  rest			 g  defrec-98ee61a7034-337				  g  filenamef  language/glil.scm
	T
 				
	  g  nameg  make-glil-mv-bind C?R4i>i5@R4i4i>i54i>i55AR4i4i>i54i>i55BR4ii5CRC   h      -  1  3  C        g  defrec-98ee61a7034-339
			  g  filenamef  language/glil.scm
	T
 			


  g  nameg  make-glil-unbind CDR4iCi5ER4ii5FRF        h      - 1 3   C              g  props
			 g  defrec-98ee61a7034-33b			  g  filenamef  language/glil.scm
	T
 			
  g  nameg  make-glil-source CGR4iFi5HR4i4iFi54iFi55IR4ii5JRJ   h      -  1  3  C }       g  defrec-98ee61a7034-33d
			  g  filenamef  language/glil.scm
	T
 			


  g  nameg  make-glil-void CKR4iJi5LR4ii5MRM  h      - 1 3   C              g  obj
			 g  defrec-98ee61a7034-33f			  g  filenamef  language/glil.scm
	T
 			
  g  nameg  make-glil-const CNR4iMi5OR4i4iMi54iMi55PR4ii5QRQ     h      - 1 3   C        g  local?
			 g  boxed?			 g  op				 g  index				 g  defrec-98ee61a7034-341				  g  filenamef  language/glil.scm
	T
 				
	  g  nameg  make-glil-lexical CRR4iQi5SR4i4iQi54iQi55TR4i4iQi54iQi55UR4i4iQi54iQi55VR4i4iQi54iQi55WR4ii5XRX   h      - 1 3   C            g  op
			 g  name			 g  defrec-98ee61a7034-343				  g  filenamef  language/glil.scm
	T
 				
	  g  nameg  make-glil-toplevel CYR4iXi5ZR4i4iXi54iXi55[R4i4iXi54iXi55\R4ii5]R]   h      - 1 3   C        g  op
			 g  mod			 g  name				 g  public?				 g  defrec-98ee61a7034-345				  g  filenamef  language/glil.scm
	T
 				
	  g  nameg  make-glil-module C^R4i]i5_R4i4i]i54i]i55`R4i4i]i54i]i55aR4i4i]i54i]i55bR4i4i]i54i]i55cR4ii5dRd       h      - 1 3   C              g  label
			 g  defrec-98ee61a7034-347			  g  filenamef  language/glil.scm
	T
 			
  g  nameg  make-glil-label CeR4idi5fR4i4idi54idi55gR4ii5hRh   h      - 1 3   C            g  inst
			 g  label			 g  defrec-98ee61a7034-349				  g  filenamef  language/glil.scm
	T
 				
	  g  nameg  make-glil-branch CiR4ihi5jR4i4ihi54ihi55kR4i4ihi54ihi55lR4ii5mRm  h      - 1 3   C            g  inst
			 g  nargs			 g  defrec-98ee61a7034-34b				  g  filenamef  language/glil.scm
	T
 				
	  g  nameg  make-glil-call CnR4imi5oR4i4imi54imi55pR4i4imi54imi55qR4ii5rRr    h      - 1 3   C            g  nargs
			 g  ra			 g  defrec-98ee61a7034-34d				  g  filenamef  language/glil.scm
	T
 				
	  g  nameg  make-glil-mv-call CsR4iri5tR4i4iri54iri55uR4i4iri54iri55vR4ii5wRw   h      - 1 3   C            g  label
			 g  escape-only?			 g  defrec-98ee61a7034-34f				  g  filenamef  language/glil.scm
	T
 				
	  g  nameg  make-glil-prompt CxR4iwi5yR4i4iwi54iwi55zR4i4iwi54iwi55{Rxsnie^YRNKGD?;1)#| + h  
  ]" z" " \" " ]" " " " L" " s" " x" " " 3"  "  q $  b  &  H$  9$   (  6 6 6 6 6 6 $  R  &  <$  1$  (  6"B">":"6"2 $  R  &  <$  1$  (  6""""" $  R  	&  <$  1$  (  
6""|"x"t"p $  ;  &  %$  (  6"2"."*"& $    &  u$  j&  T$  I$  4$  
	
(  	6"""""""" $    &  u$  j&  T$  I$  4$  
	
(  	6""
"""""" $  R  &  <$  1$  (  6""""" $    &  j$  _$  J$  5$   
	
(  	6"""""
"" $  ;  &  %$  (  6"""" $  $  &  (  6 """ $  ;  &  %$  (  6"G"C"?"; $  $  &  (  6 """ $  R  &  <$  1$  (  6""""" $    &   6""| $    !&  $  $  $  z$  e
	
$  P

$  ;$  &(  "	6"""""""""" $    #&  $  v$  a$  L$  7
	
$  "

(  $	6""""""
"" $  i  %&  S$  H$  3$  (  
&6"""""" $  :  '&  $$  (4)*56"I"E"A   
      g  x
	 g  vx	W  g  vy		W  g  vx		p  g  vy		p  g  vx	   g  vy	   g  vx  g  vy	  g  vx	  g  vy	  g  vx	  g  vy	  g  vx%q g  vy	%q g  vx	>i g  vy	>i g  vx	Oe g  vy	Oe g  vx g  vy	 g  vx	 g  vy	 g  vx	 g  vy	 g  vx g  vy	 g  vx	 g  vy	 g  vx% g  vy	% g  vx	> g  vy	> g  vx	W g  vy	W g  vx	h g  vy	h g  vx		y g  vy	
y g  vx@ g  vy	@ g  vx	8 g  vy	8 g  vx	0 g  vy	0 g  vx	, g  vy	, g  vx		( g  vy	
( g  vxQ g  vy	Q g  vx	j g  vy	j g  vx	{ g  vy	{ g  vx( g  vy	( g  vx	  g  vy	  g  vx	 g  vy	 g  vx	 g  vy	 g  vx		 g  vy	
 g  vx9n g  vy	9n g  vx	Rf g  vy	Rf g  vx g  vy	 g  vx g  vy	 g  vx	 g  vy	 g  vx g  vy	 g  vx#o g  vy	#o g  vx	<g g  vy	<g g  vx	Mc g  vy	Mc g  vx g  vy	 g  vxf g  vy	f g  vx	^ g  vy	^ g  vx	Z g  vy	Z g  vx	V g  vy	V g  vx		R g  vy	
R g  vx	N g  vy	N g  vx	J g  vy	J g  vx	&F g  vy	&F g  vxw g  vy	w g  vx	  g  vy	  g  vx	 g  vy	 g  vx	 g  vy	 g  vx		 g  vy	
 g  vx	 g  vy	 g  vx| g  vy	| g  vx	2t g  vy	2t g  vx	Cp g  vy	Cp g  vx	Tl g  vy	Tl g  vx g  vy	 g  vx	 g  vy	  }g  filenamef  language/glil.scm
	n
		o	  	  	  	
  	  	
  	  	
  	  	
  	  	
 	o	 		o	a 	e	o	 		o	 		o	 	%	o	$ 	$(	o				o		~	*	o	b	}	f	o		|		o		{		o	
	z		o	_	y	c	o		x		o	B	w	F	o		u		o	h	s	l	o		q		q		o	 4	  g  nameg  
parse-glil C|R !}"%&'(+,-./03475689:=>ABCFIJMPQTUVWX[\]`abcdghklmpqruvwz{ U h  d  ]A &  "4 54 545C&  '4 54	 54
 5 C&  =4 54 54 54 54 5 C&  S4 54 54 54 54 54 54 5 C&  4 5C&  4  54! 5" C#&  $C%&  4& 5' C(&  )C*&  4+ 5, C-&  24. 54/ 540 541 52 C3&  44 545 56 C7&  >48 549 54: 54; 5<$  ="  > C?&  4@ 5A CB&  4C 54D 5E CF&  4G 54H 5I CJ&  4K 54L 5M CN&  $4O 54P >  "  G  QRCST 6\      g  glil
	 g  rtd	 g  meta			1 g  body			1 g  nreq		N	` g  nlocs		N	` g  
else-label		N	` g  nreq	   g  nopt	   g  rest	   g  nlocs	   g  
else-label	   g  nreq	   g  nopt	   g  rest	   g  kw	   g  allow-other-keys?	   g  nlocs	   g  
else-label	   g  vars	 g  vars	-; g  rest	-; g  props	U_ g  obj	y g  local?	 g  boxed?	 g  op	 g  index	 g  op	 g  name	 g  op	' g  mod	' g  name	' g  public?	' g  label	6@ g  inst	Vd g  label	Vd g  inst	z g  nargs	z g  nargs	 g  ra	 g  label	  *g  filenamef  language/glil.scm
 
	 		# 		& 		/ 		9 		V 		h 	  	  	  	 	 	 	3 	 C 	E 	N 	Y 	g 	i 	r 	} 	 	 	 	 	 	 	 	 	 	#& 	/ 	: 	H 	\ 	 l 	 	 	 	 	 	 	 -	  g  nameg  unparse-glil C}RC       n       g  m
		,  g  filenamef  language/glil.scm		
 	Q
	T
+	n
4 
 	4
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ccache/language/assembly/spec.go                                                                    0000644                 00000002301 15154557173 0012646 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] + 4   h      ] g  guile	 	g  define-module*	 	 	g  language	g  assembly	g  spec		 	
g  filenameS	f  language/assembly/spec.scm	g  importsS	g  system	g  base	 	 	g  compile-bytecode	 	 	g  decompile-bytecode	 	 	 	g  exportsS	 	g  set-current-module	 	 	g  invalidate-compilation-cache!	g  make-language	g  nameS	 g  titleS	!f  'Guile Virtual Machine Assembly Language	"g  readerS	#g  read	$g  printerS	%g  write	&g  parserS	'g  	compilersS	(g  bytecode	)g  decompilersS	*g  for-humans?SC 5    h     ]4	
5 4 >  "  G   4i>   "  G  4i !"#     h   y   ] 6q       g  port
		 g  env		  g  filenamef  language/assembly/spec.scm
					# 			   C$%i&#i'(i )(i *5RC        g  m
		,  g  filenamef  language/assembly/spec.scm		
	-	
	K		 		 	 		
 	
   C6                                                                                                                                                                                                                                                                                                                                ccache/language/assembly/decompile-bytecode.go                                                      0000644                 00000023416 15154557173 0015463 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0&      ] \ 4  hk      ] g  guile	 	g  define-module*	 	 	g  language	g  assembly	g  decompile-bytecode		 	
g  filenameS	f  (language/assembly/decompile-bytecode.scm	g  importsS	g  system	g  vm	g  instruction	 	 	g  base	g  pmatch	 	 	g  srfi	g  srfi-4	 	 	g  rnrs	g  bytevectors	 	 	 	 	 g  objcode	!  	"g  selectS	#g  
byte-order	$# 	%!"$ 	&% 	'g  exportsS	( 	)g  set-current-module	*) 	+) 	,g  u8vector-length	-g  decode-load-program	.g  error	/f  tried to decode too many bytes	0f  -bad bytecode: only decoded ~a out of ~a bytes	1g  memq	2g  br	3g  br-if	4g  	br-if-not	5g  br-if-eq	6g  br-if-not-eq	7g  
br-if-null	8g  br-if-not-null	92345678 	:g  br-instruction?	;g  br-if-nargs-ne	<g  br-if-nargs-lt	=g  br-if-nargs-gt	>g  br-if-nargs-lt/non-kw	?;<=> 	@g  br-nargs-instruction?	Ag  
bytes->s24	Bf  -error decoding program -- read too many bytes	Cg  load-program	Dg  map	Eg  reverse	Fg  reverse!	Gg  decode-bytecode	Hg  prompt	Ig  assv-ref	Jg  gensym	Kf  :L	Lg  mv-call	Mg  bind-optionals/shuffle-or-br	Ng  and=>	Og  opcode->instruction	Pg  instruction-length	Qg  
load-array	Rg  load-wide-string	Sg  make-bytevector	Tg  make-string	Ug  bytevector-u8-set!	V	U 	W	U 	Xg  string-set!	Yg  integer->char	Zg  utf32->string	[g  native-endiannessC 5hp     ]4	
&'(5 4+ >  "  G   ,-./       h@      ]ML $  	LM"  ML $  "  45  $  	MN"    C          g  b
	)	=  g  filenamef  (language/assembly/decompile-bytecode.scm
				 			 			 	!		!			 		#	"		'	"	"	)	"		)	 		1	#		4	#		6	#	 		=
  g  nameg  pop C.0      h@   &  ]
4 5H4 O 5J$  DJ6             g  x
		9 g  env		9 g  opts			9 g  i		
	9 g  size		
	9 g  ret			9  g  filenamef  (language/assembly/decompile-bytecode.scm
	
				
				%			%		%	&	
	)	&		/	'	
	3	(		9	(	
 		9	  g  nameg  decompile-bytecode CR19       h      ] 6             g  x
		
  g  filenamef  (language/assembly/decompile-bytecode.scm
	*
	
	+	 		
  g  nameg  br-instruction? C:R1?       h      ] 6             g  x
		
  g  filenamef  (language/assembly/decompile-bytecode.scm
	,
	
	-	 		
  g  nameg  br-nargs-instruction? C@R       h8      ] 		       
$  C       C           g  a
		4 g  b		4 g  c			4 g  x			4  g  filenamef  (language/assembly/decompile-bytecode.scm
	/
		0			0			0			0			1			1			1		$	1		2	3		3	3	 		4	  g  nameg  
bytes->s24 CAR.BCD    h      ]  C      {       g  x
		
  g  filenamef  (language/assembly/decompile-bytecode.scm
	N	"		N	4		N	<			N	. 		
   CE-FG./     h@      ]ML $  	4L5 "  ML $  "  45  $  	MN"    C          g  b
	)	=  g  filenamef  (language/assembly/decompile-bytecode.scm
	D			E			E			E	 		F			E		#	G		'	G	"	)	G		)	E		1	H		4	H		6	H	 		=
  g  nameg  sub-pop CHAIJKLM@:    h    , 3 %4 5 4 5 4 5 4 5 4 5 4 5 4 5 4 5 							
H
H" <J	$  6J	$  244J55	

$  "  4 545C4	
	 O 5" " (" " $  &  $  $  $  $  p(  UJ454J5$  "  45JK """"""""$  &  $  $  $  ~$  i(  UJ454J5$  "  45JK ""?";"7"3"/"+"'$ <& &$ $ $  $  $  $  $  $    $  s  "!"(  _J4!5#4J#5$$$  $"  45$#$JK$$$# """" """""""""$  $  $  $  $  $  z(  f45$  WJ454J5$  "  45JK """""""""$  $  $  $  v(  b45$  SJ454J5$  "  45JK "":"6"2"."*"&"       g  pop
	 g  a	 g  b		 g  c		 g  d		  g  e		' g  f		. g  g		5 g  h		< g  len			R g  metalen	
	h g  labels		k g  i		n g  out		t g  exp	  g  vx	  g  vy	  g  vx	 g  vy	 g  vx	 g  vy	 g  vx	* g  vy	* g  vx	; g  vy	; g  where	W g  t	b g  l	w g  vx	 g  vy	 g  vx	 g  vy	 g  vx	 g  vy	 g  vx	/ g  vy	/ g  vx	@ g  vy	@ g  where	\ g  t	g g  l	| g  vx	 g  vy	 g  vx	 g  vy	 g  vx	 g  vy	 g  vx	 g  vy	 g  vx	 g  vy	 g  vx	% g  vy	% g  vx	6 g  vy	6 g  vx	G g  vy	G g  vx	X g  vy	 X g  vx	!i g  vy	"i g  where	# g  t	$ g  l	$ g  vx	 g  vy	 g  vx	  g  vy	  g  vx	1 g  vy	1 g  vx	B g  vy	B g  vx	S g  vy	S g  vx	d g  vy	d g  where	 g  t	 g  l	 g  vx	 g  vy	 g  vx	 g  vy	 g  vx	 g  vy	 g  vx	0 g  vy	0 g  where	U g  t	` g  l	u  Zg  filenamef  (language/assembly/decompile-bytecode.scm
	6
		7			7			7			7			7	 		7			7	*	 	7		#	8		'	7		*	8		.	7		1	8	 	5	7		8	8	*	<	7		E	9		F	9		K	9		L	9		Q	9	(	R	9		R	7		[	:		\	:		a	:	!	b	:		g	:	,	h	:		h	7		k	;		k	7		t	J		y	K		}	K	 	L	 	L	 	M	 	K	 	N	 	N	 	O	" 	N	 	Q	! 	Q	 	Q	4 	R	 	N	 	T	 	T	 	U	G	g	L	>	W	>	W	>	Z	?	b	?	q	A	u	A	w	A	w	A	~	B		B		g		g		g		i		i		i		i		i		i		i		i		i		i		i		i		i		i		U	L	e	Q	>	\	>	\	>	_	?	g	?	v	A	z	A	|	A	|	A		B		B		e		e		e		U	u	^		>		>		>		?		?		A		A		A		A		B		B		^		^		^		U	o	X	9y	U		>		>		>		?		?		A		A		A		A		B		B		Y		Y		Y		U	;	V	1E	U	J	>	U	>	U	>	X	?	`	?	o	A	s	A	u	A	u	A	|	B		B		W		W		W		U		J		J		J	 	  g  nameg  decode-load-program C-RNOC-PQRSTWXY  h      ] 456              g  str
		 g  pos		 g  value			  g  filenamef  (language/assembly/decompile-bytecode.scm
	}				~	2		~	 			   CZ[F      h0  /  ]14 5&  L 645
$  &  "  $  "  &  "  $  	"  
4L 5 4L 5 4L 5 		45"  K$   &  445 5"   C44L 5 >  "  G  "
""  !
$  64L 5 "45 "    '      g  opcode
	, g  inst		, g  make-sequence		D  g  sequence-set!		d  g  a		k  g  b		r  g  c		y  g  len	   g  seq	   g  i	   g  n	  g  out	   g  filenamef  (language/assembly/decompile-bytecode.scm
	m				n				n			p			o			q			s		"	s		&	o		.	w		<	w		D	v		N	{		\	{		d	v		g		%	k			n		/	r			u		9	y		  	   	+  	 	v	  	 	v	  	  	  	  	.  	   	$  	7  	$  	  	  	.  	  	  	  	  	  	  	 	 		 	& 	  	 	 	$ 	;, 	 7	,   C      h      ]4 5  O 6             g  pop
		  g  filenamef  (language/assembly/decompile-bytecode.scm
	k
		l				l	 		  g  nameg  decode-bytecode CGRC          g  m
		,  g  filenamef  (language/assembly/decompile-bytecode.scm		
	
	*
W	,
	/
P	6
k	k
 	m
   C6                                                                                                                                                                                                                                                   ccache/language/assembly/disassemble.go                                                             0000644                 00000025701 15154557173 0014220 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0+      ]  4    h      ] g  guile	 	g  define-module*	 	 	g  language	g  assembly	g  disassemble		 	
g  filenameS	f  !language/assembly/disassemble.scm	g  importsS	g  ice-9	g  format	 	 	g  srfi	g  srfi-1	 	 	g  system	g  vm	g  instruction	 	 	g  program	 	 	g  base	g  pmatch	 	  	! 	"! 	#g  compile	$# 	%$ 	& "% 	'g  exportsS	( 	)g  set-current-module	*) 	+) 	,f  Disassembly of ~A:

	-g  disassemble-load-program	.g  	decompile	/g  fromS	0g  value	1g  toS	2g  load-program	3g  assq-ref	4g  objects	5g  	free-vars	6g  meta	7g  blocs	8g  sources	9g  newline	:g  for-each	;f  Embedded program ~A:

	<g  reverse!	=g  byte-length	>g  nop	?g  
print-info	@g  code-annotation	Ag  and=>	Bg  assq	Cg  source->string	Dg  gensym	Ef   	Fg  disassemble-free-vars	Gg  disassemble-meta	Hg  program?	Ig  display	Jf  )----------------------------------------
	Kg  vector->list	Lg  error	Mf  bad load-program form	Nf  Free variables:

	Og  fold	Pg  make-syntax-transformer	QP 	RP 	Sg  unless	Tg  macro	Ug  $sc-dispatch	VU 	WU 	Xg  _	Yg  any	ZXY	[g  syntax->datum	\[ 	][ 	^g  datum->syntax	_^ 	`^ 	ag  if	bg  not	cg  begin	dg  syntax-violation	ed 	fd 	gf  -source expression failed to match any pattern	hg  name	ih 	jg  *uninteresting-props*	kg  filter	lg  memq	mf  Properties:

	nf  ~a:~a:~a	og  source:file	pf  (unknown file)	qg  source:line-for-user	rg  source:column	sg  
make-int16	tg  assembly-unpack	ug  list	vg  vector	wf  ~a element~:p	xg  br	yg  br-if	zg  br-if-eq	{g  	br-if-not	|g  br-if-not-eq	}g  br-if-not-null	~g  
br-if-null	f  -> ~A g  br-if-nargs-ne g  br-if-nargs-lt g  br-if-nargs-gt g  bind-optionals/shuffle-or-br g  	last-pair g  
object-ref f  ~s g  	local-ref g  local-boxed-ref g  	local-set g  local-boxed-set g  binding:start g  binding:end f  `~a'~@[ (arg)~] g  binding:name g  binding:index g  list-ref g  assert-nargs-ee/locals g  assert-nargs-ge/locals f  ~a arg~:p, ~a local~:p g  free-ref g  free-boxed-ref g  free-boxed-set f  (closure variable) g  toplevel-ref g  toplevel-set f  `~s' g  	variable? g  mv-call f  MV -> ~A g  prompt f  H -> ~A g  assembly->object f  ,~4@S    ~32S~@[;; ~1{~@?~}~]~@[~61t at ~a~]
C 5    h     ]4	
&'(5 4+ >  "  G   ,-./01       h   l   ] L 6d       g  filenamef  !language/assembly/disassemble.scm
	!		
	!	%		!	1		!	 		
   C h0      ]4 >  "  G  4 O >   6<              g  x
		)  g  filenamef  !language/assembly/disassemble.scm
	
											 	 		)  g  nameg  disassemble CR23456789:;-     h       ]4 >  "  G   6       g  sym+asm
		   g  filenamef  !language/assembly/disassemble.scm
	1			2			2			2	4		2			3	(		3	6	 	3	 			    C<=>?@ABCDEFGHIJ  h(      ]4 5$  4>  "  G   6C        g  x
		'  g  filenamef  !language/assembly/disassemble.scm
	S			T			T			U			U	"		U		%	V	 		'   CKLM   hP    ] $ 9  & $ $ $ $  45"  $  45"  $  45"  $  45"  $  45"  
	" (  -4>   "  G  4	
45>  " G  " 45" I$  &  x(  45"|44	54$  45"  5>  "  G  45"#44	54$  45"  5>  "  G  45"44	54$  45"  5>  "  G  45"k$  ^&  F454 >  "  G  45""U"N
"	$  4	>  "  G  "   
$  4
>  "  G  "   $  	456C 6 6 6 6 6            g  asm
	J g  env	J g  vx		B g  vy		B g  vx		(2 g  vy		(2 g  vy		6* g  vy		F" g  objs	 " g  	free-vars		 " g  meta	
 " g  blocs	 " g  srcs	 " g  pos	  g  code	  g  programs	  g  asm	  g  len	  g  end	 g  vx	 g  vy	 g  vx	] g  sym	r  g  filenamef  !language/assembly/disassemble.scm
	$
		%		R	'		S	'		Y	'	)	[	'		f	(		g	(		m	(	-	o	(		z	)		{	)	 	)	) 	)	 	*	 	*	 	*	) 	*	 	+	 	+	 	+	) 	+	 	'	 	,	 	-		 	/	 	0	 	4	 	0	 	6	 	6	 	7	 	6		8		6	
	9	,	@	3	@	6	@	.B	@	C	B	J	E	[	G	c	G	#d	G	-u	G	z	B		H		H		H	.	H		B		E		G		G	#	G	-	G		B		H		H		H	.	H		B		E		G		G	#	G	--	G	2	B	=	H	D	H	G	H	.S	H	S	9	l	;	p	;	#r	;	r	;	u	<	{	<	"	<		=		=		=	0	>		=		9		,		,	.	,		J		J		K		L		M		Q		W		W	 	R	&	Y	*	Y	.	Y	2	Y	6	Y	:	Y	>	Y	B	Y	F	Y	J	Y	 n	J	  g  nameg  disassemble-load-program C-RINO?        h       ]4 >  "  G  C           g  free-var
		 g  i		  g  filenamef  !language/assembly/disassemble.scm
	]			^	
		_	
 			   C   h       ]4>  "  G  
 6          g  	free-vars
		  g  filenamef  !language/assembly/disassemble.scm
	[
		\			\			\			]	 		  g  nameg  disassemble-free-vars CFR4RSTWZ]`abc     h       - 1 3    C     y       g  test
			 g  body			  g  filenamef  !language/assembly/disassemble.scm
	c
		d	 			
   C    h   u   ]	4 5L 4?6m       g  args
		 g  v			  g  filenamef  !language/assembly/disassemble.scm		c
 		   Cfg    h(   s   ]	4 5$   O @ 6 k       g  y
		' g  tmp		'  g  filenamef  !language/assembly/disassemble.scm
	c
 		'   C5SRijRklj        h      ]4 5C  |       g  x
		  g  filenamef  !language/assembly/disassemble.scm
	i			j			j	$		j			j	 		   CIm:?        h   l   ] 6     d       g  x
		  g  filenamef  !language/assembly/disassemble.scm
	n			n	 		   C9       hH      ]	4 5(  C4>  "  G  4>  "  G  6              g  meta
		B g  props		B  g  filenamef  !language/assembly/disassemble.scm
	h
		i		
	k			i			i			l			m			m		"	m		+	n		B	o	 		B  g  nameg  disassemble-meta CGRnopqr        h8      ]	4 5$  "  4 54 56              g  src
		1 g  t		!  g  filenamef  !language/assembly/disassemble.scm
	q
		r			r			r			r	.	"	s	
	)	s	%	1	r	 			1  g  nameg  source->string CCR     h      ]  C           g  byte1
		 g  byte2		  g  filenamef  !language/assembly/disassemble.scm
	u
		v			v	 			  g  nameg  
make-int16 CsRtuvwsxyz{|}~3A     h   y   ]  C      q       g  obj
		
  g  filenamef  !language/assembly/disassemble.scm
 		 	"		 	 		
   C 2   h  O  ].45$  "  $  4? C$  "  K$  "  =$  "  /	$  "  !
$  "  $  "  $  45 C$  "  $  "  $  45 C$  4455 C$  $   CC$  "  !$  "  $  "  $  s$  k"  W	$  N	
"  			"4
5 $  *4	5 $  4
54
5 C""C45	"C $  "  !$  "		 C#$  "  $$  "  %$  & C'$  "  ($  ?$  7	"  )	 C4*	5$  	$  		 C""C+$  ,45 C-$  .45 C/40516       G      g  end-addr
	 g  code	 g  objs		 g  nargs		 g  blocs		 g  labels		 g  code			 g  inst		 g  args		 g  bindings		U g  b	
_ g  v		5f  g  filenamef  !language/assembly/disassemble.scm
	x
		y				y			z			y			{			y			|		.	~		/	~		8	~		B	|	  	  	  	&  	  	 	|	  	  	  	&  	  	 	|	  	  	  	+  	&  	  		|	
 	 	 	- 	 	!	|	Q 	U 	X 	\ 	_ 	_ 	h 	n 	n 	o 	!s 	0u 	!x 	| 	} 	" 	/ 	" 	 	 	 	 	3 	0 	 	 	 	/ 	 		|	 	 	 	 	* 	% 		|	 	 		|	/ 	4 	&5 	5 	= 	B 	C 	D 	N 	Q 	%U 	W 	Z 	] 	q	|	s 	t 	{ 	)~ 	 		|	 	 	 	( 	 	 	 	 j		  g  nameg  code-annotation C@R      h      ] 6              g  addr
		 g  info		 g  extra			 g  src			  g  filenamef  !language/assembly/disassemble.scm
 
	 		 	 			  g  nameg  
print-info C?RC            g  m
		,  g  filenamef  !language/assembly/disassemble.scm		
	
	$
x	[
	f		f
 	h
A	q
	u
	x
	 
 	
   C6                                                                ccache/language/assembly/compile-bytecode.go                                                        0000644                 00000023154 15154557173 0015151 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0T&      ] V 4        h      ] g  guile	 	g  define-module*	 	 	g  language	g  assembly	g  compile-bytecode		 	
g  filenameS	f  &language/assembly/compile-bytecode.scm	g  importsS	g  system	g  base	g  pmatch	 	 	g  target	 	 	 	 	g  vm	g  instruction	 	 	g  rnrs	g  bytevectors	 	 	g  srfi	 g  srfi-1	!  	"g  selectS	#g  fold	$# 	%!"$ 	&% 	'g  exportsS	( 	)g  set-current-module	*) 	+) 	,g  assq-ref	-g  error	.f  jump too far forward	/f  jump too far backwards	0g  big	1g  instruction->opcode	2g  instruction-length	3f  $unhanded variable-length instruction	4g  length	5g  for-each	6f  !bad number of args to instruction	7g  prompt	8g  mv-call	9g  bind-optionals/shuffle-or-br	:g  br-if-nargs-gt	;g  br-if-nargs-lt	<g  br-if-nargs-ne	=g  br-if-not-null	>g  
br-if-null	?g  br-if-not-eq	@g  br-if-eq	Ag  	br-if-not	Bg  br-if	Cg  br	Dg  
load-array	Eg  bytevector-length	Fg  bytevector-copy!	Gg  load-symbol	Hg  string-length	Ig  char->integer	Jg  
string-ref	Kg  load-wide-string	Lg  string->utf32	Mg  load-string	Ng  load-number	Og  make-char32	Pg  load-program	Qg  byte-length	Rg  make-bytevector	Sf  failed to fill bytevector	Tg  target-endianness	Uf  bad assemblyC 5  hp  r   ]4	
&'(5 4+ >  "  G   ,-./0      h   i   ] LM LC     a       g  filenamef  &language/assembly/compile-bytecode.scm
	\				]		
	]	 		
   C12345   h   s   ]LM  M N Ck       g  x
		  g  filenamef  &language/assembly/compile-bytecode.scm
 			 	' 		   C6789:;<=>?@ABCDEFGHIJKLMNOPQ# h(      ]
M 4L L>  "  G  M C         g  asm
		& g  address		& g  start			&  g  filenamef  &language/assembly/compile-bytecode.scm
	n			o			p		$	q	$	%	q	 		&	   C + hH    ]H"  v454J5 	       $  6  $  6M 
LMM LMM 	LM	M 	M	NCMLO K  4545$  LMMN"   " 	" 	W" " " 9" ~" " " I" " " e" " " ?" " #" "  "  7
$  	 64
5$  LLO 6 6 $  ^  
		&  H
$  =

$  ((  LMMN"h"p"l"h"d"` $  ^  
		&  H
$  =

$  ((  LMMN"""""" $   
		&  
$  

$  $  $  $  $  y$  d(  PLMMNLMMNLMMNLMMNLMMNLMMN""""""""""" $    
		&  i
$  ^

$  I$  4(   LMMNLMMN"k"g"c"_"["W"S $    
		&  i
$  ^

$  I$  4(   LMMNLMMN""""""" $    
		&  i
$  ^

$  I$  4(   LMMNLMMN"W"K"G"C"?";"7 $  =  
		&  '
$  

(  """"" $  =  
		&  '
$  

(  """"" $  =  
		&  '
$  

(  "w"_"["W"S $  =  
		&  '
$  

(  "/"""" $  =  
		&  '
$  

(  """"" $  =  
		&  '
$  

(  ""{"w"s"o $  =  
		&  '
$  

(  "W"/"+"'"# $    
		&  x
$  m

(  Y45LM	LM	 LM	 M	N4
LM>  "  G  MNC"""" $    
		&  
$  

(  w45LM	LM	 LM	 M	N"  ,$  LM4 4!55""  
"MNC"""" $    
		"&  
$  x

(  d4#L545LM	LM	 LM	 M	N4
LM>  "  G  MNC"/"+"'"# $    
		$&  
$  

(  w45LM	LM	 LM	 M	N"  ,$  LM4 4!55""  
"MNC"t"p"l"h $    
		%&  
$  

(  w45LM	LM	 LM	 M	N"  ,$  LM4 4!55""  
"MNC"""" $  G  
		&&  1
$  &

(  LMM	NC"c"_"["W $    
		'&  
$  

$  $  yLMLM	N$  4(5"  
LMLM	N4)*LLO 
>  "  G  $  
 "C"""""         g  asm
	E g  labels	E g  address		E g  emit-opcode?		E g  get-addr		E g  label				 g  offset			 g  start	   g  inst	 E g  args	 E g  opcode	 E g  len	 E g  vx		Y g  vy	
Y g  vx	r g  vy	r g  vx	 g  vy	 g  vx		 g  vy	
 g  vx	 g  vy	 g  vx	 g  vy	 g  vx		+( g  vy	
+( g  vx	D  g  vy	D  g  vx	U g  vy	U g  vx	f g  vy	f g  vx	w g  vy	w g  vx	 g  vy	 g  vx	 g  vy	 g  vx	 g  vy	 g  vx		9 g  vy	
9 g  vx	R g  vy	R g  vx	c g  vy	c g  vx	t g  vy	t g  vx		< g  vy	
< g  vx	4 g  vy	4 g  vx	0 g  vy	0 g  vx	, g  vy	, g  vx		M g  vy	
M g  vx	f g  vy	f g  vx	w g  vy	w g  vx	 g  vy	 g  vx		 g  vy	
 g  vx	 g  vy	 g  vx		V g  vy	
V g  vx	8N g  vy	8N g  vx		g g  vy	
g g  vx	 g  vy	 g  vx		 g  vy	
 g  vx	 g  vy	 g  vx		. g  vy	
. g  vx	& g  vy	& g  vx		?v g  vy	
?v g  vx	Xn g  vy	Xn g  vx		 g  vy	
 g  vx	 g  vy	 g  vx		W g  vy	
W g  vx	O g  vy	O g  len	K g  vx		h g  vy	
h g  vx	 g  vy	 g  len	 g  i	 g  vx		 g  vy	
 g  vx	8 g  vy	8 g  x	K g  len	T g  vx			i g  vy	
	i g  vx		a g  vy		a g  len		] g  i		!	M g  vx			z
  g  vy	
	z
  g  vx		
 g  vy		
 g  len		
 g  i		
 g  vx		
1
r g  vy	

1
r g  vx	
J
j g  vy	
J
j g  vx		
A g  vy	

A g  vx	
9 g  vy	
9 g  vx	
5 g  vy	
5 g  vx	
1 g  vy	
1 g  x	

  g  filenamef  &language/assembly/compile-bytecode.scm
	U				^		
	_			_	6		_	3		_			_	
	(	`		)	`		-	`		1	`	1	5	`	*	@	a		A	a		E	`		I	a	4	M	a	-	T	b	 	[	
 	d	 	e	 	d	 	f	 	g	 	f	
 	h	 	i	 	j	 	 	! 	% 	& 	/ 	3 	B 	F 	L 	L	j	 	) 	C	j	 	
 	.	j	 	 	 	 	 	 	 		j	 	+ 	; 	K	j	 	+ 	;( 	K,	j	 	+ 	; 	K	j	 	#	j	J 	N	j	 	!	j	 		j	" 	&	j	j 	n	j	 		j			 O	j		~	"	j	C	}	'	j		|	"	a	j			{	"
	j	
\	z	 
j	j	
	l	
	m	
	m	*
	m	&
	m	
	n		t	!	y	(/	y	5	j	 f	E	  g  nameg  write-bytecode CRE-SPQTU 
      h    - 1 3 	"  d
HHO Q 4	5K4 
>  "  G  J45$  DJ456 $    &  t$  e$  M$  44	$  45"  
545 "'	 6	 6	 6	 6	 6        g  assembly
		 g  env		 g  opts			 g  bv			q g  target-endianness			q g  pos			q g  u32-bv			q g  write-bytecode			q g  vx		~ g  vy		~ g  vy	   g  vx	   g  vy	   g  vx	    g  filenamef  &language/assembly/compile-bytecode.scm
	
		'			(		-	,		6 		; 		B 		M 		T 	
	X 		` 	
	d 		i 		q 	
	t 	  	  	%  	(  	0  	,  	%  	  	  	  	  	
  	  	
  	  	
 	 	

 	 	
 #			
	  g  nameg  compile-bytecode CRC  j       g  m
		,  g  filenamef  &language/assembly/compile-bytecode.scm		
l	
 	n
   C6                                                                                                                                                                                                                                                                                                                                                                                                                     ccache/language/tree-il/effects.go                                                                  0000644                 00000125024 15154557173 0013065 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] 4      h6      ] g  guile	 	g  define-module*	 	 	g  language	g  tree-il	g  effects		 	
g  filenameS	f  language/tree-il/effects.scm	g  importsS	 	 	g  
primitives	 	 	g  ice-9	g  match	 	 	 	g  exportsS	g  make-effects-analyzer	g  &mutable-lexical	g  	&toplevel	g  &fluid	g  &definite-bailout	g  &possible-bailout	g  &zero-values	g  &allocation	 g  &mutable-data	!g  &type-check	"g  &all-effects	#g  effects-commute?	$g  exclude-effects	%g  effect-free?	&g  	constant?	'g  depends-on-effects?	(g  causes-effects?	) !"#$%&'( 	*g  set-current-module	+* 	,* 	-g  make-syntax-transformer	.- 	/- 	0g  define-effects	1g  macro	2g  $sc-dispatch	32 	42 	5g  _	6g  any	7g  each-any	867	958	:g  iota	;g  length	<g  syntax-object	=g  begin	>g  top	?> 	@g  ribcage	A@ 	Bg  n	CB 	D? 	Ef  l-a141b7f3b9a-1d09	FE 	G@CDF 	Hg  all	Ig  name	JHI 	K?? 	Lf  l-a141b7f3b9a-1d02	Mf  l-a141b7f3b9a-1d03	NLM 	O@JKN 	Pg  x	QP 	Rf  l-a141b7f3b9a-1cff	SR 	T@QDS 	U?AGOAT 	Vg  hygiene	WV 	X<=UW 	Yg  append	ZY 	[Y 	\g  map	]\ 	^\ 	_g  define-syntax	`<_UW 	ag  identifier-syntax	b<aUW 	cg  ash	d<cUW 	e<UW 	fg  *	g<fUW 	h<	UW 	ih 	jg  logior	k<jUW 	lg  syntax-violation	ml 	nl 	of  -source expression failed to match any pattern	pg  identifier?	qp 	rp 	sg  m-a141b7f3b9a-1d0f	ts> 	ug  id	vu 	wg  m-a141b7f3b9a-1d10	xw> 	yx 	zf  l-a141b7f3b9a-1d17	{z 	|@vy{ 	}f  l-a141b7f3b9a-1d12	~} 	@Qy~  g  shift t|AAGOAT 
 <cW  <W  <fW  |A  <
W  <	W      57 f  l-a141b7f3b9a-1d1a   @Qy  tAAGOAT 
 <cW  <W  <fW  A  <
W  <	W      g  m-a141b7f3b9a-1d1d >    f  l-a141b7f3b9a-1d24   @v  f  l-a141b7f3b9a-1d1f   @Q  tAAGOAT 
 <cW  <W  <fW  A  <W  <	W      f  l-a141b7f3b9a-1d27   @Q  tAAGOAT 
 <cW  <W  <fW  A  <W  <	W      g  m-a141b7f3b9a-1d2a >    f  l-a141b7f3b9a-1d31   @v  f  l-a141b7f3b9a-1d2c   @Q  tAAGOAT 
 <cW  <W  <fW  A  <	W  <	W      f  l-a141b7f3b9a-1d34   @Q  tAAGOAT 
 <cW  <W  <fW  A  <	W  <	W      g  m-a141b7f3b9a-1d37 >    f  l-a141b7f3b9a-1d3e   @v  f  l-a141b7f3b9a-1d39   @Q  tAAGOAT 
 <cW  <W  <fW  A  <	W  <	W      f  l-a141b7f3b9a-1d41   @Q  tAAGOAT 
 <cW  <W  <fW  A  <	W  <	W      g  m-a141b7f3b9a-1d44 >    f  l-a141b7f3b9a-1d4b   @v  f  l-a141b7f3b9a-1d46   @Q  tAAGOAT 
 <cW  <W  <fW  A  <	W  <	W    f  l-a141b7f3b9a-1d4e @Q tAAGOAT 
<cW <W 	<fW 
A <	
W <	W 	  g  m-a141b7f3b9a-1d51>  f  l-a141b7f3b9a-1d58 @v f  l-a141b7f3b9a-1d53 @Q tAAGOAT 
<cW <W <fW A <	W <	W    !f  l-a141b7f3b9a-1d5b"! #@Q" $t#AAGOAT 
%<c$W &<$W '<f$W (#A )<	(W *<	$W +')* ,%&+ -g  m-a141b7f3b9a-1d5e.-> /. 0f  l-a141b7f3b9a-1d6510 2@v/1 3f  l-a141b7f3b9a-1d6043 5@Q/4 6t2A5AGOAT 
7<c6W 8<6W 9<f6W :2A5 ;<	:W <<	6W =9;< >78= ?f  l-a141b7f3b9a-1d68@? A@Q/@ BtAA5AGOAT 
C<cBW D<BW E<fBW FAA5 G<	FW H<	BW IEGH JCDI Kg  m-a141b7f3b9a-1d6bLK> ML Nf  l-a141b7f3b9a-1d72ON P@vMO Qf  l-a141b7f3b9a-1d6dRQ S@QMR TtPASAGOAT 
U<cTW V<TW W<fTW XPAS Y<	XW Z<	TW [WYZ \UV[ ]f  l-a141b7f3b9a-1d75^] _@QM^ `t_ASAGOAT 
a<c`W b<`W c<f`W d_AS e<	dW f<	`W gcef habg ig  m-a141b7f3b9a-1d78ji> kj lf  l-a141b7f3b9a-1d7fml n@vkm of  l-a141b7f3b9a-1d7apo q@Qkp rtnAqAGOAT 
s<crW t<rW u<frW vnAq w<	vW x<	rW yuwx zsty {f  l-a141b7f3b9a-1d82|{ }@Qk| ~t}AqAGOAT 
<c~W <~W <f~W }Aq <	W <	~W   g  m-a141b7f3b9a-1d85>  f  l-a141b7f3b9a-1d8c @v f  l-a141b7f3b9a-1d87 @Q tAAGOAT 
<jW ?A <W <W <W <W <W <W <W < W <!W  
f  l-a141b7f3b9a-1d8f @Q tAAGOAT 
<jW ?A <W <W <W <W <W <W <W < W <!W  
g  &no-effectsg  m-a141b7f3b9a-1d92>  f  l-a141b7f3b9a-1d99 @v f  l-a141b7f3b9a-1d94 @Q ?A <
W f  l-a141b7f3b9a-1d9c @Q ?A <
W g  &all-effects-but-bailoutg  logandg  m-a141b7f3b9a-1d9f>  f  l-a141b7f3b9a-1da6 @v f  l-a141b7f3b9a-1da1 @Q ?A <W <"W g  lognot<W <W   f  l-a141b7f3b9a-1da9 @Q ?A <W <"W <W <W   g  % cause-procedureg  cause56 g  syntax-parameterizeg  m-a141b7f3b9a-1dad> g  t-a141b7f3b9a-1dac  f  l-a141b7f3b9a-1db2 @ f  l-a141b7f3b9a-1daf @Q g  	proc-nameg  args f  l-bde397a-8e8f  l-bde397a-8e9 @K g  formalsg  bodyI ??? f  l-bde397a-8dff  l-bde397a-8e0f  l-bde397a-8e1 @ g  make-procedure-nameg  prefix ?? f  l-bde397a-8d3f  l-bde397a-8d1  @  f  l-bde397a-8d0 @QD AAAAA V < ?A 	<W 
<a <W 
 	  g  lambda< g  effect<W  <cW <W    f  Wrong number of arguments?A <W g  % &depends-on-procedureg  &depends-ong  m-a141b7f3b9a-1dc8>  g  t-a141b7f3b9a-1dc7!  " #f  l-a141b7f3b9a-1dcd$# %@!"$ &f  l-a141b7f3b9a-1dca'& (@Q"' )%A(AAAA *<) +?%A( ,<+W -<a) .<+W /-. 0,/ 10 2<) 3g  a4<3+W 54 6<+W 7<"+W 8647 9258 :*19 ;?A( <<;W =g  % &causes-procedure>g  &causes?g  m-a141b7f3b9a-1ded@?> Ag  t-a141b7f3b9a-1decBA C@ Df  l-a141b7f3b9a-1df2ED F@BCE Gf  l-a141b7f3b9a-1defHG I@QCH J@FAIAAAA K<J L?FAI M<>LW N<aJ O<=LW PNO QMP RQ S<J T<3LW UT V<LW W<LW X<"LW YWX ZVTY [SUZ \KR[ ]?AI ^<=]W _g  % depends-on-effects?-procedure`566 ag  m-a141b7f3b9a-1e65ba> cg  t-a141b7f3b9a-1e63dg  t-a141b7f3b9a-1e64ecd fbb gf  l-a141b7f3b9a-1e6ahf  l-a141b7f3b9a-1e6bigh j@efi kb lf  l-a141b7f3b9a-1e67ml n@Qkm objAnAAAA p<o q?jAn r<'qW s<ao t<_qW ust vru wv x<o y<PqW z<qW {yz |g  not}<|qW ~g  zero?<~qW <qW <qW y z  } x{ pw ?An <_W g  % causes-effects?-procedureg  m-a141b7f3b9a-1e9f> g  t-a141b7f3b9a-1e9dg  t-a141b7f3b9a-1e9e  f  l-a141b7f3b9a-1ea4f  l-a141b7f3b9a-1ea5 @  f  l-a141b7f3b9a-1ea1 @Q AAAAA < ?A <(W <a <W    < <PW <W  <|W <~W <W <>W  <W       ?A <W g  % effects-commute?-procedureg  m-a141b7f3b9a-1ef9> g  t-a141b7f3b9a-1ef7g  t-a141b7f3b9a-1ef8  f  l-a141b7f3b9a-1efef  l-a141b7f3b9a-1eff @  f  l-a141b7f3b9a-1efb @Q AAAAA < ?A <#W <a <W    < <3W g  b<W  g  and<W <|W <(W <W          ?A <W g  make-hash-tableg  	hashq-refg  
hashq-set!g  <prompt>g  <abort>g  error  f  no matching patterng  
<sequence>g  <lambda-case>g  or-mapg  <lambda>g  <application>g  <lexical-ref>g  make-applicationg  <primitive-ref>g  bailout-primitive?g  effect-free-primitive?g  constructor-primitive?g  accessor-primitive?g  make-prompt-tagg  vectorg  listg  consg  list?g  symbol?g  vector?g  struct?g  string?g  number? g  char?g  null?g  pair?g  equal?g  eqv?g  eq?g  valuesg  <conditional>g  <toplevel-set>	g  <toplevel-define>
g  <module-set>g  <module-ref>g  <toplevel-ref>g  <dynset>g  <dynref>g  <dynlet>g  	<dynwind>g  <let-values>g  <fix>g  <letrec>g  <let>g  <lexical-set>g  <void>g  <const>C 5     h@o     ]4	
)5 4, >  "  G   4/0149:;47X[^`bdegi        h    ^   ]    C  V       g  tmp-a141b7f3b9a-1d0d
		 g  tmp-a141b7f3b9a-1d0c		  			   C`bk h0   )   ]44 L5L L   5C      !       g  n
		*  		*   Cno        h8      ]445545$   O @6        g  all
		7 g  name		7 g  tmp			7 g  tmp			7  g  filenamef  language/tree-il/effects.scm		>			>	$		>			>	 		7	   Cno   h(   o   ]	4 5$  @ 6      g       g  x
		" g  tmp		"  g  filenamef  language/tree-il/effects.scm
	;	 		"   C50R4/1r      h   `   ] 6X       g  id
		  g  filenamef  language/tree-il/effects.scm		O
 		   C  h   *   ]C   "       g  id
		  		   C4    h   )   ] C!       g  x
		  		   Cno        h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  language/tree-il/effects.scm
	O
 		:  g  
macro-typeg  identifier-syntax C5R4/1r  h   `   ] 6X       g  id
		  g  filenamef  language/tree-il/effects.scm		O
 		   C  h   *   ]C   "       g  id
		  		   C4    h   )   ] C!       g  x
		  		   Cno        h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  language/tree-il/effects.scm
	O
 		:  g  
macro-typeg  identifier-syntax C5R4/1r  h   `   ] 6X       g  id
		  g  filenamef  language/tree-il/effects.scm		O
 		   C  h   *   ]C   "       g  id
		  		   C4    h   )   ] C!       g  x
		  		   Cno        h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  language/tree-il/effects.scm
	O
 		:  g  
macro-typeg  identifier-syntax C5R4/1r  h   `   ] 6X       g  id
		  g  filenamef  language/tree-il/effects.scm		O
 		   C  h   *   ]C   "       g  id
		  		   C4    h   )   ] C!       g  x
		  		   Cno        h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  language/tree-il/effects.scm
	O
 		:  g  
macro-typeg  identifier-syntax C5R4/1r  h   `   ] 6X       g  id
		  g  filenamef  language/tree-il/effects.scm		O
 		   C h   *   ]C   "       g  id
		  		   C4   h   )   ] C!       g  x
		  		   Cno        h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  language/tree-il/effects.scm
	O
 		:  g  
macro-typeg  identifier-syntax C5R4/1r  h   `   ] 6X       g  id
		  g  filenamef  language/tree-il/effects.scm		O
 		   C  h   *   ]C   "       g  id
		  		   C4,   h   )   ] C!       g  x
		  		   Cno        h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  language/tree-il/effects.scm
	O
 		:  g  
macro-typeg  identifier-syntax C5R4/1r  h   `   ] 6X       g  id
		  g  filenamef  language/tree-il/effects.scm		O
 		   C> h   *   ]C   "       g  id
		  		   C4J   h   )   ] C!       g  x
		  		   Cno        h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  language/tree-il/effects.scm
	O
 		:  g  
macro-typeg  identifier-syntax C5R4/ 1r  h   `   ] 6X       g  id
		  g  filenamef  language/tree-il/effects.scm		O
 		   C\ h   *   ]C   "       g  id
		  		   C4h   h   )   ] C!       g  x
		  		   Cno        h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  language/tree-il/effects.scm
	O
 		:  g  
macro-typeg  identifier-syntax C5 R4/!1r  h   `   ] 6X       g  id
		  g  filenamef  language/tree-il/effects.scm		O
 		   Cz h   *   ]C   "       g  id
		  		   C4   h   )   ] C!       g  x
		  		   Cno        h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  language/tree-il/effects.scm
	O
 		:  g  
macro-typeg  identifier-syntax C5!R4/"1r  h   `   ] 6X       g  id
		  g  filenamef  language/tree-il/effects.scm		O
 		   C h   *   ]C   "       g  id
		  		   C4   h   )   ] C!       g  x
		  		   Cno        h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  language/tree-il/effects.scm
	O
 		:  g  
macro-typeg  identifier-syntax C5"R4/1r h   a   ] 6Y       g  id
		  g  filenamef  language/tree-il/effects.scm		{	 		   C        h   *   ]C   "       g  id
		  		   C4   h   )   ] C!       g  x
		  		   Cno        h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  language/tree-il/effects.scm
	{	 		:  g  
macro-typeg  identifier-syntax C5R4/1r       h   b   ] 6Z       g  id
		  g  filenamef  language/tree-il/effects.scm	 	 		   C       h   *   ]C   "       g  id
		  		   C4   h   )   ] C!       g  x
		  		   Cno        h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  language/tree-il/effects.scm
 	 		:  g  
macro-typeg  identifier-syntax C5R   h      ] C        g  effect
		  g  filenamef  language/tree-il/effects.scm
 
	 	 		  g  nameg  % cause-procedure CR4/14    h   :   ]  C      2       g  t-a141b7f3b9a-1dac
		
  		
   Cn        h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/effects.scm	 
 		   C5r        h   P   ] L 6H       g  filenamef  language/tree-il/effects.scm	 
 		
   C h      ] C          		
   Cno        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/effects.scm
 
 		n   C5R       h      ]      UUC        g  a
		  g  filenamef  language/tree-il/effects.scm
 
	 	 		  g  nameg  % &depends-on-procedure CR4/14:   h   :   ]  C      2       g  t-a141b7f3b9a-1dc7
		
  		
   Cn        h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/effects.scm	 
 		   C5r        h   P   ] L 6H       g  filenamef  language/tree-il/effects.scm	 
 		
   C< h      ] C          		
   Cno        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/effects.scm
 
 		n   C5R       h      ]      C        g  a
		  g  filenamef  language/tree-il/effects.scm
 
	 		 	 		  g  nameg  % &causes-procedure C=R4/>14\      h   :   ]  C      2       g  t-a141b7f3b9a-1dec
		
  		
   Cn>        h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/effects.scm	 
 		   C5r        h   P   ] L 6H       g  filenamef  language/tree-il/effects.scm	 
 		
   C^ h      ] C          		
   Cno        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/effects.scm
 
 		n   C5>R  h      ] 45C        g  effects
		 g  exclude		  g  filenamef  language/tree-il/effects.scm
 
	 		 		 		 	 			  g  nameg  exclude-effects C$R h      ]      
C              g  effects
		  g  filenamef  language/tree-il/effects.scm
 
	 			 	 		  g  nameg  effect-free? C%R   h      ] 
C |       g  effects
		  g  filenamef  language/tree-il/effects.scm
 
	 	 		  g  nameg  	constant? C&R       h      ]      UU
C          g  x
		 g  effects		  g  filenamef  language/tree-il/effects.scm
 
	 		 		 		 	 			  g  nameg  % depends-on-effects?-procedure C_R4/'14`    h   Z   ]  C    R       g  t-a141b7f3b9a-1e63
		 g  t-a141b7f3b9a-1e64		  			   Cn' h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/effects.scm	 
 		   C5r        h   P   ] L 6H       g  filenamef  language/tree-il/effects.scm	 
 		
   C h      ] C          		
   Cno        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/effects.scm
 
 		n   C5'Rh      ]      
C        g  x
		 g  effects		  g  filenamef  language/tree-il/effects.scm
 
	 		 	"	 		 		 	 			  g  nameg  % causes-effects?-procedure CR4/(14`       h   Z   ]  C    R       g  t-a141b7f3b9a-1e9d
		 g  t-a141b7f3b9a-1e9e		  			   Cn( h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/effects.scm	 
 		   C5r        h   P   ] L 6H       g  filenamef  language/tree-il/effects.scm	 
 		
   C h      ] C          		
   Cno        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/effects.scm
 
 		n   C5(RhX      ]
     UU      
$  C      UU     
C           g  a
		T g  b		T g  effects			' g  effects		9	R  g  filenamef  language/tree-il/effects.scm
 
	 		 		+ 		9 		9 		S 	 		T	  g  nameg  % effects-commute?-procedure CR4/#14` h   Z   ]  C    R       g  t-a141b7f3b9a-1ef7
		 g  t-a141b7f3b9a-1ef8		  			   Cn# h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/effects.scm	 
 		   C5r        h   P   ] L 6H       g  filenamef  language/tree-il/effects.scm	 
 		
   C h      ] C          		
   Cno        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/effects.scm
 
 		n   C5#R   h   `   ]C    X       g  x
		  g  filenamef  language/tree-il/effects.scm
 	5 		   C      h8      ]	4L  5$  C4L 54L  >  "  G  C       g  exp
		8 g  t		8 g  effects		8  g  filenamef  language/tree-il/effects.scm
 		 		 		 		 		  	 		8  g  nameg  compute-effects C h0      ]"  (  C4L 5" 
"       g  exps
		0 g  exps		% g  out			%  g  filenamef  language/tree-il/effects.scm
 		 		 	
	 		 	)	 	:	 	)	 		% 		% 	 		0  g  nameg  accumulate-effects C$; |	
 9 hX     ]Y" 2" " " c" " -" " " " \" " 0" 
" " b" " " f" 6" " $" 	" " j" " D" " " 6" " N"  " " ) $  &   
  	 	4L 5$  "  $4L54L >  "  G  4L 5$  "  $4L54L >  "  G  4L 5$  "  $4L54L >  "  G  C &    
  	 	     ?C4 56 4 56  $   &   
 "  $  (  O4L 5$  "  $4L54L >  "  G  4	 5C4L 5$  "  $4L54L >  "  G  "N456 
"6"" $   
&   
  	 	 	 	 	 	 	4	4L5	@54L5$    "  
4L 5$  "  $4L54L >  "  G  $  B4L 5$  "  $4L54L >  "  G  "  
C"" $   &   
  	
C"" $  ' &   
  	     ?C"" $   &   
 $  &  s
	 	4L5$  B454L 5$  C4L54L >  "  G  C     ?C"""" $  a &  T 
 $  >&  1
45$   	4L5  C"n"j"f"b"^ $  &  
 $ & 
	 	4L5"  "   &  " 4455 " ~$  Y
&  L4L 5$  "  $4L54L >  "  G         " """|$ 
&  
	&  	&  	&  	(  				

&  d4L 	5$  "  $4L	54L 	>  "  G  4545$  
"  	       "  "
	"  ""  ""  ""  "t"  "f"  "^C"d"`"\"X $   &  | 
 $  f&  Y
45$  ? 	4L5       45$    "  45$  @ "  
C""""" $   &   
 $  &  |
&  e 	$  S(  H4L 5$  "  $4L54L >  "  G    C""""""	" $  \ &  O 
 $  9&  ,
&   	(    C"""""" $  v &  i 
 $  S&  F
"   	4L5  C"  &  ""5&  """!""" $   &   
 $  &  
&   	$  $  (  4L 5$  "  $4L54L >  "  G  4L 5$  "  $4L54L >  "  G    C""""""""
" $  & 
 
 $ & 
" t" " &  X 	$  F(  ;4L 5$  C4L54L >  "  G  C"d"`&  X 	$  F(  ;4L 5$  C4L54L >  "  G  C"" &  X 	$  F(  ;4L 5$  C4L54L >  "  G  C""&  X 	$  F(  ;4L 5$  C4L54L >  "  G  C"D"@&  X 	$  F(  ;4L 5$  C4L54L >  "  G  C""&  X 	$  F(  ;4L 5$  C4L54L >  "  G  C"" &  X 	$  F(  ;4L 5$  C4L54L >  "  G  C"$" "!&  X 	$  F(  ;4L 5$  C4L54L >  "  G  C""""&  X 	$  F(  ;4L 5$  C4L54L >  "  G  C"\"X"#&  X 	$  F(  ;4L 5$  C4L54L >  "  G  C"""("""" $   &   
 $  u&  h
"   	L6"  8"  $"  $&  ""y%&  ""&&  ""'&  """E"A"="9 $  \ &  O 
 $  9&  ,
'&   	(   C"""""" $ ! (&  
  	 	4L 5$  "  $4L54L >  "  G  4L 5$  "  $4L54L >  "  G  4L 5$  "  $4L54L >  "  G        
$  	C		@6"" $   &  
C"" $  ` )&  S 
  		4L 5$  "  $4L54L >  "  G  C"" $  ` *&  S 
  		4L 5$  "  $4L54L >  "  G  C"" $  s +&  f 
  	 	 	      4L 5$  "  $4L54L >  "  G  C"$"  $   ,&  
      C"" $   -&  
      C"" $   .&   
  	4L 5$  "  $4L54L >  "  G  4L 5$  "  $4L54L >  "  G         	 C"" $  d /&  W 
 4L 5$  "  $4L54L >  "  G         	C"" $   0&  u 
  	 	4L54L5       	 4L 5$  "  $4L54L >  "  G  C"" $   1&   
  	 	4L 5$  "  $4L54L >  "  G  4L 5$  "  $4L54L >  "  G  4L 5$  "  $4L54L >  "  G  C")"% $   2&   
  	4L 5$  "  $4L54L >  "  G  4L 5$  "  $4L54L >  "  G         C"s"o $   3&  | 
  	 	 	4L5$    "  
4L54L 5$  "  $4L54L >  "  G  C"" $   4&   
  	 	 	 	4L5$    "  
4L54L 5$  "  $4L54L >  "  G  C"="9 $   5&  | 
  	 	 	4L5$    "  
4L54L 5$  "  $4L54L >  "  G  C"" $  f 6&  Y 
  	 		4L 5$  "  $4L54L >  "  G  C"0", $  - &    
  	4L5$  C
C"" $   7&  
C"" $   8&  
C""            g  exp
	R g  w p g  w	 p g  w	 p g  t	   g  effects	   g  t	 / g  effects	, g  t	9n g  effects	Nk g  w g  exps	 g  effects	 g  w	/ g  t	# g  effects	  g  w	5 g  x	5 g  t	Dy g  effects	Yv g  w g  w	 g  w	 g  w	 g  t	N g  effects	.K g  t	^ g  effects	s g  w g  w	8 g  w	? g  t	H g  exp	Z g  t	e g  effects	w g  w g  w	 g  w	 g  w1 g  w	R
 g  w	Y
 g  t	 g  effects	 g  w	 g  w	 g  w	 g  w	* g  w	8 g  w		K g  w	
R g  t	d g  effects	y g  w3 g  w	N g  w	` g  w] g  w	U g  w	Q g  w	I g  t	D g  effects	$A g  w~ g  w	 g  w	 g  w	E g  w		 	= g  w			 g  w	f
P g  w		
H g  w		
D g  w		
@ g  x		
@ g  w		
8 g  t			 g  effects			 g  t		
2 g  effects	

/ g  w
qr g  w	
j g  w	

 g  w	

 g  t	

 g  effects	

 g  w	Z g  w	R g  t	%R g  effects	7R g  w	g g  w	z g  t	 g  effects	 g  w	 g  w	 g  t	 g  effects	 g  w	'z g  w	:r g  t	Er g  effects	Wr g  w	 g  w	 g  t	 g  effects	 g  w	: g  w	2 g  t	2 g  effects	2 g  w	K g  w	^ g  t	i g  effects	{ g  w	 g  w	 g  t	 g  effects	 g  w	f g  w	&^ g  t	1^ g  effects	C^ g  w g  w	 g  w	 g  w6| g  w	Qt g  w	`p g  w g  w	 g  w	 g  t	 g  effects	 g  t	) g  effects		& g  t	2g g  effects	Gd g  tfx	g g  cfx	g g  afx	g g  x	u g  w- g  t	+ g  effects	( g  wT g  t	a g  effects	v g  w g  t	 g  effects	 g  w{ g  w	 g  t	 g  effects	 g  t	  g  effects	 g  w0~ g  t	;p g  effects	Pm g  w g  w	 g  w	 g  t		 g  effects	 g  w, g  w	3 g  w	: g  t	Ez g  effects	Zw g  t	 g  effects	 g  t	 g  effects	 g  w g  w	! g  t	,a g  effects	A^ g  t	j g  effects	 g  w? g  w	? g  w	? g  t	= g  effects	: g  wl g  w	s g  w	z g  t	 g  effects	 g  w m g  w	m g  w	m g  t	6k g  effects	Kh g  w g  t	 g  effects	 g  w  g  filenamef  language/tree-il/effects.scm
 		 	  	  	  	  	  	  	  		 	 	 	0r	1 	9 	H 	N 	Q 	or	s 	w	 	g	h	 	 	 	 	 	$m	+m	1-m	.j	2h	< 	D 	S 	Y 	\ 	|o	o	h	g	 	^	^	$^	`	`	
a	^	 	 	( 	. 	1 	O^	Ud	V 	^ 	m 	s 	v 	^	 	X	 	BO	HN	QQ	#ZQ	] 	e 	q 	w 	z 	S	 	G	H	G	I	G	 	\4	f5	tA	y5	 	 	 	 	 	=	<	5	\ 	d 	s 	y 	| 	8	%8	28	"8	:	"7	5		4	 	c*	r+	s*	t,	~,	-	.	.	*	 	 	 	 	$ 	' 	G!	)H!	M 		 					-			 		 		 		 		 		 		 		 	
 	
 	
 	
3	
6	
7	
< 	
 	
 	
 	
 	
 	
 	 	% 	1 	7 	: 	V 	} 	 	 	 	 	 	 	 	 	 	 	 	= 	E 	Q 	W 	Z 	v 	 	 	 	 	 	 	 	 	 	 	 	6 	a 	i 	u 	{ 	~ 	 	 	 	 	 	 	 	) 	1 	= 	C 	F 	b 		 	k	p 	 	 	 	 	 	 	 	 		 	 	* 	2 	A 	G 	J 	g 	t 	.u 	"u 	 	 		"	 	 	 	 	 	 	 	, 	1 	X 	Y 	a 	p 	v 	y 	 	 	 	 	 	 	 	 	 	 	7 	< 	Y 	^ 	 	 	 	 	 	 	 	 	 	 	 	
 	 	 	 	 	3 	; 	J 	P 	S 	y 	z 	 	 	 	 	 	 	 	 	 	 	 	 	 	
 	 	= 	E 	T 	Z 	] 	{ 	 	 	 	 	 	 	 	 	 	 	 	 	$ 	, 	; 	A 	D 	b 	j 	y 	 	 	 	 	 	 	 	 	 	 	 	  	 	 	 	  	> 	C 	} 	 	 	 	 	 	 	 	 	 	 	 	 	 	  	& 	- 	. 	6 	E 	K 	N 	l 	q 	 	 	 	 	 	 	 	 	 	 	 	~	R  g  nameg  visit C     hX      - . , 3 #  O O O LQ Q LL Q  6             g  exp
		R g  lookup		R g  compute-effects		3	R g  accumulate-effects		3	R g  visit		3	R  g  filenamef  language/tree-il/effects.scm
 		Rz	 		R  g  nameg  compute-effects C  h    >  ]45 O  Q C    6      g  assigned-lexical?
		 g  cache		 g  compute-effects			  g  filenamef  language/tree-il/effects.scm
 
	 		 	 		  g  nameg  make-effects-analyzerg  documentationf  VReturns a procedure of type EXP -> EFFECTS that analyzes the effects
of an expression. CRC            g  m
		,  g  filenamef  language/tree-il/effects.scm		
 
 
" 
& 
'C 
' 
( 
, 
0 
o9 
 	o;
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                             ccache/language/tree-il/fix-letrec.go                                                               0000644                 00000046537 15154557173 0013523 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0GM      ]  4      h      ] g  guile	 	g  define-module*	 	 	g  language	g  tree-il	g  
fix-letrec		 	
g  filenameS	f  language/tree-il/fix-letrec.scm	g  importsS	g  system	g  base	g  syntax	 	 	g  srfi	g  srfi-1	 	 	g  srfi-11	 	 	 	 	g  effects	 	 	 	g  exportsS	 g  fix-letrec!	!  	"g  set-current-module	#" 	$" 	%g  <lexical-set>	&% 	'% 	(g  lexical-set-exp	)g  <module-set>	*) 	+) 	,g  module-set-exp	-g  <toplevel-set>	.- 	/- 	0g  toplevel-set-exp	1g  <toplevel-define>	21 	31 	4g  toplevel-define-exp	5g  <conditional>	65 	75 	8g  conditional-test	9g  conditional-consequent	:g  conditional-alternate	;g  <application>	<; 	=; 	>g  application-proc	?g  application-args	@g  
<sequence>	A@ 	B@ 	Cg  sequence-exps	Dg  <lambda>	ED 	FD 	Gg  lambda-body	Hg  <lambda-case>	IH 	JH 	Kg  lambda-case-inits	Lg  lambda-case-body	Mg  lambda-case-alternate	Ng  <let>	ON 	PN 	Qg  let-vals	Rg  let-body	Sg  <letrec>	TS 	US 	Vg  letrec-vals	Wg  letrec-body	Xg  <fix>	YX 	ZX 	[g  fix-vals	\g  fix-body	]g  <let-values>	^] 	_] 	`g  let-values-exp	ag  let-values-body	bg  	<dynwind>	cb 	db 	eg  dynwind-body	fg  dynwind-winder	gg  dynwind-unwinder	hg  <dynlet>	ih 	jh 	kg  dynlet-fluids	lg  dynlet-vals	mg  dynlet-body	ng  <dynref>	on 	pn 	qg  dynref-fluid	rg  <dynset>	sr 	tr 	ug  dynset-fluid	vg  
dynset-exp	wg  <prompt>	xw 	yw 	zg  
prompt-tag	{g  prompt-body	|g  prompt-handler	}g  <abort>	~} 	}  g  	abort-tag g  
abort-args g  
abort-tail g  fix-fold g  <void> g  <const> g  <lexical-ref> g  lexical-ref-gensym g  memq g  simple-expression? g  and-map g  primitive-ref? g  delq g  lset-adjoin g  eq? g  lexical-set-gensym g  letrec-gensyms g  append g  let-gensyms g  letrec-in-order? g  effect-free? g  exclude-effects g  make-effects-analyzer g  lset-difference g  lambda? g  partition-vars g  make-sequence g  reverse g  make-sequence* g  post-order! g  	make-void g  
letrec-src g  letrec-names g  map g  list g  make-let g  cadr g  car g  caddr g  make-fix g  make-lexical-set g  module-gensym f  fixlr g  make-lexical-ref g  let-src g  	let-names g  assq g  lset-intersectionC 5hH@     ]4	
!5 4$ >  "  G    hh   s  , 3 (  D4 >  G 
	 	
 "  k      g  proc
		f g  exps		f g  unref			f g  ref			f g  set			f g  simple			f g  lambda			f g  complex			f g  unref		2	f g  ref			2	f g  set	
	2	f g  simple		2	f g  lambda		2	f g  complex		2	f  g  filenamef  language/tree-il/fix-letrec.scm
		 		f	  g  nameg  fold-values C'(+,/034789:=>?BCFGJKLMPQRUVWZ[\_`adefgjklmpqtuvyz{| 9h0    ]4L >  G 
	 &  #4 54L 	
> " &  #4 54L 	
> " &  #4 54L 	
> c" ^&  #4 54L 	
> 8" 3	&  4
 54 54 54L 	
>  G 4L >  G 4L > " &  T4 54 54L 	
>  G 4LL > S" N&  %4 54LL 	
> &" !&  ?4 5$  4L 	
> "  	
	" " &  4 54 54 54LL 	
>  G $  @4L >  G 4L > N"  4L > 4" /&  T4 54 54LL 	
>  G 4L > " &  T4 54 54LL 	
>  G 4L > |" w&  T4 54  54LL 	
>  G 4L >  " !&  R4" 54# 54L 	
>  G 4L > " $&  4% 54& 54' 54L 	
>  G 4L >  G 4L > =" 8(&  4) 54* 54+ 54LL 	
>  G 4LL >  G 4L > " ,&  #4- 54L 	
> " .&  R4/ 540 54L 	
>  G 4L > +" &1&  42 543 544 54L 	
>  G 4L >  G 4L >  "  5&  46 547 548 54L 	
>  G 4LL >  G 4L >  "  	
	"  G L 6        g  tree
	. g  unref	. g  ref		. g  set		. g  simple		. g  lambda		. g  complex		. g  unref		. g  ref		. g  set			. g  simple	
	. g  lambda		. g  complex		. g  rtd		+ g  exp		<	T g  exp		g	 g  exp	   g  exp	   g  test	 ^ g  
consequent	 ^ g  	alternate	 ^ g  unref	^ g  ref	^ g  set	^ g  simple	^ g  lambda	^ g  complex	^ g  unref	9^ g  ref	9^ g  set	9^ g  simple	9^ g  lambda	9^ g  complex	9^ g  proc	x g  args	x g  unref	 g  ref	 g  set	 g  simple	 g  lambda	 g  complex	 g  exps	 g  body	. g  inits	O g  body	O g  	alternate	O g  unref	n g  ref	n g  set	n g  simple	n g  lambda	n g  complex	n g  unref	 g  ref	 g  set	 g  simple	 g  lambda	 g  complex	 g  vals	5 g  body	5 g  unref	5 g  ref	5 g  set	5 g  simple	5 g  lambda	5 g  complex	5 g  vals	O g  body	O g  unref	l g  ref	l g  set	l g  simple	l g  lambda	l g  complex	l g  vals	 g  body	 g  unref	 g  ref	 g  set	 g  simple	 g  lambda	 g  complex	 g  exp	G g  body	G g  unref	"G g  ref	"G g  set	"G g  simple	"G g  lambda	"G g  complex	"G g  body	h g  winder	h g  unwinder	h g  unref	 g  ref	 g  set	 g  simple	 g  lambda	 g  complex	 g  unref	 g  ref	 g  set	 g  simple	 g  lambda	 g  complex	 g  fluids	] g  vals	] g  body	] g  unref	] g  ref	] g  set	] g  simple	] g  lambda	] g  complex	] g  unref	8] g  ref	8] g  set	8] g  simple	8] g  lambda	8] g  complex	8] g  fluid	p g  fluid	 g  exp	 g  unref	 g  ref	 g  set	 g  simple	 g  lambda	 g  complex	 g  tag	k g  body	k g  handler	k g  unref	 k g  ref	 k g  set	 k g  simple	 k g  lambda	 k g  complex	 k g  unref	Fk g  ref	Fk g  set	Fk g  simple	Fk g  lambda	Fk g  complex	Fk g  tag	 g  args	 g  tail	 g  unref	 g  ref	 g  set	 g  simple	 g  lambda	 g  complex	 g  unref	 g  ref	 g  set	 g  simple	 g  lambda	 g  complex	 g  unref	. g  ref	. g  set	. g  simple	. g  lambda	. g  complex	.  g  filenamef  language/tree-il/fix-letrec.scm
		 	.	  g  nameg  foldts C h@   ;  , 	3 O 		Q 	O 

	Q 

 6     3      g  tree
		; g  down		; g  up			; g  unref			; g  ref			; g  set			; g  simple			; g  lambda			; g  complex			; g  fold-values				; g  foldts	
		;  g  filenamef  language/tree-il/fix-letrec.scm
		 		;		  g  nameg  fix-fold CR589:@C h   j   ] LL 6    b       g  x
		  g  filenamef  language/tree-il/fix-letrec.scm
	,			,	 		   C;>?        h   j   ] LL 6    b       g  x
		  g  filenamef  language/tree-il/fix-letrec.scm
	1			2	 		   C   h     ]# &  C&  C&  4 545C&  G4 54 54	 54
5$  4
5$  

6CC&  4 5O 6&  ;4 54 545$  4 5$  O 6CCC           g  x
	  g  
bound-vars	  g  simple-primcall?		  g  rtd		  g  gensym		*	7 g  test		T  g  
consequent		T  g  	alternate		T  g  exps	   g  proc	   g  args	    g  filenamef  language/tree-il/fix-letrec.scm
	!
		"		-	&	
	6	&		?	"		[	(	
	i	(		j	)	
	x	(	 	*	
 	"	 	,	 	"	 	/	
 	/	 	0	
 	/	 	1	
 	 	  g  nameg  simple-expression? CR%SN     h     ] &  '4 54545D&   4 545D&  4	 54
5D&  4 54
5DD      g  x
	  g  unref	  g  ref		  g  set		  g  simple		  g  lambda*		  g  complex		  g  rtd		  g  gensym			6 g  gensym		E	^ g  gensyms		m  g  gensyms	    g  filenamef  language/tree-il/fix-letrec.scm
	:			;			=		"	>		6	=		>	;		L	F		^	D		f	;		p	K	 	K	 	;	 	R	 	R	 	Y	 	 	   CSV      h       ]	4M  54 56              g  x
		 g  effects			  g  filenamef  language/tree-il/fix-letrec.scm
	d			e	(			e			g			f	 		  g  nameg  effect+exception-free-primcall? C      h   j   ] L 6      b       g  x
		
  g  filenamef  language/tree-il/fix-letrec.scm
	^	0	
	^	< 		
   C  h       ]	4M  54      56        g  x
		 g  effects			  g  filenamef  language/tree-il/fix-letrec.scm
	_			`	(			`			b			b	5		b			a	 		  g  nameg  effect-free-primcall? CNQ       h    ]_ & 4 54 54 5
	HO Q 4O 5K" k(  8$  4	5"  4
54
54
5D45$  l"  "$  D45$  "  4	5$  "P""45$  "45$  "4	$  "  O 5$  ""	
"& 
4 54 5	"  
(  #4
54
54
5D4
5$  

"4
5$  


""  


"a45$  04
5$  "


"%"	
"D          g  x
	 g  unref	 g  ref		 g  set		 g  simple		 g  lambda*		 g  complex		 g  rtd		 g  	in-order?		$ g  orig-gensyms			$ g  vals	
	$ g  compute-effects		+ g  effect+exception-free-primcall?		5 g  gensyms		L g  vals		L g  s		L g  l		L g  c		L g  orig-gensyms	 g  vals		 g  gensyms	
 g  vals	 g  s	 g  l	 g  c	  g  filenamef  language/tree-il/fix-letrec.scm
	Z			[		;	^		L	h		R	j		X	p	#	Y	q	'	n	u	#	w	v	# 	w	# 	p	 	x	 	x	! 	x	 	j	  	#  	1  	 	z	 	{	) 	{	2 	{	) 	z	 	|	) 	}	* 	|	) 	|	$ 	z	 		# 		1  	-  	' 		 	
 	! 		j	 	 	- 	)" 	#0 	1 	6 	$8 	<	j	? 	B 	-G 	'J 	!Z 	[ 	` 	h 	w 	{	j	~ 	 	- 	% 	 	 	 	- 	) 	# 		h		i	#	i	+	i	3	h		[	 	 	 	#  	#	 	# 	 	 	! 	! 	$ 	' 	-; 	< 	A 	!E 	I 	L 	O 	-V 	)Y 	#g 	n 	q 	-x 	){ 	# 	 	 	  	) 	  	 	% 	+ 	% 	 	 	- 	' 	! 	 	 	# 	+ 	3 	 	 x		   C     h0   E  ]14 >	  G D=      g  x
		0 g  unref		0 g  ref			0 g  set			0 g  simple			0 g  lambda*			0 g  complex			0  g  filenamef  language/tree-il/fix-letrec.scm
	6
		9		 		 		 		 		 		 			9			7		0 	 		0  g  nameg  partition-vars CRD        h     ]""  (  (  C 456&  "&  "&  "&  ""p"e             g  src
	  g  exps	  g  in		  g  out		  g  head		+  g  rtd		0   g  filenamef  language/tree-il/fix-letrec.scm
 
	 			 		 		 		 		 		! 	.	$ 	(	& 		( 		+ 		+ 		0 	
	= 		G 		O 	
	R 		\ 		d 	
	g 	!	q 		y 	
	| 	  	  	  	  	  	  	  	  	 	  g  nameg  make-sequence* CR%(SVW h0      ] (  C4 L 5$   4L 5C  "        g  binds
		/  g  filenamef  language/tree-il/fix-letrec.scm
 		 			 	 	 		 		 		 		 		 	$	" 	(	$ 	$	% 		) 		/ 	 		/  g  nameg  lp C  h      ]	O  Q L 6       g  set
		 g  lp		  g  filenamef  language/tree-il/fix-letrec.scm
 		 	 		  g  nameg  lookup C        h   l   ]6 d       g  x
		  g  filenamef  language/tree-il/fix-letrec.scm
 	*	 	6 		   C    h      ]   6            g  c
		  g  filenamef  language/tree-il/fix-letrec.scm
			1		:		.		 		   C h   u   ]6m       g  x
		  g  filenamef  language/tree-il/fix-letrec.scm
	&		7		( 		   C h       ]  4 56             g  x
		 g  tmp		  g  filenamef  language/tree-il/fix-letrec.scm
			$		-		!		6		!		  			   CNQR    h   l   ] L 6      d       g  v
		
  g  filenamef  language/tree-il/fix-letrec.scm
		
	 		
   C  h   l   ] L 6      d       g  v
		
  g  filenamef  language/tree-il/fix-letrec.scm
		
	 		
   C      h   l   ] L 6      d       g  v
		
  g  filenamef  language/tree-il/fix-letrec.scm
		
	 		
   C 'h  `  ]q &  24 54 54L5$  45 6 C& b4 54	 54
 54 54 54 545O 	Q 	4	L54	L54	L54	L 5
4454554454554454554454545444
5(  	 "  [$  445 5"  >454454544555 5556&  4 54 54 54  54! 5454"O 4#$L554%O 4#$L554&O 4#$L 55
	44544	54	54	544
54
54
555 56 C      X      g  x
	 g  rtd	 g  gensym			A g  exp			A g  src		s g  	in-order?		s g  names		s g  gensyms		s g  vals		s g  body		s g  binds	  g  lookup		  g  u	
  g  s	  g  l	  g  c	  g  tmps	n g  src	 g  names	 g  gensyms	 g  vals	 g  body	 g  binds	 g  u	4 g  l		4 g  c	
4  g  filenamef  language/tree-il/fix-letrec.scm
 		 		" 		. 	
	4 	+	< 	!	> 		I 	  	  	
  	  	  	  	  	  	  	  	$  	  	  	  	#  	  	  	  	% 		 	 	 	!  	-) 	. 	1 	? 	D 	N 	O	R	_	a	f	!n	q	u		-					 	 	 	 	 			
					(	4	4 	?%	B'	K*	P*	Y*	,b*	8k,	p,	)y,	6,	B,	*	(	%	#	 R	   C     h0      ]!4 >  G O  6            g  x
		+ g  unref		+ g  simple			+ g  lambda*			+ g  complex			+  g  filenamef  language/tree-il/fix-letrec.scm
 
	 	/	 		+ 	 		+  g  nameg  fix-letrec! C RC             g  m
		,  g  filenamef  language/tree-il/fix-letrec.scm		
	
D	!
-	6
0 
@@ 
 	@B
   C6                                                                                                                                                                  ccache/language/tree-il/compile-glil.go                                                             0000644                 00000173240 15154557173 0014026 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]a 4     hq+      ] g  guile	 	g  define-module*	 	 	g  language	g  tree-il	g  compile-glil		 	
g  filenameS	f  !language/tree-il/compile-glil.scm	g  importsS	g  system	g  base	g  syntax	 	 	g  pmatch	 	 	g  message	 	 	g  ice-9	g  receive	 	 	g  glil	 	 	g  vm	 g  instruction	!  	"! 	# 	$# 	%g  optimize	&% 	'& 	(g  canonicalize	)( 	*) 	+g  analyze	,+ 	-, 	.g  srfi	/g  srfi-1	0./ 	1g  selectS	2g  
filter-map	32 	4013 	5"$'*-4 	6g  exportsS	7 	8g  set-current-module	98 	:8 	;g  
make-fluid	<g  *comp-module*	=g  unused-variable	>g  unused-variable-analysis	?g  unused-toplevel	@g  unused-toplevel-analysis	Ag  unbound-variable	Bg  unbound-variable-analysis	Cg  arity-mismatch	Dg  arity-analysis	Eg  format	Fg  format-analysis	Gg  %warning-passes	Hg  and=>	Ig  memq	Jg  warningsS	Kg  cadr	Lg  	assoc-ref	Mg  analyze-tree	Ng  make-lambda	Og  tree-il-src	Pg  make-lambda-case	Qg  	optimize!	Rg  canonicalize!	Sg  analyze-lexicals	Tg  flatten-lambda	Ug  make-hash-table	Vg  *primcall-ops*	Wg  for-each	Xg  	hash-set!	Yg  eq?	ZY		[ZY	\g  eqv?	]\		^]\	_g  equal?	`_		a`_	bg  =	cb		dg  ee?	ecd	fg  <	gf		hg  lt?	igh	jg  >	kj		lg  gt?	mkl	ng  <=	on		pg  le?	qop	rg  >=	sr		tg  ge?	ust	vg  +	wv		xg  add	ywx	zg  -	{z		|g  sub	}{|	~g  1+	~ g  add1  g  1-  g  sub1  g  * 	 g  mul  g  / 	 g  div  g  quotient 	 g  quo  g  	remainder 	 g  rem  g  modulo 	 g  mod  g  ash 	  g  logand 	  g  logior 	  g  logxor 	  g  not   g  pair?   g  cons 	  g  car   g  cdr   g  set-car! 	  g  set-cdr! 	  g  null?   g  list?   g  symbol?   g  vector?  Č g  list ǌ g  vector Ɍ g  class-of  ˌ g  
vector-ref 	 Ό g  vector-set! 	 g  
vector-set ӌ g  variable-ref  Ռ g  variable-bound?  ، g  struct?  ی g  struct-vtable  ތ g  
struct-ref 	 ጤ g  struct-set! 	 g  
struct-set 挤 g  make-struct/no-tail g  make-struct 錤 g  return  댤 g  return/values  g  bytevector-u8-ref 	 g  	bv-u8-ref  g  bytevector-u8-set! 	 g  	bv-u8-set  g  bytevector-s8-ref 	 g  	bv-s8-ref  g  bytevector-s8-set! 	 g  	bv-s8-set  g  bytevector-u16-ref 	g  
bv-u16-refg  bytevector-u16-set!	g  
bv-u16-setg  bytevector-u16-native-ref		
g  bv-u16-native-ref	
g  bytevector-u16-native-set!	g  bv-u16-native-setg  bytevector-s16-ref	g  
bv-s16-refg  bytevector-s16-set!	g  
bv-s16-setg  bytevector-s16-native-ref	g  bv-s16-native-refg  bytevector-s16-native-set!	g  bv-s16-native-set g  bytevector-u32-ref! 	"g  
bv-u32-ref#!"$g  bytevector-u32-set!%$	&g  
bv-u32-set'%&(g  bytevector-u32-native-ref)(	*g  bv-u32-native-ref+)*,g  bytevector-u32-native-set!-,	.g  bv-u32-native-set/-.0g  bytevector-s32-ref10	2g  
bv-s32-ref3124g  bytevector-s32-set!54	6g  
bv-s32-set7568g  bytevector-s32-native-ref98	:g  bv-s32-native-ref;9:<g  bytevector-s32-native-set!=<	>g  bv-s32-native-set?=>@g  bytevector-u64-refA@	Bg  
bv-u64-refCABDg  bytevector-u64-set!ED	Fg  
bv-u64-setGEFHg  bytevector-u64-native-refIH	Jg  bv-u64-native-refKIJLg  bytevector-u64-native-set!ML	Ng  bv-u64-native-setOMNPg  bytevector-s64-refQP	Rg  
bv-s64-refSQRTg  bytevector-s64-set!UT	Vg  
bv-s64-setWUVXg  bytevector-s64-native-refYX	Zg  bv-s64-native-ref[YZ\g  bytevector-s64-native-set!]\	^g  bv-s64-native-set_]^`g  bytevector-ieee-single-refa`	bg  
bv-f32-refcabdg  bytevector-ieee-single-set!ed	fg  
bv-f32-setgefhg  !bytevector-ieee-single-native-refih	jg  bv-f32-native-refkijlg  "bytevector-ieee-single-native-set!ml	ng  bv-f32-native-setomnpg  bytevector-ieee-double-refqp	rg  
bv-f64-refsqrtg  bytevector-ieee-double-set!ut	vg  
bv-f64-setwuvxg  !bytevector-ieee-double-native-refyx	zg  bv-f64-native-ref{yz|g  "bytevector-ieee-double-native-set!}|	~g  bv-f64-native-set}~[^aeimquy}#'+/37;?CGKOSW[_cgkosw{ Rg  gensymf  :Lg  
make-labelg  mapg  	hashq-refg  errorf  bad var list elementg  vars->bind-listg  make-glil-bindg  emit-bindingsg  make-glil-sourceg  reverseg  with-output-to-codeg  <lambda>g  
lambda-srcg  lambda-metag  lambda-bodyg  make-glil-programg  flatten-lambda-casef  unhandled recordg  pushg  dropg  make-glil-voidg  make-glil-lexicalg  setf  bad let var allocationg  <void>g  valsg  tailg  make-glil-branchg  brg  make-glil-callg  <const>g  	const-srcg  	const-expg  make-glil-constg  
<sequence>g  sequence-expsg  <application>g  application-srcg  application-procg  application-argsg  primitive-ref?g  hash-refg  primitive-ref-nameg  lengthg  instruction-pushesf  !bad primitive op: too many pushesg  	new-frameg  	tail-callg  
make-constg  tail-call/nargsg  callg  
call/nargsg  make-glil-mv-callg  make-glil-labelg  make-glil-mv-bindg  lexical-ref?g  assqg  lexical-ref-gensymg  lambda-case?g  lambda-case-kwg  lambda-case-optg  lambda-case-restg  lambda-case-reqg  boxf  bad lambda-case arg allocationg  lambda-case-gensymsg  lambda-case-alternatef  *couldn't find matching case for label callg  assq-refg  valuesg  variable-set!g  variable-setg  @call-with-current-continuationg  tail-call/ccg  make-applicationg  make-primitive-refg  call-with-current-continuationg  call/ccg  @call-with-valuesg  call-with-valuesg  @applyg  
tail-applyg  applyg  return/values*g  <conditional>g  conditional-srcg  conditional-testg  conditional-consequentg  conditional-alternateg  <primitive-ref>g  	br-if-notg  br-ifg  
br-if-nullg  br-if-eqg  br-if-not-nullg  br-if-not-eqg  primitive-ref-srcg  module-variableg  the-root-moduleg  make-glil-toplevelg  refg  make-glil-moduleg  module-nameg  <lexical-ref>g  lexical-ref-srcf  bad lexical allocationg  <lexical-set>g  lexical-set-srcg  lexical-set-gensymg  lexical-set-expg  <module-ref>g  module-ref-srcg  module-ref-modg  module-ref-nameg  module-ref-public?g  <module-set>g  module-set-srcg  module-set-modg  module-set-nameg  module-set-public?g  module-set-expg  <toplevel-ref>g  toplevel-ref-srcg  toplevel-ref-nameg  <toplevel-set> g  toplevel-set-srcg  toplevel-set-nameg  toplevel-set-expg  <toplevel-define>g  toplevel-define-srcg  toplevel-define-nameg  toplevel-define-expg  definef  bad lambda free var allocation	g  make-closure
g  <lambda-case>g  lambda-case-srcg  lambda-case-initsg  lambda-case-bodyg  
list-indexf  	bad kwargg  maxf  ,lambda-case gensyms don't correspond to argsg  make-glil-kw-preludeg  make-glil-opt-preludeg  make-glil-std-preludeg  delqf  bad keywords, yog  appendg  	list-tailg  bound?f  bad arg allocationg  make-glil-unbindg  <let>g  let-srcg  	let-namesg  let-gensyms g  let-vals!g  let-body"g  <letrec>#g  
letrec-src$g  letrec-in-order?%g  letrec-names&g  letrec-gensyms'g  letrec-vals(g  letrec-body)g  	empty-box*f  bad letrec var allocation+g  <fix>,g  fix-src-g  	fix-names.g  fix-gensyms/g  fix-vals0g  fix-body1f  bad fix var allocation2g  reverse!3f  bad free var allocation4g  fix5g  <let-values>6g  let-values-src7g  let-values-exp8g  let-values-body9f  $unexpected lambda-case in let-values:f  bad let-values var allocation;g  	<dynwind><g  dynwind-src=g  dynwind-body>g  dynwind-winder?g  dynwind-unwinder@g  windAg  unwindBg  return/nvaluesCg  <dynlet>Dg  dynlet-fluidsEg  dynlet-valsFg  dynlet-bodyGg  
dynlet-srcHg  wind-fluidsIg  unwind-fluidsJg  <dynref>Kg  dynref-fluidLg  
dynref-srcMg  	fluid-refNg  <dynset>Og  dynset-fluidPg  
dynset-expQg  
dynset-srcRg  	fluid-setSg  <prompt>Tg  
prompt-srcUg  
prompt-tagVg  prompt-bodyWg  prompt-handlerXg  make-glil-promptYf   unexpected lambda-case in promptZf  !bad prompt handler arg allocation[g  <abort>\g  	abort-src]g  	abort-tag^g  
abort-args_g  
abort-tail`g  abortC 5  h     ]4	
5675 4: >  "  G   4;i5 <R=>i?@iABiCDiEFi GRHIJK2LG      h   o   ] 6      g       g  kind
		
  g  filenamef  !language/tree-il/compile-glil.scm
	;		
	<	  		
   CMNOPQRS<T    h     ]+H4455$  "  K4J54 >  "  G  44	 54
 5	5454545Y45	"  ZCZF      g  x
	  g  e	  g  opts		  g  warnings		  g  t			' g  analyses		2	M g  x		i  g  x		v  g  x		  g  
allocation	    
g  filenamef  !language/tree-il/compile-glil.scm
	5
		7				7			7			7		$	8		*	;		2	;		5	>		N	@		Q	@		X	@	)	Y	A		]	A	.	a	A	;	b	A	?	g	A		i	@		i	@		l	B		v	@		y	C			@	 	D	 	@	 	G	 	G	 	 	  g  nameg  compile-glil CR4Ui5 VR4WiXV   h   {   ]  6  s       g  x
		  g  filenamef  !language/tree-il/compile-glil.scm
	O			O	'		O	/		O	 		   C>  "  G     h   }   ] 6u       g  filenamef  !language/tree-il/compile-glil.scm
 
	 		 	 		
  g  nameg  
make-label CR      hp   '  ]*44L 5L5$  D&  '$    C 6 6 6           g  id
		k g  v		k g  v			k g  vx		!	_ g  vy		!	_ g  vx		9	G g  vy		9	G  g  filenamef  !language/tree-il/compile-glil.scm
 		 		 		 		 			F 		K 		S 		W 		_ 		c 		k 	 		k	   C      h      ]O  6            g  ids
		 g  vars		 g  
allocation			 g  proc			  g  filenamef  !language/tree-il/compile-glil.scm
 
	 	 			  g  nameg  vars->bind-list CR   h      ] 44556             g  src
		 g  ids		 g  vars			 g  
allocation			 g  proc			 g  	emit-code			  g  filenamef  !language/tree-il/compile-glil.scm
 
	 		
 		 		 	 			  g  nameg  emit-bindings CR    h       ]M N  $  4 5M N CC        g  src
		 g  x		  g  filenamef  !language/tree-il/compile-glil.scm
 		 			 		 		 		 		 	
 			  g  nameg  	emit-code C        h(      ]	H4 O >  "  G  J6             g  proc
		" g  out		"  g  filenamef  !language/tree-il/compile-glil.scm
 
	 		 		 		" 	 		"  g  nameg  with-output-to-code CR h@      ]L$  4 4L5>  "  G  "   L LLL4LL5 6           g  	emit-code
		<  g  filenamef  !language/tree-il/compile-glil.scm
 		 				 		 		 		/ 	#	8 		< 		 			<   C 
  hP     ]# &  54 54 54 54 O 56	 6          g  x
		L g  
self-label		L g  
allocation			L g  rtd			L g  src		$	D g  meta		$	D g  body		$	D  g  filenamef  !language/tree-il/compile-glil.scm
 
	 		/ 		D 		H 	 		L	  g  nameg  flatten-lambda CTR   h      ]L  6           g  tree
		  g  filenamef  !language/tree-il/compile-glil.scm
 		 	(	 	 		  g  nameg  	comp-push C h      ]L  6           g  tree
		  g  filenamef  !language/tree-il/compile-glil.scm
 		 	(	 	 		  g  nameg  	comp-drop CWH   h   *  ]!4 L 5$  [&  @$  /4L45 >  "  G  L456L6L6L6       "      g  h
		y g  v		y g  vx			o g  vy			o g  vy		/	[  g  filenamef  !language/tree-il/compile-glil.scm
 		 	 	 		6 		: 	)	C 		O 	)	U 	B	Y 	)	[ 		_ 	'	e 	 	i 	'	o 	 	s 	'	y 	  		y   C   h    w   ]4L 5LLL O 6      o       g  v
		  g  filenamef  !language/tree-il/compile-glil.scm
 		 		 	 		   C      h0      ] $  "   $  LLLL O 6C         g  context
		. g  syms		.  g  filenamef  !language/tree-il/compile-glil.scm
 		 		, 		 		.	  g  nameg  clear-stack-slots CVW   h     ])44L  5L5"  `$  Q&  8$  )&  L4566666$  E&  0$  %&  L456"\"X"T"P      g  sym
	  g  v	  g  vx		%	p g  vy		%	p g  vx		=	` g  vy		=	` g  vx	   g  vy	   g  vx	   g  vy	    
g  filenamef  !language/tree-il/compile-glil.scm
			!		,		!			L	*	R	C	V	*	X		\	&	`		d	&	h		l	&	p		t	&	x		x	 	* 	C 	* 	 	 	    CH        h     ])44L  5L5"  `$  Q&  8$  )&  L4566666$  E&  0$  %&  L456"\"X"T"P      g  sym
	  g  v	  g  vx		%	p g  vy		%	p g  vx		=	` g  vy		=	` g  vx	   g  vy	   g  vx	   g  vy	    
g  filenamef  !language/tree-il/compile-glil.scm
					(					L	&	R	?	V	&	X		\	"	`		d	"	h		l	"	p		t	"	x		x	 	& 	? 	& 	 	 	    CY< T      hH      ] $  5  $  L 456L 6L 6       g  loc
		H g  vx		> g  vy			> g  vy			4  g  filenamef  !language/tree-il/compile-glil.scm
				'	&	.	C	2	&	4		8	$	>		B	$	H	 		H   C	
  hh     ]) $  V  $  =$  %(  4L 5C 6 6 6 6       g  x
		g g  vx		_ g  vy			_ g  vy			W g  vx		0	O g  vy		0	O  g  filenamef  !language/tree-il/compile-glil.scm
			!	=	.	F	$	K	0	O	)	S	0	W	)	[	0	_	)	c	0	g	) 		g   C~      hx   (  ])44L  5L5$  [&  H$  ?&  ,4L45>  "  G  L456CCCC       g  v
		x g  v		x g  vx		!	v g  vy		!	v g  vx		9	r g  vy		9	r  g  filenamef  !language/tree-il/compile-glil.scm
	
									E		I		O	6	S		X		d		j	6	n		p	 		x   CI !   h     ])44L  5L5"  i$  X&  =$  ,&  LL456L6L6L6L6$  F&  1$  &&  LL456"R"N"J"F            g  v
	  g  v	  g  vx		%	w g  vy		%	w g  vx		=	c g  vy		=	c g  vx	   g  vy	   g  vx	   g  vy	    
g  filenamef  !language/tree-il/compile-glil.scm
5		6		6	&	6		6		M:	%	S:	>	W:	%	Y:		];	"	c;		g;	"	m;		q;	"	w;		{;	" ;	 6	 8	% 8	> 8	% 8	 6	 	    C"#$%&'()*     h   C  ])44L  5L5$  X&  =$  ,&  LL456L6L6L6L6   ;      g  v
		} g  v		} g  vx		!	s g  vy		!	s g  vx		9	_ g  vy		9	_  g  filenamef  !language/tree-il/compile-glil.scm
C		D		D	&	D		D		IF	%	OF	>	SF	%	UF		YG	"	_G		cG	"	iG		mG	"	sG		wG	"	}G	 		}   C*       h     ]+44L 5L5$  n&  S$  B&  '4L>  "  G  LL456L6L6L6L6           g  name
	  g  v	  g  val		  g  v		  g  vx		!  g  vy		!  g  vx		9	u g  vy		9	u  g  filenamef  !language/tree-il/compile-glil.scm
N		O		O	(	O		O		E 		K 	(	R 		_R	'	eR	@	iR	'	kR		oS	$	uS		yS	$	S	 S	$ S	 S	$ S	 	 	   C*        h   C  ])44L  5L5$  X&  =$  ,&  LL456L6L6L6L6   ;      g  v
		} g  v		} g  vx		!	s g  vy		!	s g  vx		9	_ g  vy		9	_  g  filenamef  !language/tree-il/compile-glil.scm
X		Y		Y	(	Y		Y		I[	'	O[	@	S[	'	U[		Y\	$	_\		c\	$	i\		m\	$	s\		w\	$	}\	 		}   C+,-./0TW    h   y   ]L 456   q       g  loc
		  g  filenamef  !language/tree-il/compile-glil.scm
y	 	z	0	z	" 		   C	1
  h(  %  ]J4L 5$  4L4 L5>  "  G  4L 5(  "  84LO >  "  G  4L4455>  "  G  44L5L5$  X&  =$  ,&  LL4	56
 6
 6
 6
 645 4L45>  "  G  "  $  &  4545454545	4L5
4L4
5>  "  G  
4LLL>  "  G  $  4L45>  "  G  "   4LLL$  L"  LL >  "  G  4L45 >  "  G  	"
6L4564 5"           g  x
	# g  v	# g  	free-locs		5	| g  v	   g  vx	   g  vy	   g  vx	   g  vy	   g  POST	 # g  lcase	 g  rtd	%
 g  src	R g  req	R g  gensyms	R g  body	R g  	alternate		R g  label	
f  g  filenamef  !language/tree-il/compile-glil.scm
o	
	q		p		s		s		#s		,t	$	5t		5t		=u		By		[|		_|	$	c|	4	d}	4	l|	$	q|		}~	 ~	! ~	 ~	 	  	9 	  	 	 	 	 	 	 	 	 	 	 	  	 		  	 		"	%	]	*f	%f	i 	m 	x 					+	 		( 			'			 	 			 #	 D	#	   C2W3        hH      ] $  5  $  L 456L 6L 6       g  loc
		H g  vx		> g  vy			> g  vy			4  g  filenamef  !language/tree-il/compile-glil.scm
				'	(	.	E	2	(	4		8	&	>		B	&	H	 		H   C41  h     ]24L 5$  4L 5"  (  C4L  O >  "  G  44L5L5$  W&  <$  +&  L 456 6 6 6 6         g  x
	  g  v	  g  	free-locs		  g  v		S  g  vx		b  g  vy		b  g  vx		z  g  vy		z   g  filenamef  !language/tree-il/compile-glil.scm
	
		!				&		!		!			&		)		D		G	'	S		S	 	% 	> 	% 	 	# 	 	# 	 	# 	 	# 	 	 	   C56789: h     ])44L  5L5"  i$  X&  =$  ,&  LL456L6L6L6L6$  F&  1$  &&  LL456"R"N"J"F            g  v
	  g  v	  g  vx		%	w g  vy		%	w g  vx		=	c g  vy		=	c g  vx	   g  vy	   g  vx	   g  vy	    
g  filenamef  !language/tree-il/compile-glil.scm
			 		+		 			M	*	S	C	W	*	Y		]	'	c	 	g	'	m	 	q	'	w	 	{	' 	  	 	* 	C 	* 	 	 	    C;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ       h     ])44L  5L5"  i$  X&  =$  ,&  LL456L6L6L6L6$  F&  1$  &&  LL456"R"N"J"F            g  v
	  g  v	  g  vx		%	w g  vy		%	w g  vx		=	c g  vy		=	c g  vx	   g  vy	   g  vx	   g  vy	    
g  filenamef  !language/tree-il/compile-glil.scm
			 		+		 			M	*	S	C	W	*	Y		]	"	c		g	"	m		q	"	w		{	" 	 	 	* 	C 	* 	 	 	    C[\]^_`        hx3  Z  ]O O O LQ LQ LL LQ  &  j$  "  $  "  $  4L45 >  "  G  "   $  L4	
56&  L456C&  4 54 5	$  "  $  "  $  4L4	5>  "  G  "   $  L4	
56&  L456C&  \4 5"  G	(  	

 "	
4L
>  "  G  
		"	"& 4 54 54 5
	" 4	5$  944	54
55$  "  44	55"  $ "4
>  "  G  4L44
55>  "  G  45
$  j$  "  $  "  $  4L45 >  "  G  "   $  L4	
56&  L456C$  Q$  4L45>  "  G  "   $  L4	
56&  L456C	$  C 456" X&  "  4L4!
5>  "  G  4L	>  "  G  4
>  "  G  4
5$  J $  L4"564#54L>  "  G  L4$
56$   $  4L4%5>  "  G  "  =4#54L>  "  G  4L4&
5>  "  G  $  L4	
56&  L456C$  F4L4'5>  "  G  $  L4	
56&  L456C$  4(5 4(5 4L4'5>  "  G  4L45>  "  G  4L4	
$  "  5>  "  G  4L4)5>  "  G  4L4*
5>  "  G  $  L4	
56L4)56C4+	5$ "  4,4-	5L5$  4
>  "  G  "  4.5$  4/5$  "  4405$  "  $415$  "  4
544255$  B43LLLO 444555>  "  G  46L5L4	
56475"^8 6494:L4-	555"="L $  4-	5L &  &  4/L5$  "  E41L5$  "  54
5442L554;40L55$  "  
$  V4
>  "  G  4<LLLO 4445L55>  "  G  46LL5L4	
56"A"="9"5"4	5$ 	" {4	5=& $  ?4
>  "  G  $  L4	
56&  L456C$  4
5
$  u4L4!
5>  "  G  4L	>  "  G  4L4%
5>  "  G  $  L4	
56&  L456C4
>  "  G  
4L>  "  G  $  L4	
56&  L456C$  @4
>  "  G  4L44
55>  "  G  L4	
56$  C4
>  "  G  L4
5$  45"  	4>56C"  4	5?&  4
5	$  
4L>  "  G  
4L>  "  G  4L4@	5>  "  G  $  "  $  "  $  4L45 >  "  G  "   $  L4	
56&  L456C""" 4	5A& u4
5$ d$  ,
4L>  "  G  L4B56$  X4C4DE5
54L>  "  G  $  L4	
56&  L456C$  c
4L>  "  G  4L4F5>  "  G  $  L4	
56&  L456C$  W4C4DE5
54L>  "  G  $  L4	
56&  L456CC""4	5G& 4
5	$ $  X4C4DH5
54L>  "  G  $  L4	
56&  L456C4(5 4(5 

&  "  4L4!
5>  "  G  4L>  "  G  4L4!
5>  "  G  4L>  "  G  4L4'
5>  "  G  $  4L4"5>  "  G  "  44L4%5>  "  G  4L4	
5>  "  G  4L4)5>  "  G  $  L4$
564L4&
5>  "  G  4L4)5>  "  G  &  4L45>  "  G  "   $  L4	
56&  L456C"O"K4	5I& 4
5$ n

" $  ?4L>  "  G  4>  "  G  L4J4556$  4L4!
5>  "  G  4L>  "  G  4>  "  G  4L4K455>  "  G  $  L4	
56&  L456C$  [4C4DK554L>  "  G  $  L4	
56&  L456C$  Z4C4DK554L>  "  G  $  L4	
56&  L456CC45$  45=&  &  "  $  {$  ?4>  "  G  $  L4	
56&  L456C$  (4>  "  G  L4L4556C""""""9M& z4N 54O 54P 54Q 5
	4(5 4(5 	& i4	54	5R& 4545"  54L	>  "  G  4L4	S5>  " G  " " T& $ & |454545R& 45"  54L>  "  G  4L4	U5>  " .G  " '"  UV&  I$  =4L>  "  G  4L4	W5>  " G  " "v"rX&  i	$  \4L>  "  G  4L>  "  G  4L4	Y5>  " hG  " a":"64L>  "  G  4L4	U5>  " (G  " !4L>  "  G  4L4	U5>  "  G  "  """  UV&  I$  =4L>  "  G  4L4	Z5>  "  G  "  ""X&  m	$  \4L>  "  G  4L>  "  G  4L4	[5>  "  G  "  ":"  "2"  14L	>  "  G  4L4	S5>  "  G  "  14L	>  "  G  4L4	S5>  "  G  4L
>  "  G  $  "  $  4L4	
5>  "  G  "   4L4)5>  "  G  4L>  "  G  $  "  $  L4)56CR& 4\ 54 5	4]^[	54]_	5&  o$  "  $  "  $  4L4`a	5>  "  G  "   $  L4	
56&  L456C4]_	5$  r$  "  $  "  $  "4L4bac	5>  "  G  "   $  L4	
56&  L456C$  "  $  "  $  (4L4ba4d^[5	5>  "  G  "   $  L4	
56&  L456Ce&  4f 54- 5	$  "  $  "  $  4646L	5L5

$  d

$  34L4ga5>  "  G  "  4h 
>  "  G  "  4h 
>  "  G  
"   $  L4	
56&  L456Ci& 14j 54k 54l 5
	4L
>  "  G  4646L	5L5$  d$  34L4gm5>  "  G  "  4h >  "  G  "  4h >  "  G  $  "  $  "  $  4L45 >  "  G  "   $  L4	
56&  L456Cn&  4o 54p 54q 54r 5
	4L4ba	
5>  "  G  $  4L45>  "  G  "   $  L4	
56&  L456Cs&  4t 54u 54v 54w 54x 5
	4L>  "  G  4L4bm	
5>  "  G  $  "  $  "  $  4L45 >  "  G  "   $  L4	
56&  L456Cy&  ~4z 54{ 5	4L4`a	5>  "  G  $  4L45>  "  G  "   $  L4	
56&  L456C|&  4} 54~ 54 5
	4L
>  "  G  4L4`m	5>  "  G  $  "  $  "  $  4L45 >  "  G  "   $  L4	
56&  L456C&  4 54 54 5
	4L
>  "  G  4L4`	5>  "  G  $  "  $  "  $  4L45 >  "  G  "   $  L4	
56&  L456C&  46L 5$  "  $  "  $  c4L4 L5>  "  G  (  "  :4L O >  "  G  4L4455>  "  G  "   $  L4	
56&  L456C& 4 542 540 541 54/ 54 545 547 54 5
	4	5
$  4
5"  
$  	"  $  "  4O $  "  54$  "  
4455?46L 5$  	4(5 "  45$  45$  "  
"  $  "  &4	
>  "  G  4L$  45"  /$  "  
$  45"  45>  "  G  4LLLO >  "  G  (  " b4"  (  44$  	"  5" %$  $  $  ~  $  Z  "!"(  74!5$  4!5"p"`45"  !"45"   45"  r45"  b45"  O$  "  444
$  
"  544	554$  "  
5"LLL>  "  G  " (  " " 4646L5L5$ P& $    $  4(5 !4L4g5>  "  G  4L4	U!5>  "  G  "4L">  "  G  "4L4gm5>  "  G  4L4)!5>  "  G  "	!&  4>  "  G  "  "   &  4>  "  G  "  "  &  4>  "  zG  "  s"  o&  4>  "  NG  "  G"  C$  $  ">"H"D45"46L 54L4)5>  "  G  4L>  "  G  (  "  4L45 >  "  G  $  (4L4)5>  "  G  LLL LL6C&  4 54 54 54 54 5
	4>  "  G  4	
LLL>  "  G  4LL LO 44
5>  "  G  4L>  "  G  4
>  "  G  L45 6& 4 54 54 54 54 54 5
	4LLL O >  "  G  4
LLL>  "  G  	$  +4LLLL O 
>  "  G  "  :4>  "  G  4LLL O 445>  "  G  4L>  "  G  4>  "  G  L45 6& {4 54 54 54 54 5
	&  "  $  "  4(5 4LLLLO 	
>  "  G  "  K(  45"  I4,L5$  ""
	"44545LLL>  "  G  4LLLO 
>  "  G  4L>  "  G  $  4L4)5>  "  G  "   4
>  "  G  L45 6& 4 54 54 5
	
& a42
540
54/
541
545
54
547
5$  "  $  "  $  4 >  "  G  "   4(5 4L	>  "  G  4L45>  "  G  4L4)5>  "  G  4L4*44$  	 "  5LL5$  "  5>  "  G  4LL LO 445>  "  G  4L>  "  G  4>  "  G  L45 6
6& 4 54 54 54 5
	4L
>  "  G  4L>  "  G  4C
54L>  "  G  4L4	5>  "  G  $  4(5 4L	>  "  G  4L4
5>  "  G  4C54L>  "  G  4L45>  "  G  4L4)5>  "  G  4L4
5>  "  G  4C54L>  "  G  L456$  M4L	>  "  G  4L4
5>  "  G  4C5 "h$  4(5 4L	>  "  G  4L45>  "  G  4L4)5>  "  G  4L4
5>  "  G  4C54L>  "  G  L4	
56$  j4L	>  "  G  4L4
5>  "  G  4C54L>  "  G  $  L4	
56CC& 4 54 54 5
	4 >  "  G  4>  "  G  4	>  "  G  4L4455>  "  G  $  4(5 4L
>  "  G  4L4
5>  "  G  4L45>  "  G  4L4)5>  "  G  4L4
5>  "  G  L456$  #4L
>  "  G  L4
56$  t4(5 4L
>  "  G  4L45>  "  G  4L4)5>  "  G  4L4
5>  "  G  L4	
56$  E4L
>  "  G  4L4
5>  "  G  $  L4	
56CC&  4 54 >  "  G  $  4L>  "  G  "  X$  "  $  "  $  34L>  "  G  4L45>  "  G  "   $  L4	
56&  L456C&  4 54 5	4 >  "  G  4L>  "  G  4L	>  "  G  4L4	5>  "  G  $  "  $  "  $  4L45 >  "  G  "   $  L4	
56&  L456C& 4 54 54 54 5
	4(5 4(5 46L 54L	>  "  G  4L45>  "  G  $  4(5 4L
>  "  G  4L4
5>  "  G  4L45>  "  G  4L4)5>  "  G  4L4
5>  "  G  4L45>  "  G  " T$  Y4L
>  "  G  4L4
5>  "  G  4L4	
$  "  5>  "  G  "  $  4(5 4L
>  "  G  4L45>  "  G  4L4)5>  "  G  4L4
5>  "  G  4L4	
5>  "  G  "  b$  Y4L
>  "  G  4L4
5>  "  G  4L4	
$  "  5>  "  G  "   4L4)5>  "  G  & %4254054/541545545475$  "  $  "  $  4 >  "  G  "   4L4*44$  	 "  5LL5$  "  5>  "  G  4LL LO 445>  "  G  4L>  "  G  4L45 >  "  G  "  4>  "  G  $  "  &  "  $  L4)56C&  4 54 54 54 5
	4L	>  "  G  4
>  "  G  4L>  "  G  4L44
55>  "  G  $  L456$  .4L4*
5>  "  G  $  L4	
56C$  L4*56$  L4	
56C 6   Z      g  x
	3u g  context	3u g  RA		3u g  MVRA		3u g  	comp-push		3u g  	comp-drop		3u g  clear-stack-slots		3u g  rtd		53u g  src	 0 g  exp		 0 g  exps	? g  exps		E g  tree	
Oe g  tree	
h g  src	 g  proc		 g  args	
 g  t	 g  t	 d g  key	C* g  len	 g  tree	 g  tree	/ g  MV	 g  POST	 g  lcase	i g  label	CT g  t	 g  label	?P g  key	 g  tree	o g  len		&	H g  tree		o	 g  tree			 g  tree	
_
z g  tree	

 g  tree	
 g  tree	o g  tree	 g  MV	L g  POST	L g  producer	L g  consumer	L g  proc	v g  args	v g  tree	0 g  tree	x g  src	 g  test		 g  
consequent	
 g  	alternate	 g  L1	 g  L2	 g  rtd	f g  proc	. g  args	. g  rtd	( g  name	 g  len	 g  app	J g  rtd	O g  proc	g g  args	g g  len	r g  rtd	w g  name	 g  tree	 g  tree	0K g  tree	Oj g  tree	/J g  tree	 g  tree	 g  src	 g  name		 g  src	 g  gensym		 g  v	
p g  vx	S g  vy	S g  vx	
3 g  vy	
3 g  src	 g  gensym		 g  exp	
 g  v	n g  vx	Q g  vy	Q g  vx	1 g  vy	1 g  src	t g  mod		t g  name	
t g  public?	t g  src	H g  mod		H g  name	
H g  public?	H g  exp	H g  src	^ g  name		^ g  src	 g  name		 g  exp	
 g  src	J g  name		J g  exp	
J g  	free-locs	\ g  src	[" g  req		[" g  opt	
[" g  rest	[" g  kw	[" g  inits	[" g  gensyms	[" g  	alternate	[" g  body	[" g  nreq	t" g  nopt	" g  rest-idx	" g  allow-other-keys?	" g  
kw-indices	" g  nargs	" g  nlocs	" g  alternate-label	" g  b	C g  t	Cx g  kw	 g  names	 g  gensyms	 g  vx	2 g  vy	2 g  vy	@ g  vx	S g  vy	 S g  vx	!d g  vy	"d g  inits	 c"- g  n	 c"- g  gensyms	 c"- g  v	 " g  vx	 ! g  vy	 ! g  vx	 ! g  vy	  ! g  L	! !] g  tree	" ! g  label	"N"k g  src	"# g  names		"# g  gensyms	
"# g  vals	"# g  body	"# g  src	#$ g  	in-order?		#$ g  names	
#$ g  gensyms	#$ g  vals	#$ g  body	#$ g  src	$&3 g  names		$&3 g  gensyms	
$&3 g  vals	$&3 g  body	$&3 g  new-RA	%&3 g  out	%3%~ g  gensyms	%3%~ g  names	%3%~ g  binds	%% g  src	&P' g  exp		&P' g  body	
&P' g  rtd	&Y' g  req	&' g  opt	&' g  kw	&' g  rest	&' g  gensyms	&' g  body	&' g  	alternate	&' g  MV	&' g  src	'* g  body		'* g  winder	
'* g  unwinder	'* g  tree	(.(I g  MV	(q)D g  tree	(( g  tree	))7 g  tree	)) g  MV	)*< g  tree	**. g  tree	*~* g  fluids	*, g  vals		*, g  body	
*, g  MV	+;+ g  MV	+,m g  fluid	,- g  fluid	-.b g  exp		-.b g  src	.2f g  tag		.2f g  body	
.2f g  handler	.2f g  H	.2f g  POST	.2f g  escape-only?	.2f g  MV	./~ g  MV	/0p g  rtd	027 g  req	1,2 g  opt	1,2 g  kw	1,2 g  rest	1,2 g  gensyms	1,2 g  body	1,2 g  	alternate	1,2 g  src	23m g  tag		23m g  args	
23m g  tail	23m  g  filenamef  !language/tree-il/compile-glil.scm
 		5 		H		e	
	i		r	
  	  	  	  	  	  	  	
  	  	,  	  	  	 	 		
 		 		
 	 	 	 	 	 	! 	
% 	) 	,, 	. 	8 	E	H	L		O	O	e 	h	h	k 	q 	(x 				 						"	<					+	 				"	'	0/	4	=	C	V	s	%w	3	% 	 	 	 	 	 	 	
 	 	, 	 					)	9	)	 	 	 	 	 	 	 	
 		 	, 	 			"	*	2		6			;
	@
	D
	,G
	L
	U 	[ 	(b 	k									(	8	(		&	 	 	( 		*	:	*						(	8	( 		&	 	 	($ 	0	5	*9	:<	*A	O 	S 	W 	[ 	] 	a 	e 	
i 	m 	,p 	r 	}	~		$	 	 	 	 	 	 	 	
 	 	, 	 				3	 	 	& 	!	!	%!	5!	%!	 	 	"	'"	+' 	, 	5 	9 	D 	M$	Q$	%\$	j%	n 	r&	+v 	x 	| 	 																							#	+	#			!	$	 ,	1	:	'C	"C	J 	N	R 	T 	U	a	e	i	i		j	m	r	/z	|																																			 	(	-		6	#?	?		F 	J	N 	P 	d	e	o	tE	)|E	CE		J		K	 	 	 	 	 	 	 	
 	 	, 	 	J		M	M	Q	Q	Q	.Q	Q	 	 	(
 	S	S	S	.S	$S	2 	6 	: 	> 	@ 	D 	H 	
L 	P 	,S 	U 	XX	_X	#dX	oY	oY	r 	x 	( 	 	 	 	 	 	 	 	
 	 	, 	 	J		\	]	]	]	+]	]	 	^	 	 		J			`		 a	&	&a		,b	!	0b		1c	!	5c	1	8c	!	=d	!	Ad	1	Ed	!	Ja		Q		Y	-	]			^		g		k			n		o			r 		x 	(	 							 		 	(	 								(												+		
 	
 	
 	
 	
 	
 	
 	

" 	
& 	,
) 	
+ 	
5	
:	
B	-
F		
G	
O	
S		
\		
_	
_	
b 	
h 	(
o 	
	
	+
	
	
		
	
	
	)
	
	
	
 	"
 	-
 	"
 	
 	
 	
 	
 	
 	
 	

 	
 	,
 	
 	
		
	
	
 	
 	( 				+	"	0 	4 	8 	< 	> 	B 	F 	
J 	N 	,Q 	S 	^		_	d	i	)k	o	o	r 	x 	( 	 	 	 	 	 	 	 	
 	 	, 	 		g	g	-f		h	h	f		p		t	t	#t	:t	#t	s	 	" 	- 	" 	 	 	" 	$ 	( 	, 	
0 	4 	,7 	9 	<y	Ay	*Hz	Kz	2Ly	X{	$\{	a|	f|	!j|	1m|	!r|	{ 	 	( 	~	~	~	-~	~	 	 	( 							'	7	'			'	7	'	 	  	$	(( 	- 	6 	: 	E 	V	[	'_	7b	'd	e	j	'n	7q	'v	 	 	 		)			*	:	*	 	 	 	 	 	 	 	
 	 	, 	 				-										*	  	& 	(- 	6-	N.	R.	/S.	?Z.	;\.	^.	g*	h0	m0	q0	/t0	y0	 	 	( 	2	3	3	3	/3	:3	63	3	 	 	 	 	 	 	 	
 	 	, 	 	 *	7	7	'7	>7	'8	#7	6	 	" 	-% 	"6 	: 	> 	B 	D 	H 	L 	
P 	T 	,W 	Y 	d*	eA	jA	'oA	>qA	'vB	#xA	x@	{ 	 	( 	 	 	 	 	 	 	 	
 	 	, 	 					-	G		$		>	1	,	#	$	 	 	 	 	  	$ 	( 	
, 	0 	,3 	5 	@#	A&	Y'	]'	/^'	?f'	h'	 	0	0	#0	2		4	6	6	 	 	( 	 	 	`	$" 	' 	37	;B	"?7	CB	(GB	JC	JC	OD	lF	#rF	wG	 	 	( 	 	 	V	0 	 	I	P	.I	P	6P	Q	*Q	 	 	( 	 	 	R	0 	 	I	 K	.$I	)K	4-K	0L	*0L	3 	9 	(@ 	NM	*OM	R 	X 	(_ 	k 	p 	tN	0x 	} 	 	 	( 	 	 	Y	. 	 	 	 	( 	 	 	\	) 	 	7	 >	"$7	(>	*,>	/?	/?	2 	8 	(? 	K 	P 	T@	$X 	] 	q7	u9	"y7	~9	(9	:	:	 	 	( 	;	;	 	 	( 	 	 	<	$ 	 	 	 	( 	 	 	c	  	 	3 	9 	(@ 	I 	N 	Rf	V 	[ 	g 	k	k	-k	 k	k		 	 	l	 	 	 	 	 	 	o	o	-o	 o	o		 	 	 	t	)u	5s	>v		[x	`x	dx	/hx	mx	 	 	 	 	 	 	 	
 	 	, 	 	z		s	{		}	}	}	-}	2}	}	 	 	 	
 	 	 	 	
 	 	, 	! 	,		I	N	R	S	!_	d	v 	z 	~ 	 	 	 	 	
 	 	, 	 	 						
			= 	%	8	<	E	\	e	z 	~ 	 	 	 	 	 	
 	 	, 	 	 	 	 	( 						
		:	#	
6	
:	C	
Z	c	
w		
		
 	 	 	 	 	 	 	
 	 	, 	 	 		
		(		,	-	1	5	/8	=	O 	S 	W 	[ 	] 	a 	e 	
i 	m 	,p 	r 	| 	 	 	( 				(				
		
# 	' 	+ 	/ 	1 	5 	9 	
= 	A 	,D 	F 	P 	c	h	l	*p	u					/		 	 	 	 	 	 	 	
 	 	, 	 	 	 	 	( 				*		+	H	
L	U	
g 	k 	o 	s 	u 	y 	} 	
 	 	, 	 	 	 	 	( 				*				

		
% 	) 	- 	1 	3 	7 	; 	
? 	C 	,F 	H 	R 	S	\	\	g									 	0	0	 	 	 	 	 	 	 	 	
	 	 	, 	 	 	n	t	|	}				"		!	(				&	/				 	-	 		$								.			&	-	3	':	;	C		P	T	m	y			
			
														%!	(	o	{			0														 	 	" 		+ 
		 		& 	 	! 		& 		: '		 (
	  1
	3 7	0 >
	3 @
	  J	 W	 c		 i	 r	 u	  |	6 ~	  	 	 	* 	 	 	  	  	   	=  	   	 !	 !	  !	2 !	  !	 "	 "	  	!  	(! 	!#	!#	 !#	=!"#	 !'#	!0 	!4 	!? 	!J%	!M%	"!P%	)!Z%	!`	!e&	!i&	!l&	/!s&	!	!&	!&	!&	/!&	!	!&	!&	!&	/!&	!	!&	!&	!&	/!&	"	"	"	"	"	"%	"-		"2	2"D		"E(	"N(	"N(		"Q 	"U 	"` 	"l 	"*		"+	"+	"+	",		" 	" 	" 	"/	" 	#	3	#4	#95	#K<	#V5	#_ 	#w>	#?	#?	# 	#C	#J	$K	$N		$AW		$UX		$g]	$rX		${ 	$_	$`	$`	$ 	$m	*$m	$m	$m	$m	8%m	%n		%3	%9	%:	/%E	%J	%%N	%R	%W	'%Z	5%d	%g	*%j	8%k	#%q	#%t	1%~	%~	%	$%	%		%	%	%	.%	%		% 	%		% 	% 	&	 	&		&-	&3		&; 	&Y	&	&	
&	&	&	&	&	
& 	"& 	-& 	"&	&	'	' 	' 	' 	'$	')	',	'/	'9	)'>	2'C	>'E	'M	'S	'[	'`	'i	'{	'	' 	'	'	'	'	' 	' 	' 	(( 	( 	(( 	(%	(,	/(.	(.	(1 	(7 	((> 	(J	(N	(R	%(V	([	(l	(m	(q	
(t 	"(z 	-( 	"(	(	(	*(	(	(	(	6(	(	( 	( 	(( 	(	(	(	*(	(	( 	( 	( 	(	(	)	*)	)
	)	)	6)	)	) 	)% 	(), 	);	)?	*)B	)D	)M	)N 	)T 	()[ 	)d	
)h	)l	()o	)t	
)}	)	4)	)	
) 	() 	)	)	)	
) 	") 	-) 	")	)	)	) 	) 	) 	)	)	)	*)	*	*
 	* 	6* 	* 	* 	* 	(*# 	*2 	*6	*: 	*< 	*E	*F 	*L 	(*S 	*\	
*`	*d	(*g	*l	
*u	*|	4*~	*~	
* 	* 	(* 	*
	
* 	*	* 	* 	* 	*	*	+	+	+	%+	2+ 	+%	+6	+7	+;	
+> 	"+D 	-+L 	"+U	+Y	+]	*+`	+e	+n	+r	+v	*+y	+~	+ 	+ 	+ 	+!	+!	+!	*+!	+!	+"	+"	*+"	+"	+	+ 	+ 	(+ 	+&	+&	(+&	+&	
+	+)	+)	
, 	", 	-, 	",,	,,	,&,	,/ 	,3 	,> 	,G0	,K0	,O0	*,R0	,W0	,c 	,g1	,k 	,m 	,v	,w 	,} 	(, 	,6	
,6	,6	(,6	,6	
,8	
, 	,9	, 	, 	, 	,<	, 	, 	(, 	-<	-) 	-/ 	(-6 	-?A	
-CA	-GA	(-JA	-OA	
-a 	-e 	-i 	-m 	-o 	-s 	-w 	
-{ 	- 	,- 	- 	- 	- 	- 	(- 	- 	(- 	-G	-G	-G	%-G	-G	.H	.J	
."J	.+J	
.= 	.A 	.E 	.I 	.K 	.O 	.S 	
.W 	.[ 	,.^ 	.` 	.j 	.U	.V	.W	.U	. 	. 	(. 	.Z		.Z	.Z		.^		.`	.`	. 	". 	-. 	"/ c	/c	/c	,/c	/c	/d	/d	/!d	,/$d	/)d	/2 	/6 	/A 	/Jg	/Ng	/Rg	,/Ug	/Zg	/ch	/gh	/kh	,/nh	/sh	/^		/ 	/ 	(/ 	/n	/n	/n	*/n	/n	/ 	/ 	/o	/o	 / 	/ 	/^		/r	/r	/ 	"/ 	-0 	"0u	0u	0u	0# 	0' 	02 	0;x	0?x	0Cx	,0Fx	0Kx	0T 	0X 	0\y	0` 	0e 	0}^		0~ 	0 	(0 	0~	0~	0~	*0~	0~	0 	0 	0	0	 0 	0 	0 	0 	0 	0		1@	1V	1W	1[	1b	1o	1t	1w	1z	1	)1	21	>1	1	1	1	1	1	1	1	1 	1	1	1	2!		2=	2F	#2J	2K	2S	72T	*2X		2\ 	2d 	2n 	2 	2 	(2 	2	2 	2 	(2 	2	2	2	&2	-2	2	2	2	3	(3	3	
3	3	
3	3!	
3/	
33 	37	!3; 	3= 	3H	3L	3T	
3]	3a 	3e	3i 	3k 	3q		3u 	?	3u	  g  nameg  comp C    h0   &  ]O  Q  6           g  lcase
		+ g  
allocation		+ g  self			+ g  
self-label			+ g  
fix-labels			+ g  	emit-code			+ g  comp			+  g  filenamef  !language/tree-il/compile-glil.scm
 
	 		' 	 	+ 	 		+	  g  nameg  flatten-lambda-case CRC           g  m
		,  g  filenamef  !language/tree-il/compile-glil.scm		
	-	,		6	,
	8	/		_	.
	5
	M		M
	N
v	P{	N
! 
 
	 

 
 
      ǒ 
 	      ǔ
   C6                                                                                                                                                                                                                                                                                                                                                                 ccache/language/tree-il/analyze.go                                                                  0000644                 00000414605 15154557173 0013117 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0m     ]	& 4        hɴ      ] g  guile	 	g  define-module*	 	 	g  language	g  tree-il	g  analyze		 	
g  filenameS	f  language/tree-il/analyze.scm	g  importsS	g  srfi	g  srfi-1	 	 	g  srfi-9	 	 	g  srfi-11	 	 	g  srfi-26	 	 	g  ice-9	g  vlist	 	 	g  match	 	  	!g  system	"g  base	#g  syntax	$!"# 	%$ 	&g  message	'!"& 	(' 	)g  vm	*g  program	+!)* 	,+ 	- 	.- 	/g  pmatch	0!"/ 	10 	2 %(,.1 	3g  exportsS	4g  analyze-lexicals	5g  analyze-tree	6g  unused-variable-analysis	7g  unused-toplevel-analysis	8g  unbound-variable-analysis	9g  arity-analysis	:g  format-analysis	;456789: 	<g  set-current-module	=< 	>< 	?g  make-hash-table	@g  
hashq-set!	Ag  
make-hashq	Bg  <application>	Cg  application-proc	Dg  application-args	Eg  
lset-union	Fg  eq?	Gg  map	Hg  <conditional>	Ig  conditional-test	Jg  conditional-consequent	Kg  conditional-alternate	Lg  <lexical-ref>	Mg  lexical-ref-gensym	Ng  	hashq-ref	Og  memq	Pg  lambda-case?	Qg  length	Rg  lambda-case-req	Sg  lambda-case-opt	Tg  lambda-case-kw	Ug  lambda-case-rest	Vg  lambda-case-alternate	Wg  lambda-body	Xg  <lexical-set>	Yg  lexical-set-gensym	Zg  lexical-set-exp	[g  lset-adjoin	\g  <module-set>	]g  module-set-exp	^g  <toplevel-set>	_g  toplevel-set-exp	`g  <toplevel-define>	ag  toplevel-define-exp	bg  
<sequence>	cg  sequence-exps	dg  <lambda>	eg  reverse!	fg  <lambda-case>	gg  lambda-case-inits	hg  lambda-case-gensyms	ig  lambda-case-body	jg  append	kg  reverse	lg  lset-difference	mg  <let>	ng  let-gensyms	og  let-vals	pg  let-body	qg  <letrec>	rg  letrec-gensyms	sg  letrec-vals	tg  letrec-body	ug  for-each	vg  <fix>	wg  fix-gensyms	xg  fix-vals	yg  fix-body	zg  error	{f  unhandled record	|g  cons	}g  assq-ref	~g  hashq-remove!	g  <let-values> g  let-values-exp g  let-values-body g  	<dynwind> g  dynwind-body g  dynwind-winder g  dynwind-unwinder g  <dynlet> g  dynlet-fluids g  dynlet-vals g  dynlet-body g  <dynref> g  dynref-fluid g  <dynset> g  dynset-fluid g  
dynset-exp g  <prompt> g  
prompt-tag g  prompt-body g  prompt-handler g  <abort> g  	abort-tag g  
abort-args g  
abort-tail g  max g  filter g  cdr g  gensym f  :LCASE g  conditional? g  lexical-ref? f  'fixpoint procedures may not be assigned g  <tree-analysis> g  %make-tree-analysis-procedure g  make-syntax-transformer     g  make-tree-analysis g  macro g  $sc-dispatch     g  _ g  any   g  syntax-object g  lambda g  m-a11d84f71ea-1a65 g  top   g  ribcage g  t-a11d84f71ea-1a60 g  t-a11d84f71ea-1a61 g  t-a11d84f71ea-1a62 g  t-a11d84f71ea-1a63 g  t-a11d84f71ea-1a64     f  l-a11d84f71ea-1a6a f  l-a11d84f71ea-1a6b f  l-a11d84f71ea-1a6c f  l-a11d84f71ea-1a6d f  l-a11d84f71ea-1a6e       g  x     f  l-a11d84f71ea-1a67     g  shift g  	proc-name g  args       f  l-1e8ba8b5a-60 f  l-1e8ba8b5a-61     g  key g  value g  name g  formals g  body     f  l-1e8ba8b5a-53 f  l-1e8ba8b5a-54 f  l-1e8ba8b5a-55 f  l-1e8ba8b5a-56 f  l-1e8ba8b5a-57     g  make-procedure-name     f  l-1e8ba8b5a-43       f  l-1e8ba8b5a-42       g  hygiene     g  leaf       g  down   g  up   g  post   g  init     g  make-struct g  m-a11d84f71ea-1a5e   g  t-1e8ba8b5a-133 g  t-1e8ba8b5a-132 g  t-1e8ba8b5a-131  g  m-1e8ba8b5a-134  f  l-1e8ba8b5a-138f  l-1e8ba8b5a-139f  l-1e8ba8b5a-13a   	g  	ctor-args
	 f  l-1e8ba8b5a-120 
 g  ctorg  field f  l-1e8ba8b5a-11cf  l-1e8ba8b5a-11d  g  formg  	type-nameg  constructor-specg  field-names  f  l-1e8ba8b5a-111f  l-1e8ba8b5a-112f  l-1e8ba8b5a-113f  l-1e8ba8b5a-114   !g  record-layout"g  functional-setters#g  setters$g  copier%g  getters&g  constructor'g  getter-identifiers(g  field-identifiers)!"#$%&'( * +f  l-1e8ba8b5a-e9,f  l-1e8ba8b5a-e7-f  l-1e8ba8b5a-e5.f  l-1e8ba8b5a-e3/f  l-1e8ba8b5a-e10f  l-1e8ba8b5a-df1f  l-1e8ba8b5a-dd2f  l-1e8ba8b5a-db3+,-./012 4)*3 5f  l-1e8ba8b5a-da65 76 8 47 98 : ;
8 <9:; =< >g  each-any?>@g  syntax-violationA@ B@ Cf  Wrong number of argumentsDg  identifier?ED FD G HG I@ J@ Kf  -source expression failed to match any patternLg  record-type-vtableML NL Og  
pwpwpwpwpwPg  default-record-printerQP RP S Tg  set-struct-vtable-name!UT VT Wg  vtable-offset-userXW YW Zg  %tree-analysis?-procedure[g  tree-analysis?\ ]g  m-a11d84f71ea-1a7a^] _g  t-a11d84f71ea-1a79`_ a^ bf  l-a11d84f71ea-1a7fcb d`ac ef  l-a11d84f71ea-1a7cfe gaf h^dg ih jg  objkg  t-1e8ba8b5a-224lg  t-1e8ba8b5a-21emg  t-1e8ba8b5a-21fng  t-1e8ba8b5a-220og  t-1e8ba8b5a-223pg  t-1e8ba8b5a-222qg  t-1e8ba8b5a-221rklmnopq sg  m-1e8ba8b5a-225ts uttttttt vf  l-1e8ba8b5a-229wf  l-1e8ba8b5a-22axf  l-1e8ba8b5a-22byf  l-1e8ba8b5a-22czf  l-1e8ba8b5a-22d{f  l-1e8ba8b5a-22e|f  l-1e8ba8b5a-22f}vwxyz{| ~ru} g  	copier-id f  l-1e8ba8b5a-21c  g  	ctor-name f  l-1e8ba8b5a-214   f  l-1e8ba8b5a-212  g  layout f  l-1e8ba8b5a-210  g  
immutable? f  l-1e8ba8b5a-20e  g  field-count f  l-1e8ba8b5a-20c  g  
getter-ids f  l-1e8ba8b5a-209  g  	field-ids f  l-1e8ba8b5a-206  g  predicate-nameg  
field-spec  f  l-1e8ba8b5a-1f9f  l-1e8ba8b5a-1faf  l-1e8ba8b5a-1fbf  l-1e8ba8b5a-1fcf  l-1e8ba8b5a-1fdf  l-1e8ba8b5a-1fe  dg~47 j  g  and g  struct?  F g  struct-vtable  dg    i g Z g  throw-bad-struct  g  tree-analysis-leafg  %tree-analysis-leaf-procedureg  free-idg  
%%on-errorg  m-a11d84f71ea-1a86  f  l-a11d84f71ea-1a88      g  %%typeg  t-1e8ba8b5a-14bg  t-1e8ba8b5a-14cg  t-1e8ba8b5a-14dg  t-1e8ba8b5a-14eg  t-1e8ba8b5a-14fg  t-1e8ba8b5a-150g  t-1e8ba8b5a-151 g  m-1e8ba8b5a-152  f  l-1e8ba8b5a-156f  l-1e8ba8b5a-157f  l-1e8ba8b5a-158f  l-1e8ba8b5a-159f  l-1e8ba8b5a-15af  l-1e8ba8b5a-15bf  l-1e8ba8b5a-15c  g  getterg  index f  l-1e8ba8b5a-149f  l-1e8ba8b5a-14a    f  l-1e8ba8b5a-144f  l-1e8ba8b5a-145f  l-1e8ba8b5a-146  47    g  ckg  errg  s   f  l-a11d84f71ea-1a8bf  l-a11d84f71ea-1a8c     g  quote	 
 
 	  g  %%index   f  l-a11d84f71ea-1a90f  l-a11d84f71ea-1a91       
   g  %%copier    !f  l-a11d84f71ea-1a95"f  l-a11d84f71ea-1a96#!" $ # %$ &% '% (g  %%<tree-analysis>-set-fields)$ *() +'* ,+ -g  t-a11d84f71ea-1a85.- /f  l-a11d84f71ea-1a9a0/ 1.0 21 32 4147 54 65 7g  if874 9F4 :4 ;:5 <1 =< >9;= ?g  
struct-ref@?4 A1 B
A C@5B D4 E4 F< GEF HD5G I8>CH J36I K LK Mg  tree-analysis-downNg  %tree-analysis-down-procedureOg  m-a11d84f71ea-1aa1PO QP Rf  l-a11d84f71ea-1aa3SR TQS UPT VU WV XW YT47 ZY [Z \X[ ]PP ^f  l-a11d84f71ea-1aa6_f  l-a11d84f71ea-1aa7`^_ a ]` bPaT cb db eaT fe gdf hg iY ji kXj lf  l-a11d84f71ea-1aabmf  l-a11d84f71ea-1aacnlm o ]n pPoT qp rp soT ts urt vu wY xw yXx zf  l-a11d84f71ea-1ab0{f  l-a11d84f71ea-1ab1|z{ } ]| ~P}T ~ ~ }T (   g  t-a11d84f71ea-1aa0 f  l-a11d84f71ea-1ab5 Q PT  T47   7 F   T   ? T     M     T N g  tree-analysis-upg  %tree-analysis-up-procedureg  m-a11d84f71ea-1abc  f  l-a11d84f71ea-1abe      47     f  l-a11d84f71ea-1ac1f  l-a11d84f71ea-1ac2             f  l-a11d84f71ea-1ac6f  l-a11d84f71ea-1ac7       	      f  l-a11d84f71ea-1acbf  l-a11d84f71ea-1acc       (   g  t-a11d84f71ea-1abb f  l-a11d84f71ea-1ad0    47   7 F      ?  	           g  tree-analysis-postg  %tree-analysis-post-procedureg  m-a11d84f71ea-1ad7  f  l-a11d84f71ea-1ad9         47    	 
f  l-a11d84f71ea-1adcf  l-a11d84f71ea-1add
  	             f  l-a11d84f71ea-1ae1f  l-a11d84f71ea-1ae2  	        	 !  "! # $# %$ &f  l-a11d84f71ea-1ae6'f  l-a11d84f71ea-1ae7(&' ) 	( *)  +* ,* -)  .(- /,. 0/ 1g  t-a11d84f71ea-1ad621 3f  l-a11d84f71ea-1aeb43 524 65  76 85 47 98 :9 ;78 <F8 =8 >=9 ?5  @? A<>@ B?8 C5  D	C EB9D F8 G8 H? IGH JF9I K;AEJ L7:K M  NM Og  tree-analysis-initPg  %tree-analysis-init-procedureQg  m-a11d84f71ea-1af2RQ SR Tf  l-a11d84f71ea-1af4UT VSU WRV XW YX ZY [V47 \[ ]\ ^Z] _RR `f  l-a11d84f71ea-1af7af  l-a11d84f71ea-1af8b`a c _b dRcV ed fd gcV hg ifh ji k[ lk mZl nf  l-a11d84f71ea-1afcof  l-a11d84f71ea-1afdpno q _p rRqV sr tr uqV v	u wtv xw y[ zy {Zz |f  l-a11d84f71ea-1b01}f  l-a11d84f71ea-1b02~|}  _~ RV   V (   g  t-a11d84f71ea-1af1 f  l-a11d84f71ea-1b06 S RV  V47   7 F   V   ? V 	    O     V P g  each  g  %%set-fieldsg  dummyg  check?g  expr g  m-a11d84f71ea-1b0d  f  l-a11d84f71ea-1b12f  l-a11d84f71ea-1b13f  l-a11d84f71ea-1b14f  l-a11d84f71ea-1b15f  l-a11d84f71ea-1b16   f  l-a11d84f71ea-1b0f  g  t-1e8ba8b5a-16ag  t-1e8ba8b5a-16cg  t-1e8ba8b5a-16b g  m-1e8ba8b5a-16d  f  l-1e8ba8b5a-171f  l-1e8ba8b5a-172f  l-1e8ba8b5a-173  f  l-1e8ba8b5a-167f  l-1e8ba8b5a-168f  l-1e8ba8b5a-169  47     M   O  G G g  listg  tree-il-foldg  tree-il-srcg  <binding-info>g  %make-binding-info-procedureg  make-binding-info g  m-a11d84f71ea-1b75 g  t-a11d84f71ea-1b73g  t-a11d84f71ea-1b74  f  l-a11d84f71ea-1b7af  l-a11d84f71ea-1b7b   f  l-a11d84f71ea-1b77    g  vars  g  refs  g  m-a11d84f71ea-1b71  47   
       g  pwpw g  %binding-info?-procedureg  binding-info?g  m-a11d84f71ea-1b84 g  t-a11d84f71ea-1b83	 
 f  l-a11d84f71ea-1b89 	
 f  l-a11d84f71ea-1b86 
   ~47 j     F         ! "! #g  binding-info-vars$g  %binding-info-vars-procedure%g  m-a11d84f71ea-1b90&% '& (f  l-a11d84f71ea-1b92)( *') +&* ,+ -, .- /*47 0/ 10 2.1 3&& 4f  l-a11d84f71ea-1b955f  l-a11d84f71ea-1b96645 7 36 8&7* 98 :8 ;7* <; =:< >= ?/ @? A.@ Bf  l-a11d84f71ea-1b9aCf  l-a11d84f71ea-1b9bDBC E 3D F&E* GF HF IE* J
I KHJ LK M/ NM O.N Pf  l-a11d84f71ea-1b9fQf  l-a11d84f71ea-1ba0RPQ S 3R T&S* UT VT Wg  %%<binding-info>-set-fieldsXS* YWX ZVY [Z \g  t-a11d84f71ea-1b8f]\ ^f  l-a11d84f71ea-1ba4_^ `]'_ a&`* ba c`*47 dc ed f7c gFc hc ihd j`* kj lgik m?c n`* o
n pmdo qc rc s#j trs uqdt vflpu wbev x* y$x zg  binding-info-refs{g  %binding-info-refs-procedure|g  m-a11d84f71ea-1bab}| ~} f  l-a11d84f71ea-1bad ~ }    47    }} f  l-a11d84f71ea-1bb0f  l-a11d84f71ea-1bb1   }          f  l-a11d84f71ea-1bb5f  l-a11d84f71ea-1bb6   }          f  l-a11d84f71ea-1bbaf  l-a11d84f71ea-1bbb   }    W   g  t-a11d84f71ea-1baa f  l-a11d84f71ea-1bbf ~ }  47   7 F      ?      z      { g  m-a11d84f71ea-1bc6  f  l-a11d84f71ea-1bcbf  l-a11d84f71ea-1bccf  l-a11d84f71ea-1bcdf  l-a11d84f71ea-1bcef  l-a11d84f71ea-1bcf   f  l-a11d84f71ea-1bc8  47    # z  g  
string-anyg  symbol->stringg  gensym?g  vhash-consqj j g  cadrg  foldg  	let-namesg  letrec-namesg  	fix-namesg  vlist-for-eachg  
vhash-assqg  findg  pair?g  warningg  unused-variableg  
vlist-dropg  
vlist-nullg  <reference-graph>g  %make-reference-graph-procedureg  make-reference-graph g  m-a11d84f71ea-1ccf g  t-a11d84f71ea-1cccg  t-a11d84f71ea-1ccd g  t-a11d84f71ea-1cce   f  l-a11d84f71ea-1cd4f  l-a11d84f71ea-1cd5f  l-a11d84f71ea-1cd6   	f  l-a11d84f71ea-1cd1
	 
     g  defs g  toplevel-context  g  m-a11d84f71ea-1cca  47   
     g  pwpwpw  !g  %reference-graph?-procedure"g  reference-graph?#g  m-a11d84f71ea-1ce0$# %g  t-a11d84f71ea-1cdf&% '$ (f  l-a11d84f71ea-1ce5)( *&') +f  l-a11d84f71ea-1ce2,+ -', .$*- /. 0*-~47 1j0 21 30 40 541 6F0 70 871 9*- :9 ;68: <35; =/2< >- ?!> @g  reference-graph-defsAg  %reference-graph-defs-procedureBg  m-a11d84f71ea-1cecCB DC Ef  l-a11d84f71ea-1ceeFE GDF HCG IH JI KJ LG47 ML NM OKN PCC Qf  l-a11d84f71ea-1cf1Rf  l-a11d84f71ea-1cf2SQR T PS UCTG VU WU XTG YX ZWY [Z \L ]\ ^K] _f  l-a11d84f71ea-1cf6`f  l-a11d84f71ea-1cf7a_` b Pa cCbG dc ec fbG g
f heg ih jL kj lKk mf  l-a11d84f71ea-1cfbnf  l-a11d84f71ea-1cfcomn p Po qCpG rq sq tg  %%<reference-graph>-set-fieldsupG vtu wsv xw yg  t-a11d84f71ea-1cebzy {f  l-a11d84f71ea-1d00|{ }zD| ~C}G ~ }G47   7 F   }G   ? }G 
    @     G A g  reference-graph-refsg  %reference-graph-refs-procedureg  m-a11d84f71ea-1d07  f  l-a11d84f71ea-1d09      47     f  l-a11d84f71ea-1d0cf  l-a11d84f71ea-1d0d             f  l-a11d84f71ea-1d11f  l-a11d84f71ea-1d12             f  l-a11d84f71ea-1d16f  l-a11d84f71ea-1d17       t   g  t-a11d84f71ea-1d06 f  l-a11d84f71ea-1d1b    47   7 F      ?             g   reference-graph-toplevel-contextg  +%reference-graph-toplevel-context-procedureg  m-a11d84f71ea-1d22  f  l-a11d84f71ea-1d24      47     f  l-a11d84f71ea-1d27f  l-a11d84f71ea-1d28            	 
	 
 f  l-a11d84f71ea-1d2cf  l-a11d84f71ea-1d2d       	      f  l-a11d84f71ea-1d31f  l-a11d84f71ea-1d32       ! "t! # " $# %g  t-a11d84f71ea-1d21&% 'f  l-a11d84f71ea-1d36(' )&( *) +* ,)47 -, .- /7, 0F, 1, 21- 3) 43 5024 6?, 7) 8	7 96-8 :, ;, <3 =;< >:-= ?/59> @+.? A BA Cg  m-a11d84f71ea-1d3dDC ED Ff  l-a11d84f71ea-1d42Gf  l-a11d84f71ea-1d43Hf  l-a11d84f71ea-1d44If  l-a11d84f71ea-1d45Jf  l-a11d84f71ea-1d46KFGHIJ LEK MD Nf  l-a11d84f71ea-1d3fON PMO QLP47 RQ SLP TS U@S VS WS XUVW Yg  and=>Zg  graph-reachable-nodes[g  
vlist-fold\g  graph-reachable-nodes*]g  
partition*^g  toplevel-define-name_g  toplevel-define-src`g  toplevel-set-nameag  toplevel-set-srcbg  module?cg  module-variabledg  module-public-interfaceeg  macro?fg  vlist-filtergg  unused-toplevelhg  <toplevel-ref>ig  toplevel-ref-namejg  toplevel-ref-srckg  <toplevel-info>lg  %make-toplevel-info-proceduremg  make-toplevel-infong  m-a11d84f71ea-1e83on pg  t-a11d84f71ea-1e81qg  t-a11d84f71ea-1e82rpq soo tf  l-a11d84f71ea-1e88uf  l-a11d84f71ea-1e89vtu wrsv xo yf  l-a11d84f71ea-1e85zy {xz |ow{ }| ~w{ ~ ~  g  m-a11d84f71ea-1e7f w{ 47  k~ 
  } { l  g  %toplevel-info?-procedureg  toplevel-info?g  m-a11d84f71ea-1e92 g  t-a11d84f71ea-1e91  f  l-a11d84f71ea-1e97  f  l-a11d84f71ea-1e94    ~47 j     F    k      g  toplevel-info-refsg  %toplevel-info-refs-procedureg  m-a11d84f71ea-1e9e  f  l-a11d84f71ea-1ea0      47     f  l-a11d84f71ea-1ea3f  l-a11d84f71ea-1ea4       k      f  l-a11d84f71ea-1ea8f  l-a11d84f71ea-1ea9       
      f  l-a11d84f71ea-1eadf  l-a11d84f71ea-1eae      g  %%<toplevel-info>-set-fields    g  t-a11d84f71ea-1e9d f  l-a11d84f71ea-1eb2    47   7 F    k  ?  
            g  toplevel-info-defsg  %toplevel-info-defs-procedureg  m-a11d84f71ea-1eb9  f  l-a11d84f71ea-1ebb	 
	 
    
47     f  l-a11d84f71ea-1ebef  l-a11d84f71ea-1ebf   
   
 k      !  "f  l-a11d84f71ea-1ec3#f  l-a11d84f71ea-1ec4$"# % $ &%
 '& (& )%
 *) +(* ,+ - .- /. 0f  l-a11d84f71ea-1ec81f  l-a11d84f71ea-1ec9201 3 2 43
 54 64 73
 87 968 :9 ;g  t-a11d84f71ea-1eb8<; =f  l-a11d84f71ea-1ecd>= ?<> @?
 A@ B?
47 CB DC E7B FFB GB HGC I?
 JkI KFHJ L?B M?
 NM OLCN PB QB RI SQR TPCS UEKOT VADU W
 XW Yg  m-a11d84f71ea-1ed4ZY [Z \f  l-a11d84f71ea-1ed9]f  l-a11d84f71ea-1eda^f  l-a11d84f71ea-1edb_f  l-a11d84f71ea-1edc`f  l-a11d84f71ea-1edda\]^_` b[a cZ df  l-a11d84f71ea-1ed6ed fce gbf47 hg ibf jki ki li mkl ng  <const>og  toplevel-define!pg  resolve-moduleqg  ooprg  goopssqr tg  <module-ref>ug  goops-toplevel-definitionvg  
vhash-delqwg  unbound-variablexg  vlist-reverseyg  <arity-info>zg  %make-arity-info-procedure{g  make-arity-info|g  m-a11d84f71ea-2136}| ~g  t-a11d84f71ea-2133g  t-a11d84f71ea-2134g  t-a11d84f71ea-2135~ }}} f  l-a11d84f71ea-213bf  l-a11d84f71ea-213cf  l-a11d84f71ea-213d  } f  l-a11d84f71ea-2138  }  g  toplevel-calls  g  lexical-lambdas g  toplevel-lambdas  g  m-a11d84f71ea-2131  47  y 
    z  g  %arity-info?-procedureg  arity-info?g  m-a11d84f71ea-2147 g  t-a11d84f71ea-2146  f  l-a11d84f71ea-214c  f  l-a11d84f71ea-2149    ~47 j     F    y      g  toplevel-procedure-callsg  #%toplevel-procedure-calls-procedureg  m-a11d84f71ea-2153  f  l-a11d84f71ea-2155      47     f  l-a11d84f71ea-2158f  l-a11d84f71ea-2159       y      f  l-a11d84f71ea-215df  l-a11d84f71ea-215e       
      f  l-a11d84f71ea-2162f  l-a11d84f71ea-2163      g  %%<arity-info>-set-fields    g  t-a11d84f71ea-2152 f  l-a11d84f71ea-2167     47    7  F      y 	 
?   
 
        	    g  %lexical-lambdas-procedureg  m-a11d84f71ea-216e  f  l-a11d84f71ea-2170      !  "47 #" $# %!$ & 'f  l-a11d84f71ea-2173(f  l-a11d84f71ea-2174)'( * &) +* ,+ -+ .* /y. 0-/ 10 2" 32 4!3 5f  l-a11d84f71ea-21786f  l-a11d84f71ea-2179756 8 &7 98 :9 ;9 <8 =< >;= ?> @" A@ B!A Cf  l-a11d84f71ea-217dDf  l-a11d84f71ea-217eECD F &E GF HG IG JF KJ LIK ML Ng  t-a11d84f71ea-216dON Pf  l-a11d84f71ea-2182QP ROQ SR TS UR47 VU WV X7U YFU ZU [ZV \R ]y\ ^Y[] _?U `R a` b_Va cU dU e\ fde gcVf hX^bg iTWh j kj lg  %toplevel-lambdas-proceduremg  m-a11d84f71ea-2189nm on pf  l-a11d84f71ea-218bqp roq snr ts ut vu wr47 xw yx zvy {nn |f  l-a11d84f71ea-218e}f  l-a11d84f71ea-218f~|}  {~ nr   r y   w  v f  l-a11d84f71ea-2193f  l-a11d84f71ea-2194  { nr   r 	   w  v f  l-a11d84f71ea-2198f  l-a11d84f71ea-2199  { nr   r    g  t-a11d84f71ea-2188 f  l-a11d84f71ea-219d o nr  r47   7 F   r y  ? r 	         r l g  m-a11d84f71ea-21a4  f  l-a11d84f71ea-21a9f  l-a11d84f71ea-21aaf  l-a11d84f71ea-21abf  l-a11d84f71ea-21acf  l-a11d84f71ea-21ad   f  l-a11d84f71ea-21a6  47   y     g  program?g  procedure-nameg  
arity:nreqg  
arity:noptg  arity:rest?g  carg  arity:kwg  arity:allow-other-keys?g  program-aritiesg  
procedure?g  procedure-minimum-arityg  lambda-metag  	assoc-refg  const?g  	const-expg  keyword?g  arity-mismatchg  with-output-to-stringg  writeg  validate-arityg  application-srcg  
vlist-tailg  catch  g  
module-refg  toplevel-ref?g  lambda?f  format-string-syntax-errorg  &syntax-errorg  throwg  unterminated-conditionalg  tildeg  literalg  
take-while0123456789 
g  string->numberg  list->stringg  everyg  number?g  list-ref	 g  min	g  unexpected-semicolon	g  "unexpected-conditional-termination	g  unterminated-iteration	g  unexpected-termination	f  computer bought the farm	g  string->list	g  format-string-argument-count	g  resolve-interface		g  ensureS	
g  	proc-ref?	g  gettext	g  gettext?	g  ngettext	g  N_	g  	ngettext?	g  string?	g  	const-fmt	g  boolean?	g  format	g  
wrong-port	g  negate	g  non-literal-format-string	z 	z 	f  no matching pattern	g  wrong-format-string	g  wrong-num-args	g  wrong-format-arg-count	g  syntax-error	g  
make-const	ASas~% 	 g  simple-format	!	 	"	  	#	  	$	!	 	%	!	 C 5  hT k  ]04	
23;5 4> >  "  G   ?@    h(      ]
45 4 >  "  G  C             g  k
		" g  v		" g  res			"  g  filenamef  language/tree-il/analyze.scm
 
	 		 		
 	 		"	  g  nameg  
make-hashq CARh      ]L L 6   {       g  y
		  g  filenamef  language/tree-il/analyze.scm
 			 	&	 	 		  g  nameg  step CBCDEFGHIJKLM@NOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstu@     h   k   ]M  6     c       g  sym
		  g  filenamef  language/tree-il/analyze.scm
			 		   Cvwxy@       h   |   ]M  6    t       g  sym
		 g  val		  g  filenamef  language/tree-il/analyze.scm
			# 			   CdW@jeNz{ 	       h     ] &  o4 54M  >  "  G  4L 4LL554M  44M  55>  "  G  4M >  "  G  C 6        g  x
	  g  rtd	  g  body			~ g  free		A	~  g  filenamef  language/tree-il/analyze.scm
						 	.	%		. 		5 		A 		A 		D!		K!	0	N!	:	X!	0	]!		f"	 	 	    C|}uN@  h0      ]4M 5$  4M >  "  G  L  6C    ~       g  sym
		,  g  filenamef  language/tree-il/analyze.scm
*		+	!	+		-	#	*.	# 		,   C       h(      ]	4L  5$  LLO 6C           g  sym
		$ g  refs		$  g  filenamef  language/tree-il/analyze.scm
'			(		(		)		"*	 		$  g  nameg  delabel-dependents! CN   h   }   ]4M 5$  CL  6 u       g  sym
		  g  filenamef  language/tree-il/analyze.scm
=		>		>		?	 		   CN@j~       hX      ]4M 5$  G4M L44M 54M L55>  "  G  4M >  "  G  M6C       g  sym
		X g  val		X  g  filenamef  language/tree-il/analyze.scm
D	
	E		E		I		J		J	&	#K	&	-J		2I		;L		VM	 		X	   C Z       h    ]MO LQ  &  :4 54 54L$  "  545@&  I4	 54
 54 5	4L54L54L	56& "4 54M4M
5>  "  G  "  4M>  "  G  "  $  45$  4M5$  "  ~	$  s4	5$  c44	5545$  ,4	5$  "  4	5$  "  4	5"  

$  
"  '4	5	"
"  "  45	"u"  $  "  " "  ""  " C&  P4 54 54M >  "  G  4M>  "  G  4L56&  4 5 "&  4  5 "!&  4" 5 "d#&  m4$ 5"  U(  C(  	
4L
5
64	
4L
5
5	"	"%&  h4 54M >  "  G  4L 54M 4&4M 55>  "  G  4M >  "  G  C'&  4( 54) 54* 54 5
	4 >  "  G  4 >  "  G  4M4+4,54M55>  "  G  4-4445?4L	555
$  4L
5"  6.&  j4/ 540 541 5	4M4+4,54M55>  "  G  -44L	545?62&  43 544 545 5	4M4+4,54M55>  "  G  467L O >  "  G  -44L	545?68&  49 54: 54; 5	46<LO >  "  G  4M4+4,54M55>  "  G  4=LLLO 5
4>
54L	4+55?O LQ 46@LO >  "  G  46ALLLO >  "  G  -4
?6B&  04C 54D 54L54L56E&  E4F 54G 54H 5	4L54L54L	56I&  =4J 54K 54L 5	4L	544+55@M&  4N 5 "O&  04P 54Q 54L54L56R&  G4S 54T 54U 5	4L54L54L	56V&  B4W 54X 54Y 5	4L54L	545@C         g  x
	 g  proc	 g  labels-in-proc		 g  tail?		 g  tail-call-args		 g  step		 g  rtd		 g  proc		-	Y g  args		-	Y g  test		v  g  
consequent		v  g  	alternate			v  g  gensym	  g  p	 g  c		 g  t	
u g  gensym	, g  exp	, g  exp	;R g  exp	ax g  exp	 g  exps	 g  exps	 g  ret		 g  y	
 g  y	
 g  body	" g  free	F g  inits	I g  gensyms	I g  body		I g  	alternate	
I g  gensyms	f g  vals	f g  body		f g  gensyms	F g  vals	F g  body		F g  gensyms	cJ g  vals	cJ g  body		cJ g  var-refs	
J g  vars-with-refs	J g  	body-refs	J g  delabel-dependents!	J g  exp	` g  body	` g  body	 g  winder	 g  unwinder		 g  fluids	 g  vals	 g  body		 g  fluid	#: g  fluid	Pr g  exp	Pr g  tag	 g  body	 g  handler		 g  tag	 g  args	 g  tail		  >g  filenamef  language/tree-il/analyze.scm
 		 		6 	$	E 	.	N 	$	O 		Y 		a 	  	  	&  	  	  	  	  	  	(  	$  	  	  	  	
 	 	 	 	 	% 	& 	%0 	1 	,4 	4< 	,= 	,D 	)H 	$I 	.S 	$Y 	.c 	$i 	.p 	)u 	# 	( 	$ 	 	( 	 	 	 	 	 	 	$ 	&( 	, 	4 	B 	&R 	Z 	h 	&x 	 	 	& 	 	 	 		 	 	 		 	/ 	$ 	 	 	 	 	9 	3 	 	& 	  	 	 	 	! 	 	% 	, 	 1 	: 	A 	4F 	F 	I 		P 	"S 	,] 	"b 		k 		 	 	 	 	 	- 	 	 	 	 	% 	; 	% 	* 	. 	4 	5 	G 	,I 	Q 	m 	t 	w 	~ 	- 	 		 		?	 	 					-			%		* 	8		?B		F	N 	j					-				%		 	 	 		=		C		<P	JO		R 	i 	p 	&t 	| 	& 	T	 	 	 	& 	 	& 	 	& 	W	 	 	 	& 	Z	)Z	3Z	)Z	 	* 	&: 	B 	Y 	` 	&d 	l 	&p 	r`	z 	 	 	& 	 	& 	 	c	 	 	 	& 	 	&  	f	4f	h	 		  g  nameg  analyze! C    h   {   ]L LL 6    s       g  y
		  g  filenamef  language/tree-il/analyze.scm
p		p	 		  g  nameg  recur CBCDGHIJKXZ\]^_`abcdW@NN h   r   ]4M 5L 6       j       g  v
		  g  filenamef  language/tree-il/analyze.scm
			 		 		   CN    h   t   ] 4M  5C l       g  sym
		  g  filenamef  language/tree-il/analyze.scm
	"		.		$ 		   CfghiVST    h   i   ]L LL 6    a       g  x
		  g  filenamef  language/tree-il/analyze.scm
	!		- 		   CAmnopQMqrst       h   i   ]L LL 6    a       g  x
		  g  filenamef  language/tree-il/analyze.scm
	%		' 		   Cvwxyz{jP V hx    ]kO LQ  &  *4 54 54L545@&  @4 54	 54
 54L54L54L56&  4 5 "M&  4 5 ",&  4 5 "&  4 5 "&  4 545@&  4 5"  D$  944M5 4M5>  "  G  ""  4M 5
"4LO 4M 5544LO 4M  5554L 
>  "  G  4M >  "  G  C&  4 54 54  54! 54" >  "  G  4# >  "  G  "  	(  K44L
54$
LO 5?4M 4%&5>  "  G  "  H4M	4'4M	5
5>  "  G  	

	"v
	"j$  4L5"  6(& u4) 54* 54+ 5445?"  c"  S	(  4L
56	4M4'4M5
5>  "  G  	

	"
	"4,5$  4-5$  	4M	5$  "  f4M	
5	$  T4.455$  ?4/455	&  (4.4	55$  4/4	55	"  "  "  "  	$  ;4M4'5>  "  G  4L4
556"""0&  41 542 543 5"  l(  *444	LO 5?

4L	56
4M
4'4M
5	5>  "  G  		"	"5& C46 547 548 5" (  "  
(  4L	564M
5$  S
&  "4544L	55"  	49:5
"
44L	55
"e	
"U
4M
5$  9; 64M
5$  		"4M
4'	5>  "  G  		"	"<&  ,4= 54> 54L54L56?&  @4@ 54A 54B 54L54L54L56C&  :4D 54E 54F 54L544G55@H&  4I 5 "J&  ,4K 54L 54L54L56M&  4N 54O 54P 54Q5$  45$  45"  "  4M $  4M
5
"  >  "  G  4L54L54L56R&  >4S 54T 54U 54L54L545@C         g  x
	u g  proc	u g  n		u g  recur		u g  rtd		u g  proc		0	L g  args		0	L g  test		i  g  
consequent		i  g  	alternate		i  g  exp	   g  exp	   g  exp	   g  exp	 g  exps	'6 g  body	E g  c	K g  n	K g  free-addresses	 g  labels	 g  inits	3 g  gensyms	3 g  body	3 g  	alternate	3 g  gensyms		e g  n	
e g  nlocs	 g  gensyms	1 g  vals	1 g  body	1 g  nmax	E g  gensyms		O g  n	
O g  v	i g  v		F g  gensyms	0 g  vals	0 g  body	0 g  gensyms	$ g  n		$ g  nmax	
 g  v	
$ g  gensyms	M{ g  vals	M{ g  body	M{ g  in	Wo g  n		Wo g  gensyms	
a g  vals	a g  nmax	a g  r	 g  rtd	 g  body	 g  v	
o g  exp	 g  body	 g  body	 g  winder	 g  unwinder	 g  fluids	9 g  vals	9 g  body	9 g  fluid	HZ g  fluid	p g  exp	p g  tag	, g  body	, g  handler	, g  cont-var	, g  tag	Ir g  args	Ir g  tail	Ir  Hg  filenamef  language/tree-il/analyze.scm
o		q		7p		Bs		Ls		Tq		rp	 v	 q	 p	 q	 p	 q	 p	 q	p	 q	,	6	>q	K	N	R		S	V	]	1_	b	c	!j	5l	!o	u													"							"		q	e	k	
l	o	z					/	7	/	)			'		"	(	<	(	"				"					q	8	;	E	E	O	U	Z	f	i	i	l	s	x	 y	&	 				%																			%				0
				%	 	!	$	0,	/	J	K	R	"S	X	(_	d	s	t	w	'		q						 										"						!$	$	8q	W	]		a	g	l	x	y		#					"			"								*								"	&	'	3	6	@	A	H	*M	;T	*Y	d	g	o	o	q	p		q	p		q	p	(	-	*7	9	Aq	Zp	bq	wp	
	q				#			!						*	#		
p	,		4q	Rp	h	+r	 	u	  g  nameg  	allocate! C?        h     ]AHHHHHHO O Q Q 45 K45 K45 K45 K45 K45 K4 >  "  G  4 
>  "  G  JC        g  x
	  g  
bound-vars	  g  	free-vars		  g  assigned		  g  	refcounts		  g  labels		  g  
allocation		  g  analyze!		/  g  	allocate!		/   	g  filenamef  language/tree-il/analyze.scm
 
	P 		W 		^ 		e 		l 		sm		z	 	 	 	 	   g  nameg  analyze-lexicals C4R        h      ]  C             g  leaf
		 g  down		 g  up			 g  post			 g  init			  g  filenamef  language/tree-il/analyze.scm
#
 			  g  nameg  %make-tree-analysis-procedure CR4=        h      ]  C             g  t-a11d84f71ea-1a60
		 g  t-a11d84f71ea-1a61		 g  t-a11d84f71ea-1a62			 g  t-a11d84f71ea-1a63			 g  t-a11d84f71ea-1a64			  			   C?BC       h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	#
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	#
 		
   CH h      ] C          		
   CJK      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/analyze.scm
#
 		n   C5RNORS  4V >  "  G   	Yi  R      h      ] $   CC             g  obj
		  g  filenamef  language/tree-il/analyze.scm
#
 		  g  nameg  %tree-analysis?-procedure CZR4[\        h   :   ]  C      2       g  t-a11d84f71ea-1a79
		
  		
   C?B[C      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	#
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	#
 		
   C h      ] C          		
   CJK      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/analyze.scm
#
 		n   C5[R     h      ] &   
C 6       g  s
		  g  filenamef  language/tree-il/analyze.scm
#
 		  g  nameg  %tree-analysis-leaf-procedure CR4   h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C &, h   :   ]C     2       g  err
		 g  s		  			   C\J    h   :   ]  C      2       g  t-a11d84f71ea-1a85
		
  		
   C?BC      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	#
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	#
 		
   CL h      ] C          		
   CJK      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/analyze.scm
#
 	    C5RM h      ] &   C 6       g  s
		  g  filenamef  language/tree-il/analyze.scm
#
 		  g  nameg  %tree-analysis-down-procedure CNR4M\ch   h   :   ]C     2       g  err
		 g  s		  			   Ckqv h   :   ]C     2       g  err
		 g  s		  			   Cy h   :   ]C     2       g  err
		 g  s		  			   C\    h   :   ]  C      2       g  t-a11d84f71ea-1aa0
		
  		
   C?BMC      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	#
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	#
 		
   C h      ] C          		
   CJK      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/analyze.scm
#
 	    C5MR h       ] &   	C 6              g  s
		  g  filenamef  language/tree-il/analyze.scm
#
 		  g  nameg  %tree-analysis-up-procedure CR4     h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C\    h   :   ]  C      2       g  t-a11d84f71ea-1abb
		
  		
   C?BC      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	#
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	#
 		
   C h      ] C          		
   CJK      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/analyze.scm
#
 	    C5R h       ] &   	C 6              g  s
		  g  filenamef  language/tree-il/analyze.scm
#
 		  g  nameg  %tree-analysis-post-procedure CR4   h   :   ]C     2       g  err
		 g  s		  			   C" h   :   ]C     2       g  err
		 g  s		  			   C%+0 h   :   ]C     2       g  err
		 g  s		  			   C\L    h   :   ]  C      2       g  t-a11d84f71ea-1ad6
		
  		
   C?BC      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	#
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	#
 		
   CN h      ] C          		
   CJK      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/analyze.scm
#
 	    C5RO h       ] &   	C 6              g  s
		  g  filenamef  language/tree-il/analyze.scm
#
 		  g  nameg  %tree-analysis-init-procedure CPR4O^ej   h   :   ]C     2       g  err
		 g  s		  			   Cmsx h   :   ]C     2       g  err
		 g  s		  			   C{ h   :   ]C     2       g  err
		 g  s		  			   C\    h   :   ]  C      2       g  t-a11d84f71ea-1af1
		
  		
   C?BOC      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	#
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	#
 		
   C h      ] C          		
   CJK      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/analyze.scm
#
 	    C5OR4(    h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   CJK h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  language/tree-il/analyze.scm
#
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5(RG   h      ]4L 5LLL 6            g  analysis
		 g  result		  g  filenamef  language/tree-il/analyze.scm
9		:		:	 			   C        h(      ]
4L L O L5C             g  x
		" g  results		" g  locs			"  g  filenamef  language/tree-il/analyze.scm
6		7	!	7		
9		<		 9		!8	 		"	   CNGh      ]4L 5LLL 6            g  analysis
		 g  result		  g  filenamef  language/tree-il/analyze.scm
9		:		:	 			   C        h8      ]
4 54L L O L5C              g  x
		1 g  results		1 g  locs			 g  locs			1  g  filenamef  language/tree-il/analyze.scm
6		7	!	7		@	%	@		7		9		-<		/9		08	 		1	   CG      h      ]4L 5LLL 6            g  analysis
		 g  result		  g  filenamef  language/tree-il/analyze.scm
9		:		:	 			   C        h0      ]
4L L O L5C             g  x
		* g  results		* g  locs			 g  locs			*  g  filenamef  language/tree-il/analyze.scm
6		7	!	7		
A		7		9		&<		(9		)8	 
		*	   CGPu    h(      ] &  	 	"  	4 5L 6     |       g  analysis
		# g  result		#  g  filenamef  language/tree-il/analyze.scm
K		L	 		#	   C hp     ]4 O  O  O 4	 554
O  >  "  G  C        g  analyses
		n g  tree		n g  env			n g  proc			 g  proc			) g  proc		+	; g  results		J	k  g  filenamef  language/tree-il/analyze.scm
,
	D			D		E		+F		<G		=H		FG		JD			JC		MK		[N		`K	 		n	  g  nameg  analyze-treeg  documentationf hRun all tree analyses listed in ANALYSES on TREE for ENV, using
`tree-il-fold'.  Return TREE.  The leaf/down/up procedures of each analysis are
passed a ``location stack', which is the stack of `tree-il-src' values for each
parent tree (a list); it can be used to approximate source location when
accurate information is missing from a given `tree-il' element. C5R       h      ]  C           g  vars
		 g  refs		  g  filenamef  language/tree-il/analyze.scm
Z
 			  g  nameg  %make-binding-info-procedure CR4  h   Z   ]  C    R       g  t-a11d84f71ea-1b73
		 g  t-a11d84f71ea-1b74		  			   C?BC      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	Z
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	Z
 		
   C h      ] C          		
   CJK      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/analyze.scm
Z
 		n   C5RNR  4V >  "  G   	Yi  R        h      ] $   CC      ~       g  obj
		  g  filenamef  language/tree-il/analyze.scm
Z
 		  g  nameg  %binding-info?-procedure CR4\  h   :   ]  C      2       g  t-a11d84f71ea-1b83
		
  		
   C?BC      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	Z
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	Z
 		
   C" h      ] C          		
   CJK      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/analyze.scm
Z
 		n   C5R#    h      ] &   
C 6       g  s
		  g  filenamef  language/tree-il/analyze.scm
Z
 		  g  nameg  %binding-info-vars-procedure C$R4#29>    h   :   ]C     2       g  err
		 g  s		  			   CAGL h   :   ]C     2       g  err
		 g  s		  			   COU[ h   :   ]C     2       g  err
		 g  s		  			   C\w    h   :   ]  C      2       g  t-a11d84f71ea-1b8f
		
  		
   C?B#C      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	Z
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	Z
 		
   Cy h      ] C          		
   CJK      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/analyze.scm
Z
 	    C5#Rz        h      ] &   C 6       g  s
		  g  filenamef  language/tree-il/analyze.scm
Z
 		  g  nameg  %binding-info-refs-procedure C{R4z    h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C\    h   :   ]  C      2       g  t-a11d84f71ea-1baa
		
  		
   C?BzC      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	Z
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	Z
 		
   C h      ] C          		
   CJK      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/analyze.scm
Z
 	    C5zR4W    h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   CJK h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  language/tree-il/analyze.scm
Z
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5WR     h      ] 4 56        g  sym
		  g  filenamef  language/tree-il/analyze.scm
`
	b		b	 		  g  nameg  gensym? CRz#XYfRSUThgG      h      ] L  6              g  var
		 g  name		 g  vars			  g  filenamef  language/tree-il/analyze.scm
w		x	"	x	 			   Cmn  h      ] L  6              g  var
		 g  name		 g  vars			  g  filenamef  language/tree-il/analyze.scm
w		x	"	x	 			   Cqr  h      ] L  6              g  var
		 g  name		 g  vars			  g  filenamef  language/tree-il/analyze.scm
w		x	"	x	 			   Cvw  h      ] L  6              g  var
		 g  name		 g  vars			  g  filenamef  language/tree-il/analyze.scm
w		x	"	x	 			   C !    h    ]\&  "  	45&  
"  	454 5 &  4 545		 C	&  4
 54 54 54 54 5
	4 >  "  G  44	$  	"  4
$  	
 "  $  45"  5554O 5 C&  04 54 5	4O 	5

 C&  04 54 5	4O 	5

 C&  04 54 5	4 O 	5

 CC          g  x
	 g  info	 g  env		 g  locs		 g  refs		= g  vars		= g  src		= g  rtd		F g  gensym		W	o g  refs			c	o g  req	  g  opt		  g  rest	
  g  kw	  g  gensyms	  g  names	  g  vars	 g  gensyms	/Q g  names		/Q g  vars	
EQ g  gensyms	g g  names		g g  vars	
} g  gensyms	 g  names		 g  vars	
  g  filenamef  language/tree-il/analyze.scm
p		s		t		7u		=s		F}		Z	"	c	
	w}	 	 	 	# 	 	 	$ 	0 	 	" 	, 	" 	6 	 	
 w			!}	4w		E	
Y}	lw		}	
}	w			
 #		   C z#OP 
h   p  ] 4L5$  m4L 5$  "  4L5$  M  $  "  	4L545$  "  $  
	6CCC     h      g  var
	  g  gensym	  g  t		;	U g  name		U	 g  loc		U	  g  filenamef  language/tree-il/analyze.scm
	
											!		'		.		2		5		9	"	;		J	"	U		Z	"	d		m	,	n	"	o		s		w	!	}	 	    CQ        h0      ]4LL O L >  "  G  L 4 56         g  
inner-vars
		. g  refs		.  g  filenamef  language/tree-il/analyze.scm
					&		.		 		.	  g  nameg  shrink Cfhmnqrvw    h     ]4&  "  	45&  
"  	45O  Q  &  4 545		 C&  4	 545		 C
&  4 545		 C&  4 545		 CC         g  x
	  g  info	  g  env		  g  locs		  g  refs		6  g  vars		6  g  shrink		D  g  rtd		P  g  gensyms		a	x g  vars			l	x g  gensyms	   g  vars		   g  gensyms	   g  vars		   g  gensyms	   g  vars		    g  filenamef  language/tree-il/analyze.scm
						6		P		d		l	
 	 	 	
 	 	 	
 	 	 	
 	 	   Ciii iz#LM  hp   &  ],&  "  	45&  
"  	45 &  4 545 CC             g  x
		i g  info		i g  env			i g  locs			i g  refs		6	i g  vars		6	i g  rtd		=	i g  gensym		N	f g  refs		Z	f  	g  filenamef  language/tree-il/analyze.scm
g		i		j		6i		=k		Qm	"	Zm	
 		i	   C     h   v   ]C    n       g  result
		 g  env		  g  filenamef  language/tree-il/analyze.scm
	 			   C  6R  h      ]  C         g  refs
		 g  defs		 g  toplevel-context			  g  filenamef  language/tree-il/analyze.scm

 			  g  nameg  %make-reference-graph-procedure CR4 h   z   ]  C  r       g  t-a11d84f71ea-1ccc
		 g  t-a11d84f71ea-1ccd		 g  t-a11d84f71ea-1cce			  			   C?BC      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	
 		
   C h      ] C          		
   CJK      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/analyze.scm

 		n   C5RNR   4V >  "  G   	Yi  R        h      ] $   CC             g  obj
		  g  filenamef  language/tree-il/analyze.scm

 		  g  nameg  %reference-graph?-procedure C!R4"\=      h   :   ]  C      2       g  t-a11d84f71ea-1cdf
		
  		
   C?B"C      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	
 		
   C? h      ] C          		
   CJK      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/analyze.scm

 		n   C5"R@    h      ] &   
C 6       g  s
		  g  filenamef  language/tree-il/analyze.scm

 		  g  nameg  %reference-graph-defs-procedure CAR4@OV[ h   :   ]C     2       g  err
		 g  s		  			   C^di h   :   ]C     2       g  err
		 g  s		  			   Clrx h   :   ]C     2       g  err
		 g  s		  			   C\    h   :   ]  C      2       g  t-a11d84f71ea-1ceb
		
  		
   C?B@C      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	
 		
   C h      ] C          		
   CJK      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/analyze.scm

 	    C5@R        h      ] &   C 6       g  s
		  g  filenamef  language/tree-il/analyze.scm

 		  g  nameg  %reference-graph-refs-procedure CR4 h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C\    h   :   ]  C      2       g  t-a11d84f71ea-1d06
		
  		
   C?BC      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	
 		
   C h      ] C          		
   CJK      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/analyze.scm

 	    C5R        h       ] &   	C 6              g  s
		  g  filenamef  language/tree-il/analyze.scm

 		  g  nameg  +%reference-graph-toplevel-context-procedure CR4     h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C$ h   :   ]C     2       g  err
		 g  s		  			   C\@    h   :   ]  C      2       g  t-a11d84f71ea-1d21
		
  		
   C?BC      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	
 		
   CB h      ] C          		
   CJK      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/analyze.scm

 	    C5R4tRTX    h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   CJK h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  language/tree-il/analyze.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5tRY     h      ]L L 6    w       g  kid
		 g  result		  g  filenamef  language/tree-il/analyze.scm
			! 			   C  h      ] 6     w       g  kid
		 g  result		  g  filenamef  language/tree-il/analyze.scm
			 			   C      h   {  ]4 5$  "  	4 5$  C44 L55$  "  4 54L O 56       s      g  root
		y g  path		y g  result			y g  t			$ g  t		;	M g  children		M	y g  path		Y	y g  result		m	y  g  filenamef  language/tree-il/analyze.scm
								(		,		/	$	;		;		J	@	M		P		Y		\		m		y	
 		y	  g  nameg  loop C       h       ]O Q  6           g  root
		 g  refs		 g  	reachable			 g  loop			  g  filenamef  language/tree-il/analyze.scm

		 			  g  nameg  graph-reachable-nodes CZR[Z      h       ] 4L 56          g  	root+true
		 g  result		 g  root			 g  	reachable			  g  filenamef  language/tree-il/analyze.scm
			"				"				 			   C        h      ]O  6              g  roots
		 g  refs		  g  filenamef  language/tree-il/analyze.scm

		 			  g  nameg  graph-reachable-nodes* C\R[        h@     ]"  4L 5$  45C45C       g  k+v
		? g  result		? g  k			? g  v			? g  r1			? g  r2			?  g  filenamef  language/tree-il/analyze.scm
			!		!		!		!					!		"	#	/		3	&	>	 		?	   C   h       ]
4 O 5D        g  pred
		 g  vhash		 g  result			  g  filenamef  language/tree-il/analyze.scm

																 				  g  nameg  
partition* C]R@Y 
      h     ]* &   "  	4 5 &   
"  	4 5 &  	 	"  	4 54455$  "  4	5 C       g  graph
	  g  name	  g  refs		  g  defs		8  g  ctx		U  g  t		g	y g  ctx-refs		y  g  refs	    g  filenamef  language/tree-il/analyze.scm
							!		8		=		U		X	 	[	'	g	 	g		v	B	y		|		# 		4 		# 		 	 	  g  nameg  add-ref-from-context C @`^_^`a   h     ]4&  "  	45&  
"  	45&  
	"  4>  "  G   &  >4 54 54	$  "  	4
55		 C&  #4 54 >  "  G  L 6C            g  x
	  g  graph	  g  env		  g  locs		  g  refs		6  g  defs		6  g  rtd		d  g  name		|  g  src		|  g  defs		   g  name	    g  filenamef  language/tree-il/analyze.scm
						6		=		d		 "	 "	* "	2 "	 !	 $	 		 &	 	 	   CO ]bcde h`     ]	4L 5$  44L 5 5"  $  C4L 5$  #4L  5$  $  6CCC            g  name
		[ g  t	 	[ g  var	?	Y  g  filenamef  language/tree-il/analyze.scm
A	!	<		<			=		=		=		 B	#	,		6		7		?		G		J		N		S		U	 		[   C@\f    h      ]4 L 5C         g  name+src
		  g  filenamef  language/tree-il/analyze.scm
H	)	I	0	I	<	I	0	I	+ 		   Cg     h(      ]  45$  C6            g  name+loc
		# g  name		# g  loc			#  g  filenamef  language/tree-il/analyze.scm
L		M	)	N	)	M		O	(	O		P	,	#P	# 			#   C     h   m  ]24O  &   
"  	4 5>  G 45 &   "  	4 5454	
O 56   e      g  graph
		} g  env		} g  public-defs		,	} g  private-defs		,	} g  roots		<	} g  refs		X	} g  	reachable		c	} g  unused		s	}  g  filenamef  language/tree-il/analyze.scm
2		A		D	!	+A		/@		4E		<E			AF		XE			[G		cE			fH		sE			}L	 		}	   C Q iii ihij       h`      ]&  
	"  4>  "  G   &  #4 54 >  "  G  L 6C           g  x
		\ g  graph		\ g  env			\ g  locs			\ g  rtd		,	\ g  name		=	Y  g  filenamef  language/tree-il/analyze.scm
				,			Y	 		\	   C O `@   hX      ] &  C&  "  	45&  
"  	45 CC          g  x
		U g  graph		U g  env			U g  locs			U g  rtd			U g  refs		C	R g  defs		C	R  g  filenamef  language/tree-il/analyze.scm
)		+		-		,.		C-	
	Q/	 		U	   C  7Rk   h      ]  C           g  refs
		 g  defs		  g  filenamef  language/tree-il/analyze.scm
^
 			  g  nameg  %make-toplevel-info-procedure ClR4m h   Z   ]  C    R       g  t-a11d84f71ea-1e81
		 g  t-a11d84f71ea-1e82		  			   C?BmC      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	^
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	^
 		
   C h      ] C          		
   CJK      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/analyze.scm
^
 		n   C5mRNRk  4V k>  "  G   	Yli  kRk        h      ] $   CC             g  obj
		  g  filenamef  language/tree-il/analyze.scm
^
 		  g  nameg  %toplevel-info?-procedure CR4\        h   :   ]  C      2       g  t-a11d84f71ea-1e91
		
  		
   C?BC      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	^
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	^
 		
   C h      ] C          		
   CJK      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/analyze.scm
^
 		n   C5Rk    h      ] &   
C 6       g  s
		  g  filenamef  language/tree-il/analyze.scm
^
 		  g  nameg  %toplevel-info-refs-procedure CR4   h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C\     h   :   ]  C      2       g  t-a11d84f71ea-1e9d
		
  		
   C?BC      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	^
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	^
 		
   C h      ] C          		
   CJK      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/analyze.scm
^
 	    C5Rk        h      ] &   C 6       g  s
		  g  filenamef  language/tree-il/analyze.scm
^
 		  g  nameg  %toplevel-info-defs-procedure CR4   h   :   ]C     2       g  err
		 g  s		  			   C!', h   :   ]C     2       g  err
		 g  s		  			   C/5: h   :   ]C     2       g  err
		 g  s		  			   C\V    h   :   ]  C      2       g  t-a11d84f71ea-1eb8
		
  		
   C?BC      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	^
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	^
 		
   CX h      ] C          		
   CJK      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/analyze.scm
^
 	    C5R4hjm    h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   CJK h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  language/tree-il/analyze.scm
^
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5Rnhopst h     ]#"  T$  K$  8&  -
$  $  (  CCCCCCC"  @ $  7 &  , 
 &  45&  "pCCCC $  R &  E 
 $  - 	&   	&  ""s"o"k"g"c           g  proc
	  g  args	  g  env		  g  args			Z g  w			X g  x			X g  w		0	T g  w		w  g  w	   g  w	   g  w	    g  filenamef  language/tree-il/analyze.scm
d
	h			i		^n	 t	 t	# t	 t	 u	
 n	 p	 n	 	 	  g  nameg  goops-toplevel-definition CuRkhijbc     h     ]<&  
"  	45&  "  	45 &  y4 54 545$  4	5"  		$  "  	4
5	$  C$  "  	45	4	5

 CC           g  x
	  g  info	  g  env		  g  locs		  g  refs		6  g  defs		6  g  rtd		=  g  name		U  g  src		U  g  t			r  g  src		   g  refs	
    g  filenamef  language/tree-il/analyze.scm
{		}		~		6}		=		Z		d		e		r		 	 	
 	 	! 	 	$ 	 	 	   C k^`abc`^vBCDu    hp    ]D&  
"  	45&  "  	454 >  "  G   &  }4 54 >  "  G  4	5$  4
5"  $  "  	45$  
 C4545		 C&  *4 54545		 C&  Q4 54 545		$  !4	54	5

 C C C           g  x
	k g  info	k g  env		k g  locs		k g  refs		k g  defs		8k g  rtd		Ok g  name		`  g  t	   g  src	   g  refs		   g  name	  g  refs	  g  defs		  g  proc	a g  args	a g  name		-a g  refs	
IW g  defs	IW  g  filenamef  language/tree-il/analyze.scm
						!		8		;		O		u			 	 		 	 	
 	 	 	 	$ 	 	 	 	 	
	#	-	
2	6	7	$@	$I	`	j	
 !	k	   Ciiki i        h      ]C          g  x
		 g  info		 g  env			 g  locs			  g  filenamef  language/tree-il/analyze.scm
	 			   Cw     h      ]  6         g  name+loc
		 g  name		 g  loc			  g  filenamef  language/tree-il/analyze.scm
			#		#				"		 		   Cxk   h(      ]4 &   
"  	4 556        g  toplevel
		' g  env		'  g  filenamef  language/tree-il/analyze.scm
					$	%		'	 		'	   C  8Ry    h      ]  C         g  toplevel-calls
		 g  lexical-lambdas		 g  toplevel-lambdas			  g  filenamef  language/tree-il/analyze.scm

 			  g  nameg  %make-arity-info-procedure CzR4{ h   z   ]  C  r       g  t-a11d84f71ea-2133
		 g  t-a11d84f71ea-2134		 g  t-a11d84f71ea-2135			  			   C?B{C      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	
 		
   C h      ] C          		
   CJK      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/analyze.scm

 		n   C5{RNRy  4V y>  "  G   	Yzi  yRy        h      ] $   CC      |       g  obj
		  g  filenamef  language/tree-il/analyze.scm

 		  g  nameg  %arity-info?-procedure CR4\   h   :   ]  C      2       g  t-a11d84f71ea-2146
		
  		
   C?BC      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	
 		
   C h      ] C          		
   CJK      hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/analyze.scm

 		n   C5Ry    h      ] &   
C 6       g  s
		  g  filenamef  language/tree-il/analyze.scm

 		  g  nameg  #%toplevel-procedure-calls-procedure CR4     h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C\    h   :   ]  C      2       g  t-a11d84f71ea-2152
		
  		
   C?BC      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	
 		
   C h      ] C          		
   CJK      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/analyze.scm

 	    C5Ry        h      ] &   C 6~       g  s
		  g  filenamef  language/tree-il/analyze.scm

 		  g  nameg  %lexical-lambdas-procedure CR4%,1      h   :   ]C     2       g  err
		 g  s		  			   C4:? h   :   ]C     2       g  err
		 g  s		  			   CBHM h   :   ]C     2       g  err
		 g  s		  			   C\i    h   :   ]  C      2       g  t-a11d84f71ea-216d
		
  		
   C?BC      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	
 		
   Ck h      ] C          		
   CJK      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/analyze.scm

 	    C5Ry        h       ] &   	C 6              g  s
		  g  filenamef  language/tree-il/analyze.scm

 		  g  nameg  %toplevel-lambdas-procedure ClR4z     h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C\    h   :   ]  C      2       g  t-a11d84f71ea-2188
		
  		
   C?BC      h   `   ]L 6    X       g  a
		  g  filenamef  language/tree-il/analyze.scm	
 		   CF       h   P   ] L 6H       g  filenamef  language/tree-il/analyze.scm	
 		
   C h      ] C          		
   CJK      h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/analyze.scm

 	    C5R4    h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   CJK h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  language/tree-il/analyze.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5RGG     h0      ]4 54 54 544 554 5 C       g  a
		0  g  filenamef  language/tree-il/analyze.scm
			 	
	/		>		 		)	%	 	&	 	/	 
		0   CfRSUTVQdWk     h    ]Q4 5$  4 544 55D4 5$  7 $  
 
 "4 54 5  D" $ 
&  4	54
5454545		(  "  $  45"  

$  
"  

(  "  $  45"  

$  
"  

$  45"  $  "   "%&  )454545"D45D "           g  proc
	 g  arity	G	f g  name	j g  proc		j g  arities		j g  rtd		sz g  req	 E g  opt	 E g  rest	 E g  kw	 E g  	alternate		 E g  t	
   g  t	
  g  meta	[v g  body	[v  g  filenamef  language/tree-il/analyze.scm
												"		$		%		/		2		6		:		@		A		G		J		S	%	V	1	Z	>	a		d		f		j		p		s	 	 	 	 	
 	 	 	 	 	 	
 	 		+	&	6	?!	6)	+-	&0	68	 ;	E	M	`		f		*h		v		z	} 	 				 =	  g  nameg  arities CDkOQ hX    ]q $ F  $ 3$  $ $  
	
(  $  "  (  45"  "  "45$  X4455$  "  	$  4455"  $  $  "  "w""L "a"  L $  .$  &45$  $  CCCCCCCCCCC             g  arity
	Q g  vx	O g  vy		O g  vx		 M g  vy		 M g  vx		1K g  vy		1K g  vx		BI g  vy		BI g  vx			SG g  vy	
	SG g  args		h  g  result		h  g  arg		|  g  t	   g  args	E g  count	"A  g  filenamef  language/tree-il/analyze.scm
				`	%	d	!	h		n		o	
	|		|	
 	 	 	 	 	 	 	 	 	 	 	 	 	( 	 	 	! 	 	 	 	 	 	 						("	)	"-	3	"=	0>	& ,	Q   C h   Y   ] L 6Q       g  filenamef  language/tree-il/analyze.scm
#	5	#	@ 		
   C 
   h     ]3O Q 45454 >  G H4O 5KJ$  "  .4$  "  4	 O 5>  "  G  C       g  proc
	  g  application	  g  lexical?		  g  arities		
  g  args		  g  src		  g  name		,  g  arities		,  g  matches?		4   	g  filenamef  language/tree-il/analyze.scm

							"	!	/		7	
	L!		Q"		U"		]#		d#		v"	 	 	  g  nameg  validate-arity CRydWLMhi     h     ]3&  
"  	45&  "  	45&  		"  	45&  +4>  "  G  4 5 C	&  /4
545$    "?C&  +4>  "  G  4 5 CC          g  lexical-name
	  g  val	  g  info		  g  toplevel-calls		Q  g  lexical-lambdas		Q  g  toplevel-lambdas		Q  g  rtd		Z  g  lexical-lambdas	   g  gensym	   g  val*	   g  lexical-lambdas	    g  filenamef  language/tree-il/analyze.scm
/		1		2		93		Q1		Z4			w7	 6	 4		 <	 <	 =	 =	 >	' >	 4		 C	 B	 	 	  g  nameg  extend Cy`^adWhimnoqrsvwxBCDLM !    h    ]lO Q &  
"  	45&  "  	45&  		"  	45 &  4 54	 5
	

&  +4
>  "  G  4	
5 C&  @4
54544 5$  "  
5 CC&  4 54 5
		
6&  4 54 5
		
6&  4 54 5
		
6& 4 5	4 >  "  G  4 >  "  G  	


&  *4	>  "  G  4	 >  "  G  C
&  "4	54 5 C
&  j4 	545$  L&  "454 5 C4 >  "  G  CCCC        g  x
	 g  info	 g  env		 g  locs		 g  extend		
 g  toplevel-calls		^ g  lexical-lambdas		^ g  toplevel-lambdas		^ g  rtd		g g  name			 g  exp	
	 g  rtd	  g  toplevel-lambdas	   g  name	  g  proc	  g  toplevel-lambdas	  g  gensyms		, g  vals	
, g  gensyms		BR g  vals	
BR g  gensyms		hx g  vals	
hx g  proc		 g  rtd	
 g  name	 g  toplevel-calls	  g  gensym	 g  proc	( g  r	4} g  rtd	9} g  name	Je g  toplevel-calls	We   g  filenamef  language/tree-il/analyze.scm
-		H		,I		FJ		^H		gL	 N	
 R	 P	 N	
 U	 U	 X	  X	- Y	1 Y	- Z	1 X	  V	L	,_	
4L	Ra	
ZL	xc	
L	f	
h	f	
k	 k	f	
 o	(o	-p	1p	4q	 4q	Mt	'Wt	fx	jx	&rx	 ,		   C y        h   U  ]#&  
"  	45&  "  	45&  		"  	454 5$  45"   C M      g  name
		 g  val		 g  info			 g  toplevel-calls		Q	 g  lexical-lambdas		Q	 g  toplevel-lambdas		Q	 g  lexical-lambdas		q	  g  filenamef  language/tree-il/analyze.scm
						9		Q		X		d		e		q		 
			  g  nameg  shrink Cymnoqrsvwx    h     ]$&  	
"  4>  "  G  &  	"  4>  "  G  &  
	"  4>  "  G   &  4 54	 5
6&  4 54 5
6&  4 54 5
6C           g  x
	  g  info	  g  env		  g  locs		  g  shrink		  g  rtd		|  g  gensyms	   g  vals	   g  gensyms	   g  vals	   g  gensyms	   g  vals	    g  filenamef  language/tree-il/analyze.scm
					/		U		|	 	
 	 	
 	 	
 	 	   CyYb        h   Y   ] LL 6      Q       g  filenamef  language/tree-il/analyze.scm
		
	 		

   C     h   e   -  1  3 C     ]       g  args
			  g  filenamef  language/tree-il/analyze.scm
	 			


   Ci      h   Y   ] LL 6      Q       g  filenamef  language/tree-il/analyze.scm
		
	 		

   C     h   e   -  1  3 C     ]       g  args
			  g  filenamef  language/tree-il/analyze.scm
	 			


   C       h     ]!  44L 55$  "  !4L5$  4LO 5"  45$  14	54L5$  4
LO 5"  "  45$  	645$  	6C            g  name+application
	  g  name	  g  application		
  g  t			N g  proc		N  g  name		b  g  proc*	    g  filenamef  language/tree-il/analyze.scm
					
	
		
	
									+		5		6		N	
	Q		[		\	"	b		e		o		p	 	
 	 	 	 	 	 	 	    C     hP      ] &   
"  	4 5 &  	 	"  	4 5O 6             g  result
		J g  env		J g  toplevel-calls		7	J g  toplevel-lambdas		7	J  g  filenamef  language/tree-il/analyze.scm
						7		J	 		J	   Ciiiyi i      h      ]C          g  x
		 g  info		 g  env			 g  locs			  g  filenamef  language/tree-il/analyze.scm
*	 			   C   9R4i5ROO  h      ] 6      w       g  char
		
  g  filenamef  language/tree-il/analyze.scm
		
	 		
  g  nameg  digit? CkGQ	  h     ]4545L$  L45"  "  D45$  45$  yL LLL$  4	L5"  L$  
"  (  
"  4
?L $  4	L5"  L$  
"  (  
"  4?6"c"_          g  chars
	  g  conds	  g  mins		)  g  maxs		)  g  sel?		)   g  filenamef  language/tree-il/analyze.scm

			$		$		$		5	$	)	)		5!	&	7!	+	9!		9		:	#	F		G	#	S		Y	*	Z	3	f	'	g	0	p	+	z	. 	. 	2 	+ 	$ 	' 	0 	+ 	. 	.  	2 	+ 	$ 	 #	 	   C			O   h      ] 6      w       g  char
		
  g  filenamef  language/tree-il/analyze.scm
		
	 		
  g  nameg  digit? CO        h      ] 6      w       g  char
		
  g  filenamef  language/tree-il/analyze.scm
		
	 		
  g  nameg  digit? C	z	      h8  E	  ]' (  $  6D$  ~$  "  %$  "  &$  "  t$  "  T$  "  u_$  "  g
$  "  Y($  "  K)$  "  =!$  "  /|$  "  !/$  "  q$  "  Q$     "0$  "  1$  "  2$  "  3$  "  4$  "  5$  "  6$  "  u7$  "  g8$  "  Y9$  "  K,$  "  =:$  "  /@$  "  !+$  "  -$  "  #$  $  "v$  "  V$  &  "p$  "  P$  V4:5$  45"  	 	$  4	5"   "P[$  j 4	5(  "  4
445554@5		L O 	

 ";$  2$  $ 

 "6]$  "$   4566{$  4@5$  D "  V	(  45"  N
$  	}&  	"  8	
	"	~&  	
	"	
	"
	" "*$  4@5$  D 45(  "  4
44555$  "  45(  "  4
44555$  "   "?$  "  k$  "  K$  D^$  Dh$  "  H$  <4:5$  	"    "'$  6 (  6   "M  "+$  N ~$     "  "6  =	      g  chars
	6 g  state	6 g  params		6 g  
conditions		6 g  	end-group		6 g  	min-count		6 g  	max-count		6 g  key		( g  colon?	e g  	min-count		| g  numbers	 g  selector	 g  at?		 g  chars	 g  chars		 g  tilde?	
 g  numbers	b g  t	 g  numbers	 g  t	 g  argc	Nv g  key	.  g  filenamef  language/tree-il/analyze.scm
							!					%		(		(	 	 	* 	3						+	%		"	$	&	+)	%0	3	E	N	]	*e	m	*n	.|	.|	 	  	, 	5	 	$	$ 				#	'						)				$	%	.	4$	7%	9%	$:%	-?&	B&	X%	^)	'`)	i	o+	t,	u-	|-	,-	&-	,	/	'/		0	0	1	.1	2	.2	"			
		
	
												3	"3	+5	"!5	232	<	=6	I6	K7	$M7	)O7	R8	"T9	"U9	+Z	b	j	p	s	v	)~		;	%;	"						)		=	%=	"8		B	B	B		!D	 #D	,	;F	(GF	$NF	SG	 UG	,VG	5_I	 dJ	 vG		L	L	M	'M	N	N	%N	2N	,N	P	P	*P	3R	R	.P		T	T	U	U	*U	1U	X	X	*X	3.X	2[	6[	 	6	  g  nameg  loop C	  h(      ]	O Q 4 5

6              g  fmt
		! g  loop	
	!  g  filenamef  language/tree-il/analyze.scm

	
										!	 		!  g  nameg  format-string-argument-count C	Rt	     h   Y   ] L 6Q       g  filenamef  language/tree-il/analyze.scm
p		p	) 		
   C     h   e   -  1  3 C     ]       g  args
			  g  filenamef  language/tree-il/analyze.scm
p	 			


   Cp		cLh 
 hH    ]," "   $   &  l 
  	 	$  4O 5"  
45$  45"  $  $  CCC &   
 CCC $  c 	&  . 
 45$  $  CCC &   
  	&  C" "" $  & 	&   
 &  C"""           g  exp
	C g  proc	C g  special-name		C g  env		C g  w		#  g  w		*  g  w		1  g  mod		V  g  var		l  g  w	   g  w	   g  var	   g  w	 
 g  w	+;  g  filenamef  language/tree-il/analyze.scm
]
	d		9o		:p		Mq		Vo		^r		_r		lo		ts		ws		{s		~s	+ s	& d	 b	 d	 i	 i	 j	 j	 j	 k	 k	 d	 	C	  g  nameg  	proc-ref?g  documentationf  Return #t when EXP designates procedure PROC in ENV.  As a last
resort, return #t when EXP refers to the global variable SPECIAL-NAME. C	
R	
	    h      ] 6         g  t-a11d84f71ea-25ec
		 g  t-a11d84f71ea-25ef		  g  filenamef  language/tree-il/analyze.scm
x		
x	+	x	 			  g  nameg  gettext? C	R	
		       h      ] 6         g  t-a11d84f71ea-25f6
		 g  t-a11d84f71ea-25f9		  g  filenamef  language/tree-il/analyze.scm
y		
y	-	y	 			  g  nameg  	ngettext? C	RB	n		 h    ]B" W"   $   &   
 45$   	$  $  w&  l
45$  T$  K$  8&  -
	4	5$  $  $  CCCCCCCCCCCCCC $   &  s 
 45$  W 	$  E(  :$  *&  
45$  C"""""""" $  * &   
 45$  C"|"x"t            g  x
	 g  env	 g  w		#  g  w		7  g  w		F  g  x		F  g  w		c  g  w		}  g  x		}  g  w		   g  w	 U g  w	 Q g  w	I g  w	-A g  w	v  g  filenamef  language/tree-il/analyze.scm
{
	}		&		2}	 	 }	 		  g  nameg  	const-fmt C	R							Ln			Q				 hp     ]4L>  G   $  R$  J &  "  L  $  &  "  L "  $  CLL L 6CC  	      g  min
		n g  max		n g  t		M	j  g  filenamef  language/tree-il/analyze.scm
								$	-	(	 	)	$	2	3	6		:	-	>	 	?	$	H	3	M		\	$	`	0	j	 		n
   C		  h      ]LL 6       g  _
		 g  key		  g  filenamef  language/tree-il/analyze.scm
				
	%		 			   C h  ]  ]2" & $   $  45$  54455$  "  445>  "  G  "   "  O"  '4455$  
64	
56 $  &  
C""$  E&  8
4455$  $  "  6"i"e"a4 564 56 $    $  4L 5$  n45$  54455$  "  445>  "  G  "   4L 545O O 6"9"5"1   U      g  args
	 g  loc	 g  vx		 g  vy		 g  vx		!
 g  w	  g  w	  g  vx	9 g  vy	9 g  vx	J g  vy	J g  fmt	 g  count	  g  filenamef  language/tree-il/analyze.scm
				(		2	
	3		6	"	>		B		G		K		O	#	P	/	[		k	
	q		{	
 	 	" 	 	
 	  	
 	 	 	, 		
			/	
	#	$	/,	
,	O	[	\	f	
g	j	"r	v	{			#	/				
		 7		  g  nameg  check-format-args C			nk			O	     h   q   ] 6      i       g  t-a11d84f71ea-2e3a
		
  g  filenamef  language/tree-il/analyze.scm
	 		
   C		 	O	       h   q   ] 6      i       g  t-a11d84f71ea-2e41
		
  g  filenamef  language/tree-il/analyze.scm
	) 		
   C    h  H  ]Z"  a $  X  $  E4L545$  #$  45  "CCCC $   $ $ x& k
45$ Q$ F"  (  45"  $  	~$  	$  R		
$  
"	$  "4455 "  
	

$  
"e4455 "  W
	

$  
"94455 "  +
	4455 "  4	5"4
5$  C44455>  "  G  C""""""     @      g  args
	 g  loc	 g  w			e g  x			e g  w		$	c g  x		$	c g  w		1	c g  x		q g  w	  g  x	  g  w	  g  chars	  g  result	  g  w	  g  x		  g  w	
 = g  x	 = g  x	7 g  x	
?i g  x	
k g  opts	 g  t	  g  filenamef  language/tree-il/analyze.scm
				)		1		H	-	U	$	_	
	g	 		 	 	 				"	#	T	U										
					'		!			 %		  g  nameg  check-simple-format-args CBt		 	!hb  h   Y   ] LL 6      Q       g  filenamef  language/tree-il/analyze.scm
		
	  		

   C     h   e   -  1  3 C     ]       g  args
			  g  filenamef  language/tree-il/analyze.scm
	 			


   C	#	%  h     ]DO O Q Q " " - $ " &  
 $  &  
$  			&  Y 	
4
$  "  	455$  +4
$  "  	45>  " 8G  " 1" -
		&  Y 	
4
$  "  	455$  +4
$  "  	45>  " G  " " 
" 	" " " " "  $   &   
 $  s&  f

$  K			&  5 	
4
$  "  	45>  " +G  " $
"K	"D"="9"/"+ $   &   
 $  &  
 		45$  4O 5"  

&   4	$  "  	455"  $  "  
$  +4	$  "  	45>  "  G  "   
	"  "H"  "@"  "2"  "*C           g  x
	 g  _	 g  env		 g  locs		 g  check-format-args		 g  check-simple-format-args		 g  w		;L g  w		AI g  w		\> g  w			l7 g  w	
	{  g  w	
 0 g  w	h g  w	n g  w	 g  w		 g  w	
 g  w	 g  w	 g  w	1 g  w		8 g  proc	
[ g  t	  g  filenamef  language/tree-il/analyze.scm
		#		~	 	' 	/ 	 	 	 	% 	- 	 	 	 	' 	/ 	 	 			%	-	T			 	(		;	E	F	[	e	f	p	1w	9				
		&	.		 -		   C i       h      ]C           g  x
		 g  _		 g  env			 g  locs			  g  filenamef  language/tree-il/analyze.scm
	 			   C   h      ]C           g  x
		 g  _		 g  env			 g  locs			  g  filenamef  language/tree-il/analyze.scm
	 			   C    h   q   ]C    i       g  _
		 g  env		  g  filenamef  language/tree-il/analyze.scm
	 			   C  :RC   c      g  m
		, g  rtd
AA g  rtd
mn g  down
      A       g  up      A       g  vars	      K      a g  refs	      K      a g  init	      a       g  rtd
             g  add-ref-from-context
             g  down             g  post	             g  refs	             g  defs	             g  init	             g  rtd
            ­ g  leaf
      U       g  down      U       g  refs	      _      u g  defs	      _      u g  init	      u       g  rtd
            - g  down
     ~     t g  up     ~     t g  post	     ~     t g  toplevel-calls	           g  lexical-lambdas	           g  toplevel-lambdas	           g  init	          k g  down
     R     T  g  filenamef  language/tree-il/analyze.scm		
 
=2 
>5#
j*,
jZ
~3`
      f	      K	      af	      d
      
      
      
      S
      	      s	      S	      	       
      ^
      d
      ׮z	      _	      uz	      x
      
     
     )	     	     )	     w'
     x	     	
     	     
     2-
     7x]
     8\x
     9Ey
     <{
     R	     T
 ,	     T
   C6                                                                                                                            ccache/language/tree-il/spec.go                                                                     0000644                 00000003431 15154557173 0012375 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] 5 4 h6      ] g  guile	 	g  define-module*	 	 	g  language	g  tree-il	g  spec		 	
g  filenameS	f  language/tree-il/spec.scm	g  importsS	g  system	g  base	 	 	g  pmatch	 	 	g  glil	 	 	 	 	g  compile-glil	 	 	 	g  exportsS	 	g  set-current-module	  	! 	"g  write	#g  unparse-tree-il	$g  write-tree-il	%g  	make-void	&g  make-sequence	'g  join	(g  invalidate-compilation-cache!	)g  make-language	*g  nameS	+g  titleS	,f  Tree Intermediate Language	-g  readerS	.g  read	/g  printerS	0g  parserS	1g  parse-tree-il	2g  joinerS	3g  	compilersS	4g  for-humans?SC 5     h     ]4	
5 4! >  "  G   "#    h      - 1 3 4 5@         g  exp
			 g  port			  g  filenamef  language/tree-il/spec.scm
	
						 			
  g  nameg  write-tree-il C$R%&   h8      ] (  6 $    (  C 6 6          g  exps
		5 g  env		5 g  vx			. g  vy			.  g  filenamef  language/tree-il/spec.scm
	
		 			!			 		.	#	
 		5	  g  nameg  join C'R4(i>   "  G  4)i*+,-.      h   x   ] 6p       g  port
		 g  env		  g  filenamef  language/tree-il/spec.scm
	'			'	# 			   C/$i01i2'i3i 45RC       g  m
		,  g  filenamef  language/tree-il/spec.scm		
 	
	
	%
"	&		+		%
 	
   C6                                                                                                                                                                                                                                        ccache/language/tree-il/canonicalize.go                                                             0000644                 00000011317 15154557173 0014104 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] : 4    h      ] g  guile	 	g  define-module*	 	 	g  language	g  tree-il	g  canonicalize		 	
g  filenameS	f  !language/tree-il/canonicalize.scm	g  importsS	 	 	g  ice-9	g  match	 	 	g  srfi	g  srfi-1	 	 	 	g  exportsS	g  canonicalize!	 	g  set-current-module	 	 	g  tree-il-fold	g  tree-il-any	 g  post-order!	!g  <prompt>	"g  <lambda-case>	#g  lexical-ref?	$g  lexical-ref-gensym	%g  <application>	&g  <lambda>	'g  make-prompt	(g  make-lambda	)g  make-lambda-case	*g  make-application	+g  make-primitive-ref	,g  throw	-g  
make-const	.g  wrong-number-of-args	/f  Wrong number of arguments	0g  <dynlet>	1g  <fix>	2g  <letrec>	3g  <let>	4g  
<sequence>	5g  any	6g  	sequence?	7g  make-sequence	8g  
append-map	9g  sequence-expsC 5  h  u   ]4	
5 4 >  "  G          h      ]$  CL  6              g  exp
		 g  res		  g  filenamef  !language/tree-il/canonicalize.scm
								 			   C       h      ]$  CL  6              g  exp
		 g  res		  g  filenamef  !language/tree-il/canonicalize.scm
								 			   C       h   w   ]C   o       g  exp
		 g  res		  g  filenamef  !language/tree-il/canonicalize.scm
		 			   C      h       ] O  O 6              g  proc
		 g  exp		  g  filenamef  !language/tree-il/canonicalize.scm
	
			 			  g  nameg  tree-il-any CR !"#$    h       ]4 5$  4 5L CC      |       g  x
		  g  filenamef  !language/tree-il/canonicalize.scm
	K			L	&		L	!		M	+		M	& 		   C%&'()*+,-./01234567869    h       ]4 5$   6  C       |       g  x
		  g  filenamef  !language/tree-il/canonicalize.scm
	+	(		,	.		,	*		-	.		.	. 		   C h`  g  ]a" " " w" " " w"  $  &  
  	 	$  &  
$  u					$  ?				&  4O 5"  	"  "  "  "  $  "  $  &  
$  &  
	$  z&  l
(  S			&  =	

&  '	&  	"  "  
"  	"  "  "  "  "  "  "  $  CH44	5	5K4
J56CC $  v &  i 
  	&  K4	4
454545454545 55	6""" $  9 &  , 
 (   	(   	C"Q"M"I"E $  J &  = 
 (  ( 	(   	(   	C""""" $  P &  C 
  	(  ( 	(   	(   	C""""" $  J &  = 
 (  ( 	(   	(   	C"D"@"<"8"4 $  7 &  * 
 45$  456C"" $  2 &  % 
 $  (  C""""       _      g  x
	Y g  w	2 g  w		8 g  w		? g  w		F g  w		a  g  w	   g  w	   g  w	   g  w		   g  t	  g  w	 g  w	4 g  w	O g  w		\ g  w	
j g  w	x g  w	 g  thunk	 g  w$ g  w	* g  w	1 g  w g  w	 g  w" g  w	 g  w	 g  wI} g  w	Vy g  w	cu g  w g  w	 g  w	 g  w g  w	 g  w5Q  $g  filenamef  !language/tree-il/canonicalize.scm
	$			%		K	I	
 	K	 	K	 	_	 	Q	
	_		X		X		Y		Y	.	Y	;	Y	?	Y		X		Z	
	Z	%	Z	
	b		%	A	<		E	=	I	=	J	=	K	>	
O	@	T	@	"V	@	W	A	\	A	 ^	A	_	B	f	C	k	C	 m	C	n	D	r	D	 t	D	u	E	~	A		>	
	<			:		%		)		)		+		*		%	 3	Y   C      h      ] 6      }       g  x
		
  g  filenamef  !language/tree-il/canonicalize.scm
	"
	
	#	 		
  g  nameg  canonicalize! CRC      m       g  m
		,  g  filenamef  !language/tree-il/canonicalize.scm		
	
	"
 	

   C6                                                                                                                                                                                                                                                                                                                  ccache/language/tree-il/inline.go                                                                   0000644                 00000001431 15154557173 0012717 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4  hx      ] g  guile	 	g  define-module*	 	 	g  language	g  tree-il	g  inline		 	
g  filenameS	f  language/tree-il/inline.scm	g  exportsS	g  inline!	 	g  set-current-module	 	 	g  issue-deprecation-warning	f  ?`inline!' is deprecated.  Use (language tree-il peval) instead.C 5   h   g   ]4	
5 4 >  "  G           h      ]4>  "  G   C        g  x
		  g  filenamef  language/tree-il/inline.scm
	
									 		  g  nameg  inline! CRC  _       g  m
		(  g  filenamef  language/tree-il/inline.scm		
 	
 	 
   C6                                                                                                                                                                                                                                        ccache/language/tree-il/debug.go                                                                    0000644                 00000035430 15154557173 0012535 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0 ;      ] e 4 h6      ] g  guile	 	g  define-module*	 	 	g  language	g  tree-il	g  debug		 	
g  filenameS	f  language/tree-il/debug.scm	g  importsS	 	 	g  ice-9	g  match	 	 	g  srfi	g  srfi-1	 	 	g  srfi-26	 	 	 	g  exportsS	g  verify-tree-il	 	g  set-current-module	 	  	!g  	hashq-ref	"g  error	#f  duplicate gensym	$g  
hashq-set!	%g  make-hash-table	&f  unexpected tree-il	'g  	<dynwind>	(g  <dynref>	)g  <dynset>	*g  <conditional>	+g  <application>	,g  for-each	-f  expected list of args	.g  
<sequence>	/f  expected more than one exp	0f  expected list of exps	1g  <prompt>	2g  <abort>	3g  <dynlet>	4g  length	5f  mismatch in fluids/vals	6f  vals should be list	7f  fluids should be list	8g  <module-set>	9f  %module name should be list of symbols	:g  and-map	;g  symbol?	<f  name should be symbol	=g  <toplevel-define>	>f  name should be a symbol	?g  <toplevel-set>	@g  <primitive-ref>	Ag  <module-ref>	Bg  <toplevel-ref>	Cg  <void>	Dg  <const>	Eg  <let-values>	Fg  lambda-case?	Gf  %let-values body should be lambda-case	Hg  <fix>	If  names should be list of syms	Jf  gensyms should be list of syms	Kf  'names, syms, vals should be same length	Lg  <letrec>	Mg  <let>	Ng  <lambda>	Of  !lambda body should be lambda-case	Pf  meta should be alist	Qg  pair?	Rg  <lexical-set>	Sg  memq	Tf  displaced lexical	Uf  unbound lexical	Vg  <lexical-ref>	Wg  <lambda-case>	Xf  -bad required args (should be list of symbols)	Yf  'bad gensyms (should be list of symbols)	Zg  take	[g  drop	\f  unexpected gensyms length	]f  6bad keywords (should be #f or (aok (kw name sym) ...))	^g  keyword?	_f  *bad required args (should be #f or symbol)	`f  /bad optionals (should be #f or list of symbols)	ag  tree-il-src	bf  bad src	cg  map	dg  carC 5     h1  f   ]4	
5 4  >  "  G   !"#$       hX      ]
 (  C  4M5$  45"  4M>  "  G   "             g  new
		R g  env		R g  sym			J  g  filenamef  language/tree-il/debug.scm
	!			"			$			$	 		$					 			!			%			)			.		
	G	 	
	R	$	 		R	  g  nameg  add-env C%"&'()*+,      h   o   ]L L 6      g       g  t-9d61fd5a44d-1361
		
  g  filenamef  language/tree-il/debug.scm
 	 		
   C-./ h   o   ]L L 6      g       g  t-9d61fd5a44d-12d8
		
  g  filenamef  language/tree-il/debug.scm
 	 		
   C012 h   o   ]L L 6      g       g  t-9d61fd5a44d-11cd
		
  g  filenamef  language/tree-il/debug.scm
 	 		
   C34   h   o   ]L L 6      g       g  t-9d61fd5a44d-1632
		
  g  filenamef  language/tree-il/debug.scm
 	 		
   C       h   o   ]L L 6      g       g  t-9d61fd5a44d-1638
		
  g  filenamef  language/tree-il/debug.scm
 	 		
   C56789:;<=>?@ABCDEFGHIJ   h   o   ]L L 6      g       g  t-9d61fd5a44d-1b64
		
  g  filenamef  language/tree-il/debug.scm
 	 		
   CKL   h   o   ]L L 6      g       g  t-9d61fd5a44d-1c53
		
  g  filenamef  language/tree-il/debug.scm
 	 		
   CM     h   o   ]L L 6      g       g  t-9d61fd5a44d-1d20
		
  g  filenamef  language/tree-il/debug.scm
 	 		
   CNOPQR!STUVWX"Y h   V   ] L 6      N       g  filenamef  language/tree-il/debug.scm		>		
	>		 		

   C#$Z[\]^S      hh      ]) $  [  45$  D$  ;$  ($  (  $  L 6CCCCCCC         g  x
		f g  w		d g  x			d g  w		+	` g  x		+	` g  w		G	Z  g  filenamef  language/tree-il/debug.scm
	5			6	!	X	8	$ 		f   C_`abcd L h    ]" " W" " " 
" 	" " <" " " " " " S" " 5" @"  4 >  " G  "  $  &  b 
  	 	4L >  "  G  4L >  "  G  4L >  " mG  " f &  & 
 4L >  " 8G  " 1 &  D 
  	4L >  "  G  4L >  " G  "  &  b 
  	 	4L >  "  G  4L >  "  G  4L >  " G  "  &  j 
  	$  34L >  "  G  4	L O >  " (G  " !4
>  " G  " 	 &  j 
 $  =(  4 >  " G  " 4L O >  " G  " 4 >  " G  "  &  b 
  	 	4L >  "  G  4L >  "  G  4L >  " 5G  " . &  i 
  	 	4L >  "  G  4L O >  "  G  4L >  " G  " "" $   &   
  	 	$  $  y4545$  N4L O >  "  G  4L O >  "  G  4L >  " G  " 4 >  " G  " 4 >  " G  " 4 >  " G  " "" $   &   
  	 	 	"  4>  " vG  " o$  H45$  7$  4L >  " CG  " <4>  " +G  " $""" " $  \ &  O 
  	$  4L >  " G  " 4>  " G  " "" $  \  &  O 
  	$  4L >  " jG  " c4>  " RG  " K"J"F $  > !&  1 
 $  " 4 >  " G  " "" $   "&  y 
  	 	"  4 >  " G  " $  445$  #$  " 4 >  " G  " y"""h"d $  > #&  1 
 $  " =4>  " ,G  " %"" $   $&  	 
" "" $   %&   
 " 
"" $  t &&  g 
  	4'5$  ,4L >  "  G  4L >  " 
G  " 
z4(>  " 
iG  " 
b"I"E $ N )& A 
  	 	 	"  4* >  " 
G  " 
$  45$  "  4+ >  " 	G  " 	$  45$  $  4545$  45"  $  A4L54,L O >  "  G  4L >  " 	YG  " 	R4- >  " 	>G  " 	74 >  " 	&G  " 	"+"'"""" $ T .& G 
  	 	 	 	"  4* >  " G  " $  45$  "  4+ >  " G  " y$  45$  $  4545$  45"  $  A4L54/L O >  "  G  4L >  " G  " 4- >  " G  " 4 >  " G  " "+"'"""" $ G 0& : 
  	 	 	"  4* >  " WG  " P$  45$  "  4+ >  " 'G  "  $  45$  $  4545$  45"  $  :41L O >  "  G  4L 4L5>  " G  " 4- >  " G  " 4 >  " uG  " n"2"."""3"/ $   2&   
  	"  E$  ;4'5$  4L >  " G  " 43 >  " G  " " $  <"  44>  " G  " $  455$  """"u"p"l $   6&   
  	 	$  b47M5$  =485$  4L >  " 0G  " )49>  " G  " 4:>  "  G  " 4>  " G  " "" $   ;&   
  	$  N47M5$  )485$  " 49 >  " xG  " q4: >  " `G  " Y4>  " HG  " A"" $ ( <&  
  	 	 	 	 	 	 		"  4= >  " G  " $ 45$ >O 
 Q 
" $ f45$ E
45$ 4545$  45"  
$  "  
$  45"  
$ " U
$  "  $  a4L >  "  G  47M5$  4?5"  4@M>  "  G  "4L >  " G  " $  @47M5$  4?5"  4@M>  "  G  "  $  "  "4L >  "  G  47M5$  4?5"  4@M>  "  G  "4L4A4555$  45"  
4B455"h	$  4L 	>  " LG  " E" A4C >  " 0G  " )4>   " G  " 4
>   " G  "  4
>   "  G  "  "  c$  Y"  4D >  "  G  "  $  2$  4EO 5"  $  "$""""  -$  #$  "4F >  "  ]G  "  V"l$  H"  4G >  "  /G  "  ($  45$  ""  ""  ""  "
"  "M"  "E	"  ""  "4H 5$  ^"  4I>  "  GG  "  @$  5455$   44JK55$  "  ""  ""  ""    C             g  exp
	 g  env	 g  w		{  g  w	   g  w	   g  w	  g  w	P g  w	M g  w	b g  w	i g  w	p g  w	. g  w	+ g  w	@ g  w	 g  w		 g  w	 g  w	~ g  w	%{ g  w	,x g  w	o g  w	l g  w	i g  w	 g  w	 g  w	 g  w	? g  w	F g  w	 g  w	 g  w	5 g  w	V g  w	] g  w	 g  w	w g  w	~ g  w		. g  w		+ g  w		( g  w		% g  b	{ g  env	 g  w		U
 g  w		\
 g  w		c
 g  w		j
 g  b			 g  env	
	
A g  w	
 g  w	
 g  w	
 g  w	
 g  b	3U g  w	  g  w	 g  w	Y g  w	V g  w	S g  w	z g  w	 g  w	! g  w	 g  w	% g  w	, g  w	3 g  w	: g  w	A g  w		H g  failure	
 g  failure	 g  env	P g  nopt	P g  inits	P g  tail	P g  env	 g  inits	 g  tail	 g  sym	&_ g  sym	 g  sym	; g  x	<_ g  src	8  Rg  filenamef  language/tree-il/debug.scm
	&			(		K 		O 		V 		b	(	  	  	  	 	(	  		(	 	3 	S	(	s 	 	 		(	 	 	 		 		 		 	 		1	(	E 	I 	P 		T 	[ 		h 		 		 	 			(	 	 	 		(	/ 	C 	^ 		(	 	 	 	 	 	 	! 	 	 		 		 		 		# 	* 		7 		; 	B 		O 		S 	Z 		s	(	 		 	 		 	 	 	 	 	 	 	 		 		 	 		"	(	K 	O 	P 		h 		l 	s 			(	 	 	 		 		 	 			(	 	 	 		 	& 		9	(	j 		n 	u 		 	 	 	 	 	 	 	 		 	 			(	 	 	 		 	  			(	 	 	 		 		 		 	 			(	 		 	 		) 	, 	0 	1 	!= 	B 		F 	M 		Y 	\ 	` 	a 	#m 	p 	t 	u 	 { 	~ 	 	 	1 	 	 	 		 	 	 		 	 		 		 		 			2	(		q 			u 		| 			 		 		 		 	!	 		 			 		 			 		 		 		 	#	 		 		 		 	 	 		 		 		 	1	 	
  	
 	
	 		
 	
' 	
B 		
F 	
M 		
Z 		
^ 	
e 		
	(	
	}		
	}	
	}		
	{	
	|	
	{	
	|	!
	|	
			
						{		~		{		~	#%	~	( 	,	{	- 	 3 	6 	? 	F 	1M 	Y	{	Z 		u 		z 	 		 		 	 		 		 	 			(		r		u		u			y	7	v		;	v	B	v		R	r	]	t		a	t	h	t		t	r	w	s	{	s		|	s	*	s		(		i		h		k		h		m		h		p				n			n		n		!	l		%	l	,	l		9	j		=	j	D	j		]	(		a		`		c		`		e		`		f			f		f			d			d		d			b			b		b			(	O	,		S	,	Z	,		f	*	i	+	m	*	n	+	z	+		*		=		*		=	#	=		*		?	#	?		A		B		C		C		B		F		B		G		G		G		B		A		*		J			N		N		O	
	R		R		T		T		T	&	U	 &	U	)		5		6		:		>		C		
\	 	
b	U	0e	V	o	U	p	W		O		O		O	+	O	&												
	 	
	Q		Q	'	O		Y		Y		Y		Z		Z													
8	 	
>	[	A	\	D	]	P	Z	P	J		Q	J	T	J	 Y	J	.a	J	 e	J	k	K	l	K	 z	M		M	&	M		J			^			^		H			H		H			*		<			<	&	<		2	*	5	1	9	1		<	1	E	3	I	3	J	4	c	1	s	*		/		/			0			0		0			*		.			.		.			*		-		-			-	(	-	)	(	2 	8 	@	E	
I	N	
Z	]	a	
b	)n	o	t	.~				  g  nameg  visit C  h8      ]HO Q 45 KO Q  6         g  exp
		6 g  seen-gensyms		6 g  add-env			6 g  visit		&	6  g  filenamef  language/tree-il/debug.scm
	
				&	&		4	'		6	&	 		6  g  nameg  verify-tree-il CRC ^       g  m
		,  g  filenamef  language/tree-il/debug.scm		
1	
 	1
   C6                                                                                                                                                                                                                                         ccache/language/tree-il/optimize.go                                                                 0000644                 00000003753 15154557173 0013312 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] 0 4      h      ] g  guile	 	g  define-module*	 	 	g  language	g  tree-il	g  optimize		 	
g  filenameS	f  language/tree-il/optimize.scm	g  importsS	 	 	g  
primitives	 	 	g  peval	 	 	g  cse	 	 	g  
fix-letrec	 	 	g  debug	 	 	g  ice-9	g  match	  	!  	"! 	#g  exportsS	$g  	optimize!	%$ 	&g  set-current-module	'& 	(& 	)g  memq	*g  partial-eval?S	+g  cse?S	,g  fix-letrec!	-g  verify-tree-il	.g  expand-primitives!	/g  resolve-primitives!C 5  hP  i   ]4	
"#%5 4( >  "  G   )*     h   o   ] C   g       g  x
		 g  e		  g  filenamef  language/tree-il/optimize.scm
	"	 			   C+   h   `   ] C   X       g  x
		  g  filenamef  language/tree-il/optimize.scm
	'	 		   C,-./   h    ]+45$  \$  =$  0&  $  "  "  "  "  "  45$  \$  =$  0&  $  "  "  "  "  "  4	44	44
4 5555556          g  x
	 g  env	 g  opts		 g  v			u g  w			l g  x			l g  w		4	Z g  x		4	Z g  v		~  g  w	   g  x	   g  w	   g  x	   g  peval	  g  cse	   g  filenamef  language/tree-il/optimize.scm
	
				v	$	 		 	*	 	+	 	,	 	-	 	-	 	-	#	-		-		,		+		*		)	 		  g  nameg  	optimize! C$RC   a       g  m
		,  g  filenamef  language/tree-il/optimize.scm		
K	
 	M
   C6                      ccache/language/tree-il/peval.go                                                                    0000644                 00000536330 15154557173 0012563 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0     ] 4       hM      ] g  guile	 	g  define-module*	 	 	g  language	g  tree-il	g  peval		 	
g  filenameS	f  language/tree-il/peval.scm	g  importsS	 	 	g  
primitives	 	 	g  effects	 	 	g  ice-9	g  vlist	 	 	g  match	 	 	g  srfi	g  srfi-1	 	 	 g  srfi-9	!  	"! 	#g  srfi-11	$# 	%$ 	&g  srfi-26	'& 	(' 	)g  control	*) 	+* 	,"%(+ 
	-g  exportsS	. 	/g  set-current-module	0/ 	1/ 	2g  make-syntax-transformer	32 	42 	5g  	*logging*	6g  macro	7g  identifier?	87 	97 	:g  syntax-object	;g  top	<; 	=g  ribcage	>g  id	?> 	@g  m-9d6212d37ae-5919	A@; 	BA 	Cf  l-9d6212d37ae-5920	DC 	E=?BD 	F= 	Gg  x	HG 	If  l-9d6212d37ae-591b	JI 	K=HBJ 	L<EFK 	Mg  hygiene	NM 	O:LN 	Pg  $sc-dispatch	QP 	RP 	Sg  _	Tg  each-any	UST	Vf  l-9d6212d37ae-5923	WV 	X=HBW 	Y<XFK 	Z:YN 	[g  syntax-violation	\[ 	][ 	^f  -source expression failed to match any pattern	_g  log	`g  any	ag  free-id	bg  quote	cg  m-9d6212d37ae-5926	dc; 	ed 	ff  l-9d6212d37ae-5928	gf 	h=Heg 	i<Fh 	j:biN 	kaj 	lk` 	mlT	n`m	og  if	pg  dummy	qg  event	rg  arg	spqr 	td<< 	uf  l-9d6212d37ae-592b	vf  l-9d6212d37ae-592c	wf  l-9d6212d37ae-592d	xuvw 	y=stx 	z<yFh 	{:ozN 	|g  and	}:|zN 	~:5zN 	g  or :zN  g  eq? :zN  :zN  ~  g  memq :zN  :bzN  ~  g  log* :zN  g  
module-ref g  resolve-interface g  pretty-print   g  newline g  let/ec g  tree-il-fold g  abort-to-prompt g  tree-il-any g  vlist-length g  	vlist-ref g  	vlist-any g  <application> g  <lambda> g  <primitive-ref> g  values g  <const> g  <lexical-ref> g  <void> g  <module-ref> g  <toplevel-ref> g  singly-valued-primitive? g  singly-valued-expression? g  make-application g  tree-il-src g  make-primitive-ref g  truncate-values g  <var> g  %make-var-procedure g  make-var S````  g  lambda g  m-9d6212d37ae-5be1 ;  g  t-9d6212d37ae-5bdd g  t-9d6212d37ae-5bde g  t-9d6212d37ae-5bdf g  t-9d6212d37ae-5be0     f  l-9d6212d37ae-5be6 f  l-9d6212d37ae-5be7 f  l-9d6212d37ae-5be8 f  l-9d6212d37ae-5be9   =    f  l-9d6212d37ae-5be3   =H  g  shift g  	proc-name g  args   <<  f  l-1e8ba8b5a-60 f  l-1e8ba8b5a-61   =  g  key g  value g  name g  formals g  body   <<<<<  f  l-1e8ba8b5a-53 f  l-1e8ba8b5a-54 f  l-1e8ba8b5a-55 f  l-1e8ba8b5a-56 f  l-1e8ba8b5a-57   =  g  make-procedure-name   <  f  l-1e8ba8b5a-43   =  <  f  l-1e8ba8b5a-42   =H  FFFFF  M   :  <F  :N  g  gensym :N  g  refcount :N  g  set? :N    g  make-struct g  m-9d6212d37ae-5bdb ;  g  t-1e8ba8b5a-133 g  t-1e8ba8b5a-132 g  t-1e8ba8b5a-131   g  m-1e8ba8b5a-134 ;    f  l-1e8ba8b5a-138 f  l-1e8ba8b5a-139 f  l-1e8ba8b5a-13a   =  g  	ctor-args   f  l-1e8ba8b5a-120   =  g  ctor g  field  f  l-1e8ba8b5a-11cf  l-1e8ba8b5a-11d =  g  formg  	type-nameg  constructor-specg  field-names	 
<<<< f  l-1e8ba8b5a-111f  l-1e8ba8b5a-112f  l-1e8ba8b5a-113f  l-1e8ba8b5a-114 =	
 g  record-layoutg  functional-settersg  settersg  copierg  gettersg  constructorg  getter-identifiersg  field-identifiers <<<<<<<< f  l-1e8ba8b5a-e9f  l-1e8ba8b5a-e7f  l-1e8ba8b5a-e5f  l-1e8ba8b5a-e3f  l-1e8ba8b5a-e1 f  l-1e8ba8b5a-df!f  l-1e8ba8b5a-dd"f  l-1e8ba8b5a-db# !" $=# %f  l-1e8ba8b5a-da&% '=H& (FFFFFF$' ):( *:N +:
( ,)*+ -, .![ /![ 0f  Wrong number of arguments1!7 2!7 3<F 4:3N 5g  record-type-vtable6!5 7!5 8g  pwpwpwpw9g  default-record-printer:!9 ;!9 < =g  set-struct-vtable-name!>!= ?!= @g  vtable-offset-userA!@ B!@ Cg  %var?-procedureDg  var?ES` Fg  m-9d6212d37ae-5bf4GF; Hg  t-9d6212d37ae-5bf3IH JG Kf  l-9d6212d37ae-5bf9LK M=IJL Nf  l-9d6212d37ae-5bf6ON P=HJO QGMFPFFFF R:Q Sg  objTg  t-1e8ba8b5a-224Ug  t-1e8ba8b5a-21eVg  t-1e8ba8b5a-21fWg  t-1e8ba8b5a-220Xg  t-1e8ba8b5a-223Yg  t-1e8ba8b5a-222Zg  t-1e8ba8b5a-221[TUVWXYZ \g  m-1e8ba8b5a-225]\; ^]]]]]]] _f  l-1e8ba8b5a-229`f  l-1e8ba8b5a-22aaf  l-1e8ba8b5a-22bbf  l-1e8ba8b5a-22ccf  l-1e8ba8b5a-22ddf  l-1e8ba8b5a-22eef  l-1e8ba8b5a-22ff_`abcde g=[^f hg  	copier-idih jf  l-1e8ba8b5a-21ckj l=ik mg  	ctor-namenm of  l-1e8ba8b5a-214po q=np r sf  l-1e8ba8b5a-212ts u=rt vg  layoutwv xf  l-1e8ba8b5a-210yx z=wy {g  
immutable?|{ }f  l-1e8ba8b5a-20e~} =|~ g  field-count f  l-1e8ba8b5a-20c = g  
getter-ids f  l-1e8ba8b5a-209 = g  	field-ids f  l-1e8ba8b5a-206 = g  predicate-nameg  
field-spec{ <<<<<< f  l-1e8ba8b5a-1f9f  l-1e8ba8b5a-1faf  l-1e8ba8b5a-1fbf  l-1e8ba8b5a-1fcf  l-1e8ba8b5a-1fdf  l-1e8ba8b5a-1fe = MFPFgFFFFlFqFuFzFFFF$' :S  :| g  struct?:  : g  struct-vtable:  <MFP :N   R <FP :CN g  throw-bad-struct! ! g  var-nameg  %var-name-procedureg  
%%on-errorg  m-9d6212d37ae-5c00;  f  l-9d6212d37ae-5c02 =H FFFFF : a ` g  %%typeg  t-1e8ba8b5a-14bg  t-1e8ba8b5a-14cg  t-1e8ba8b5a-14dg  t-1e8ba8b5a-14eg  t-1e8ba8b5a-14fg  t-1e8ba8b5a-150g  t-1e8ba8b5a-151 g  m-1e8ba8b5a-152;  f  l-1e8ba8b5a-156f  l-1e8ba8b5a-157f  l-1e8ba8b5a-158f  l-1e8ba8b5a-159f  l-1e8ba8b5a-15af  l-1e8ba8b5a-15bf  l-1e8ba8b5a-15c = g  getterg  index f  l-1e8ba8b5a-149f  l-1e8ba8b5a-14a = h <<< f  l-1e8ba8b5a-144f  l-1e8ba8b5a-145f  l-1e8ba8b5a-146 = FFFFFF$' : a S` g  ckg  errg  s  f  l-9d6212d37ae-5c05f  l-9d6212d37ae-5c06 = FFFFF : :b <F :N   g  %%index: a S` f  l-9d6212d37ae-5c0af  l-9d6212d37ae-5c0b = FFFFF : :b F  :
N    g  %%copier: a S` f  l-9d6212d37ae-5c0ff  l-9d6212d37ae-5c10	 
=	 
FFFFF : :b g  %%<var>-set-fields<
F :N   g  t-9d6212d37ae-5bff f  l-9d6212d37ae-5c14 = FFFFF : FFFFFF$' :  :o : :   !<F ":!N # " $g  
struct-ref%:$ &F ':
&N (%' ): *:b +:!N ,*+ -), .#(- /. 0<F 1:0N 2g  
var-gensym3g  %var-gensym-procedure4g  m-9d6212d37ae-5c1b54; 65 7f  l-9d6212d37ae-5c1d87 9=H68 :5F9FFFF ;:: <a; =<` >F9FFFFF$' ?:> @a? AS=@` B55 Cf  l-9d6212d37ae-5c20Df  l-9d6212d37ae-5c21ECD F=BE G5FF9FFFF H:G I:bG J<FF9 K:JN LIK ML N:> OaN PS=O` Qf  l-9d6212d37ae-5c25Rf  l-9d6212d37ae-5c26SQR T=BS U5TF9FFFF V:U W:bU XTF9 Y:XN ZWY [Z \:> ]a\ ^S=]` _f  l-9d6212d37ae-5c2a`f  l-9d6212d37ae-5c2ba_` b=Ba c5bF9FFFF d:c e:bc f<bF9 g:fN heg ih jg  t-9d6212d37ae-5c1akj lf  l-9d6212d37ae-5c2fml n=k6m o5nF9FFFF p:o qnF9FFFFF$' r:q sr t:oq u:q v:q wvr x<nF9 y:xN zuwy {:$q |nF9 }:|N ~{r} :q :bq :2xN  r tz~ ps <F9 :3N g  var-refcountg  %var-refcount-procedureg  m-9d6212d37ae-5c36;  f  l-9d6212d37ae-5c38 =H FFFFF : a ` FFFFFF$' : a S`  f  l-9d6212d37ae-5c3bf  l-9d6212d37ae-5c3c = FFFFF : :b <F :N   : a S` f  l-9d6212d37ae-5c40f  l-9d6212d37ae-5c41 = FFFFF : :b F :	N   : a S` f  l-9d6212d37ae-5c45f  l-9d6212d37ae-5c46 = FFFFF : :b <F :N   g  t-9d6212d37ae-5c35 f  l-9d6212d37ae-5c4a = FFFFF : FFFFFF$' :  :o : :  <F :N  :$ F :	N  : :b :N     <F :N g  var-set?g  %var-set?-procedureg  m-9d6212d37ae-5c51;  f  l-9d6212d37ae-5c53 =H FFFFF : a ` FFFFFF$' : a S`  f  l-9d6212d37ae-5c56f  l-9d6212d37ae-5c57 = FFFFF : :b <F :N   : a S` f  l-9d6212d37ae-5c5bf  l-9d6212d37ae-5c5c  =  FFFFF : :b  F :	N   : 	a 
S	` f  l-9d6212d37ae-5c60f  l-9d6212d37ae-5c61 = FFFFF : :b <F :N   g  t-9d6212d37ae-5c50 f  l-9d6212d37ae-5c65 = FFFFF : FFFFFF$' :   :o !: ": #" $<F %:$N &!#% ':$ (F ):	(N *') +: ,:b -:$N .,- /+. 0 &*/ 10 2<F 3:2N 4g  each5`` 645 7`68`79`8:g  %%set-fields;g  check?<g  expr=p;< >g  m-9d6212d37ae-5c6c?>; @? Af  l-9d6212d37ae-5c71Bf  l-9d6212d37ae-5c72Cf  l-9d6212d37ae-5c73Df  l-9d6212d37ae-5c74Ef  l-9d6212d37ae-5c75FABCDE G==@F H? If  l-9d6212d37ae-5c6eJI K=HHJ Lg  t-1e8ba8b5a-16aMg  t-1e8ba8b5a-16cNg  t-1e8ba8b5a-16bOLMN Pg  m-1e8ba8b5a-16dQP; RQQQ Sf  l-1e8ba8b5a-171Tf  l-1e8ba8b5a-172Uf  l-1e8ba8b5a-173VSTU W=ORV Xf  l-1e8ba8b5a-167Yf  l-1e8ba8b5a-168Zf  l-1e8ba8b5a-169[XYZ \=[ ]GFKFWFFF\$' ^::] _<GFK `:_N a:_N b:2_N c:_N d:_N eabcd fg  mapgf hf ig  listjg  set-var-refcount!kg  %set-var-refcount!-procedurelS`` mg  m-9d6212d37ae-5c80nm; og  t-9d6212d37ae-5c7epg  t-9d6212d37ae-5c7fqop rnn sf  l-9d6212d37ae-5c85tf  l-9d6212d37ae-5c86ust v=qru wn xf  l-9d6212d37ae-5c82yx z=Hwy {nvFzFFFF |:{ }g  t-1e8ba8b5a-18c~g  t-1e8ba8b5a-18d}~ g  m-1e8ba8b5a-18e;  f  l-1e8ba8b5a-192f  l-1e8ba8b5a-193 = g  setter f  l-1e8ba8b5a-186f  l-1e8ba8b5a-187f  l-1e8ba8b5a-188 =  f  l-1e8ba8b5a-17df  l-1e8ba8b5a-17e = g  field-specs f  l-1e8ba8b5a-179f  l-1e8ba8b5a-17a = vFzFFF$' : g  val:  :o : :  <vFz :N  g  struct-set!: vFz :	N  : :b :jN    | <Fz :kN g  set-var-set?!g  %set-var-set?!-procedureg  m-9d6212d37ae-5c90; g  t-9d6212d37ae-5c8eg  t-9d6212d37ae-5c8f  f  l-9d6212d37ae-5c95f  l-9d6212d37ae-5c96 =  f  l-9d6212d37ae-5c92 =H FFFFF : FFFF$' : :  :o : :  <F :N  : F :	N  : :b :N     <F :N g  
vlist-nullg  
vhash-assqg  <lambda-case>g  foldg  vhash-consqg  appendg  reverse  g  <let>g  <letrec>g  <fix>g  <lexical-set>g  build-var-tableg  	<counter>g  %%make-counter-procedureg  %make-counterS`````` g  m-9d6212d37ae-63bc; g  t-9d6212d37ae-63b6g  t-9d6212d37ae-63b7g  t-9d6212d37ae-63b8g  t-9d6212d37ae-63b9g  t-9d6212d37ae-63bag  t-9d6212d37ae-63bb  f  l-9d6212d37ae-63c1f  l-9d6212d37ae-63c2f  l-9d6212d37ae-63c3f  l-9d6212d37ae-63c4f  l-9d6212d37ae-63c5f  l-9d6212d37ae-63c6  =  f  l-9d6212d37ae-63be =H  FFFFF : g  effort< F 	:N 
g  size:
N g  continuation:N g  
recursive?:N g  data:N g  prev:N 	 g  m-9d6212d37ae-63b4;  FFFFFF$' : :N :
 	 	 <F :N g  pwpwpwpwpwpw 
 !g  %counter?-procedure"g  counter?#g  m-9d6212d37ae-63d3$#; %g  t-9d6212d37ae-63d2&% '$ (f  l-9d6212d37ae-63d8)( *=&') +f  l-9d6212d37ae-63d5,+ -=H', .$*F-FFFF /:. 0*F-FgFFFFlFqFuFzFFFF$' 1:S0 21 3:|0 4:0 541 6:0 7:0 871 9<*F- ::9N ;68: <35; =/2< ><F- ?:!>N @g  effort-counterAg  %effort-counter-procedureBg  m-9d6212d37ae-63dfCB; DC Ef  l-9d6212d37ae-63e1FE G=HDF HCFGFFFF I:H JaI KJ` LFGFFFFF$' M:L NaM OSKN` PCC Qf  l-9d6212d37ae-63e4Rf  l-9d6212d37ae-63e5SQR T=PS UCTFGFFFF V:U W:bU X<TFG Y:XN ZWY [Z \:L ]a\ ^SK]` _f  l-9d6212d37ae-63e9`f  l-9d6212d37ae-63eaa_` b=Pa cCbFGFFFF d:c e:bc fbFG g:
fN heg ih j:L kaj lSKk` mf  l-9d6212d37ae-63eenf  l-9d6212d37ae-63efomn p=Po qCpFGFFFF r:q s:bq tg  %%<counter>-set-fieldsu<pFG v:tuN wsv xw yg  t-9d6212d37ae-63dezy {f  l-9d6212d37ae-63f3|{ }=zD| ~C}FGFFFF :~ }FGFFFFF$' :  :o : :  <}FG :N  :$ }FG :
N  : :b :@N     <FG :AN g  size-counterg  %size-counter-procedureg  m-9d6212d37ae-63fa;  f  l-9d6212d37ae-63fc =H FFFFF : a ` FFFFFF$' : a S`  f  l-9d6212d37ae-63fff  l-9d6212d37ae-6400 = FFFFF : :b <F :N   : a S` f  l-9d6212d37ae-6404f  l-9d6212d37ae-6405 = FFFFF : :b F :N   : a S` f  l-9d6212d37ae-6409f  l-9d6212d37ae-640a = FFFFF : :b <F :tN   g  t-9d6212d37ae-63f9 f  l-9d6212d37ae-640e = FFFFF : FFFFFF$' :  :o : :  <F :N  :$ F :N  : :b :N     <F :N g  counter-continuationg  %counter-continuation-procedureg  m-9d6212d37ae-6415;  f  l-9d6212d37ae-6417 =H FFFFF : a ` FFFFFF$' : a S`  f  l-9d6212d37ae-641af  l-9d6212d37ae-641b  =  FFFFF : :b <F :N   	: 
a	 S
` f  l-9d6212d37ae-641ff  l-9d6212d37ae-6420 = FFFFF : :b F :	N   : a S` f  l-9d6212d37ae-6424f  l-9d6212d37ae-6425 = FFFFF :  :b !<F ":t!N # " $# %g  t-9d6212d37ae-6414&% 'f  l-9d6212d37ae-6429(' )=&( *)FFFFF +:* ,)FFFFFF$' -:, .- /:o, 0:, 1:, 21- 3<)F 4:3N 5024 6:$, 7)F 8:	7N 96-8 ::, ;:b, <:3N =;< >:-= ?/59> @+.? A<F B:AN Cg  counter-recursive?Dg  %counter-recursive?-procedureEg  m-9d6212d37ae-6430FE; GF Hf  l-9d6212d37ae-6432IH J=HGI KFFJFFFF L:K MaL NM` OFJFFFFF$' P:O QaP RSNQ` SFF Tf  l-9d6212d37ae-6435Uf  l-9d6212d37ae-6436VTU W=SV XFWFJFFFF Y:X Z:bX [<WFJ \:[N ]Z\ ^] _:O `a_ aSN`` bf  l-9d6212d37ae-643acf  l-9d6212d37ae-643bdbc e=Sd fFeFJFFFF g:f h:bf ieFJ j:	iN khj lk m:O nam oSNn` pf  l-9d6212d37ae-643fqf  l-9d6212d37ae-6440rpq s=Sr tFsFJFFFF u:t v:bt w<sFJ x:twN yvx zy {g  t-9d6212d37ae-642f|{ }f  l-9d6212d37ae-6444~} =|G~ FFJFFFF : FJFFFFF$' :  :o : :  <FJ :N  :$ FJ :	N  : :b :CN     <FJ :DN g  counter-datag  %counter-data-procedureg  m-9d6212d37ae-644b;  f  l-9d6212d37ae-644d =H FFFFF : a ` FFFFFF$' : a S`  f  l-9d6212d37ae-6450f  l-9d6212d37ae-6451 = FFFFF : :b <F :N   : a S` f  l-9d6212d37ae-6455f  l-9d6212d37ae-6456 = FFFFF : :b F :	N   : a S` f  l-9d6212d37ae-645af  l-9d6212d37ae-645b = FFFFF : :b <F :tN   g  t-9d6212d37ae-644a f  l-9d6212d37ae-645f = FFFFF : FFFFFF$' :  :o : :  <F :N  :$ F :	N  : :b :N     <F :N g  counter-prevg  %counter-prev-procedureg  m-9d6212d37ae-6466;  f  l-9d6212d37ae-6468 =H FFFFF : a ` FFFFFF$' : a S`   f  l-9d6212d37ae-646bf  l-9d6212d37ae-646c  = FFFFF : :b <F :N 	 
	 : a S` f  l-9d6212d37ae-6470f  l-9d6212d37ae-6471 = FFFFF : :b F :	N   : a S` f  l-9d6212d37ae-6475f  l-9d6212d37ae-6476 =  FFFFF !:  ":b  #<F $:t#N %"$ &% 'g  t-9d6212d37ae-6465(' )f  l-9d6212d37ae-647a*) +=(* ,+FFFFF -:, .+FFFFFF$' /:. 0/ 1:o. 2:. 3:. 43/ 5<+F 6:5N 7246 8:$. 9+F ::	9N ;8/: <:. =:b. >:5N ?=> @</? A17;@ B-0A C<F D:CN Eg  m-9d6212d37ae-6481FE; GF Hf  l-9d6212d37ae-6486If  l-9d6212d37ae-6487Jf  l-9d6212d37ae-6488Kf  l-9d6212d37ae-6489Lf  l-9d6212d37ae-648aMHIJKL N==GM OF Pf  l-9d6212d37ae-6483QP R=HOQ SNFRFWFFF\$' T::S U<NFR V:UN W:@UN X:UN Y:UN Z:CUN [:UN \:UN ]WXYZ[\ ^g  set-counter-recursive?!_g  "%set-counter-recursive?!-procedure`g  m-9d6212d37ae-6495a`; bg  t-9d6212d37ae-6493cg  t-9d6212d37ae-6494dbc eaa ff  l-9d6212d37ae-649agf  l-9d6212d37ae-649bhfg i=deh ja kf  l-9d6212d37ae-6497lk m=Hjl naiFmFFFF o:n piFmFFF$' q:p r:p sqr t:op u:p v:p wvq x<iFm y:xN zuwy {:p |iFm }:	|N ~{q}r :p :bp :^xN  q tz~ os <Fm :_N g  abort-counterg  record-effort!g  record-size!g  find-counterg  ming  	transfer!g  make-variableg  make-top-counterg  make-nested-counterg  make-recursive-counterg  	<operand>g  %%make-operand-procedureg  %make-operandS`````````` g  m-9d6212d37ae-6564; g  t-9d6212d37ae-655ag  t-9d6212d37ae-655bg  t-9d6212d37ae-655cg  t-9d6212d37ae-655dg  t-9d6212d37ae-655eg  t-9d6212d37ae-655fg  t-9d6212d37ae-6560g  t-9d6212d37ae-6561g  t-9d6212d37ae-6562g  t-9d6212d37ae-6563 
 
f  l-9d6212d37ae-6569f  l-9d6212d37ae-656af  l-9d6212d37ae-656bf  l-9d6212d37ae-656cf  l-9d6212d37ae-656df  l-9d6212d37ae-656ef  l-9d6212d37ae-656ff  l-9d6212d37ae-6570f  l-9d6212d37ae-6571f  l-9d6212d37ae-6572 
=  f  l-9d6212d37ae-6566 =H FFFFF : g  var<F :N g  sym:N g  visit:N g  source:N g  visit-count:N g  	use-count:N g  	copyable?:N g  residual-value:N g  constant-value:N g  alias:N  
g  m-9d6212d37ae-6558; FFFFFF$' : :N :
   <F :N g  pwpwpwpwpwpwpwpwpwpw 
g  %operand?-procedureg  operand?g  m-9d6212d37ae-6583; g  t-9d6212d37ae-6582  f  l-9d6212d37ae-6588 = f  l-9d6212d37ae-6585 =H FFFFF : FFgFFFFlFqFuFzFFFF$' :S  :| :  : :  <F :N    <F :N g  operand-varg  %operand-var-procedureg  m-9d6212d37ae-658f;  f  l-9d6212d37ae-6591 =H FFFFF  : a  ` FFFFFF$' : a S`  f  l-9d6212d37ae-6594	f  l-9d6212d37ae-6595
	 =
 FFFFF : :b <F :N   : a S` f  l-9d6212d37ae-6599f  l-9d6212d37ae-659a = FFFFF : :b F :
N    !: "a! #S"` $f  l-9d6212d37ae-659e%f  l-9d6212d37ae-659f&$% '=& ('FFFFF ):( *:b( +g  %%<operand>-set-fields,<'F -:+,N .*- /. 0g  t-9d6212d37ae-658e10 2f  l-9d6212d37ae-65a332 4=13 54FFFFF 6:5 74FFFFFF$' 8:7 98 ::o7 ;:7 <:7 =<8 ><4F ?:>N @;=? A:$7 B4F C:
BN DA8C E:7 F:b7 G:>N HFG IE8H J:@DI K69J L<F M:LN Ng  operand-symOg  %operand-sym-procedurePg  m-9d6212d37ae-65aaQP; RQ Sf  l-9d6212d37ae-65acTS U=HRT VQFUFFFF W:V XaW YX` ZFUFFFFF$' [:Z \a[ ]SY\` ^QQ _f  l-9d6212d37ae-65af`f  l-9d6212d37ae-65b0a_` b=^a cQbFUFFFF d:c e:bc f<bFU g:fN heg ih j:Z kaj lSYk` mf  l-9d6212d37ae-65b4nf  l-9d6212d37ae-65b5omn p=^o qQpFUFFFF r:q s:bq tpFU u:tN vsu wv x:Z yax zSYy` {f  l-9d6212d37ae-65b9|f  l-9d6212d37ae-65ba}{| ~=^} Q~FUFFFF : :b <~FU :+N   g  t-9d6212d37ae-65a9 f  l-9d6212d37ae-65be =R QFUFFFF : FUFFFFF$' :  :o : :  <FU :N  :$ FU :N  : :b :NN     <FU :ON g  %operand-visitg  %%operand-visit-procedureg  m-9d6212d37ae-65c5;  f  l-9d6212d37ae-65c7 =H FFFFF : a ` FFFFFF$' : a S`  f  l-9d6212d37ae-65caf  l-9d6212d37ae-65cb = FFFFF : :b <F :N   : a S` f  l-9d6212d37ae-65cff  l-9d6212d37ae-65d0 = FFFFF : :b F :	N   : a S` f  l-9d6212d37ae-65d4f  l-9d6212d37ae-65d5 = FFFFF : :b <F :+N   g  t-9d6212d37ae-65c4 f  l-9d6212d37ae-65d9 = FFFFF : FFFFFF$' :  :o : :  <F :N  :$ F :	N  : :b :N     <F :N g  operand-sourceg  %operand-source-procedureg  m-9d6212d37ae-65e0;  f  l-9d6212d37ae-65e2  =H  FFFFF : a ` FFFFFF$' : a 	S` 
 f  l-9d6212d37ae-65e5f  l-9d6212d37ae-65e6 =
 FFFFF : :b <F :N   : a S` f  l-9d6212d37ae-65eaf  l-9d6212d37ae-65eb =
 FFFFF : :b  F !:	 N "! #" $: %a$ &S%` 'f  l-9d6212d37ae-65ef(f  l-9d6212d37ae-65f0)'( *=
) +*FFFFF ,:+ -:b+ .<*F /:+.N 0-/ 10 2g  t-9d6212d37ae-65df32 4f  l-9d6212d37ae-65f454 6=35 76FFFFF 8:7 96FFFFFF$' ::9 ;: <:o9 =:9 >:9 ?>: @<6F A:@N B=?A C:$9 D6F E:	DN FC:E G:9 H:b9 I:@N JHI KG:J L<BFK M8;L N<F O:NN Pg  operand-visit-countQg  %operand-visit-count-procedureRg  m-9d6212d37ae-65fbSR; TS Uf  l-9d6212d37ae-65fdVU W=HTV XSFWFFFF Y:X ZaY [Z` \FWFFFFF$' ]:\ ^a] _S[^` `SS af  l-9d6212d37ae-6600bf  l-9d6212d37ae-6601cab d=`c eSdFWFFFF f:e g:be h<dFW i:hN jgi kj l:\ mal nS[m` of  l-9d6212d37ae-6605pf  l-9d6212d37ae-6606qop r=`q sSrFWFFFF t:s u:bs vrFW w:	vN xuw yx z:\ {az |S[{` }f  l-9d6212d37ae-660a~f  l-9d6212d37ae-660b}~ =` SFWFFFF : :b <FW :+N   g  t-9d6212d37ae-65fa f  l-9d6212d37ae-660f =T SFWFFFF : FWFFFFF$' :  :o : :  <FW :N  :$ FW :	N  : :b :PN     <FW :QN g  operand-use-countg  %operand-use-count-procedureg  m-9d6212d37ae-6616;  f  l-9d6212d37ae-6618 =H FFFFF : a ` FFFFFF$' : a S`  f  l-9d6212d37ae-661bf  l-9d6212d37ae-661c = FFFFF : :b <F :N   : a S` f  l-9d6212d37ae-6620f  l-9d6212d37ae-6621 = FFFFF : :b F :	N   : a S` f  l-9d6212d37ae-6625f  l-9d6212d37ae-6626 = FFFFF : :b <F :+N   g  t-9d6212d37ae-6615 f  l-9d6212d37ae-662a = FFFFF : FFFFFF$' :  :o : :  <F :N  :$ F :	N  : :b :N     <F :N g  operand-copyable?g  %operand-copyable?-procedureg  m-9d6212d37ae-6631; 	  	f  l-9d6212d37ae-6633		 	=H	 	 	F	FFFF 	:	 	a	 		` 	F	FFFFF$' 		:	 	
a		 	S		
` 	 	f  l-9d6212d37ae-6636	f  l-9d6212d37ae-6637			 	=		 		F	FFFF 	:	 	:b	 	<	F	 	:	N 			 		 	:	 	a	 	S		` 	f  l-9d6212d37ae-663b	f  l-9d6212d37ae-663c			 	=		 		F	FFFF 	 :	 	!:b	 	"	F	 	#:		"N 	$	!	# 	%	$ 	&:	 	'a	& 	(S		'` 	)f  l-9d6212d37ae-6640	*f  l-9d6212d37ae-6641	+	)	* 	,=		+ 	-	,F	FFFF 	.:	- 	/:b	- 	0<	,F	 	1:+	0N 	2	/	1 	3	2 	4g  t-9d6212d37ae-6630	5	4 	6f  l-9d6212d37ae-6645	7	6 	8=	5	 	7 	9	8F	FFFF 	::	9 	;	8F	FFFFF$' 	<:	; 	=	< 	>:o	; 	?:	; 	@:	; 	A	@	< 	B<	8F	 	C:	BN 	D	?	A	C 	E:$	; 	F	8F	 	G:		FN 	H	E	<	G 	I:	; 	J:b	; 	K:	BN 	L	J	K 	M	I	<	L 	N	>	D	H	M 	O	:	=	N 	P<F	 	Q:	PN 	Rg  operand-residual-value	Sg  !%operand-residual-value-procedure	Tg  m-9d6212d37ae-664c	U	T; 	V	U 	Wf  l-9d6212d37ae-664e	X	W 	Y=H	V	X 	Z	UF	YFFFF 	[:	Z 	\a	[ 	]	\` 	^F	YFFFFF$' 	_:	^ 	`a	_ 	aS	]	`` 	b	U	U 	cf  l-9d6212d37ae-6651	df  l-9d6212d37ae-6652	e	c	d 	f=	b	e 	g	U	fF	YFFFF 	h:	g 	i:b	g 	j<	fF	Y 	k:	jN 	l	i	k 	m	l 	n:	^ 	oa	n 	pS	]	o` 	qf  l-9d6212d37ae-6656	rf  l-9d6212d37ae-6657	s	q	r 	t=	b	s 	u	U	tF	YFFFF 	v:	u 	w:b	u 	x	tF	Y 	y:		xN 	z	w	y 	{	z 	|:	^ 	}a	| 	~S	]	}` 	f  l-9d6212d37ae-665b	f  l-9d6212d37ae-665c			 	=	b	 		U	F	YFFFF 	:	 	:b	 	<	F	Y 	:+	N 			 		 	g  t-9d6212d37ae-664b		 	f  l-9d6212d37ae-6660		 	=		V	 		U	F	YFFFF 	:	 		F	YFFFFF$' 	:	 		 	:o	 	:	 	:	 			 	<	F	Y 	:	N 				 	:$	 		F	Y 	:		N 				 	:	 	:b	 	:	R	N 			 				 					 				 	<F	Y 	:	S	N 	g  operand-constant-value	g  !%operand-constant-value-procedure	g  m-9d6212d37ae-6667		; 		 	f  l-9d6212d37ae-6669		 	=H		 		F	FFFF 	:	 	a	 		` 	F	FFFFF$' 	:	 	a	 	S		` 			 	f  l-9d6212d37ae-666c	f  l-9d6212d37ae-666d			 	=		 			F	FFFF 	:	 	:b	 	<	F	 	:	N 			 		 	:	 	a	 	S		` 	f  l-9d6212d37ae-6671	f  l-9d6212d37ae-6672			 	=		 			F	FFFF 	:	 	:b	 		F	 	:		N 			 		 	:	 	a	 	S		` 	f  l-9d6212d37ae-6676	f  l-9d6212d37ae-6677			 	=		 			F	FFFF 	:	 	:b	 	<	F	 	:+	N 			 		 	g  t-9d6212d37ae-6666		 	f  l-9d6212d37ae-667b		 	=			 			F	FFFF 	:	 		F	FFFFF$' 	:	 		 	:o	 	:	 	:	 			 	<	F	 	:	N 				 	:$	 		F	 	:		N 				 	:	 	:b	 	:		N 			 				 					 				 	<F	 	:		N 	g  operand-alias	g  %operand-alias-procedure
 g  m-9d6212d37ae-6682

 ; 

 
f  l-9d6212d37ae-6684

 
=H

 

F
FFFF 
:
 
a
 
	
` 

F
FFFFF$' 
:

 
a
 
S
	
` 


 
f  l-9d6212d37ae-6687
f  l-9d6212d37ae-6688


 
=

 


F
FFFF 
:
 
:b
 
<
F
 
:
N 


 

 
:

 
a
 
S
	
` 
f  l-9d6212d37ae-668c
f  l-9d6212d37ae-668d


 
 =

 
!

 F
FFFF 
":
! 
#:b
! 
$
 F
 
%:		
$N 
&
#
% 
'
& 
(:

 
)a
( 
*S
	
)` 
+f  l-9d6212d37ae-6691
,f  l-9d6212d37ae-6692
-
+
, 
.=

- 
/

.F
FFFF 
0:
/ 
1:b
/ 
2<
.F
 
3:+
2N 
4
1
3 
5
4 
6g  t-9d6212d37ae-6681
7
6 
8f  l-9d6212d37ae-6696
9
8 
:=
7

9 
;

:F
FFFF 
<:
; 
=
:F
FFFFF$' 
>:
= 
?
> 
@:o
= 
A:
= 
B:
= 
C
B
> 
D<
:F
 
E:
DN 
F
A
C
E 
G:$
= 
H
:F
 
I:		
HN 
J
G
>
I 
K:
= 
L:b
= 
M:	
DN 
N
L
M 
O
K
>
N 
P
@
F
J
O 
Q
<
?
P 
R<F
 
S:	
RN 
Tg  m-9d6212d37ae-669d
U
T; 
V
U 
Wf  l-9d6212d37ae-66a2
Xf  l-9d6212d37ae-66a3
Yf  l-9d6212d37ae-66a4
Zf  l-9d6212d37ae-66a5
[f  l-9d6212d37ae-66a6
\
W
X
Y
Z
[ 
]==
V
\ 
^
U 
_f  l-9d6212d37ae-669f
`
_ 
a=H
^
` 
b
]F
aFWFFF\$' 
c::
b 
d<
]F
a 
e:
dN 
f:
dN 
g:N
dN 
h:
dN 
i:
dN 
j:P
dN 
k:
dN 
l:
dN 
m:	R
dN 
n:	
dN 
o:	
dN 
p
f
g
h
i
j
k
l
m
n
o 

qg  set-operand-visit-count!
rg  #%set-operand-visit-count!-procedure
sg  m-9d6212d37ae-66b1
t
s; 
ug  t-9d6212d37ae-66af
vg  t-9d6212d37ae-66b0
w
u
v 
x
t
t 
yf  l-9d6212d37ae-66b6
zf  l-9d6212d37ae-66b7
{
y
z 
|=
w
x
{ 
}
t 
~f  l-9d6212d37ae-66b3

~ 
=H
}
 

t
|F
FFFF 
:
 

|F
FFF$' 
:
 
:
 


 
:o
 
:
 
:
 


 
<
|F
 
:
N 



 
:
 

|F
 
:	
N 




 
:
 
:b
 
:
q
N 


 



 




 



 
<F
 
:
r
N 
g  set-operand-use-count!
g  !%set-operand-use-count!-procedure
g  m-9d6212d37ae-66c1

; 
g  t-9d6212d37ae-66bf
g  t-9d6212d37ae-66c0


 


 
f  l-9d6212d37ae-66c6
f  l-9d6212d37ae-66c7


 
=


 

 
f  l-9d6212d37ae-66c3

 
=H

 


F
FFFF 
:
 

F
FFF$' 
:
 
:
 


 
:o
 
:
 
:
 


 
<
F
 
:
N 



 
:
 

F
 
:	
N 




 
:
 
:b
 
:

N 


 



 




 



 
<F
 
:

N 
g  set-operand-copyable?!
g  !%set-operand-copyable?!-procedure
g  m-9d6212d37ae-66d1

; 
g  t-9d6212d37ae-66cf
g  t-9d6212d37ae-66d0


 


 
f  l-9d6212d37ae-66d6
f  l-9d6212d37ae-66d7


 
=


 

 
f  l-9d6212d37ae-66d3

 
=H

 


F
FFFF 
:
 

F
FFF$' 
:
 
:
 


 
:o
 
:
 
:
 


 
<
F
 
:
N 



 
:
 

F
 
:	
N 




 
:
 
:b
 
:

N 


 



 




 



 
<F
 
:

N 
g  %set-operand-residual-value!
g  '%%set-operand-residual-value!-procedure
g  m-9d6212d37ae-66e1

; 
g  t-9d6212d37ae-66df
g  t-9d6212d37ae-66e0


 


 
f  l-9d6212d37ae-66e6
f  l-9d6212d37ae-66e7


 
=


 

 
f  l-9d6212d37ae-66e3

 
=H

 


F
FFFF  :
 
F
FFF$' : :  :o : :  	<
F
 
:	N 
 : 
F
 :	N  : :b :
	N      <F
 :
N g  set-operand-constant-value!g  &%set-operand-constant-value!-procedureg  m-9d6212d37ae-66f1; g  t-9d6212d37ae-66efg  t-9d6212d37ae-66f0   !f  l-9d6212d37ae-66f6"f  l-9d6212d37ae-66f7#!" $= # % &f  l-9d6212d37ae-66f3'& (=H%' )$F(FFFF *:) +$F(FFF$' ,:+ -:+ .,- /:o+ 0:+ 1:+ 21, 3<$F( 4:3N 5024 6:+ 7$F( 8:	7N 96,8- ::+ ;:b+ <:3N =;< >:,= ?/59> @*.? A<F( B:AN Cg  set-operand-alias!Dg  %set-operand-alias!-procedureEg  m-9d6212d37ae-6701FE; Gg  t-9d6212d37ae-66ffHg  t-9d6212d37ae-6700IGH JFF Kf  l-9d6212d37ae-6706Lf  l-9d6212d37ae-6707MKL N=IJM OF Pf  l-9d6212d37ae-6703QP R=HOQ SFNFRFFFF T:S UNFRFFF$' V:U W:U XVW Y:oU Z:U [:U \[V ]<NFR ^:]N _Z\^ `:U aNFR b:		aN c`VbW d:U e:bU f:C]N gef hdVg iY_ch jTXi k<FR l:DkN mg  and=>ng  make-operandog  make-bound-operandspg  make-unbound-operandsqg  set-operand-residual-value!rg  applysg  visit-operandtg  notug  pair?vg  null?wg  list?xg  symbol?yg  vector?zg  length{g  eqv?|g  equal?}g  types-check?~g  operator-size-limitS~	g  operand-size-limitS	g  value-size-limitS	g  effort-limitS	g  recursive-effort-limitS	 g  current-moduleg  errorf  unbound varg  vlist->listg  string-appendg  symbol->stringf   g  make-lexical-ref  f  no matching patterng  everyg  const?g  	const-expg  catchg  the-scm-moduleg  effectg  	make-voidg  testg  
make-constg  	<dynwind>g  make-dynwindg  <dynlet>g  make-dynletg  
<sequence>z z g  tail g  make-sequenceg  <let-values>g  make-let-valuesg  make-lambda-caseg  make-fixg  make-letrecg  make-letg  <abort>g  <prompt>g  <conditional>g  make-lambdag  <dynref>g  <toplevel-set>g  <toplevel-define>g  <module-set>g  <dynset>g  	constant?g  operatorg  carg  cdrg  filterg  composeg  void?g  make-effects-analyzerg  lexical-ref?g  lexical-ref-gensymg  make-prompt-tagg  abort?g  	tree-il=?g  	abort-tag  g  
abort-argsg  
abort-tailg  make-promptg  
make-abortg  	sequence?g  sequence-expsg  @applyg  lambda-case-alternateg  callg  and-mapg  takeg  dropg  split-atg  
fold-rightg  lambda?g  effect-free-primitive?g  accessor-primitive?g  memvf  t-g  tg  make-conditionalg  consg  constructor-primitive?g  string?g  vectorg  @call-with-valuesf  failure-g  failureg  make-toplevel-setg  make-toplevel-defineg  make-module-set  g  resolve-moduleg  ensureSg  module?g  module-variableg  resolve-primitives!g  primitive-ref?g  make-dynsetg  make-dynreff  post-g  post f  pre-g  pre  f  what!g  alist-deleteg  assq-refg  rest g  rest-sym g  $bi S  g  	rest-argsS   g  ?g  cutg  <>   	 
g  =g  lexical-refcount 
 |	   S  g  	make-listg  tmpf  tmp g  make-lexical-setC 5      h   ]4	
,-.5 41 >  "  G   44569      h   _   ] 6W       g  id
		  g  filenamef  language/tree-il/peval.scm		2	 		   CO   h   *   ]C   "       g  id
		  		   CRUZ    h   )   ] C!       g  x
		  		   C]^        h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  language/tree-il/peval.scm
	2	 		:  g  
macro-typeg  identifier-syntax C55R44_6Rn{}~ 
      h0   Q   ]   	  CI       g  dummy
		0 g  event		0 g  arg			0  		0	   C]^        h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  language/tree-il/peval.scm
	>	 		"  g  
macro-typeg  syntax-rulesg  patternsg  quoteg  event g  argg  ...   C5_R_  hH      - 1 3 44554 >  "  G  4>   "  G  D             g  event
			C g  args			C g  pp			C  g  filenamef  language/tree-il/peval.scm
	E
	
	F			F			F	+		F			G			F			F			H			H		)	H		2	I		C	J	 			C
  g  nameg  log* CR      h       ]
4L  5$  L6C            g  exp
		 g  res		 g  res				  g  filenamef  language/tree-il/peval.scm
	N			O				O			P			M	 			   C h       ]
4L  5$  L6C            g  exp
		 g  res		 g  res				  g  filenamef  language/tree-il/peval.scm
	Q			R				R			S			M	 			   C     h   p   ]C    h       g  exp
		 g  res		  g  filenamef  language/tree-il/peval.scm
	T	 			   C     h@      ] U  #4 O  O >  XCXFGE         g  proc
		> g  exp		> g  tag			> g  _		3	> g  results		3	>  g  filenamef  language/tree-il/peval.scm
	L
		M			N		6	M	 		>	  g  nameg  tree-il-any CR        hH     ]45"  -$  "4 455$  C"C
"           g  proc
		C g  vlist		C g  len				C g  i			< g  t		&	:  g  filenamef  language/tree-il/peval.scm
	W
		X				X			Y			Z			Z			[			[		&	[		&	[		4	\		:	\		<	Y	 		C	  g  nameg  	vlist-any CR     h   N   ] L C       F       g  filenamef  language/tree-il/peval.scm		_	 			
   C     h0    ])"   $   &  q 
 O  Q $  N&  A
&  ' 	$  (  C6 6  C6 6  CC $   &  C &  C &  C &  C 	&  C 
&  C &  ? 
 $  )&  
45$  C"""""              g  exp
	) g  w	  g  failure		)  g  w		G	 g  w		V	x g  failure		Z	x g  w ! g  w	  g  filenamef  language/tree-il/peval.scm
	^
		_	 	)  g  nameg  singly-valued-expression? CR        h(      ]4 5$   C4 545  6       g  x
		(  g  filenamef  language/tree-il/peval.scm
	m
		o			o			q			r			r	/	!	r		&	s		(	q	 
		(  g  nameg  truncate-valuesg  documentationf  %Discard all but the first value of X. CR    h      ]  C       g  name
		 g  gensym		 g  refcount			 g  set?			  g  filenamef  language/tree-il/peval.scm
	y
 			  g  nameg  %make-var-procedure CR446R-       h      ]  C       g  t-9d6212d37ae-5bdd
		 g  t-9d6212d37ae-5bde		 g  t-9d6212d37ae-5bdf			 g  t-9d6212d37ae-5be0			  			   CU/0        h   ]   ]L 6    U       g  a
		  g  filenamef  language/tree-il/peval.scm		y
 		   CS2  h   M   ] L 6E       g  filenamef  language/tree-il/peval.scm		y
 		
   C4    h      ] C          		
   C]^        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/peval.scm
	y
 		n   C5R78;<  4? >  "  G   	Bi  R h   z   ] $   CC      r       g  obj
		  g  filenamef  language/tree-il/peval.scm
	y
 		  g  nameg  %var?-procedure CCR44D6RE     h   :   ]  C      2       g  t-9d6212d37ae-5bf3
		
  		
   CU/D0       h   ]   ]L 6    U       g  a
		  g  filenamef  language/tree-il/peval.scm		y
 		   CS2  h   M   ] L 6E       g  filenamef  language/tree-il/peval.scm		y
 		
   C    h      ] C          		
   C]^        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/peval.scm
	y
 		n   C5DR        h   |   ] &   
C 6t       g  s
		  g  filenamef  language/tree-il/peval.scm
	y
 		  g  nameg  %var-name-procedure CR446R        h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   CE/    h   :   ]  C      2       g  t-9d6212d37ae-5bff
		
  		
   CU/0       h   ]   ]L 6    U       g  a
		  g  filenamef  language/tree-il/peval.scm		y
 		   CS2  h   M   ] L 6E       g  filenamef  language/tree-il/peval.scm		y
 		
   C1    h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm
	y
 	    C5R2    h   ~   ] &   C 6v       g  s
		  g  filenamef  language/tree-il/peval.scm
	y
 		  g  nameg  %var-gensym-procedure C3R4426RAHM      h   :   ]C     2       g  err
		 g  s		  			   CPV[ h   :   ]C     2       g  err
		 g  s		  			   C^di h   :   ]C     2       g  err
		 g  s		  			   CE    h   :   ]  C      2       g  t-9d6212d37ae-5c1a
		
  		
   CU/20       h   ]   ]L 6    U       g  a
		  g  filenamef  language/tree-il/peval.scm		y
 		   CS2  h   M   ] L 6E       g  filenamef  language/tree-il/peval.scm		y
 		
   C    h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm
	y
 	    C52R    h       ] &   	C 6       x       g  s
		  g  filenamef  language/tree-il/peval.scm
	y
 		  g  nameg  %var-refcount-procedure CR446R    h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   CE    h   :   ]  C      2       g  t-9d6212d37ae-5c35
		
  		
   CU/0       h   ]   ]L 6    U       g  a
		  g  filenamef  language/tree-il/peval.scm		y
 		   CS2  h   M   ] L 6E       g  filenamef  language/tree-il/peval.scm		y
 		
   C    h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm
	y
 	    C5R    h    |   ] &   	C 6       t       g  s
		  g  filenamef  language/tree-il/peval.scm
	y
 		  g  nameg  %var-set?-procedure CR446R        h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C
 h   :   ]C     2       g  err
		 g  s		  			   CE1    h   :   ]  C      2       g  t-9d6212d37ae-5c50
		
  		
   CU/0       h   ]   ]L 6    U       g  a
		  g  filenamef  language/tree-il/peval.scm		y
 		   CS2  h   M   ] L 6E       g  filenamef  language/tree-il/peval.scm		y
 		
   C3    h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm
	y
 	    C5R446R9^`ehi       h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C]^   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  language/tree-il/peval.scm
	y
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5Rj      h       ] &   	C 6            g  s
		 g  val		  g  filenamef  language/tree-il/peval.scm
	y
 			  g  nameg  %set-var-refcount!-procedure CkR44j6Rl h   Z   ]  C    R       g  t-9d6212d37ae-5c7e
		 g  t-9d6212d37ae-5c7f		  			   CU/j0       h   ]   ]L 6    U       g  a
		  g  filenamef  language/tree-il/peval.scm		y
 		   CS2  h   M   ] L 6E       g  filenamef  language/tree-il/peval.scm		y
 		
   C    h      ] C          		
   C]^        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/peval.scm
	y
 		n   C5jR        h       ] &   	C 6            g  s
		 g  val		  g  filenamef  language/tree-il/peval.scm
	y
 			  g  nameg  %set-var-set?!-procedure CR446Rl     h   Z   ]  C    R       g  t-9d6212d37ae-5c8e
		 g  t-9d6212d37ae-5c8f		  			   CU/0       h   ]   ]L 6    U       g  a
		  g  filenamef  language/tree-il/peval.scm		y
 		   CS2  h   M   ] L 6E       g  filenamef  language/tree-il/peval.scm		y
 		
   C    h      ] C          		
   C]^        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/peval.scm
	y
 		n   C5Rj  h      ] $  v &  j 
  	45&  		"  	45&  	"  4>  "  G  CCC             g  exp
	  g  res	  g  w		!	| g  var		-	| g  val		K	y  g  filenamef  language/tree-il/peval.scm
 		 		$ 		- 		- 		2 	%	K 	!	K 	
 		 	   C    h      ] 
 6          g  name
		 g  sym		 g  res			  g  filenamef  language/tree-il/peval.scm
 		 	!	 	 			   C h      ] 
 6          g  name
		 g  sym		 g  res			  g  filenamef  language/tree-il/peval.scm
 		 	!	 	 			   C       h      ] 
 6          g  name
		 g  sym		 g  res			  g  filenamef  language/tree-il/peval.scm
 		 	!	 	 			   C       h      ] 
 6          g  name
		 g  sym		 g  res			  g  filenamef  language/tree-il/peval.scm
 		 	!	 	 			   C  hh    ] $ X & S 
  	 	 	 	 	 	 	4$  "  $  	 "  $  "  (  /4	>  "  G  4>  "  G  4
5"  $  ~$  j$  N$  2(  &	

	"l"  4"  /"  $"  "  
	"0"  56 &  * 
  	 	 	6 &  0 
  	 	 	 		6 
&  * 
  	 	 	6 &  Q 
  	 	45&  	"  4>  "  G  CCC          g  exp
	d g  res	d g  w		e g  w		"e g  w		)e g  w		0e g  w		=e g  x		}Z g  ls	 F g  p-ls		 F g  p-ls	
 F g  p-ls	 F g  w	 A g  w	 9 g  x	 9 g  w	 . g  x	 . g  w	  g  w	w g  w	~ g  w	 g  w	 g  w	 g  w	 g  w	^ g  s	.[  g  filenamef  language/tree-il/peval.scm
 		 		R 		\ 		c 	"	i 	'	n 	0	s 	<	v 	 	F 	_ 	a 	e 	h 	 	 	 	 	 	 	% 	. 	. 	 	d	   Ch   q   ]C   i       g  exp
		 g  res		  g  filenamef  language/tree-il/peval.scm
 	 			   C    h(      - . , 3 #   6           g  exp
		$ g  table		$  g  filenamef  language/tree-il/peval.scm
 
	$ 	 		$  g  nameg  build-var-table CR      h      ]  C           g  effort
		 g  size		 g  continuation			 g  
recursive?			 g  data			 g  prev			  g  filenamef  language/tree-il/peval.scm
 
 			  g  nameg  %%make-counter-procedure CR446R        h      ]  C           g  t-9d6212d37ae-63b6
		 g  t-9d6212d37ae-63b7		 g  t-9d6212d37ae-63b8			 g  t-9d6212d37ae-63b9			 g  t-9d6212d37ae-63ba			 g  t-9d6212d37ae-63bb			  			   CU/0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	 
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	 
 		
   C   h      ] C          		
   C]^        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/peval.scm
 
 		n   C5R7;   4? >  "  G   	Bi  R  h      ] $   CC      w       g  obj
		  g  filenamef  language/tree-il/peval.scm
 
 		  g  nameg  %counter?-procedure C!R44"6RE=        h   :   ]  C      2       g  t-9d6212d37ae-63d2
		
  		
   CU/"0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	 
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	 
 		
   C?   h      ] C          		
   C]^        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/peval.scm
 
 		n   C5"R@      h      ] &   
C 6{       g  s
		  g  filenamef  language/tree-il/peval.scm
 
 		  g  nameg  %effort-counter-procedure CAR44@6ROV[ h   :   ]C     2       g  err
		 g  s		  			   C^di h   :   ]C     2       g  err
		 g  s		  			   Clrx h   :   ]C     2       g  err
		 g  s		  			   CE    h   :   ]  C      2       g  t-9d6212d37ae-63de
		
  		
   CU/@0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	 
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	 
 		
   C   h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm
 
 	    C5@R  h      ] &   C 6y       g  s
		  g  filenamef  language/tree-il/peval.scm
 
 		  g  nameg  %size-counter-procedure CR446R   h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   CE    h   :   ]  C      2       g  t-9d6212d37ae-63f9
		
  		
   CU/0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	 
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	 
 		
   C   h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm
 
 	    C5R  h       ] &   	C 6              g  s
		  g  filenamef  language/tree-il/peval.scm
 
 		  g  nameg  %counter-continuation-procedure CR446R   h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C$ h   :   ]C     2       g  err
		 g  s		  			   CE@    h   :   ]  C      2       g  t-9d6212d37ae-6414
		
  		
   CU/0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	 
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	 
 		
   CB   h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm
 
 	    C5RC  h       ] &   	C 6              g  s
		  g  filenamef  language/tree-il/peval.scm
 
 		  g  nameg  %counter-recursive?-procedure CDR44C6RRY^     h   :   ]C     2       g  err
		 g  s		  			   Cagl h   :   ]C     2       g  err
		 g  s		  			   Couz h   :   ]C     2       g  err
		 g  s		  			   CE    h   :   ]  C      2       g  t-9d6212d37ae-642f
		
  		
   CU/C0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	 
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	 
 		
   C   h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm
 
 	    C5CR  h       ] &   	C 6       y       g  s
		  g  filenamef  language/tree-il/peval.scm
 
 		  g  nameg  %counter-data-procedure CR446R   h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   CE    h   :   ]  C      2       g  t-9d6212d37ae-644a
		
  		
   CU/0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	 
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	 
 		
   C   h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm
 
 	    C5R  h       ] &   	C 6       y       g  s
		  g  filenamef  language/tree-il/peval.scm
 
 		  g  nameg  %counter-prev-procedure CR446R
   h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C!& h   :   ]C     2       g  err
		 g  s		  			   CEB    h   :   ]  C      2       g  t-9d6212d37ae-6465
		
  		
   CU/0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	 
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	 
 		
   CD   h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm
 
 	    C5R44t6R9TV]hi      h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C]^   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  language/tree-il/peval.scm
 
 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5tR^    h       ] &   	C 6            g  s
		 g  val		  g  filenamef  language/tree-il/peval.scm
 
 			  g  nameg  "%set-counter-recursive?!-procedure C_R44^6Rl  h   Z   ]  C    R       g  t-9d6212d37ae-6493
		 g  t-9d6212d37ae-6494		  			   CU/^0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	 
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	 
 		
   C   h      ] C          		
   C]^        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/peval.scm
 
 		n   C5^R      h       ] &  	 	"  	4 56  x       g  c
		  g  filenamef  language/tree-il/peval.scm
 
	 	 		  g  nameg  abort-counter CR@    h8      ]	 &   
"  	4 5
$   6C         g  c
		6 g  e		6  g  filenamef  language/tree-il/peval.scm
 
	 		 		! 		" 		' 		- 		0 		1 		4 	 		6  g  nameg  record-effort! CR     h8      ]	 &   "  	4 5
$   6C         g  c
		6 g  s		6  g  filenamef  language/tree-il/peval.scm
 
	 		 		! 		" 		' 		- 		0 		1 		4 	 		6  g  nameg  record-size! CR    hP      ]$  E &  		"  	45&  C &  		"  	456C        g  data
		O g  counter		O  g  filenamef  language/tree-il/peval.scm
 
	 		 		) 		3 		M 	 		O	  g  nameg  find-counter CR@      h     - . , 3 	#   &   
"  	4 5#   &   "  	4 5 &   
"  	4 5&  
"  	4545 &   "  	4 5&  "  	4545C         g  from
	 g  to	 g  effort		 g  size		 g  from-v	   g  to-v	   g  from-balance	   g  
to-balance	   g  amount	   g  from-v	  g  to-v	  g  from-balance	  g  
to-balance	  g  amount		  g  filenamef  language/tree-il/peval.scm
 
	 	*	- 		8 	(	P 		U 		o 	+  	  	  	  	  	  	  	  	  	  	  	  	  	)  	  	  	  	  	 		 	 	 	 	 	  			  g  nameg  	transfer! CR     h(   
  ]4 545 C          g  effort-limit
		$ g  
size-limit		$ g  continuation			$ g  data			$ g  effort			$ g  size			$  g  filenamef  language/tree-il/peval.scm
 
	 		
 		 	 		$	  g  nameg  make-top-counter CR     hH     ]4
54
5  4>  "  G  C       	      g  continuation
		A g  data		A g  current			A g  effort			( g  size			( g  c		(	A  g  filenamef  language/tree-il/peval.scm
 
	 			 		 		( 		+	 		A	  g  nameg  make-nested-counter CR     h   p  ]$4
54
5&  		"  	45&  		"  	45 4 >  "  G  C   h      g  effort-limit
	  g  
size-limit	  g  orig		  g  current		  g  effort		D	h g  size		D	h g  continuation		D	h g  data		D	h g  c		h   	g  filenamef  language/tree-il/peval.scm

					
				,		D			h			k	 		 	  g  nameg  make-recursive-counter CR     h    N  , 
3 
 	 CF      g  var
		  g  sym		  g  visit			  g  source			  g  visit-count			  g  	use-count			  g  	copyable?			  g  residual-value			  g  constant-value			  g  alias				   
g  filenamef  language/tree-il/peval.scm

 		 	
  g  nameg  %%make-operand-procedure CR446R h    Z  , 
3 
 	 CR      g  t-9d6212d37ae-655a
		  g  t-9d6212d37ae-655b		  g  t-9d6212d37ae-655c			  g  t-9d6212d37ae-655d			  g  t-9d6212d37ae-655e			  g  t-9d6212d37ae-655f			  g  t-9d6212d37ae-6560			  g  t-9d6212d37ae-6561			  g  t-9d6212d37ae-6562			  g  t-9d6212d37ae-6563				   
		 	
   CU/0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	
 		
   C   h      ] C          		
   C]^        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/peval.scm

 		n   C5R7;ר  4? >  "  G   	Bi  R  h      ] $   CC      w       g  obj
		  g  filenamef  language/tree-il/peval.scm

 		  g  nameg  %operand?-procedure CR446RE        h   :   ]  C      2       g  t-9d6212d37ae-6582
		
  		
   CU/0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	
 		
   C   h      ] C          		
   C]^        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/peval.scm

 		n   C5R      h      ] &   
C 6x       g  s
		  g  filenamef  language/tree-il/peval.scm

 		  g  nameg  %operand-var-procedure CR446R    h   :   ]C     2       g  err
		 g  s		  			   C  h   :   ]C     2       g  err
		 g  s		  			   C#)/ h   :   ]C     2       g  err
		 g  s		  			   CEK    h   :   ]  C      2       g  t-9d6212d37ae-658e
		
  		
   CU/0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	
 		
   CM   h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm

 	    C5RN  h      ] &   C 6x       g  s
		  g  filenamef  language/tree-il/peval.scm

 		  g  nameg  %operand-sym-procedure COR44N6R]di    h   :   ]C     2       g  err
		 g  s		  			   Clrw h   :   ]C     2       g  err
		 g  s		  			   Cz h   :   ]C     2       g  err
		 g  s		  			   CE    h   :   ]  C      2       g  t-9d6212d37ae-65a9
		
  		
   CU/N0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	
 		
   C   h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm

 	    C5NR  h       ] &   	C 6       {       g  s
		  g  filenamef  language/tree-il/peval.scm

 		  g  nameg  %%operand-visit-procedure CR446R h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   CE    h   :   ]  C      2       g  t-9d6212d37ae-65c4
		
  		
   CU/0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	
 		
   C   h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm

 	    C5R  h       ] &   	C 6       {       g  s
		  g  filenamef  language/tree-il/peval.scm

 		  g  nameg  %operand-source-procedure CR446R	 h   :   ]C     2       g  err
		 g  s		  			   C# h   :   ]C     2       g  err
		 g  s		  			   C&,1 h   :   ]C     2       g  err
		 g  s		  			   CEM    h   :   ]  C      2       g  t-9d6212d37ae-65df
		
  		
   CU/0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	
 		
   CO   h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm

 	    C5RP  h       ] &   	C 6              g  s
		  g  filenamef  language/tree-il/peval.scm

 		  g  nameg  %operand-visit-count-procedure CQR44P6R_fk    h   :   ]C     2       g  err
		 g  s		  			   Cnty h   :   ]C     2       g  err
		 g  s		  			   C| h   :   ]C     2       g  err
		 g  s		  			   CE    h   :   ]  C      2       g  t-9d6212d37ae-65fa
		
  		
   CU/P0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	
 		
   C   h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm

 	    C5PR  h       ] &   	C 6       ~       g  s
		  g  filenamef  language/tree-il/peval.scm

 		  g  nameg  %operand-use-count-procedure CR446R      h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   C h   :   ]C     2       g  err
		 g  s		  			   CE    h   :   ]  C      2       g  t-9d6212d37ae-6615
		
  		
   CU/0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	
 		
   C   h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm

 	    C5R  h       ] &   	C 6       ~       g  s
		  g  filenamef  language/tree-il/peval.scm

 		  g  nameg  %operand-copyable?-procedure CR446R			      h   :   ]C     2       g  err
		 g  s		  			   C		 	% h   :   ]C     2       g  err
		 g  s		  			   C	(	.	3 h   :   ]C     2       g  err
		 g  s		  			   CE	O    h   :   ]  C      2       g  t-9d6212d37ae-6630
		
  		
   CU/0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	
 		
   C	Q   h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm

 	    C5R	R  h       ] &   	C 6              g  s
		  g  filenamef  language/tree-il/peval.scm

 		  g  nameg  !%operand-residual-value-procedure C	SR44	R6R	a	h	m h   :   ]C     2       g  err
		 g  s		  			   C	p	v	{ h   :   ]C     2       g  err
		 g  s		  			   C	~		 h   :   ]C     2       g  err
		 g  s		  			   CE	    h   :   ]  C      2       g  t-9d6212d37ae-664b
		
  		
   CU/	R0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	
 		
   C	   h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm

 	    C5	RR	  h       ] &   	C 6              g  s
		  g  filenamef  language/tree-il/peval.scm

 		  g  nameg  !%operand-constant-value-procedure C	R44	6R			 h   :   ]C     2       g  err
		 g  s		  			   C			 h   :   ]C     2       g  err
		 g  s		  			   C			 h   :   ]C     2       g  err
		 g  s		  			   CE	    h   :   ]  C      2       g  t-9d6212d37ae-6666
		
  		
   CU/	0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	
 		
   C	   h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm

 	    C5	R	  h       ] &   		C 6       z       g  s
		  g  filenamef  language/tree-il/peval.scm

 		  g  nameg  %operand-alias-procedure C	R44	6R


  h   :   ]C     2       g  err
		 g  s		  			   C

"
' h   :   ]C     2       g  err
		 g  s		  			   C
*
0
5 h   :   ]C     2       g  err
		 g  s		  			   CE
Q    h   :   ]  C      2       g  t-9d6212d37ae-6681
		
  		
   CU/	0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	
 		
   C
S   h      ] C          		
   C]^        h      ]14 5$  @4 5$  @4 5$  @4 5$  	@4 
5$   O @4 5$  4 O ?$  @ 6 6            g  x
	  g  tmp	  g  tmp		"  g  tmp		9  g  tmp		P  g  tmp		g  g  tmp	    g  filenamef  language/tree-il/peval.scm

 	    C5	R44+6R9
c
e
phi      h    v   ]45C   n       g  dummy
		 g  check?		 g  s			 g  getter			 g  expr			  			   C]^   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  language/tree-il/peval.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  check?g  sg  getterg  expr g  ...   C5+R
q    h       ] &   	C 6            g  s
		 g  val		  g  filenamef  language/tree-il/peval.scm

 			  g  nameg  #%set-operand-visit-count!-procedure C
rR44
q6Rl
 h   Z   ]  C    R       g  t-9d6212d37ae-66af
		 g  t-9d6212d37ae-66b0		  			   CU/
q0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	
 		
   C
   h      ] C          		
   C]^        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/peval.scm

 		n   C5
qR
      h       ] &   	C 6            g  s
		 g  val		  g  filenamef  language/tree-il/peval.scm

 			  g  nameg  !%set-operand-use-count!-procedure C
R44
6Rl
   h   Z   ]  C    R       g  t-9d6212d37ae-66bf
		 g  t-9d6212d37ae-66c0		  			   CU/
0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	
 		
   C
   h      ] C          		
   C]^        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/peval.scm

 		n   C5
R
      h       ] &   	C 6            g  s
		 g  val		  g  filenamef  language/tree-il/peval.scm

 			  g  nameg  !%set-operand-copyable?!-procedure C
R44
6Rl
   h   Z   ]  C    R       g  t-9d6212d37ae-66cf
		 g  t-9d6212d37ae-66d0		  			   CU/
0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	
 		
   C
   h      ] C          		
   C]^        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/peval.scm

 		n   C5
R
      h       ] &   	C 6            g  s
		 g  val		  g  filenamef  language/tree-il/peval.scm

 			  g  nameg  '%%set-operand-residual-value!-procedure C
R44
6Rl     h   Z   ]  C    R       g  t-9d6212d37ae-66df
		 g  t-9d6212d37ae-66e0		  			   CU/
0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	
 		
   C   h      ] C          		
   C]^        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/peval.scm

 		n   C5
R      h       ] &   	C 6            g  s
		 g  val		  g  filenamef  language/tree-il/peval.scm

 			  g  nameg  &%set-operand-constant-value!-procedure CR446Rl@      h   Z   ]  C    R       g  t-9d6212d37ae-66ef
		 g  t-9d6212d37ae-66f0		  			   CU/0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	
 		
   CB   h      ] C          		
   C]^        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/peval.scm

 		n   C5RC      h       ] &   		C 6            g  s
		 g  val		  g  filenamef  language/tree-il/peval.scm

 			  g  nameg  %set-operand-alias!-procedure CDR44C6Rlj       h   Z   ]  C    R       g  t-9d6212d37ae-66ff
		 g  t-9d6212d37ae-6700		  			   CU/C0       h   ^   ]L 6    V       g  a
		  g  filenamef  language/tree-il/peval.scm	
 		   CS2 h   N   ] L 6F       g  filenamef  language/tree-il/peval.scm	
 		
   Cl   h      ] C          		
   C]^        hp      ]4 5$  @4 5$   O @4 5$  4 O ?$  @	
 6	
 6         g  x
		n g  tmp		n g  tmp		"	n g  tmp		>	n  g  filenamef  language/tree-il/peval.scm

 		n   C5CRm       h   T  - . , 3 #  #  #  45$    &  	 	"  	4 5"   &  	 	"  	4 5$  "   

 C       L      g  var
	  g  sym	  g  source		  g  visit		  g  alias		  g  source		0  g  	copyable?		  g  alias		   g  filenamef  language/tree-il/peval.scm
(
	(-		0-		8/		;/	$	T/		\0		x0		.	 
	 		  g  nameg  make-operand CnRfn     h      ] L 6       g  name
		 g  sym		 g  source			 g  alias			  g  filenamef  language/tree-il/peval.scm
4		5	 			   Cn       h      ] L 6        g  name
		 g  sym		 g  source			  g  filenamef  language/tree-il/peval.scm
7		8	 			   C      h@      - . , 3 #  $  O  6O  6        g  vars
		? g  syms		? g  sources			? g  visit			? g  aliases			?  g  filenamef  language/tree-il/peval.scm
2
	3		.4		?7	 		?	  g  nameg  make-bound-operands CoRfn       h      ] 6           g  vars
		 g  syms		  g  filenamef  language/tree-il/peval.scm
;
	<	 			  g  nameg  make-unbound-operands CpR
    h      ]$  &  q
$  V&  G
&  +	$  (  "  "  "  "  "  "  "   &   	C 6         g  op
	  g  val	  g  w			 g  w		6	p g  w		E	g g  val	    g  filenamef  language/tree-il/peval.scm
>
	A	 ?	 	 	  g  nameg  set-operand-residual-value! CqRPP
q     h@   {   ]L &  	L 	"  	4L 5 L &  L 	 CL 6       s       g  val
		9  g  filenamef  language/tree-il/peval.scm
T			U	,	U	(	U	 		9
   CP
q     h@   {   ]L &  	L 	"  	4L 5 L &  L 	 CL 6       s       g  val
		9  g  filenamef  language/tree-il/peval.scm
e			f	,	f	(	f	 		9
   CP
q     h@   {   ]L &  	L 	"  	4L 5 L &  L 	 CL 6       s       g  val
		9  g  filenamef  language/tree-il/peval.scm
T			U	,	U	(	U	 		9
   C
   h8   r   ] L&  L	"  4L>  "  G  L 6       j       g  filenamef  language/tree-il/peval.scm
[		_		1Z	 		1
  g  nameg  abort CrP
q h@   {   ]L &  	L 	"  	4L 5 L &  L 	 CL 6       s       g  val
		9  g  filenamef  language/tree-il/peval.scm
e			f	,	f	(	f	 		9
   CP
q     h@   {   ]L &  	L 	"  	4L 5 L &  L 	 CL 6       s       g  val
		9  g  filenamef  language/tree-il/peval.scm
e			f	,	f	(	f	 		9
   C  h    - . , 3 #  #   &  	 	"  	4 5
$ P O  O 4 O >   "  G  V &  	 	"  	4 5$  $  "  $  "  $  D4 &  	 	"  	4 5 &  	 	"  	4 5>  "  y	 U  X4 &  	 	"  	4 5 &  	 	"  	4 54
 O  5>  X"  /G4>  "  X4 O >   "  G  CX4 O >   "  G  FC             g  op
	 g  counter	 g  ctx		 g  effort-limit		 g  
size-limit		 g  tag	 \ g  _	I\ g  results	I\  g  filenamef  language/tree-il/peval.scm
I
	!R		:R		?R		NS		fW	 W	 X	 X	  X	8 X	 Y	 Y	) Y	 Z	 a	b	)c	Ca	LZ	cS	 			  g  nameg  visit-operand CsRtuvwxyz{|        h      ] $  C $  "  K $  "  = $  "  / $  "  ! $  "   $  "   $  
4	5C 
$  "   $  "   $  4	5	CC         g  primitive-name
	  g  args	   g  filenamef  language/tree-il/peval.scm
j
	k		kn		sn		}k	 p	 p	 	 	  g  nameg  types-check? C}R  h(      ]	4 M 5$  C 4M 56         g  sym
		& g  v		&  g  filenamef  language/tree-il/peval.scm
													-	&	 			&  g  nameg  
lookup-var Cf 	     h@      ]	444 &   
"  	4 55554 M 5N C        g  var
		? g  new	-	?  g  filenamef  language/tree-il/peval.scm
									-		=	'	-	)	-	+		-		-		0		<	 		?   C  h      ]L O  6 |       g  vars
		  g  filenamef  language/tree-il/peval.scm
			 		  g  nameg  fresh-gensyms C
    h@      ]	 &  	 	"  	4 5 &   	C 6              g  op
		9 g  val		9  g  filenamef  language/tree-il/peval.scm
			#				 		9  g  nameg  record-operand-use Cq
    h`      ]
 &  	 	"  	4 5
$  4 >  "  G  "    &   	C 6             g  op
		Z g  n		Z g  count		 	Z  g  filenamef  language/tree-il/peval.scm
				 		 		%		*		+		D	 			Z	  g  nameg  unrecord-operand-uses CqN       h      - . , 3 #  #  4L  >  "  G  &  "  $  4 >  "  G  "    &   
"  	4 5&  
"  	4	5 &   "  	4 
56         g  op
	  g  ctx	  g  val		  g  s		{   g  filenamef  language/tree-il/peval.scm
				8		F		G		d	#	{	 	5 	 
	 	  g  nameg  residualize-lexical C     hH      ]"  %$   4 56456 $  (  C""          g  src
		E g  values		E  g  filenamef  language/tree-il/peval.scm
								7							 		E	  g  nameg  make-values Cf{r|   hH      ]L$  "  L$  4L >  "  44L5L >  G  D        g  results
	=	G  g  filenamef  language/tree-il/peval.scm
						*		-		<		@	
	G	 			G
   C   h   r   -  1  3 D   j       g  _
			  g  filenamef  language/tree-il/peval.scm
					
 			


   C   h   o   ]L  6      g       g  t-9d6212d37ae-6b11
		
  g  filenamef  language/tree-il/peval.scm
	% 		
   C}       h     ]45$  454O >  G $  C	$  
 6$  $  	 6 6 4 O 56 456"   456	&  45$  
6""             g  src
	  g  name	  g  args		  g  ctx		  g  make-values		  g  args			2 g  success?		3  g  values		3   g  filenamef  language/tree-il/peval.scm
							*					6		@		I		O		X		[		_		f	#	h		m	$	o		t	  	 	 	 	 	 	 	 	 	 	 		 	 	  g  nameg  fold-constants Cz .   h  0  ]i" " " " " " s" " " V"  $  &  7 
  	 	4L 5$  6C &  7 
  	 	4L 5$  6C &   
 45$  45"  $  	"  $  4	
56 "  $  Y45$  <(  (	4L 	5

$  4
 56C4	
56 4	
56 $  "}4	
56 "a4	
 56 4	
 56  $   &   
  	$  &  w
						
		&  /4L 5$  4	
5	6C""""" $  M &  @ 
  	 	 	4L 5$  6C"V"R $  V &  I 
  	 	 	 	4L 5$  6C"" $  M &  @ 
  	 	 	4L 5$  6C"" $   &  C"w"s $   &  C"Y"U $   &  C";"7 $   &  C"" $   &  ~ 
 $  g&  Z
&  C 	L45$  ,L$  L45"  $  4 L56CC"""""" " i" " " |" - $ " &  3L$  )L$  L"  $  L4 L5  6CC !&  3L$  )L$  L"  $  L4 L5  6CC "&  3L$  )L$  L"  $  L4 L5  6CC #&  3L$  )L$  L"  $  L4 L5  6CC $&  3L$  )L$  L"  $  L4 L5  6CC %&  3L$  )L$  L"  $  L4 L5  6CC &&  3L$  )L$  L"  $  L4 L5  6CC &  q 
 $  Z&  M
4'5$  3L$  )L$  L"  $  4 L5  6CC"F"B">":"6 $  @ (&  3L$  )L$  L"  $  L4 L5  6CC"" $  @ )&  3L$  )L$  L"  $  L4 L5  6CC"="9 $  @ *&  3L$  )L$  L"  $  L4 L5  6CC"" $  @ +&  3L$  )L$  L"  $  L4 L5  6CC"" $  @ ,&  3L$  )L$  L"  $  L4 L5  6CC"P"L $  @ -&  3L$  )L$  L"  $  L4 L5  6CC""      (      g  exp
	 g  w	>	q g  w		D	q g  w		K	q g  w		R	q g  body		[	q g  w	~  g  w	   g  w	   g  w	   g  body	   g  w  g  w	  g  tail-len	  g  len	  g  ls		 g  n		 g  p-ls		 g  head	k g  w		,Q g  tail	
5Q g  w	u g  wt g  w	t g  w	t g  w	l g  w	l g  w	l g  w	l g  w	l g  w		l g  w	
"l g  w	)l g  w	0l g  body	@h g  w g  w	 g  w	 g  w	 g  w	 g  body	 g  w- g  w	- g  w	- g  w	- g  w	- g  w	
- g  body	- g  wI g  w	O g  w	V g  w	] g  w	d g  body	m g  w	 g  w	 g  w	*{ g  w	9w g  w[ g  w	a g  w	|  =g  filenamef  language/tree-il/peval.scm
				UG		[G			cH		oI		t	 K	 K		 L	 M	 	 O		/Q	5Q	=R	BS	&KS	3MS	&OS	RO			:A	@A		HB	OD	!fC	l	<	<		=	>		8	8		9	+:	1	g4	m4		u5	6		>%	E%	I%		O%	&R%	>Y%	5^%	*b%		g&	$k&	4o&	$s&	{	 	 		 	 	) 	 		!	$!	4!	$!	B!		 	 		 	 	) 	
 		!	$!	4!	$!	B!	%	/ 	3 		9 	= 	)B 	F 		K!	$O!	4S!	$X!	BZ!	a	k 	o 		u 	y 	)~ 	 		!	$!	4!	$!	B!		 	 		 	 	) 	 		!	$!	4!	$!	B!		 	 		 	 	) 	 		!	$!	4!	$!	B!		 	# 		) 	- 	)2 	6 		;!	$?!	4C!	$H!	BJ!	Q	 	 		 	 	) 	 		!	$!	4!	$!	B!		 	 		 	 	) 	 		 !	$!	4!	$!	B!		/ 	3 		9 	= 	)B 	F 		K!	$O!	4S!	$X!	BZ!	b	z 	~ 		 	 	) 	 		!	$!	4!	$!	B!		 	 		 	 	) 	 		!	$!	4!	$!	B!		 	 		 	 	)# 	' 		,!	$0!	44!	$9!	B;!	C	[ 	_ 		e 	i 	)n 	r 		w!	${!	4!	$!	B!		 	  g  nameg  loop C     h(      ]O  Q 6              g  src
		! g  exp		! g  nmin			! g  nmax			! g  consumer			! g  loop			!  g  filenamef  language/tree-il/peval.scm
			 		!	  g  nameg  inline-values C h      ]4M  56          g  x
		  g  filenamef  language/tree-il/peval.scm
X		]		]	 		  g  nameg  constant-expression? C      h0      ]L &  C &  	 	"  	4 5
C            g  op
		+  g  filenamef  language/tree-il/peval.scm
f		m		
m		m	
	n		(n		*n	
 		+  g  nameg  referenced? Cfq h    y   ]4 >  "  G   C       q       g  op
		 g  val		  g  filenamef  language/tree-il/peval.scm
	"		$ 			   C	SO	Rqs       h  T  ]^O Q " " 
(  4 5$  445455$  <4 5(  C44	
5545456(  "  454455(  C4544	
5545456	"
45$  

"&  		"  	45$  

"&  "  &  		"  	45
$  1445>  "  G  

"^
4545$  "  
"& 	
"4 5	"  L      g  ops
	 g  	in-order?	 g  body		 g  counter		 g  ctx		 g  build-result		 g  referenced?		
 g  old		 g  values		 g  effects			 g  ops*	
	 g  values		 g  effects		 g  new		& g  effects		J  g  values		[  g  effect-vals	   g  body	   g  values	   g  op	 g  effect	  g  filenamef  language/tree-il/peval.scm
_										&	
	-		1		2		7	"	@	4	J		J		Rt		Sv		[v		cw	
	iy		ly	!	xy		yz	 {	 y	 	 	& 	 	 	' 	0 	' 	 ~	 	
 	 	 	 	# 	 	 	 	 	"			
				&	)	E	H	M	Y	]m	am	bm	
in	n	n	
			.	H	.						 	:	 									4	B	 U		  g  nameg  prune-bindings C     h   x   ]C  p       g  x
		 g  res		  g  filenamef  language/tree-il/peval.scm
				 			   C      h   x   ]C  p       g  x
		 g  res		  g  filenamef  language/tree-il/peval.scm
				 			   C  h      ]L$  CL 6          g  x
		 g  res		  g  filenamef  language/tree-il/peval.scm
								 			   C   h@      ] U  %4O 
 >  "  G  XCXFGE       g  x
		@ g  limit		@ g  tag			@ g  _		5	@ g  results		5	@  g  filenamef  language/tree-il/peval.scm
						8	 		@	  g  nameg  small-expression? CN h0      ]&  "  	454 56          g  sym
		- g  op		- g  env			-  g  filenamef  language/tree-il/peval.scm
				!	%	-	 		-	  g  nameg  
extend-env C       h0      ]
 $    &   
 6CC           g  x
		, g  r		, g  w			&  g  filenamef  language/tree-il/peval.scm
				&	 		,	   C    hH      ]	4 M 5$  "  4 4M 55&  	C6         g  sym
		F g  v		- g  s	-	F  g  filenamef  language/tree-il/peval.scm
														"	-	*		-	 		F  g  nameg  assigned-lexical? C	Rs  h    ]"4 5$ 4 54L5$  "  	45$ &  
"  	45	&  		"  	4
5$  D&  		"  	45$  "  ;4L	
	
5$  "  &  		"  	45"  n4 54M5$  "  44M55	&  		"  	45$  4L 5DD45$  m4 54M5$  "  44M55	&  		"  	45$   ",""D$   DD           g  x
	 g  	n-aliases	 g  var			= g  t			: g  t		= g  s		_	 g  t	   g  t	   g  y	  g  sym	 K g  v	( g  s	(H g  sym	t g  v	 g  s	  g  filenamef  language/tree-il/peval.scm
									
					/		3		7		=		H		_	 	 	 	  	 	  	: 	  	 	  	 	, 	 							-%	(	N	R	S	^	b	b	c	m	n	1t	w							-						
				 >		  g  nameg  find-definition C      h      ]L LL 6         g  exp
		  g  filenamef  language/tree-il/peval.scm
			*		 		  g  nameg  	for-value C    h      ]! $  y &  n 
 $  Z&  O
&  : 	(  C$  "(  44M 55$  CCCCCCCCC           g  x
	  g  w	  g  w		6	| g  w		E	z g  w		`	v  g  filenamef  language/tree-il/peval.scm
					c]		f]		n]		r		 	   g  nameg  make-prompt-tag? C    h   y   ]L  6q       g  val
		 g  op		  g  filenamef  language/tree-il/peval.scm
			 			   C     h   y   ]4L>  "  G  L Cq       g  val
		 g  op		  g  filenamef  language/tree-il/peval.scm
			 			   C  h0      ]4L 5$  4L 5$  4L 5L6CC              g  val
		) g  op		)  g  filenamef  language/tree-il/peval.scm
"		#		#		$		#		%		%%	 		)	   Cr 	hp   >  ]
4L	>  "  G  4L445454544L54L5 554L LLLL55L LLL6  6      g  val
		n g  op		n g  exp		`	n  g  filenamef  language/tree-il/peval.scm
&		-		/		1		 1	'	%1	>	'1	'	(2	'	-2	>	/2	'	03	'	53	>	73	'	82	$	;4	(	B5	'	K2	$	Q1		R		`/		`.		n	 		n	   CfpN     h(      ]	4 L 5&  C6           g  old
		$ g  s		$  g  filenamef  language/tree-il/peval.scm
			+		&		 		$  g  nameg  new-sym Ci      h      ]L LL 6  y       g  t-9d6212d37ae-8149
		  g  filenamef  language/tree-il/peval.scm
	!		:		! 		   Czi     h       ]L     6              g  var
		 g  gensym		 g  init			 g  body			  g  filenamef  language/tree-il/peval.scm
i	*	k	6	l	6	m	6	j	, 			   C hx  )  ]HL
LL	$  JL4LL$  L"  L$  	L "  5L4LL$  45 "  5L6L
LL	$  QL4LL$  L"  L 5L44LLL	54454LLL	55 5L64	LLL	>  G  4	 L
>  G 4	4LL5L
>  G L$  	L "  G L$  45 "  G 4L L
L>  G L45454L54
LO L56  !      g  non-rest-gensyms
 v g  rest-gensyms v g  provided-gensyms	 v g  default-gensyms	 v g  provided-vars	 v g  default-vars	 v g  	rest-vars	v g  
rest-inits	'v g  default-inits	<v  	g  filenamef  language/tree-il/peval.scm
(			*		
*		)		,		-	$	$-	,	*.	$	/.	-	4.	9	6,		90		C1	$	D2	.	H2	=	J2	.	M2	(	R3	(	T0		X+		_5		`5		d)		i7		s8	$	z8	,	9	$ 7	 ;	 ;	$ ;	4 ;	$ <	* >	+ >	B >	+ ?	+ ?	; ?	+ <	* <	$ ;	 6	 X	 X	* X	 V	 Z	 V	 \	 \	" \	 V	^	^	!^	-V	`	a	"a	1a	"!a	&b	*V	-d	6d	$;d	?V	Ff	Og	Xh	ai	ve	 J	v
  g  nameg  inlined-application CmDC^f    h0      ]4L 4LLLL54LL55 L 6              g  tmp
		)  g  filenamef  language/tree-il/peval.scm
							*				)					)	 
		)
  g  nameg  abort C{ 
    h`   G  ]	H44L&  "  54L54 5 5K (  JC	LJ454L  56      ?      g  elts
		Z g  test		Z  g  filenamef  language/tree-il/peval.scm
				
	 	 	,	 		 	3	 	8		 	 		#	%		8	)		#	*
	#	0
	2	2
	#	5			7		<	%	@		J	0	Q	0	V	4	X	0	Z	 		Z  g  nameg  lp Ci  h   X   ] LLL L 6       P       g  filenamef  language/tree-il/peval.scm		1		 		
   C       h   o   ] 6       g       g  t-9d6212d37ae-9754
			  g  filenamef  language/tree-il/peval.scm
	 			   Cr     h`    ]I" "  "  |454	 M5NL  44 5	5 4	4
554LL4L4LLL5556 $  s &  LL4L4LLL 55 6 &  LL4L4LLL 55 6 &  LL4L4LLL 55 6"
" $  &  
 "  "  |454	 M5NL  44 5	5 4	4
554LL4L4LLL5556 &  LL4L4LLL 55 6 &  LL4L4LLL 55 6 &  LL4L4LLL 55 6""  D &  7 
  	(  LL4L4LLL 55 6""$ L( A 	"  "  |454	 M5NL  44 5	5 4	4
554LL4L4LLL5556 &  LL4L4LLL 55 6 &  LL4L4LLL 55 6 &  LL4L4LLL 55 6""  D &  7 
  	(  LL4L4LLL 55 6""$ (  	"  "  |454	 M5NL  44 5	5 4	4
554LL4L4LLL5556 &  LL4L4LLL 55 6 &  LL4L4LLL 55 6 &  LL4L4LLL 55 6""  D &  7 
  	(  LL4L4LLL 55 6""$ ( "  "  |454	 M5NL  44 5	5 4	4
55	4LL4L4LLL	55	5	6 &  LL4L4LLL 55 6 &  LL4L4LLL 55 6 &  LL4L4LLL 55 6""  D &  7 
  	(  LL4L4LLL 55 6""$  0&  # 	   4L 56"""+"'"""i"e &  7 
  	(  LL4L4LLL 55 6""" $  S &  F 
 4L5$  * 	 	LL4L4LLL556"""      g  	alternate
	` g  t	  g  failure		f  g  w g  w	" g  t	3 g  failure	 g  w	7_ g  w	t g  w	{ g  t	 g  failure	 g  w	 g  w	 g  w	 g  t	Z g  failure	6X g  w	 g  w	& g  t	7 g  failure		 g  w	;c g  w	| g  w g  wX g  w	/T g  w	6T  g  filenamef  language/tree-il/peval.scm
[		\		
=			C		C		C		C				 D	%	(	!	,		.		4F		7F		<F	#	=H		AI		BJ		FJ	&	JJ	3	KJ	7	PJ		RH		UG		VK		ZK	*	_K	?	cK	*	dL	'	fK		fK		iv		px		sy	 x	 v	 E	 =		 x	 y	 x	 v	 =		 x	 y	 x	 v	 =		 x	 y	 x	 v	=		\	(=		-C	1C	3C	3C	6	>D	%F	!J	L	RF	UF	ZF	#[H	_I	`J	dJ	&hJ	3iJ	7nJ	pH	sG	tK	xK	*}K	?K	*L	'K	K	v	x	y	x	v	E	=		x	y	x	v	=		x	y	x	v	=		x	y	x	v	=		Fx	Iy	Wx	[v	_=		c\	=		C	C	C	C		D	%	!		F	F	F	#H	I	J	J	&J	3J	7J	H	G	K	K	*K	?K	*L	'K	K	v	x	y	x	v	E	=		x	y	"x	&v	)=		6x	9y	Gx	Kv	N=		[x	^y	lx	pv	t=		x	y	x	v	=		\	=		C	C	C	C		D	%	!		F	F	F	#H	I	J	J	&J	3J	7 J	"H	%G	&K	*K	*/K	?3K	*4L	'6K	6K	9v	@x	Cy	Qx	Uv	ZE	Z=		jx	my	{x	v	=		x	y	x	v	=		x	y	x	v	=		x	y		x	v	=		\	,=		1C	5C	7C	7C	:	BD	%J	!N	P	VF	YF	^F	#_H	cI	dJ	hJ	&lJ	3mJ	7rJ	tH	wG	xK	|K	*K	?K	*L	'K	K	v	x	y	x	v	E	=		x	y	x	v	=		x	y	x	v	=		x		y	x	v	=		Jx	My	[x	_v	c=		g\	k	k	&k	1l	j	=		x	y	x	v	=		\	_	'*\	?c	Bd	Pc	Ta	X\	.	`  g  nameg  lp Ct   hx    ]Q"   $   &   
 $  &  ~
		$  Z&  N
&  9 	 		O 	

L LLQ 

	6 C C C C C C C $   &   
 $  &  }
$  g&  Z
&  C	$  1(  & 	 	45 """"""""""         g  c
	u g  w	  g  w		   g  w		6  g  w		<  g  w		C  g  w		J  g  w		e  g  w		s  g  w			z  g  lp	
   g  w m g  w	 m g  w	 e g  w	] g  w	Y g  w	.Q g  w	5Q g  w	<Q  g  filenamef  language/tree-il/peval.scm
M		N		 [	 N		?T	QS	UN		 	u  g  nameg  simplify-conditional C        h   W   ] L 6     O       g  filenamef  language/tree-il/peval.scm
&		'	 		
   C       h   c   -  1  3 C     [       g  args
			  g  filenamef  language/tree-il/peval.scm
&	 			


   C    h      ]L M 6         g  exp
		 g  counter		 g  ctx			  g  filenamef  language/tree-il/peval.scm
			 			  g  nameg  visit Co     h      ]L  6       g  names
		 g  gensyms		 g  vals			 g  body			  g  filenamef  language/tree-il/peval.scm
			 			   C       h      ]L M 6         g  exp
		 g  counter		 g  ctx			  g  filenamef  language/tree-il/peval.scm
			 			  g  nameg  visit C        h      ]LL  6             g  names
		 g  gensyms		 g  vals			 g  body			  g  filenamef  language/tree-il/peval.scm
			 			   C 
      h     ] $   &  z 
  	4L 5$  "  	45&  
"  	45&  		"  	4	5$  CCCC      g  exp
	  g  w	!  g  t		,	G g  op		G  g  s		c   g  filenamef  language/tree-il/peval.scm
					$		,		<		@		D		G		L	"	c	 	 	   g  nameg  lookup-alias C h      ]L L 6         g  exp
		 g  counter		 g  ctx			  g  filenamef  language/tree-il/peval.scm
	(		* 			   C    h0      ] (  4 >  "  G  "   L  6         g  names
		. g  gensyms		. g  vals			. g  body			.  g  filenamef  language/tree-il/peval.scm
						/		6		/	.	 		.	   C     h(      ]	454 M 5N C           g  elt
		$ g  new			$  g  filenamef  language/tree-il/peval.scm
																$		!			!	 		$   C        h      ] 6            g  t-9d6212d37ae-af4a
		 g  t-9d6212d37ae-af4b		  g  filenamef  language/tree-il/peval.scm
	" 			   CN		 h0      ]	4 5$  C4 5$  C 6           g  x
		, g  t			, g  t		,  g  filenamef  language/tree-il/peval.scm
%		%	"		%		%	-	%		,%	7 		,   Cs
 h8/  ?  , 3 5O O LQ LQ $  4>  "  G  "   " ." ." +" *" %" $" #" "" !"  (" " " C" " " " " " d"  " " " " " " :" " -" ? $ + &   
  	 		O 
LQ 
4L54L54>  G4
O ?$  	LO @4	>  G4

O ?$  L	LO @4L	56 &  C 
  	 		4L5454L	564 56 4 56  $   &   
 "  $  (  :
	(  
 "44L
5	56
4L
545$  4455		"|45$  		"e		"V456 	">"" $ X & K 
  	 		 	
 	 	 	 	4L54L54L455O Q 4L5$  " x	$ q
$  " b$ Z& L
$ 2 & $
!& 		$  $  "&  
	$  &  "  (  04#5$  4$5$  "  k"  e"  `$  F$  2%&  $
	""  "  "  "m"  "  "  "  "  "  "  "  "  "  "  $  C&	
$  

"  (  ?4#54#54#54'455"  $  ~$  j$  N$  2(  &"\"  4"  /"  $"  "  " "  4(LO 5$  4L5"  6	"t"p $   "&   
  	$  )6*$  +6,$   C4-$  4L5"  5	4.	4/ M5

$  
"   
M5N	C"" $  &  
  	" " " i" " "  04L15456	$  	2&  	
					
		43L	
5$  "  	43L	5$  4L5"  	"b$  \2&  O
			444055 """04L15456""	$ 	"& 	
			

$ 
& 



	
	
	& }
	
	
	
	& V455455$  455"  
4/	M5$  "  	6O Q $  "  $  "  $  04L154564748595$  "  4:5$  485$  ;&  		"  	4<=5$  e"  U&  "  Q;&  	"  4<>>  "  G  ;&  		"  	4<?5"""   "   45  "@ U  HHAO LQ 485$  4BLL5"  "$  4C5"  4DLL5K4L45 J5K$  4EJ>  "  G  "   JXCXFGE"""
"""	$  T	 &  G	
	
4F
5$  -454L
5$  C0	6"""	$ |	 & o	
	
4G
5$ U
45" Y" k" " " " "  ?$  +4L
5$  C0	6456 $ 5" $  $ ( $ H& 
$ $  (44)5 5 "f*$  4I5$  >
J$  K"  
L$  M"  +44N55$  "  6(  )44+5 5 "4OP54554.QR M5N44R   SO 
Q 455 "m4I5$  4
J$  K"  
L$  M"  +44N556(  )44+5 5 "0	4+5 6""""""J&  "L&  """$  T&  r$  g(  \$  LH&  ?
$  (4+5 ";"""""""$  U&  r$  g(  \$  LH&  ?
$  (4+5 ""k"g"c"_"["W"S$  T&  $  (  $  &  
$  s &  f
V&  O	$  =4404WV55 5 """"""""}"y"u"q$  U&  $  (  $  &  
$  i &  \
V&  E	$  344 55 """""""""""$  T&  $  (  $  &  
$   &  r
X&  [	$  I$  4(  )4 5 " """"""""""""$  U&  $  (  $  &  
$   &  r
X&  [	$  I$  4(  )4 5 "6"""""""""""""""	$ ~	 & q	
	
4Y
5$ W" k
45$ IX& )$ "  0	6$  (  "  ZO 	Q $  q&  d
$  I &  <
V&  	04WV560	 66 6 6 6 $  7H&  *
&  04WV5 6"4"0",""0	60	6456 &  "  *$ 
" "  "  "  |$  p[&  S$  G(  ;$  'H&  
4\5" " " 	" "  "  "  $  $(  [&  "  "`"Y"U$  ]&  "  "0")$  V&  "  x""$  bX&  B$  3$  (  	"  ""  ""  ""  ""  "$  D&  
4)5"  4+544 55 """"""4L,5	"l"" $  &  
 $ | & o
" D 			$ 2		
4^_5$  4^5"  $  	"  $  "v" $ 4#5$ ( " x" " "  I$  4L5"445 504L
56$  &  
$   &  
V&  y	"  f(  (40
455 "$  -$  4`4M55"  $  	"""""""""$  &  
$   &  
X&  	$  $  4`4M55"  $  j$  _(  T$  4`4M55"  $  040
4 55 """""	""""""$  VH&  I
$  34a540
455 "4"""45"w""$  "%"""b&  "!&  ""d"`"\"X"T $   &   
 $   &  
&   			(  &  )6 C4	5
"  04W5
6$  "  *$  "  $  "  
$  <4cd
5$  +44

 55 """~"_"["W"S"O $ L & ? 
 $ ( & 
e&  			$  		
$  (  $  "&  
	$  &  
	&  p		&  X	(  G			&  )4f40
55 ""0","("$" """""""" """ $   g&   
  	 		hO 
L
Q 
4L*5"  '
4i4L54L	556$  FH&  9
$   "	 """"$"  $  -  &   $  )6*$  +6 C"" $  5 j&  ( 
  	k4L56"" $  5 l&  ( 
  	m4L56"`"\ $  G n&  : 
  	 		 	
o	4L
56"
" $   p&   C"" $   p&  x 
  	4F5$  V 			&  D4qrO s5
4t
5$  %4u
54uv5&  W6 C C"_"["W"S $   w&   C"8"4 $  d w&  W 
 4F5$  =4/M5$   C4x L54y5$   "SC""" $  @ z&  3 
  	{4L54L56"v"r $  , |&   
 }4L56";"7 $  L ~&  ? 
  	 		45454L	56"" $  &  
  	 		4L54L54L	5
4`4M
55$  b4`4M55$  
64O54.Q M5N4  4
45564`4M55$  F4O54.Q M5N4 
 445564O54O54.Q M5N4.Q M5N4 
 4454556"D"@ $ & &  
  	4L5	$  &  

			&  				&  a45
5$  "  $  455"  
4L
	5$  4L5"  "  "  
"  "  

$  
Cf	4L56"" $   &   
  	 	 		HHHHH
O LQ 4L5K
4LJ
5K4J
J5K4LJ5K4L	J5K4IJ5$  JCLJJO 6"Q"M $   &   
  	 	 		 	
HHHHHO LQ 4L5K4LJ5K4JJ	5K4LJ5K4L
J5K"  LJJO 64IJ5$  4cL		5$  JC"""p"l $ R 2& E 
  	 	 		O 
Q 
4L54L54LO 4
554L54L	54I5$  )44 55 "I"  LO 645$  l4K455$  V454544445545 55 "پ"u"q"" $  2& s 
 4^5$  4^5"  		$  		"  $  "ٵ" $ 4#5
$ 
( 
 	4^5$  4^5"  $  	"  $  "O" |$ N4#5$ :( / 	4^5$  4^5"  $  	"  $  "" $ 4#5$ ( $ }& p
$ Z & M
 V & 6	! 	""$ "& "
#"$$$ $ & $
$%" "	&&$ &&('4^5)($  4^(5"  **$  	*)"  $  "" \,)$ .4#-5.+$ +( +//$  /%&  /
/00&  /	11&  4/1M522$  2"  414M55222Q&  	2	"  	4<252$  s445!5524LO 253444254354!540#'4.423555544 "s""""ּ"ָ"ִ"ְ+$  +.+,.--,+""֋(*-,+""xb%&  "3!%&  "'"\"X"T"P"L"H"D"@"<"8"4"0$  "*""""$  """u"ռ"ո
$  


""Փ	
""Հ"| $   &   
  	 		4/5

$  
"  	45


&  

"  	4<
5Q&  		"  	4<5
$  .4L	545$  C4)5 64L
>  "  G  
&  
"  	4<
54L	56"u"q $  %&  
  	" &  )6&  			"  	4<5$  "1&  L 6&  
"  	4<5		Q&  			"  	4<	5	$  L 6&  		"  	4<5$ 47&  		"  	4<55$  1&  		"  	4<5		 "4&  "  LL5		$ p4`4M	55$ .4I	5

$  "  4	5$  "  4y	5
$  F&  "  $  -&  		"  4<>  "  G  "   	C&  
"  	4<5

Q&  	
	"  	4<
5
$  	C,&  1"  
L 	64:	5$  4L	L5$  	C"""  
L 	64L	L5$  4:	5$  "	C"&  	"  4<>  "  G  L 	6L 6L 64/5$  "  	45"5"y"u $   &  *$  +6 C"K"G $   H&  $  )6 C""   ?      g  exp
	/5 g  env	/5 g  counter		/5 g  ctx		/5 g  find-definition		/5 g  	for-value		/5 g  w	  g  w	  g  w	  g  w		  g  make-prompt-tag?	
  g  tag	 g  body	 g  vals	  g  vals	O g  w	 g  w	 g  w	 g  w		 g  w	 g  w	 g  exps	 g  effects		 g  w	
/f g  w	
l g  x	l g  head	} g  w	C g  w	C g  w		C g  w		C g  w	
C g  w	C g  w	%C g  w	,C g  w	3C g  vars	>C g  new	GC g  env	]C g  new-sym	gC g  body	yC g  w	 g  w	 g  w	 g  w	 g  x	 g  w	 g  ls	" g  p-ls	" g  sym	/X g  w	b g  w	 g  t	C g  w	  g  x	  g  ls	( g  p-ls	( g  p-ls	( g  p-ls	( g  old	Cm g  name	Cm g  kw	Cm g  w	w g  w	 g  x	 g  w	 g  x	 g  w	 g  w	_ g  w	e g  w	l g  new		 g  x	
 g  w	 g  w	 g  w	 g  proc		 g  w	
i5 g  t	z g  v	 g  w	 g  w	 g  w	 g  w	 g  w	 g  exp	 g  w	
\ g  w	w g  w	~ g  w	 g  w	 g  w	 g  w	 g  w	 g  w	 g  nargs	 g  nreq	 g  nopt	 g  x	 g  key	 g  inlined-application		 g  t		-	P g  t			 g  found		
7 g  counter		
$ g  tag	
S g  new-counter	
^
 g  result	
^
 g  abort	
q
 g  t	

 g  _	 g  results	 g  w	
?} g  args	Uy g  t	dy g  w	
 g  v	  g  x	 g  t	 g  w	!P g  x	!P g  w	60 g  x	60 g  w	K( g  w	f  g  exp	 g  member	 g  exp	! g  t	( g  refcount	1M g  lp	l g  exp	 g  member	 g  exp	 g  w	a g  x	a g  w	~ g  w	 g  w	 g  x	 g  exp	 g  w	v g  x	v g  w	j g  w	'b g  w	-b g  w	9^ g  exp	H^ g  w	T g  x	T g  w	H g  w	@ g  w	@ g  w	8 g  w	4 g  w	0 g  x	0 g  exp	0 g  w	e( g  x	e( g  w	 g  w	 g  w	 g  w	 g  w	 g  w	 g  x	 g  exp	 g  w	9 g  x	9 g  w	V g  w	l g  w	r g  w	 g  w	 g  w	 g  x	 g  w	 g  exp	 g  w	# g  x	# g  w	@ g  w	V g  w	\ g  w	w g  w	 g  w	 g  x	 g  w	 g  exp	 g  w	
% g  v	B g  w	Q g  x	Q g  w	jx g  x	jx g  x	u g  w	p g  failure	. g  w	& g  w	& g  failure	& g  w	 g  w	 g  w	Bh g  w	Hh g  x	z g  x	 g  v	9 g  w	E g  x	E g  w	0 g  w	# g  w	[q g  w	 g  w	 g  w	. g  x	. g  x	 g  res	V g  exp	k g  w	S g  w	S g  w	K g  w		/ g  w	
+ g  x	+ g  tail-len	
+ g  len	+ g  ls	= g  n	= g  p-ls	= g  args	M g  w	` g  tail*	f g  speculative?	f g  args	 g  w	~ g  w	v g  w	r g  ls	j g  exp	2 g  w	<f g  w	u g  w	m g  w	i g  w	e g  x	e g  w	Y g  exp	?U g  w	 g  args*	 g  exp	 g  w	 g  w	oT g  w	uT g  w	L g  w		H g  vals	
H g  exp	*@ g  w	p g  w	v g  w	 g  w		 g  w	
 g  x	 g  w	 g  w	 g  w	 g  w	 g  w	({ g  w	Aw g  exp	]s g  w	{ g  w	{ g  w	{ g  w		{ g  simplify-conditional	
{ g  v	{ g  w	Cs g  w	 g  w	 g  w	 g  w	3 g  w	3 g  w	3 g  w	O g  w	U g  w	\ g  w		c g  w	
j g  w	0 g  w	0 g  w	0 g  w		, g  module	
( g  var		% g  w	l g  exp	 g  w	  g  w	  g  w	  g  w	 ! < g  w	 ' < g  w	 X  g  w	 ^  g  w	 e  g  w		 l  g  w	 "+ g  w	 "+ g  w	 "+ g  w		 "+ g  pre	
 "+ g  body	 "+ g  post	 "+ g  post-sym	!%!d g  pre-sym	!{! g  pre-sym	!"+ g  post-sym	!"+ g  w	"G#\ g  w	"M#\ g  w	"T#\ g  producer		"c#\ g  w	
"~#2 g  w	"#/ g  w	"#, g  w	"#) g  w	"#! g  nmin	"# g  nmax	"# g  t	"# g  t	
#<#\ g  w	#x$ g  w	#$ g  w	#$ g  w		#$ g  vars	
#$ g  new	#$ g  ops	#$ g  env*	#$ g  body*	#$ g  visit	#$ g  w	$2$ g  w	$8$ g  w	$E$ g  w		$L$ g  w	
$S$ g  vars	$Z$ g  new	$Z$ g  ops	$Z$ g  env*	$Z$ g  body*	$Z$ g  visit	$m$ g  w	%&P g  w	%&P g  w	%"&P g  w		%)&P g  lookup-alias	
%3&P g  vars	%A&P g  new	%J&P g  ops	%i&P g  env	%x&P g  body	%&P g  exp	%% g  sym	&&H g  pairs	&&H g  exp	&2&H g  w	&l* g  w	&r* g  tail-len	&{* g  len		&* g  ls	
&* g  n	&* g  p-ls	&* g  names	&* g  w	&* g  w	&* g  tail-len	&* g  len	&* g  ls	'* g  n	'* g  p-ls	'* g  gensyms	'$*k g  w	'7*c g  w	'>*c g  tail-len	'G*c g  len	'\*c g  ls	'z*T g  n	'z*T g  p-ls	'z*T g  vals	'*/ g  w	'*' g  w	'* g  w	 '* g  w	!'* g  w	"'* g  w	#'* g  w	$(* g  w	%( * g  w	&(+) g  w	'(:) g  x	((:) g  tail-len	)(E) g  len	*(Z) g  ls	+(x) g  n	,(x) g  p-ls	-(x) g  args	.() g  w	/() g  w	0() g  w	1() g  v	2(( g  s	2() g  tmps	2).) g  tmp-syms	3)>) g  exp	4)}) g  w	.)) g  w	*9*P g  w	*u* g  w	** g  w	*+ g  w	*+ g  w	++ g  w		++ g  t	
++1 g  op	
+1+ g  s	+M+m g  exp	++ g  w	,	. g  op	,. g  t	,7. g  s		,o, g  val		,- g  t		-,. g  t	
-K-y g  t	-_-v g  s	
-- g  t	.. g  filenamef  language/tree-il/peval.scm
		5		6		O	 		*		*			#		C!	R			8				*	:	'		*	:			!		7	K	P	S	b	d	f	i		q	{	*}	}										
							%		6	>	A	G	J	S	]	]	m	y				6	:	;	E	[				L	*U	<_	*`	p		/	0	C	
G	w	|						&		*														-	7	*9	:	D	D		r	z					*									(	**	+	"5	=		$	$	%	$	&	&	!$					$		-u		-u		@u	#	Lu	<	Mu	3	Tt		Y		c	*	e		fx	"	pw		qy		ty		y		y		z		t									!								
	"
$	
$	
8	
N	
P	
	
	
	
	
	
	
	
	
	
	
				M	U	X	d	y	}								x	y		.	&							"		*	2	*	%			 	0		(		!	"	&	%(	(	+	21	4	<	-D	!H	J	N	T	"W	\	&a	/l							"		%	-	%				9	1				7	/	 					@	H	^	b			 
	%	<	%	 			0	4			,	9	,						,						,						9	 B					*	A	*	&		1	.	M	2Q	V	*[	A]	*b	&d	h	z									=	A	&E	F	P	V	Y	^	-g	?i	-k	k							1			f	j		x	y		*				$	9				*		$					1		2	5		D	E]	H]	P]	U	Y			]	]	]					]	]	]	!	%		&	/	.:	;<	.=	(?	?	U	Y						3																		%	<	%				#							, 	4#	E&	?(	,*	*	@	L	K	P	&W	EY	&]	]	s	w			*	|			(	*	
*|	K~	
_		7	8	7	9				*	5		%	/	*1	33	7	w		*	1		&	&	(	 (		)		)	*	*	"+	,	z										*	 	* 	 	 		 .	 8	* :	 <	 @	 s	 |	/ 	 	 	 	 	* 	 	* 	 	 ]	 ]	 ]	!		!]	!]	!]	!		!	!	!#	#!%	!%	!(	!0	$!7	!!;	!=	!C	!H	#!M	3!N	!W	%!\	:!`	%!b	!d	!e]	!h]	!p]	!t	!u	!y	$!{	!{	!~	!	&!	!!	!	!	!	$!	3!	!	'!	<!	'!	!	!	!	$!	!	7!	?!	7!	!	!	&!	!!	!	!	!	&!	!!	!	!	"	)"	A"	"	'"	<"	'"	'"#	<"'	'")	"+	"/	"W	"a	*"c	"c	"h	"	"	"	"	5"	="	-"	"	"	"	#<		#N	#\	#`	#	#	#	#	#	#	#	#		$	$	$Z	$u	$	$	$	$	$	$		$	$		$	!$	$	%9	%A	%D	%J	%M	%_	(%i	%i	%l	%x	%{	%	%	%		%	%	(%	5%	(%	%	%	%	%		%	%		%	%	%	%	%	%	&	&		&	&	&	 &"	&#	&.	&0	&2	&2	&H	&T	(	(	(	(	(	(	(	-(	(	)~	 ) }	)!	)$	),	2).	).	)1	)>	)A	
)F	)O	)X	)a	)h	)m	)y	){	)}	
)}		)	)	+	+	+&	+*	+.	+1j	+6k	"+Mk	+nk	+sk		+t	+~	*+	+l	+m	+m	+o	0+o	&+o	+q	+r	*+	+	*+	+r	+	,	,	,		,	,	,7		,K	,O		,U	,X	,o	,		,	, 	,		,$	,$	,$	,		,'	,'	-	-*	-*	2-*	%- *	;-,*	-,		-5]	-8]	-@]	-D0	-E9	-K9	-Y:	-_9	-m;	-}0	-B	 -B	-B	-B	1-B	(-B	-E	-G	"-G	-G	.0	.
M	.0	.W	.P	.P	.'P	.(Q	.4P	.Mc	.M\	.N\	.Z\	.[]	.g\	.u7	.8	.h	.#	.	.	.	.	.	.	.	.	.		/
	/	/%	/*	/1	=	/5	  g  nameg  loop C    h    - /   0   3 #  45 #  #  	(#  	#  	
#  #  	dH
H	HO O O 	
O 	Q 	Q Q 
Q  $  Q &   
 45"  ( &   
 45"  "  K4 5K	4	O 5K
O 
	Q  6         g  exp
	} g  cenv	} g  env		} g  operator-size-limit		} g  operand-size-limit		} g  value-size-limit		} g  effort-limit		} g  recursive-effort-limit		} g  local-toplevel-env		`} g  store			`} g  compute-effects	
	`} g  
lookup-var	 } g  fresh-gensyms	 } g  record-operand-use	 } g  unrecord-operand-uses	 } g  residualize-lexical	 } g  fold-constants	 } g  inline-values	 } g  constant-expression?	 } g  prune-bindings	 } g  small-expression?	 } g  
extend-env	 } g  w	   g  w	  g  loop	E}  g  filenamef  language/tree-il/peval.scm
t
	t	% 	 	 	 		V	E	{	}	 	}	g  operator-size-limitS	g  operand-size-limitS	g  value-size-limitS	g  effort-limitS	g  recursive-effort-limitS	   g  nameg  pevalg  documentationf  }Partially evaluate EXP in compilation environment CENV, with
top-level bindings from ENV and return the resulting expression. CRC          g  m
		, g  rtd
$N g  rtd
BC g  rtd
|}#  g  filenamef  language/tree-il/peval.scm		
G	E
	L

	W
	^
&	m
	y
>[ 
?{ 
k 
l; 
mi 
n 
r 
s 
ue 
w
y

      ((
      2
      б;
      i>
      I
      ܬj
     Ēt
 	     Ĕ
   C6                                                                                                                                                                                                                                                                                                         ccache/language/tree-il/cse.go                                                                      0000644                 00000127367 15154557173 0012234 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0߮      ]  4        h      ] g  guile	 	g  define-module*	 	 	g  language	g  tree-il	g  cse		 	
g  filenameS	f  language/tree-il/cse.scm	g  importsS	 	 	g  
primitives	 	 	g  effects	 	 	g  ice-9	g  vlist	 	 	g  match	 	 	g  srfi	g  srfi-1	 	 	 g  srfi-9	!  	"! 	#g  srfi-11	$# 	%$ 	&g  srfi-26	'& 	(' 	)"%( 		*g  exportsS	+ 	,g  set-current-module	-, 	., 	/g  make-syntax-transformer	0/ 	1/ 	2g  	*logging*	3g  macro	4g  identifier?	54 	64 	7g  syntax-object	8g  top	98 	:g  ribcage	;g  id	<; 	=g  m-9d6145bdb05-25f0	>=8 	?> 	@f  l-9d6145bdb05-25f7	A@ 	B:<?A 	C: 	Dg  x	ED 	Ff  l-9d6145bdb05-25f2	GF 	H:E?G 	I9BCH 	Jg  hygiene	KJ 	L7IK 	Mg  $sc-dispatch	NM 	OM 	Pg  _	Qg  each-any	RPQ	Sf  l-9d6145bdb05-25fa	TS 	U:E?T 	V9UCH 	W7VK 	Xg  syntax-violation	YX 	ZX 	[f  -source expression failed to match any pattern	\g  log	]g  any	^g  free-id	_g  quote	`g  m-9d6145bdb05-25fd	a`8 	ba 	cf  l-9d6145bdb05-25ff	dc 	e:Ebd 	f9Ce 	g7_fK 	h^g 	ih] 	jiQ	k]j	lg  if	mg  dummy	ng  event	og  arg	pmno 	qa99 	rf  l-9d6145bdb05-2602	sf  l-9d6145bdb05-2603	tf  l-9d6145bdb05-2604	urst 	v:pqu 	w9vCe 	x7lwK 	yg  and	z7ywK 	{72wK 	|g  or	}7|wK 	~g  eq?	7~wK  7wK  {  g  memq 7wK  7_wK  {  g  log* 7wK  g  
module-ref g  resolve-interface g  pretty-print   g  newline g  
vlist-null g  tree-il-fold g  <lexical-set> g  vhash-consq g  build-assigned-var-table g  negate-primitive g  not g  symbol->string g  
string-ref g  string-length g  boolean-valued-primitive? g  test g  <const> g  boolean? g  <application> g  <primitive-ref> g  boolean-valued-expression? g  value g  <lambda> g  values g  <lexical-ref> g  <void> g  <module-ref> g  <toplevel-ref> g  singly-valued-primitive? g  singly-valued-expression? g  make-application g  make-primitive-ref g  
make-const g  <conditional> g  make-conditional g  vector-length     g  	tree-il=? g  vlist-length g  tree-il-hash g  vhash-assoc g  	vlist-ref g  error     f  no matching pattern g  lambda g  effect-free? g  exclude-effects g  tree-il-src g  lexical-ref? g  
vhash-cons g  make-lexical-ref g  
vhash-assq g  make-effects-analyzer g  vhash-fold-right g  reverse g  	constant? g  effect g  lambda-case? g  void? g  	make-void g  
<sequence> g  make-sequence g  	sequence? g  append g  sequence-exps g  <prompt> g  make-prompt g  <abort> g  
make-abort g  <lambda-case> g  make-lambda-case g  hashq g  most-positive-fixnum g  make-lambda g  equal? g  <toplevel-set> g  make-toplevel-set g  <toplevel-define> g  make-toplevel-define g  <module-set> g  make-module-set g  <dynset> g  make-dynset g  <dynref> g  make-dynref g  <dynlet> g  make-dynlet g  	<dynwind> g  make-dynwind g  <let-values> g  make-let-values g  <fix> g  make-fix g  <letrec> g  make-letrec g  <let> g  make-let g  make-lexical-setC 5      hp     ]4	
)*+5 4. >  "  G   41236      h   ]   ] 6U       g  id
		  g  filenamef  language/tree-il/cse.scm		n	 		   CL     h   *   ]C   "       g  id
		  		   CORW    h   )   ] C!       g  x
		  		   CZ[        h@      ]  4?$  @4 5$  @ 6             g  x
		: g  tmp		: g  tmp		#	:  g  filenamef  language/tree-il/cse.scm
	n	 		:  g  
macro-typeg  identifier-syntax C52R41\3Okxz{} 
h0   Q   ]   	  CI       g  dummy
		0 g  event		0 g  arg			0  		0	   CZ[        h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  language/tree-il/cse.scm
	r	 		"  g  
macro-typeg  syntax-rulesg  patternsg  quoteg  event g  argg  ...   C5\R\    hH      - 1 3 44554 >  "  G  4>   "  G  D             g  event
			C g  args			C g  pp			C  g  filenamef  language/tree-il/cse.scm
	x
	
	y			y			y	+		y			z			y			y			{			{		)	{		2	|		C	}	 			C
  g  nameg  log* CR    h   o   ]C   g       g  exp
		 g  res		  g  filenamef  language/tree-il/cse.scm
 	 			   C h8      ]
 $  , &    
  	 	6CC       g  exp
		8 g  res		8 g  w		!	2  g  filenamef  language/tree-il/cse.scm
 		 		2 	 		8	   C      h   o   ]C   g       g  exp
		 g  res		  g  filenamef  language/tree-il/cse.scm
 	 			   C      h(      - . , 3 #   6           g  exp
		$ g  table		$  g  filenamef  language/tree-il/cse.scm
 
	$ 	 		$  g  nameg  build-assigned-var-table CR h@     ]	4 5$  C &  C4 54455?C            g  	primitive
		: g  t			: g  chars	%	:  g  filenamef  language/tree-il/cse.scm
 
	 			 		 		 		 		 		% 		( 		- 	$	4 	 	6 		9 	 		:  g  nameg  boolean-valued-primitive? CR        h     ]"  @"  C $  + &   
 45$  CC"" $  L &  ? 
 $  )&  
45$  C"y"u"q"m"i          g  x
	  g  ctx	  g  w		)	> g  w		_  g  w		z   g  filenamef  language/tree-il/cse.scm
 
	 		 		 		 		< 		= 		F 	 		 	  g  nameg  boolean-valued-expression? CR  h   V   ] L CN       g  filenamef  language/tree-il/cse.scm	 		 	 		
   C   hp  I  ]2"  O Q  $   &   
 "   &  C6 $  m&  `
&  : 	"   &  C6 $  (  C"" &  C6 "}"y &  C6 6  $   &  C &  C &  C &  C 	&  C 
&  C &  ? 
 $  )&  
45$  C"""""       A      g  x
	i g  ctx	i g  failure		  g  w		,  g  failure		0  g  w		^  g  w		m  g  failure		q  g  failure	   g  w	+a g  w	FY  g  filenamef  language/tree-il/cse.scm
 
	 	 	i	  g  nameg  singly-valued-expression? CR        h   q   ] 45L  6    i       g  filenamef  language/tree-il/cse.scm	 		 	3	 		 	9	 	 		
   C    h    ]2"  O  Q  $  y &  l 
 $  Q&  D
45$   	4455645  66 6 6 6  $   &   
 	6 
&   
	6 &  4 
  	 	4L 54L 56 &  p 
 $  Z&  M
&  6 	$  $(  45$  C""""""~"z"vx      g  exp
	 g  ctx	 g  failure		  g  w		'  g  w		-  g  failure		1  g  w		L  g  w		^	u g  w	   g  w	   g  w	   g  w	  g  w	  g  w	  g  w	  g  w	! g  w	< g  w	K| g  w	^t  g  filenamef  language/tree-il/cse.scm
 		 		e 		i 	0	q 		u 		y 		~ 	3  	  	9  	  	  	  	  	  	  	  	" 	: 	 	a 	m 	 		  g  nameg  negate C       h   G  ] $   "  $  w4 $   "  5	$  V $   "  
 $   "   $   "  	4L 5$  L$  LCCCCC ?      g  v1
	  g  v2	  g  len		*  g  w		F  g  w		l   g  filenamef  language/tree-il/cse.scm
 		 			 		 		  		8 		< 		K 		O 		] 		a 		o 		{ 		  	  	  	 	 	  g  nameg  entry-matches? C h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C        h    ]dO  Q 454 54O 5$ n" c$ X45" $  
		$  4	5	$  	
			
$  &$  	"  $  4 5"  "  $  C     UU     
$  "  &     UU     
$  	"C4	
56 4	
56 4	
56 $  <		&  '     UU     UU
$  	"C""C
"C             g  exp
	 g  effects	 g  ctx		 g  db		 g  entry-matches?		 g  len		  g  h		  g  n		= g  v		O g  w			bJ g  x	
	bJ g  len		t= g  w	 0 g  w	 0 g  w	 0 g  t	 0 g  effects	   g  effects	  g  w		a  g  filenamef  language/tree-il/cse.scm
 		 		 		  		% 		9 		= 		B 		F 		G 	  	  	  	  	,  	"  	  	  	  	% 	( 	". 	1 	{ 	 	 	 	 	 	 		  g  nameg  find-dominating-expression C     h@  q  ];44      55$ "  C4L 5$  4 564L4L 55$  4 56C $   &  $ 
 45$   C6 &   
 $  {	&  n

&  W 	$  E(  :4L 5$  &  
		6CC"""""""C     i      g  exp
	; g  effects	; g  db		; g  w		v  g  w		|  g  w	 1 g  w	 1 g  w	 ) g  w	 % g  w	  g  v	  g  w		  g  filenamef  language/tree-il/cse.scm
																 	
	(	2	,	
	0		3		<	
	=	
	@	&	F	2	H	&	L	A	P	
	T		W		`	
	b				 		 	! 	 	 	 			!	 #	;	  g  nameg  find-dominating-test C    h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h     ]-(   C4M5$  "  45$   "  345 45	4	 	O 5	 "t        g  env
	  g  names	  g  syms		  g  exps		  g  db		  g  name		  g  sym		  g  exp		  g  t		!	8 g  v		R	u g  h			[	r  g  filenamef  language/tree-il/cse.scm
'		(		*		*	&	*	7	*		+		!+		/,		<+		I#	#	R#		R#		U$		[#		^%		x/		{/	#	~/	. +	
 	 	  g  nameg  augment-env C    h   #  ] $   "  $  t4 $   "  5	$  S $   "  
 $   "   $   "  	 $   "  	L 6CC          g  v1
	  g  v2	  g  len		*  g  w		F   g  filenamef  language/tree-il/cse.scm
2		3			3		3		 3		83		<3		K3		O3		]3		a3		p3		t3	 5		 	 	  g  nameg  entry-matches? C     h@    ]+
$  C4 5"  $  $  45	$  }
	     UUL     
$  "  &L     UU     
$    ">C456 456 456 $  E&  0L     UU     UU
$    "C""         g  db
	= g  base	= g  n		= g  t		= g  v		= g  w		*  g  len		>  g  w		R  g  effects		f	 g  effects	   g  w	 9  g  filenamef  language/tree-il/cse.scm
8		9	
	9		:	
	f@	 @	 A	 A	' A	 :	
=	!=	&>	)>	'3>	9:	
 	=	  g  nameg  unroll Ch   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C    hX    ]O O  Q Q 4 544       55$ 4 O 5$  4545"  	$  4		5$  $  4
5	$  v
		
4
5$  A"  	
	"{$   4 5$  4 56""C456 456 456 C


	"CC      g  exp
	X g  effects	X g  env		X g  db		X g  entry-matches?		X g  unroll		X g  h		&X g  env-len		eT g  db-len		eT g  n			mJ g  m	
	mJ g  v		H g  w	 ; g  x	 ; g  len	 . g  w	 ! g  w	 ! g  w	 ! g  w	 ! g  niter	 !  g  filenamef  language/tree-il/cse.scm
1		 C		&C		)D		,D		=D		AD		BE		WD		XF		_G		eF		mH		rI		vI		wJ	 L	' L	$ L	 M	 M	 P	& P	- P	" N	 N	' N	 N	0N	"O	4O	""J	JH	 "	X	  g  nameg  find-dominating-lexical C       h   g   ] L 6      _       g  sym
		
  g  filenamef  language/tree-il/cse.scm
 		
 	 		
   C     h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C     hP     ] $  64L  LLL>  G  45 "45D            g  in
		J g  out		J g  db*			J g  x			? g  db**			?  g  filenamef  language/tree-il/cse.scm
p		q			q		
r	)	r	0	r	)	r		%t		*t		+f		?t		@u		Ju	 		J	  g  nameg  lp C        h(      ]O L Q  6           g  exps
		$ g  db		$ g  env			$ g  ctx			$ g  lp			$  g  filenamef  language/tree-il/cse.scm
o		p		 p		$p	 		$	  g  nameg  parallel-visit C        h   9  ]94L 5"  $  4L 5$  h$  K45	$  ,
		 &  C"456 456 456 C
"g1      g  sym
	  g  env-len		  g  n		  g  v		!  g  w		-  g  len		A  g  w		P	x g  w		\	x  g  filenamef  language/tree-il/cse.scm
x		S			S		T		U		U		V		lX		rZ		xZ		yV	 T	 	    C    h(      ]	4M  LO 5      
C         g  exp
		& g  x		&  g  filenamef  language/tree-il/cse.scm
z		x		{	 		&  g  nameg  bailout? C    h   9  ]94L 5"  $  4L 5$  h$  K45	$  ,
		 &  C"456 456 456 C
"g1      g  sym
	  g  env-len		  g  n		  g  v		!  g  w		-  g  len		A  g  w		P	x g  w		\	x  g  filenamef  language/tree-il/cse.scm
x		S			S		T		U		U		V		lX		rZ		xZ		yV	 T	 	    C     h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C    hp    ]*4M  LO 5"  4 L5$  4L L5"  $  D4 L5$  4L LL5"  $  D"  0  L 4 54O 5D45$   L&  "  L	$   D""L
&  4 5$  "  `44 55$  "  A45$  "  *44      55$  4L L5"  $  4 5$   D45D""      g  exp
	p g  db*	p g  effects		p g  t		3  g  t		`  g  v	   g  h	   g  t	 I g  t	F  	g  filenamef  language/tree-il/cse.scm
}		x		~				#	
	$		3		A		B		N	
	O		`		n		} 		~ 	  	  	 	
 	 	 	 	# 	
 	
 	 	 	 	 	
 	 	 	% 	 	 	 	 	 		 	
* 	, 	
. 		2 	3 		M	
N	X	
^	_	h	 3	p	  g  nameg  return C   h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C     h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C     h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C   h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C h  O  ]# $   (  ] 4L4L5LL>  G (  L 456L 4L455456  4L4L5L>  G 4	5$  4
455 "C45$   "(45 "4 56      G      g  in
	 g  out	 g  db*		 g  w			m g  last		/	m g  db**		/	m g  w		s  g  x		s  g  head	   g  db**	    
g  filenamef  language/tree-il/cse.scm
(		)			+	'	f		.+	'	2+		<,		Af		M-		P.		U.	-	\.	6	^.	-	`.		af		m.		p)			x1	'	}f	 1	G 1	' 1	 3	 2	 4	 4	 4	 4	 5	 2	 6	 8	 f	 8	 )		 $		  g  nameg  lp C    h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C   h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C       h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C     h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C    h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C     h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C   h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C     h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C   h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C     h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h0      ]4 L O 5$   O 6C           g  k
		, g  h		, g  out			,  g  filenamef  language/tree-il/cse.scm
^		_		_		)`	 		,	   C    h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C     h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C     h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C   h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C     h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h0      ]4 L O 5$   O 6C           g  k
		, g  h		, g  out			,  g  filenamef  language/tree-il/cse.scm
^		_		_		)`	 		,	   C    h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C   h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C     h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C       h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C     h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C       h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C       h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C     h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C   h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C     h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C   h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C   h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C     h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C   h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C   h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C   h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C   h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C   h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C   h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C   h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C   h   w   ]L Co       g  x
		 g  size		  g  filenamef  language/tree-il/cse.scm
 		 	 			   C      h      ] O 6     ~       g  k
		 g  h		 g  tail			  g  filenamef  language/tree-il/cse.scm
f		g	 			   C c      h  r  ]O O O LQ LQ LLLL Q " " [" '" " %" {" " e" " 
" 
" 
'" 
" 	" 	u" 	" " " b" " a"  $ q &  4 
 O 	L	Q 		6 &   
  		 	
4L>  G 4L	4	
5>  G 4L
4	5>  G 456 &   
  		 	
4L>  G 4	>  G 4L
>  G 454	54	564 56 4 56  $   &   
  		 	
 	 	 	 	 	4>  G 4L>  G $  4L>  "  	"  G 4	
5	$  "  6"" $  y &  l 
  			$  24L	45
4

O 5
>  "  	"  G 
4
56"" $  j &  ] 
  		4L>  G 
4	>  G 4
54	 56"" $ 0 !& # 
  		 	
4L">  G 4L4L"5">  G 4L	4	#5>  G 4L
4	$5>  G 4%5" " c" " " " "  "  64	&54	'54	(O 56$  v!&  i
	45$  	4	)564	*54	+54	,O 56"M"I$  D!&  7
		45$  4	-56"""$  q!&  d
	$  H.&  ;
&  %	"&  4	/5"  6"""~"z"v$  q!&  d
		$  B.&  5
&  "&  4	05"  6"""""$  !&  
	$  s.&  f
&  P	$  >.&  1
&  4L5 ""g"c"_"["W"S"O"K$  !&  
415$  r	$  `.&  S
&  =	$  +.&  
&  6"""""""""$  !&  
	$  t.&  g
	$  J.&  =
$  %42435 5 "m""	"""""$  c!&  V
$  @.&  3
$  4	4564	556"""""g"c $   6&   6"C"? $  I 7&  < 
  		4L	>  G 
48
56"" $  I 9&  < 
  		4L	>  G 
4:
56"" $  [ ;&  N 
  		 	
 	4L>  G 4<	
56")"% $   =&   6"" $   >&   6"" $  j ?&  ] 
  		4L>  G 
4L	>  G 4@
54	A56"h"d $  @ B&  3 
 4L>  G 
	4C	5
6"" $   D&   
  		 	
4>  G 4	>  G 4L
4	E54	F5>  G 4G54	H54	I56"V"R $   J&   
  		 	
4L>  G 4L	4	K5>  G 4L
>  G 4L54	M54	N56"" $  s O&  f 
  		4L>  G 
4L	4	P5>  G 4Q
54	R56"!" $   S&  x 
  		 	
 	4
>  G 4L4	T5>  G 4U	54	V56"" $   W&   
  		 	
 	 	4>  G 4L4	X54L	
5>  G 4Y	
54	Z56"" $   [&   
  		 	
 	4
>  G 4L4	\54L	5>  G 4]	54	^56"B"> $  R _&  E 
  		 	
4L
>  G 4`	56"" $  % a&   
  	 6"" $   b&   6"" $   .&   6"e"a       j      g  exp
	 g  db	 g  env		 g  ctx		 g  parallel-visit		! g  bailout?		! g  return		! g  w	   g  w	   g  lp		   g  w	 j g  w	 j g  w		 j g  w	
 j g  tag	j g  db*	j g  body	/j g  _	/j g  handler	Pj g  _	Pj g  w	w g  w	} g  w		 g  w	
 g  tag	 g  db*	 g  args	 g  db**	 g  tail	 g  db***	 g  db2	 g  w	/ g  w	5 g  w		< g  w	
C g  w	J g  w	Q g  w	X g  w	_ g  w	f g  inits	y g  _	y g  body	 g  db*	 g  alt	 g  _	 g  w	o g  w	o g  w		o g  h	
*A g  body	
Wo g  _	Wo g  w	 g  w	 g  w		 g  proc	
 g  db*	 g  args	 g  db**	 g  w	 	 g  w		 g  w			 g  w	
	 g  test	'	 g  db+	'	 g  converse	F	 g  db-	F	 g  
consequent	g	 g  db++	g	 g  	alternate		 g  db--		 g  v		 g  db+	 g  db-	 g  w	m g  db+	Qk g  db-	Qk g  w	 g  w	8 g  w	0 g  w	e g  w	 g  w	[ g  w	S g  w	O g  w	G g  w	| g  w	 g  w	 g  w	 g  w	 g  w	( g  w	C g  w	J g  w	e g  w		 g  w		 g  w		[	 g  w		a	 g  w			h	 g  exp	
	{	 g  db*		{	 g  w			 g  w			 g  w				 g  exp	
		 g  db*			 g  w	

M g  w	
	
M g  w		

M g  w	


M g  w	

M g  exp	
1
M g  db*	
1
M g  w	
 g  w	
 g  w		
 g  fluid	

 g  db*	
 g  exp	
 g  db**	
 g  w	M g  w	$M g  fluid		7M g  db*	
7M g  w	i g  w	o g  w		v g  w	
} g  fluids	 g  db*	 g  vals	 g  db**	 g  db2	 g  body	 g  db***	 g  db2	
 g  w	( g  w	. g  w		5 g  w	
< g  pre	O g  db*	O g  body	p g  db**	p g  post	 g  db***	 g  db2	 g  w	9 g  w	9 g  w		9 g  producer	
9 g  db*	9 g  consumer	9 g  db**	9 g  w	U g  w	[ g  w		b g  w	
i g  w	p g  vals	 g  db*	 g  body	 g  db**	 g  w	o g  w	o g  w		o g  w	
o g  w	 o g  w	o g  vals	o g  db*	o g  body	Ho g  db**	Ho g  w	 g  w	 g  w		 g  w	
 g  w	 g  vals	 g  db*	 g  body	 g  db**	 g  w	(i g  w	.i g  w		5i g  w	
<i g  exp	Oi g  db*	Oi  g  filenamef  language/tree-il/cse.scm
j		B	 (	 (	 (	 	 :	 :	2:	 :	;	f	);	?.;	2:	7<	"<f	O<	"S:	Z=	j=		m	@	 @	2@	 @	A	"A	>A	"@	B	#B	6B	#@	C	f	D	f	C			i 	 s 	=x 	 | 	!	! 	"	#	"$	" 	%	&	%					#" 	& 	* 	* 	- 	1 	> 	E	.J	#V	#Z	a	o		s		!	4	!		"	>	"		f					!	+&	*	/	2	#8	0:	#@	>E	I	N	Sf	f	j	o	tf					f		]				+f	7	<f	Q	V]	m	u		f						#		f	,		0			#	f				)	C	G					 			l	/p		q	w	0	%					f			f							#		?		C		k	 	u	2	z	 	~										 		2		 									
!	 
+	2
0	 
4	
;	
M		
Q	
m	
q	
	
	
	"
	6
	"
	
	!
	3
	!
	
	
f				'	"1	66	":	A	M		Q		#	A	#		"	>	"		#f		/f		#		f		f				?	 I	5N	 R	W	"\f	o	"s	x	#	:	#		f		f					%	<	%		&f		&	"	-f	9		=	s	!}	=	!		"f		"		f				
	!	=	!	"	"'f	2	)G	"K	R	cf	o		s		!	=	!		"f		)	"		 f				?	 I	2N	 R	Y	i		m							)		  g  nameg  visit C       h     ]AHHO O O Q Q Q 4 5O K4J5K	O Q  

6             g  exp
	  g  assigned-lexical?	  g  %compute-effects		  g  negate		+  g  find-dominating-expression		+  g  find-dominating-test		+  g  augment-env		+  g  find-dominating-lexical		+  g  table		G	S g  visit		l   
g  filenamef  language/tree-il/cse.scm
 
	A 		G 		V 		lj	 m	 j	 	   g  nameg  cseg  documentationf  'Eliminate common subexpressions in EXP. CRC        g  m
		,  g  filenamef  language/tree-il/cse.scm		
=	x
 
	p 
7 
 
      m 
 	      o
   C6                                                                                                                                                                                                                                                                          ccache/language/tree-il/primitives.go                                                               0000644                 00000133444 15154557173 0013646 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]l 4  h      ] g  guile	 	g  define-module*	 	 	g  language	g  tree-il	g  
primitives		 	
g  filenameS	f  language/tree-il/primitives.scm	g  importsS	g  system	g  base	g  pmatch	 	 	g  ice-9	g  match	 	 	g  rnrs	g  bytevectors	 	 	g  syntax	 	 	 	 	g  srfi	 g  srfi-4	!  	"! 	#g  srfi-16	$# 	%$ 	&"% 	'g  exportsS	(g  resolve-primitives!	)g  add-interesting-primitive!	*g  expand-primitives!	+g  effect-free-primitive?	,g   effect+exception-free-primitive?	-g  constructor-primitive?	.g  accessor-primitive?	/g  singly-valued-primitive?	0g  bailout-primitive?	1g  negate-primitive	2()*+,-./01 
	3g  set-current-module	43 	53 	6g  apply	7g  @apply	8g  call-with-values	9g  @call-with-values	:g  call-with-current-continuation	;g  @call-with-current-continuation	<g  call/cc	=g  dynamic-wind	>g  @dynamic-wind	?g  values	@g  eq?	Ag  eqv?	Bg  equal?	Cg  memq	Dg  memv	Eg  =	Fg  <	Gg  >	Hg  <=	Ig  >=	Jg  zero?	Kg  	positive?	Lg  	negative?	Mg  +	Ng  *	Og  -	Pg  /	Qg  1-	Rg  1+	Sg  quotient	Tg  	remainder	Ug  modulo	Vg  ash	Wg  logand	Xg  logior	Yg  logxor	Zg  lognot	[g  not	\g  pair?	]g  null?	^g  list?	_g  symbol?	`g  vector?	ag  string?	bg  struct?	cg  number?	dg  char?	eg  complex?	fg  real?	gg  	rational?	hg  inf?	ig  nan?	jg  integer?	kg  exact?	lg  inexact?	mg  even?	ng  odd?	og  char<?	pg  char<=?	qg  char>=?	rg  char>?	sg  integer->char	tg  char->integer	ug  number->string	vg  string->number	wg  acons	xg  cons	yg  cons*	zg  list	{g  vector	|g  car	}g  cdr	~g  set-car!	g  set-cdr! g  caar g  cadr g  cdar g  cddr g  caaar g  caadr g  cadar g  caddr g  cdaar g  cdadr g  cddar g  cdddr g  caaaar g  caaadr g  caadar g  caaddr g  cadaar g  cadadr g  caddar g  cadddr g  cdaaar g  cdaadr g  cdadar g  cdaddr g  cddaar g  cddadr g  cdddar g  cddddr g  
vector-ref g  vector-set! g  variable-ref g  variable-set! g  variable-bound? g  	fluid-ref g  
fluid-set! g  @prompt g  call-with-prompt g  @abort g  abort-to-prompt g  make-prompt-tag g  throw g  error g  	scm-error g  string-length g  
string-ref g  string-set! g  struct-vtable g  make-struct g  
struct-ref g  struct-set! g  bytevector-u8-ref g  bytevector-u8-set! g  bytevector-s8-ref g  bytevector-s8-set! g  u8vector-ref g  u8vector-set! g  s8vector-ref g  s8vector-set! g  bytevector-u16-ref g  bytevector-u16-set! g  bytevector-u16-native-ref g  bytevector-u16-native-set! g  bytevector-s16-ref g  bytevector-s16-set! g  bytevector-s16-native-ref g  bytevector-s16-native-set! g  u16vector-ref g  u16vector-set! g  s16vector-ref g  s16vector-set! g  bytevector-u32-ref g  bytevector-u32-set! g  bytevector-u32-native-ref g  bytevector-u32-native-set! g  bytevector-s32-ref g  bytevector-s32-set! g  bytevector-s32-native-ref g  bytevector-s32-native-set! g  u32vector-ref g  u32vector-set! g  s32vector-ref g  s32vector-set! g  bytevector-u64-ref g  bytevector-u64-set! g  bytevector-u64-native-ref g  bytevector-u64-native-set! g  bytevector-s64-ref g  bytevector-s64-set! g  bytevector-s64-native-ref g  bytevector-s64-native-set! g  u64vector-ref g  u64vector-set! g  s64vector-ref g  s64vector-set! g  bytevector-ieee-single-ref g  bytevector-ieee-single-set! g  !bytevector-ieee-single-native-ref g  "bytevector-ieee-single-native-set! g  bytevector-ieee-double-ref g  bytevector-ieee-double-set! g  !bytevector-ieee-double-native-ref g  "bytevector-ieee-double-native-set! g  f32vector-ref g  f32vector-set! g  f64vector-ref g  f64vector-set! 6789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~  g  *interesting-primitive-names* g  
hashq-set! g  *interesting-primitive-vars* g  module-variable g  current-module f  unbound interesting primitive g  make-hash-table g  for-each g  make-struct/no-tail wxyz{  g  *primitive-constructors* |}CD  g  *primitive-accessors* g  append     g  *effect-free-primitives* ?@AB[\]^_`bacdwxyz{  g  "*effect+exception-free-primitives* 6789:;<=>?  g  *multiply-valued-primitives*  g  *bailout-primitives*mnkloqrp g  *negatable-primitives*g  *effect-free-primitive-table*	g  (*effect+exceptions-free-primitive-table*
g  !*multiply-valued-primitive-table*g  *bailout-primitive-table*g  *negatable-primitive-table*g  	hashq-refg  post-order!g  <toplevel-ref>g  toplevel-ref-srcg  toplevel-ref-nameg  and=>g  make-primitive-refg  <module-ref>g  module-ref-srcg  module-ref-modg  module-ref-nameg  module-ref-public?g  resolve-moduleg  module-public-interfaceg  identityg  *primitive-expand-table*g  
pre-order!g  <application>g  application-src g  application-proc!g  application-args"g  primitive-ref?#g  primitive-ref-name$g  make-syntax-transformer%$ &$ 'g  define-primitive-expander(g  macro)g  $sc-dispatch*) +) ,g  _-g  any.,-/g  syntax->datum0/ 1/ 2g  datum->syntax32 42 5g  reverse6g  quote7g  
make-const8g  src9g  make-application:g  self-evaluating?;f  	what what<g  if=f  bad consequent yall>g  match-lambda*?, @g  syntax-violationA@ B@ Cf  -source expression failed to match any patternDg  lengthED FD Gg  lastHG I5 J5 Kg  const?Lg  	const-expMg  gensymNf  bOg  make-lexical-refPg  bQg  make-letRP Sg  make-conditionalTg  chained-comparison-expanderUFGHIE V Wg  most-negative-fixnumXg  most-positive-fixnumYg  maybe-simplify-to-eqZf  pre-[f  thunk-\f  post-]g  pre^g  thunk_g  post`]^_ ag  make-dynwindb]_ cg  make-dynrefdg  make-dynseteg  make-promptfg  make-lambda-casegg  tree-il-srchg  argsig  handlerji kg  
make-abortC 5 h`  b  ]4	
&'25 45 >  "  G   R       h0      ]	445  5$  "  	4 5 6       g  name
		0 g  t		,  g  filenamef  language/tree-il/primitives.scm
	t
		v		
	v	#		v			v		!	w		%	w		)	w		0	u	 
		0  g  nameg  add-interesting-primitive! C)R4i5 R4i)ii>  "  G  RR?@ABEFGHIJKLVWXYZMNOPQRSTU[\]^_`bacdefghijklmnopqrstuv4ii5RRR RR4i5 R4i5 	R4i5 
R4i5 R4i5 R4i     h   l   ] 6     d       g  x
		  g  filenamef  language/tree-il/primitives.scm
 	
	 	 		   Ci>  "  G  4i	     h   l   ] 6     d       g  x
		  g  filenamef  language/tree-il/primitives.scm
 	
	 	 		   Ci>  "  G  4i
     h   l   ] 6     d       g  x
		  g  filenamef  language/tree-il/primitives.scm
 	
	 	 		   Ci>  "  G  4i     h   l   ] 6     d       g  x
		  g  filenamef  language/tree-il/primitives.scm
 	
	 	 		   Ci>  "  G  4i    h(      ]4  >  "  G    6         g  x
		&  g  filenamef  language/tree-il/primitives.scm
 	
	 		
 	4	 	<	 		! 	4	$ 	<	& 	 			&   Ci>  "  G  C    h      ] 6             g  prim
		
  g  filenamef  language/tree-il/primitives.scm
 
	
 	 		
  g  nameg  constructor-primitive? C-RC    h      ] 6             g  prim
		
  g  filenamef  language/tree-il/primitives.scm
 
	
 	 		
  g  nameg  accessor-primitive? C.R     h      ] 6             g  prim
		
  g  filenamef  language/tree-il/primitives.scm
 
	
 	 		
  g  nameg  effect-free-primitive? C+R	  h      ] 6             g  prim
		
  g  filenamef  language/tree-il/primitives.scm
 
	
 	 		
  g  nameg   effect+exception-free-primitive? C,R
        h      ]4 5C          g  prim
		  g  filenamef  language/tree-il/primitives.scm
 
	 		 	 		  g  nameg  singly-valued-primitive? C/R       h      ] 6             g  prim
		
  g  filenamef  language/tree-il/primitives.scm
 
	
 	 		
  g  nameg  bailout-primitive? C0R      h      ] 6             g  prim
		
  g  filenamef  language/tree-il/primitives.scm
 
	
 	 		
  g  nameg  negate-primitive C1R   h   o   ]L  6      g       g  name
		
  g  filenamef  language/tree-il/primitives.scm
 		
 	 		
   C       h   o   ]L  6      g       g  name
		
  g  filenamef  language/tree-il/primitives.scm
 		
	 		
   C      h       ]44 L55L O 6          g  m
		  g  filenamef  language/tree-il/primitives.scm
 		 		
 	#	 		 	 		   C      h   K  ]) &  -4 54 544L 55O 6	&  K4
 54 54 54 5445$  "  5O 6C       C      g  x
	  g  rtd	  g  src			< g  name			< g  src		`  g  mod		`  g  name		`  g  public?		`   g  filenamef  language/tree-il/primitives.scm
 		 		$ 		) 		3 		< 		D 		k 		n 		z 	  	  	 	    C  h      ]O  6        g  x
		 g  mod		  g  filenamef  language/tree-il/primitives.scm
 
	 	 			  g  nameg  resolve-primitives! C(R4i5 R !"# 	     h`     ]) &  H4 54 54 545$   4455$  @CCC             g  x
		Y g  rtd		Y g  src		$	W g  proc		$	W g  args		$	W g  expand		C	U  g  filenamef  language/tree-il/primitives.scm
				+		5		6		;	&	C		C		K		S	 		Y   C        h      ] 6             g  x
		
  g  filenamef  language/tree-il/primitives.scm
	
	

	 		
  g  nameg  expand-primitives! C*R4&'(+.14z5y6789:;      h     ]"  (  45C$  445 5C$  F&  "   	  4L 5 "$  "l4
5$   "H6 "4            g  args
	  g  in	  g  out		   g  filenamef  language/tree-il/primitives.scm
									!							 		$	$	/		6		7		;		>		A	 	D	*	H		J 		O 	.	Q 		X!		c!	L	g!		k"	/	p"	<	s"	/	v!		y	 	 $	 $	 	 &	 &	  &	 &	 '	 '	 '	 	 (	 (	  (	2 (	  (	 (	 *	 *	  *	 	 	 	 6	   g  nameg  inline-args C<986c7= 
    h0    ]A $    &  $  $  q$  C(  4L 54L 5 C  4L5 C  4L5 C  4L5 C  4L5 C  4L5 C $   C4 5$  
  C $  	 6C            g  exp
	* g  vx	  g  vy		  g  vx		(  g  vy		(  g  vx		9  g  vy		9  g  vx		J  g  vy		J   	g  filenamef  language/tree-il/primitives.scm
+		-			,		.		V0			Y1		`2		i0			l4			v4	:	y4			}5	 5	* 5	 4		 4	: 4		 5	 5	* 5	 4		 4	: 4		 5	 5	* 5	 4		 4	: 4		 5	 5	* 5	 4		 4	: 4		 5	 5	* 5	 4		 6	,	9	,	:	 ,	$>	(>	 0	*  g  nameg  
consequent C6>5?8 
  h     - 1 3 O O Q Q   "  5(  45"  ,	45 "" C          g  sym
			| g  clauses			| g  inline-args			| g  
consequent			| g  in		7	l g  out		7	l  g  filenamef  language/tree-il/primitives.scm

	(?		7B		=C		>D		BD	'	ED	!	GD		NE		QF	"	TF	,	UF	"	VG	%	[G	1	^G	%	aF	"	dF		lE		lB		oB	-	wB		x?	 			|
   C    h   t   ]	4 5L 4?6l       g  args
		 g  v			  g  filenamef  language/tree-il/primitives.scm	
 		   CBC   h(   r   ]	4 5$   O @ 6 j       g  y
		' g  tmp		'  g  filenamef  language/tree-il/primitives.scm

 		'   C5'R4iiJ9E7     hP   Z   -  1  3  $  =  $  *(  !454
5 6CCC R       g  expr
			O g  w		M g  x			M g  w		+	I  			O


   C>  "  G  4iiK9G7      hP   Z   -  1  3  $  =  $  *(  !454
5 6CCC R       g  expr
			O g  w		M g  x			M g  w		+	I  			O


   C>  "  G  4iiL9F7      hP   Z   -  1  3  $  =  $  *(  !454
5 6CCC R       g  expr
			O g  w		M g  x			M g  w		+	I  			O


   C>  "  G  4iiMFHJ9MKLRQ7? hp  K  -  1  3 " "   $    $  $  45$  45"  $  	"  $  C"  x
$  L45	$  :	(  1	454455 6CC	$  		

	"C
	"yCCC $    $  $  (  "  45 6"  T45$  E45&  4	5 6	45&  4
5 6""45$  E45&  4	5 6	45&  4
5 6"\"X"	""" $  L (   
6  $  $(  45 6"""     C      g  expr
		k g  w	 g  x		 g  w		/ g  x		/ g  w		@ g  x		@ g  tail-len		K g  len		` g  ls			|  g  n	
	|  g  p-ls		|  g  z	   g  w	   g  w	   g  w g  x	 g  w	' g  x	' g  w	< g  w%. g  w4g g  x	4g g  w	I_  g  filenamef  language/tree-il/primitives.scm]\	i\	*s\	^	.^	X	X	"X	Z	&Z	 		k


   C>  "  G  4iiNFHJ9N7? 	 h`  a  -  1  3 "   $    $  $  45$  45"  $  	"  $  C"  x
$  L45	$  :	(  1	454455 6CC	$  		

	"C
	"yCCC $  L (   6  $  $(  45 6"""    Y      g  expr
		\ g  w	 g  x		 g  w		+ g  x		+ g  w		<  g  x		<  g  tail-len		G  g  len		\  g  ls			x  g  n	
	x  g  p-ls		x  g  z	   g  w	   g  w	   g  w g  w%X g  x	%X g  w	:P  		\


   C>  "  G  4iiOFHJ9OKLQ7      h    -  1  3 " "   $    $  $  45$  45"  $  	"  $  C"  x
$  L45	$  :	(  1	454455 6CC	$  		

	"C
	"yCCC $    $  r$  ](  R"  45 645$  $45&  4	5 6""""~"z"v $  A  $  ,(  !454

5 6"."*"&       g  expr
		 g  w	 g  x		 g  w		/ g  x		/ g  w		@ g  x		@ g  tail-len		K g  len		` g  ls			|  g  n	
	|  g  p-ls		|  g  z	   g  w	   g  w	   g  w g  x	 g  w	' g  x	' g  w	< g  w g  x	 g  w	  g  filenamef  language/tree-il/primitives.scmYj	ej	"oj	 		


   C>  "  G  4iiPFHJ9P7  hX  Q  -  1  3 "   $    $  $  45$  45"  $  	"  $  C"  x
$  L45	$  :	(  1	454455 6CC	$  		

	"C
	"yCCC $  A  $  ,(  !4545 6"""       I      g  expr
		Q g  w	 g  x		 g  w		+ g  x		+ g  w		<  g  x		<  g  tail-len		G  g  len		\  g  ls			x  g  n	
	x  g  p-ls		x  g  z	   g  w	   g  w	   g  wM g  x	M g  w	'E  		Q


   C>  "  G  4iiXFHJ9X7      h    -  1  3 " W"   $    $  $  45$  45"  $  	"  $  C"  x
$  L45	$  :	(  1	454455 6CC	$  		

	"C
	"yCCC $  P  $  ;$  &(  45 6"""" $  T (   
6  $  ,(  !454
5 6"R"N"J           g  expr
		 g  w	 g  x		 g  w		/ g  x		/ g  w		@ g  x		@ g  tail-len		K g  len		` g  ls			|  g  n	
	|  g  p-ls		|  g  z	   g  w	   g  w	   g  w` g  x	` g  w	'\ g  x	'\ g  w	<T g  wu~ g  w g  x	 g  w	  		


   C>  "  G  4iiWFHJ9W7  h    -  1  3 " W"   $    $  $  45$  45"  $  	"  $  C"  x
$  L45	$  :	(  1	454455 6CC	$  		

	"C
	"yCCC $  P  $  ;$  &(  45 6"""" $  V (   	6  $  -(  "454	5 6"P"L"H         g  expr
		 g  w	 g  x		 g  w		/ g  x		/ g  w		@ g  x		@ g  tail-len		K g  len		` g  ls			|  g  n	
	|  g  p-ls		|  g  z	   g  w	   g  w	   g  w` g  x	` g  w	'\ g  x	'\ g  w	<T g  wu g  w g  x	 g  w	  		


   C>  "  G  4ii9|      h`   Z   -  1  3  $  H  $  5(  ,45445 5 6CCC      R       g  expr
			Z g  w		X g  x			X g  w		+	T  			Z


   C>  "  G  4ii9|}       h`   Z   -  1  3  $  H  $  5(  ,45445 5 6CCC      R       g  expr
			Z g  w		X g  x			X g  w		+	T  			Z


   C>  "  G  4ii9}|       h`   Z   -  1  3  $  H  $  5(  ,45445 5 6CCC      R       g  expr
			Z g  w		X g  x			X g  w		+	T  			Z


   C>  "  G  4ii9} h`   Z   -  1  3  $  H  $  5(  ,45445 5 6CCC      R       g  expr
			Z g  w		X g  x			X g  w		+	T  			Z


   C>  "  G  4ii9| hp   Z   -  1  3  $  [  $  H(  ?45445445 5 5 6CCC   R       g  expr
			m g  w		k g  x			k g  w		+	g  			m


   C>  "  G  4ii9|}       hp   Z   -  1  3  $  [  $  H(  ?45445445 5 5 6CCC   R       g  expr
			m g  w		k g  x			k g  w		+	g  			m


   C>  "  G  4ii9|}       hp   Z   -  1  3  $  [  $  H(  ?45445445 5 5 6CCC   R       g  expr
			m g  w		k g  x			k g  w		+	g  			m


   C>  "  G  4ii9|}       hp   Z   -  1  3  $  [  $  H(  ?45445445 5 5 6CCC   R       g  expr
			m g  w		k g  x			k g  w		+	g  			m


   C>  "  G  4ii9}|       hp   Z   -  1  3  $  [  $  H(  ?45445445 5 5 6CCC   R       g  expr
			m g  w		k g  x			k g  w		+	g  			m


   C>  "  G  4ii9}|       hp   Z   -  1  3  $  [  $  H(  ?45445445 5 5 6CCC   R       g  expr
			m g  w		k g  x			k g  w		+	g  			m


   C>  "  G  4ii9}|       hp   Z   -  1  3  $  [  $  H(  ?45445445 5 5 6CCC   R       g  expr
			m g  w		k g  x			k g  w		+	g  			m


   C>  "  G  4ii9} hp   Z   -  1  3  $  [  $  H(  ?45445445 5 5 6CCC   R       g  expr
			m g  w		k g  x			k g  w		+	g  			m


   C>  "  G  4ii9| h   \   -  1  3  $  n  $  [(  R45445445445 5 5 5 6CCCT       g  expr
		  g  w		~ g  x			~ g  w		+	z  		 


   C>  "  G  4ii9|}     h   \   -  1  3  $  n  $  [(  R45445445445 5 5 5 6CCCT       g  expr
		  g  w		~ g  x			~ g  w		+	z  		 


   C>  "  G  4ii9|}     h   \   -  1  3  $  n  $  [(  R45445445445 5 5 5 6CCCT       g  expr
		  g  w		~ g  x			~ g  w		+	z  		 


   C>  "  G  4ii9|}     h   \   -  1  3  $  n  $  [(  R45445445445 5 5 5 6CCCT       g  expr
		  g  w		~ g  x			~ g  w		+	z  		 


   C>  "  G  4ii9|}     h   \   -  1  3  $  n  $  [(  R45445445445 5 5 5 6CCCT       g  expr
		  g  w		~ g  x			~ g  w		+	z  		 


   C>  "  G  4ii9|}     h   \   -  1  3  $  n  $  [(  R45445445445 5 5 5 6CCCT       g  expr
		  g  w		~ g  x			~ g  w		+	z  		 


   C>  "  G  4ii9|}     h   \   -  1  3  $  n  $  [(  R45445445445 5 5 5 6CCCT       g  expr
		  g  w		~ g  x			~ g  w		+	z  		 


   C>  "  G  4ii9|}     h   \   -  1  3  $  n  $  [(  R45445445445 5 5 5 6CCCT       g  expr
		  g  w		~ g  x			~ g  w		+	z  		 


   C>  "  G  4ii9}|     h   \   -  1  3  $  n  $  [(  R45445445445 5 5 5 6CCCT       g  expr
		  g  w		~ g  x			~ g  w		+	z  		 


   C>  "  G  4ii9}|     h   \   -  1  3  $  n  $  [(  R45445445445 5 5 5 6CCCT       g  expr
		  g  w		~ g  x			~ g  w		+	z  		 


   C>  "  G  4ii9}|     h   \   -  1  3  $  n  $  [(  R45445445445 5 5 5 6CCCT       g  expr
		  g  w		~ g  x			~ g  w		+	z  		 


   C>  "  G  4ii9}|     h   \   -  1  3  $  n  $  [(  R45445445445 5 5 5 6CCCT       g  expr
		  g  w		~ g  x			~ g  w		+	z  		 


   C>  "  G  4ii9}|     h   \   -  1  3  $  n  $  [(  R45445445445 5 5 5 6CCCT       g  expr
		  g  w		~ g  x			~ g  w		+	z  		 


   C>  "  G  4ii9}|     h   \   -  1  3  $  n  $  [(  R45445445445 5 5 5 6CCCT       g  expr
		  g  w		~ g  x			~ g  w		+	z  		 


   C>  "  G  4ii9}|     h   \   -  1  3  $  n  $  [(  R45445445445 5 5 5 6CCCT       g  expr
		  g  w		~ g  x			~ g  w		+	z  		 


   C>  "  G  4ii9}       h   \   -  1  3  $  n  $  [(  R45445445445 5 5 5 6CCCT       g  expr
		  g  w		~ g  x			~ g  w		+	z  		 


   C>  "  G  4iiy9xy?   h    -  1  3 "  "  b $  Y  $  F$  3454455 6CCC $  P  $  ;$  &(  45 6"O"K"G"C $  9  $  $(  45 6"""            g  expr
		 g  w		q g  x			q g  w		/	o g  x		/	o g  w		@	m g  x		@	m g  w   g  x	   g  w	   g  x	   g  w	   g  w  g  x	  g  w	   		


   C>  "  G  4iiw9x    h      -  1  3  $  r  $  _$  L$  9(  045445 5 6CCCCC           g  expr
		  g  w	  g  x		  g  w		'  g  x		'  g  w		8	~ g  x		8	~ g  w		M	z  		 


   C>  "  G  4ii697       h`      -  1  3  $  G  $  4$  !456CCC              g  expr
			Y g  w		W g  x			W g  w		'	U g  x		'	U g  w		8	S g  x		8	S  			Y


   C>  "  G  4ii899    h`   x   -  1  3  $  J  $  7$  $(  45 6CCCC    p       g  expr
			\ g  w		Z g  x			Z g  w		'	X g  x		'	X g  w		<	T  			\


   C>  "  G  4ii:9;   hH   Z   -  1  3  $  5  $  "(  45 6CCC R       g  expr
			G g  w		E g  x			E g  w		+	A  			G


   C>  "  G  4ii<9; hH   Z   -  1  3  $  5  $  "(  45 6CCC R       g  expr
			G g  w		E g  x			E g  w		+	A  			G


   C>  "  G  4iiKLck9       h   !  -  1  3  $    $  t$  a45$  J4545$  45$  
"  "  $  456CCCCC             g  expr
		  g  w	  g  x		  g  w		'  g  x		'  g  w		8  g  x		8  g  n		N	w  g  filenamef  language/tree-il/primitives.scm	=		H		N		Q		[		\		f		i	)	{	 
		 


   C>  "  G  4ii9  h`   x   -  1  3  $  J  $  7$  $(  45 6CCCC    p       g  expr
			\ g  w		Z g  x			Z g  w		'	X g  x		'	X g  w		<	T  			\


   C>  "  G  4ii9   hx      -  1  3  $  _  $  L$  9$  &(  45 6CCCCC              g  expr
			q g  w		o g  x			o g  w		'	m g  x		'	m g  w		8	k g  x		8	k g  w		M	g  			q


   C>  "  G  4ii9     h`   x   -  1  3  $  J  $  7$  $(  45 6CCCC    p       g  expr
			\ g  w		Z g  x			Z g  w		'	X g  x		'	X g  w		<	T  			\


   C>  "  G  4ii9   hx      -  1  3  $  _  $  L$  9$  &(  45 6CCCCC              g  expr
			q g  w		o g  x			o g  w		'	m g  x		'	m g  w		8	k g  x		8	k g  w		M	g  			q


   C>  "  G  4ii9N7        hx   x   -  1  3  $  f  $  S$  @(  7454454	5 5 6CCCCp       g  expr
			x g  w		v g  x			v g  w		'	t g  x		'	t g  w		<	p  			x


   C>  "  G  4ii9N7      h      -  1  3  $  {  $  h$  U$  B(  9454454	5 5 6CCCCC          g  expr
		  g  w	  g  x		  g  w		'  g  x		'  g  w		8  g  x		8  g  w		M   		 


   C>  "  G  4ii9N7       hx   x   -  1  3  $  f  $  S$  @(  7454454	5 5 6CCCCp       g  expr
			x g  w		v g  x			v g  w		'	t g  x		'	t g  w		<	p  			x


   C>  "  G  4ii9N7      h      -  1  3  $  {  $  h$  U$  B(  9454454	5 5 6CCCCC          g  expr
		  g  w	  g  x		  g  w		'  g  x		'  g  w		8  g  x		8  g  w		M   		 


   C>  "  G  4ii9N7       hx   x   -  1  3  $  f  $  S$  @(  7454454	5 5 6CCCCp       g  expr
			x g  w		v g  x			v g  w		'	t g  x		'	t g  w		<	p  			x


   C>  "  G  4ii9N7      h      -  1  3  $  {  $  h$  U$  B(  9454454	5 5 6CCCCC          g  expr
		  g  w	  g  x		  g  w		'  g  x		'  g  w		8  g  x		8  g  w		M   		 


   C>  "  G  4ii9N7       hx   x   -  1  3  $  f  $  S$  @(  7454454	5 5 6CCCCp       g  expr
			x g  w		v g  x			v g  w		'	t g  x		'	t g  w		<	p  			x


   C>  "  G  4ii9N7      h      -  1  3  $  {  $  h$  U$  B(  9454454	5 5 6CCCCC          g  expr
		  g  w	  g  x		  g  w		'  g  x		'  g  w		8  g  x		8  g  w		M   		 


   C>  "  G  4ii9N7       hx   x   -  1  3  $  f  $  S$  @(  7454454	5 5 6CCCCp       g  expr
			x g  w		v g  x			v g  w		'	t g  x		'	t g  w		<	p  			x


   C>  "  G  4ii9N7      h      -  1  3  $  {  $  h$  U$  B(  9454454	5 5 6CCCCC          g  expr
		  g  w	  g  x		  g  w		'  g  x		'  g  w		8  g  x		8  g  w		M   		 


   C>  "  G  4ii9N7       hx   x   -  1  3  $  f  $  S$  @(  7454454	5 5 6CCCCp       g  expr
			x g  w		v g  x			v g  w		'	t g  x		'	t g  w		<	p  			x


   C>  "  G  4ii9N7      h      -  1  3  $  {  $  h$  U$  B(  9454454	5 5 6CCCCC          g  expr
		  g  w	  g  x		  g  w		'  g  x		'  g  w		8  g  x		8  g  w		M   		 


   C>  "  G  4ii9N7       hx   x   -  1  3  $  f  $  S$  @(  7454454	5 5 6CCCCp       g  expr
			x g  w		v g  x			v g  w		'	t g  x		'	t g  w		<	p  			x


   C>  "  G  4ii9N7      h      -  1  3  $  {  $  h$  U$  B(  9454454	5 5 6CCCCC          g  expr
		  g  w	  g  x		  g  w		'  g  x		'  g  w		8  g  x		8  g  w		M   		 


   C>  "  G  4ii9N7       hx   x   -  1  3  $  f  $  S$  @(  7454454	5 5 6CCCCp       g  expr
			x g  w		v g  x			v g  w		'	t g  x		'	t g  w		<	p  			x


   C>  "  G  4ii9N7      h      -  1  3  $  {  $  h$  U$  B(  9454454	5 5 6CCCCC          g  expr
		  g  w	  g  x		  g  w		'  g  x		'  g  w		8  g  x		8  g  w		M   		 


   C>  "  G  4ii9N7       hx   x   -  1  3  $  f  $  S$  @(  7454454	5 5 6CCCCp       g  expr
			x g  w		v g  x			v g  w		'	t g  x		'	t g  w		<	p  			x


   C>  "  G  4ii9N7      h      -  1  3  $  {  $  h$  U$  B(  9454454	5 5 6CCCCC          g  expr
		  g  w	  g  x		  g  w		'  g  x		'  g  w		8  g  x		8  g  w		M   		 


   C>  "  G  4ii9N7       hx   x   -  1  3  $  f  $  S$  @(  7454454	5 5 6CCCCp       g  expr
			x g  w		v g  x			v g  w		'	t g  x		'	t g  w		<	p  			x


   C>  "  G  4ii9N7      h      -  1  3  $  {  $  h$  U$  B(  9454454	5 5 6CCCCC          g  expr
		  g  w	  g  x		  g  w		'  g  x		'  g  w		8  g  x		8  g  w		M   		 


   C>  "  G  7MNOPQRS9 h   0  )   
3  6)   3 C)   3 C- 1 3 4 L 5454 5   4	 4
  54
 54 556 (      g  src
			 g  src
		 g  a		 g  src
	$	& g  a	$	& g  b		$	& g  src
	/  g  a	/  g  b		/  g  rest		/  g  prim		8  g  b-sym		A  g  b*		N   g  filenamef  language/tree-il/primitives.scm
						0		8		;		?		A		A		D		J	&	N		N		V		[		`		a		f	#	s	>	u	#	v	# 	> 	# 	# 	 	 			 			 	$	&	 	/ 	
	   C     h      ] O C             g  	prim-name
		
  g  filenamef  language/tree-il/primitives.scm

 		
  g  nameg  chained-comparison-expander CTR4iT h   }   ] 4 56       u       g  	prim-name
		  g  filenamef  language/tree-il/primitives.scm
	
				 	 		   CU>  "  G  KLCVjkWX9@ h   e  ]4 5$  |4 545$  "  ?$  "  345$  '45$  $  	"  "  "  $  	L 4
5  6CC     ]      g  a
	  g  b	  g  v		  g  t			n  g  filenamef  language/tree-il/primitives.scm
			
		
										/		3		4		9		C		D		N		S		r		w	)	|	@	~	) 	% 	 	 	  g  nameg  maybe-simplify C        h@     )   ,3 O  Q 45$  C6-  1  3 C         g  src
			2 g  a			2 g  b				2 g  maybe-simplify			2 g  t			2 g  else
	;	=  g  filenamef  language/tree-il/primitives.scm
							2		;	 			2	 	;	=


  g  nameg  maybe-simplify-to-eq CYR4iiAYi>  "  G  4iiBYi>  "  G  4ii=MZ[\Q`aO]9^_      hx     )   d3 454545   4 4	54
4554556-  1  3 C         g  src
			j g  pre			j g  thunk				j g  post				j g  PRE			j g  THUNK			j g  POST			j g  else
	s	u  g  filenamef  language/tree-il/primitives.scm
		
			"						$						#					*"		3#		<$		=%		B'		G'	(	K'		L(		P(	(	U(	=	Y(	(	Z(	K	\(		])		b)	(	f)		h%		j 		s	 			j	 	s	u


   C>  "  G  4ii>MZ\QbaO]_ 
      hH   h  ]4545   4 454	556 `      g  src
		G g  pre		G g  expr			G g  post			G g  PRE			G g  POST			G  g  filenamef  language/tree-il/primitives.scm
.		0		0	"		0		
1		1	#	1		0		4		!5		(6		)7		.9		39	(	79		:;		?;	(	C;		E7		G2	 		G	   C>  "  G  4iic        h       )   3  6-  1  3 C           g  src
			 g  fluid			 g  else
		  g  filenamef  language/tree-il/primitives.scm
?		@		?	 				 		


   C>  "  G  4iid   h       )   3  6-  1  3 C         g  src
			 g  fluid			 g  exp				 g  else
		  g  filenamef  language/tree-il/primitives.scm
E		F		E	 				 		


   C>  "  G  4iiMefgh96O 
  h`     )   I3 45  445 4454	5 55	6-  1  3 C      y      g  src
			O g  tag			O g  exp				O g  handler				O g  args-sym			O g  else
	X	Z  g  filenamef  language/tree-il/primitives.scm
K		
M		M		R		S		#S	)	&S	0	(S	9	-S	=	.T		2T	(	7T	?	9T	(	<V	+	AV	@	EV	+	HU	%	JT		MR		ON		XK	 			O	 	X	Z


   C>  "  G  4iiMQje9fgh6Oi       h     )   r3 45 45    4 45445 44	
54545 55	56-  1  3 C           g  src
			x g  tag			x g  thunk				x g  handler				x g  handler-sym			x g  args-sym			x g  else
    g  filenamef  language/tree-il/primitives.scm
\		
^	"	_		^		a		"a	!	'a	4	(b		/c		5c	6	7c		8f		;g		Bg	*	Eg	1	Gg	:	Lg	>	Mh		Qi		Vi	/	Xi		Yj		^j	0	bj		ck		hk	0	lk		oj		qh		tf		vb		x`	 \	 "			x	   


   C>  "  G  4iik   h       )   3  6-  1  3 C        g  src
			 g  tag			 g  	tail-args				 g  else
		  g  filenamef  language/tree-il/primitives.scm
q		s	#	s		q	 				 		


   C>  "  G  iik7   h(      *   1 3  456-  1  3 C       g  src
		 g  tag		 g  args			 g  else
	&	(  g  filenamef  language/tree-il/primitives.scm
w		y	(	y	7	y	(	y		&w	 			
	 	&	(


   C6   Z      g  m
		,  g  filenamef  language/tree-il/primitives.scm		
	.	&		1	%
\	t
]	z	%f	z
g	|
 		~
 	 
 	 
 	 
 	 
 	 
 	 
 	& 
 	1 
 	* 
 	" 
 	$ 
 
 
6 
 
 
4 
 
 
	f 

/ 

 
 
g 
h	!r
	
	J
M
P
 U
%c
(h
,o
/s
3ky
7#
8
9 
9
:
;
<
=
>
?
@
A
B
C
D
E
G
H
I"
J2
KB
LR
Mb
Nr
O
P
Q
R
S
V
Wr
X
Y
Zh
[8
]7
^>
_|
`
a
b
dU
e~
f
h
iu
j
l
m.
n
o
q%
rN
s
t
vE
wn
x
y


	

      J
      K
      V	%      `
      i
      t	%      ~
      
      	      6
      ?,
      J-	      -,
      6=
      A>	      "=
      +C
      6D	      #C
      ,I
      7J	      FI
      OZ
      Z[	      *Z
      3o
      >p	      8o
      Kv	      ]u
 	      ]
   C6                                                                                                                                                                                                                             ccache/language/elisp/spec.go                                                                       0000644                 00000002075 15154557173 0012153 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0%      ] ( 4      h]      ] g  guile	 	g  define-module*	 	 	g  language	g  elisp	g  spec		 	
g  filenameS	f  language/elisp/spec.scm	g  importsS	g  compile-tree-il	 	 	g  parser	 	 	g  system	g  base	 	 	 	g  exportsS	 	g  set-current-module	 	 	g  invalidate-compilation-cache!	g  make-language	g  nameS	 g  titleS	!f  
Emacs Lisp	"g  readerS	#g  
read-elisp	$g  printerS	%g  write	&g  	compilersS	'g  tree-ilC 5      h   {   ]4	
5 4 >  "  G   4i>   "  G  4i !"#     h   v   ] 6n       g  port
		 g  env		  g  filenamef  language/elisp/spec.scm
					! 			   C$%i&'i 5
RC s       g  m
		,  g  filenamef  language/elisp/spec.scm		
	-	
	K		 		 	
 	 
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                    ccache/language/elisp/runtime.go                                                                    0000644                 00000015734 15154557173 0012712 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4      h|      ] g  guile	 	g  define-module*	 	 	g  language	g  elisp	g  runtime		 	
g  filenameS	f  language/elisp/runtime.scm	g  exportsS	g  	nil-value	g  t-value	g  value-slot-module	g  function-slot-module	g  
elisp-bool	g  ensure-fluid!	g  reference-variable	g  set-variable!	g  runtime-error	g  macro-error	g  built-in-func	g  built-in-macro	g  
defspecial	g  prim	 	g  set-current-module	 	 	g  
value-slot	  	!g  function-slot	"! 	#g  error	$g  resolve-interface	%g  resolve-module	&g  module-defined?	'g  make-unbound-fluid	(g  module-define!	)g  module-export!	*g  
module-ref	+g  module-set!	,g  make-syntax-transformer	-, 	., 	/g  macro	0g  $sc-dispatch	10 	20 	3g  any	4333 	5g  syntax-object	6g  begin	7g  top	87 	9g  ribcage	:g  dummy	;g  name	<g  value	=:;< 	>g  m-9d4fb909439-25	?>7 	@?88 	Af  l-9d4fb909439-2a	Bf  l-9d4fb909439-2b	Cf  l-9d4fb909439-2c	DABC 	E9=@D 	F9 	Gg  x	HG 	I? 	Jf  l-9d4fb909439-27	KJ 	L9HIK 	M8EFL 	Ng  hygiene	ON 	P56MO 	Qg  define-public	R5QMO 	Sg  syntax-violation	TS 	US 	Vf  -source expression failed to match any pattern	Wg  datum->syntax	Xg  map	Yg  identifier?	Zg  syntax->datum	[g  identity	\g  string->symbol	]g  string-append	^g  symbol->string	_g  make-id	`g  _	a`33 	bg  macro-	cg  scheme-name	dc 	e8 	ff  l-9d4fb909439-44	gf 	h9deg 	i;< 	j88 	kf  l-9d4fb909439-3e	lf  l-9d4fb909439-3f	mkl 	n9ijm 	of  l-9d4fb909439-3b	po 	q9Hep 	r8FhnFq 	s56rO 	t5QrO 	ug  
make-fluid	v5urO 	wg  cons	x5wrO 	yg  quote	z5yrO 	{5/rO 	|z{ 	}g  each-any	~3}	3~ ` g  compile- f  l-9d4fb909439-52   9de  g  args g  body ;  888  f  l-9d4fb909439-4a f  l-9d4fb909439-4b f  l-9d4fb909439-4c   9  f  l-9d4fb909439-47   9He  8FF  56O  g  define 5O  5uO  5wO  5yO  g  special-operator 5O    g  lambda 5O  g  @ g  sym :  g  m-9d4fb909439-55 7  88  f  l-9d4fb909439-5a f  l-9d4fb909439-5b f  l-9d4fb909439-5c   9    f  l-9d4fb909439-57   9H  8F  5O  5O   C 5       h     ]4	
5 4 >  "  G   RR R"R#        h      - 1 3  @              g  msg
			 g  args			  g  filenamef  language/elisp/runtime.scm
	5
		6	 			
  g  nameg  macro-error CRiR     h   {   ] $  CC  s       g  b
		  g  filenamef  language/elisp/runtime.scm
	<
		=	 		  g  nameg  
elisp-bool CR$%&'()  hP     ]4 54 545$  C45 4>  "  G   6           g  module
		K g  sym		K g  intf			K g  resolved			K g  fluid		(	K  g  filenamef  language/elisp/runtime.scm
	G
		H		
	I			H			J		!	J		$	K		(	K		+	L	
	I	M	#	K	M	
 		K	  g  nameg  ensure-fluid! CR%*  h@      ]
4 5 $  64 >  "  G  45[C            g  module
		; g  sym		; g  resolved				;  g  filenamef  language/elisp/runtime.scm
	O
		P				P			R			Q			S			U		1	V	 			;	  g  nameg  reference-variable CR$%&+()* 
       h   >  ]4 54 5 $  X45$  4>  "  G  "  -4>  "  G  4 >  "  G  "   4 >  "  G  4	5\C  6      g  module
	  g  sym	  g  value		  g  intf		  g  resolved		   g  filenamef  language/elisp/runtime.scm
	X
		Y		
	Z			Y			\			[			^		*	]		+	_		E	a		[	b		d	b	 	i	b		v	d	 	e	 	 	  g  nameg  set-variable! CR4./24PR   h   R   ]  C       J       g  dummy
		 g  name		 g  value			  			   CUV       h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  language/elisp/runtime.scm
	l	 		"  g  
macro-typeg  syntax-rulesg  patternsg  nameg  value   C5RWXYZ[     h    y   ]4 5$  "   6       q       g  datum
		  g  filenamef  language/elisp/runtime.scm
	x			y	 		y			y	 		   C\]^      h0      - 1 3  454445?56       g  template-id
			0 g  data			0 g  symbols			.  g  filenamef  language/elisp/runtime.scm
	q
		x			w			t			u			u	!	)	u		+	t		0	v	 
			0
  g  nameg  make-id C_R4./2a_bstvx|     h0      ]
4  5    C             g  name
		* g  value		* g  tmp			*  g  filenamef  language/elisp/runtime.scm	 	"		 	2	 	"	 	 		*	   CUV        h(   n   ]	4 5$  @ 6      f       g  x
		" g  tmp		"  g  filenamef  language/elisp/runtime.scm
 	 		"   C5R4./2_ 	    h0      ]4  5    C       g  name
		0 g  args		0 g  body			0 g  tmp			0  g  filenamef  language/elisp/runtime.scm	 	"		 	2	 	"	 	 		0	   CUV       h(   n   ]	4 5$  @ 6      f       g  x
		" g  tmp		"  g  filenamef  language/elisp/runtime.scm
 	 		"   C5R4./2 h   P   ] C H       g  dummy
		 g  sym		 g  args			  			   CUV h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  language/elisp/runtime.scm
 	 		"  g  
macro-typeg  syntax-rulesg  patternsg  symg  argsg  ...   C5RC           g  m
		(  g  filenamef  language/elisp/runtime.scm		
	,	%
	0	'
	2	-		5	-
	7	/		:	/
 	5
	8
	<
*	G
b	O
i	X
		q
 	
   C6                                     ccache/language/elisp/bindings.go                                                                   0000644                 00000011010 15154557173 0013003 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] / 4       h      ] g  guile	 	g  define-module*	 	 	g  language	g  elisp	g  bindings		 	
g  filenameS	f  language/elisp/bindings.scm	g  exportsS	g  make-bindings	g  mark-global-needed!	g  map-globals-needed	g  with-lexical-bindings	g  with-dynamic-bindings	g  get-lexical-binding	 	g  set-current-module	 	 	g  make-record-type	g  needed-globals	g  lexical-bindings	 	g  bindings-type	g  record-constructor	g  make-hash-table	g  record-accessor	g  	assoc-ref	 g  memq	!g  
assoc-set!	"g  record-modifier	#g  hash-ref	$g  and-map	%g  symbol?	&g  error	'f  can't bind non-symbols	(g  for-each	)g  	hash-set!	*g  
make-fluid	+g  with-fluids*	,g  map	-g  with-symbol-bindings	.f  #invalid targets for lexical bindingC 5   hH     ]4	
5 4 >  "  G   4i5R        h      ] 4545 6              g  filenamef  language/elisp/bindings.scm
	1
		2		
	2	&		2	*		2	 		
  g  nameg  make-bindings CR !"    hh     ]#445 545$  "  45$  "  4545 6         g  bindings
		e g  sym		e g  module			e g  
old-needed			e g  t			- g  old-in-module		-	e g  new-in-module		G	e g  
new-needed		T	e  g  filenamef  language/elisp/bindings.scm
	7
		8			8		
	8	5		8			8			8			:			:		*	:	:	-	8		0	;		<	;		G	=		G	8		J	>		T	8		W	?		]	?	$	_	?		e	?	 		e	  g  nameg  mark-global-needed! CR     h   '  ]B445 5"  `(  C"  $(  	"  $45		"	"""             g  bindings
	  g  proc	  g  needed		  g  mod-tail			v g  
mod-result			v g  aentry		%	n g  module		*	k g  symbols		/	h g  sym-tail		5	Y g  
sym-result			5	Y  
g  filenamef  language/elisp/bindings.scm
	F
		G			G		
	G	0		G			G			G			I			K		"	N		%	O		%	O		*	P		*	O		/	Q		/	O		5	R		;	T		D	V	$	E	W	*	L	W	7	N	W	*	Q	W	$	Y	V		Y	R		v	M	
	v	I		y	J	& 	I	 	 	  g  nameg  map-globals-needed CR#  h0      ]445 545$  [CC             g  bindings
		* g  sym		* g  lex			* g  slot			*  g  filenamef  language/elisp/bindings.scm
	]
		^			^		
	^	.		^			^			^			`			^		$	a	 		*	  g  nameg  get-lexical-binding CR$%&'(#)*  h       ]4L  5$  CL  45 6  x       g  sym
		  g  filenamef  language/elisp/bindings.scm
	n			o			o			p	'		p	 		   C+,#      h   h   ]L  6      `       g  sym
		
  g  filenamef  language/elisp/bindings.scm
	r		
	r	% 		
   C     hx   _  ]$  45"  $  4>  "  G  "   445 54	O >  "  G  
4O 56     W      g  bindings
		s g  syms		s g  targets			s g  proc			s g  lex		B	s  g  filenamef  language/elisp/bindings.scm
	h
		i				i		
	j			j	
		i	
		i			k		!	k		(	k		5	l		6	l		<	l	-	>	l		B	l		B	l		E	n		`	r		s	r	 		s	  g  nameg  with-symbol-bindings C-R$%&.-        h0     ]$  45"  $  6 6       g  bindings
		0 g  syms		0 g  targets			0 g  proc			0  g  filenamef  language/elisp/bindings.scm
	v
		w				w		
	x			x	
		w	
		w		 	y		$	y		0	z	 		0	  g  nameg  with-lexical-bindings CR-,       h   _   ]C    W       g  el
		  g  filenamef  language/elisp/bindings.scm
		 		   C      h      ] 456          g  bindings
		 g  syms		 g  proc			  g  filenamef  language/elisp/bindings.scm
	|
						}	 			  g  nameg  with-dynamic-bindings CRC        g  m
		(  g  filenamef  language/elisp/bindings.scm		
	)	,		/	,		1	,		3	,		6	+
 	1
9	7
	F
K	]

	h
	v
E	|
 	G
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                         ccache/language/elisp/lexer.go                                                                      0000644                 00000030112 15154557173 0012331 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.020      ] { 4   h      ] g  guile	 	g  define-module*	 	 	g  language	g  elisp	g  lexer		 	
g  filenameS	f  language/elisp/lexer.scm	g  importsS	g  ice-9	g  regex	 	 	 	g  exportsS	g  	get-lexer	g  get-lexer/1	 	g  set-current-module	 	 	g  error	g  lexer-error	g  set-char-bit	g  eof-object?	g  char=?	g  is-char?	g  integer->char	 g  real-character	!g  char-alphabetic?	"g  char->integer	#g  char-upcase	$g  add-control	%g  	read-char	&g  char-numeric?	'g  unread-char	(f  invalid digit in escape-code	)g  charcode-escape	*a		+b		,t			-n	
	.v		/f		0r		1e		2s	 	3d		4*+,-./0123 
	5g  basic-escape-codes	6A		7s		8H		9S		:g  assq-ref	;g  get-character	<g  	peek-char	=f  !expected - after control sequence	>g  char>=?	?g  char<?	@g  make-regexp	Af  ^[+-]?[0-9]+\.?$	Bg  integer-regex	Cf  7^[+-]?([0-9]+\.?[0-9]*|[0-9]*\.?[0-9]+)(e[+-]?[0-9]+)?$	Dg  float-regex	Eg  string->char-set	Ff  -+=*/_~!@$%^&:<>{}?.	Gg  no-escape-punctuation	Hg  list->string	Ig  reverse	Jg  regexp-exec	Kg  integer	Lg  float	Mg  symbol	Ng  char-set-contains?	Og  get-symbol-or-number	Pg  circular-ref	Qg  circular-def	Rf  !invalid circular marker character	Sg  get-circular-marker	Tg  
file-port?	Ug  port-filename	Vg  	port-line	Wg  port-column	Xg  set-source-property!	Yg  filename	Zg  line	[g  column	\g  eof	]g  char-whitespace?	^g  lex	_g  	character	`g  string	ag  function	bg  
paren-open	cg  paren-close	dg  square-open	eg  square-close	fg  quote	gg  	backquote	hg  unquote-splicing	if  expected @ in unquote-splicing	jg  unquote	kg  string-length	lf  invalid character in input	mg  string->symbol	ng  inexact->exact	og  string->number	pg  integer?	qf  expected integer	rg  exact?	sf  expected inexact float	tf  wrong number/symbol type	ug  dot	vg  binary-ports	wv 	xg  
eof-object	ywx 	zwx C 5  h%  H  ]4	
5 4 >  "  G         h      - 1 3 @              g  port
			 g  msg			 g  args				  g  filenamef  language/elisp/lexer.scm
	'
		(	 				
	  g  nameg  lexer-error CRh      ] C             g  chr
		
 g  bit		
  g  filenamef  language/elisp/lexer.scm
	-
		.				.	 		
	  g  nameg  set-char-bit CR       h      ]4 5$  C 6        g  tested
		 g  	should-be		  g  filenamef  language/elisp/lexer.scm
	4
		5			5			6	 			  g  nameg  is-char? CR    h      ]  $   6 C          g  chr
		  g  filenamef  language/elisp/lexer.scm
	<
		=			=			>	 		  g  nameg  real-character C R !"#        hH      ]	4 545$  4455	@C?$  	C@$  
C 	6          g  chr
		E g  real			E  g  filenamef  language/elisp/lexer.scm
	F
		G				G			H			H			I			I		"	I		$	I	.	%	I		/	J		E	M	 		E  g  nameg  add-control C$R%&"!#'( 	   h   t  ],"  "  4 545$  45	0"  645$  *4455	A
$  "  	
"  $  	"  $  "w$  "  $  4 >  "  G  C 6$  $  C"1"-

" l      g  port
	  g  base	  g  digits		  g  early-return		  g  result		  g  procdigs		  g  cur		  g  code		F	] g  value		b  g  valid		t   
g  filenamef  language/elisp/lexer.scm
	V
		W			[			[			]			\			^		'	^	/	(	^		-	_		7	\		8	`	'	;	`	6	C	`	'	E	a	'	F	`	$	F	`		L	b		P	b		Z	d		b	[		j	f		o	f	!	t	[		|	g	
 	p	 	p	 	p	1 	p	 	h	 	h	 	h	 	j	 	m	 	l	 	Y	 	Y	 	Y	 	W	 (	 	  g  nameg  charcode-escape C)R45R6789%:5$;<=)">?'        h  C  ]*M$  	"  	 4 54\5$ r4 54545"  $  C"  ^$  	4
 56C$  J44 5-5$  544 5-5$  "  4>  "  G  	4
 56Cx$  
 	6u$   		6U$   		66405$  0485$  4 >  "  G   		6""$  M44 5-5$  744 5-5$  "  4>  "  G  4
 56""6  ;      g  port
	 g  	in-string	 g  	meta-bits		% g  cur		% g  escaped		= g  esc-code		H g  meta		S  g  filenamef  language/elisp/lexer.scm
 
	 		 		 		 		% 		* 		6 		7 		= 		@ 		H 		K 		S 		_ 	
	o 		r 	"	| 	  	  	  	  	  	  	  	&  	  	  	  	   	  	"  	  	  	  	  	  	
 	 	 	
 	 	
 	'* 	+ 	I 	Q 	
X 	[ 	 e 	i 	j 	m 	w 	{ 	 	 	 	 	 	 	 >		  g  nameg  get-character C;R4@iA5BR4@iC5DR4EiF5GR%HIJBKDLM&!NG'  hH    ])" 24 545$  P4455$  "  	45$  "   $  "  	45$  	"  
D45$  "   45$  "  	45$  "R4\5$  4 5"24 >  "  G  4455$  "  	45$  "   $  "  	45$  	"  
D"            g  port
	B g  result-chars	8 g  
had-escape		8 g  c		8 g  result		&	j g  t		q  g  t	   g  result	 8  g  filenamef  language/elisp/lexer.scm
 
	 		 		 		 		 		 	#	 	$	& 	#	& 		. 		4 		@ 		B 		L 		R 		^ 		` 		f 		j 		k 	"	q 		 	"  	  	"  	  	%  	  	  	  	&  	   	  	  	#  	$  	#  	  	 	 	 	 	  	, 	. 	4 	8 	8 	9 	B 	 4	B  g  nameg  get-symbol-or-number COR%&"PQR      hx     ]"  84 545$  45	0	
"	"  
"G #$  C=$  C 6         g  port
		u g  result		> g  cur			> g  val		$	4 g  id	F	u g  type		F	u  g  filenamef  language/elisp/lexer.scm
 
	 		 		 	
	 		 		 		# 	2	$ 		$ 		+ 		. 		4 		> 		> 		I 		V 		X 		e 		g 		q 		u 	 		u  g  nameg  get-circular-marker CSRTUVWXYZ[       hP      ]
 4L>  "  G  4L>  "  G  4L >  "  G  C         g  token
		N g  value		N g  obj			N  g  filenamef  language/elisp/lexer.scm
						
			0			 		&	0	-		6		<	0	C	 		N	   C%\]^_;`HI'Sabcdefg<hijOMklmKnopqLrstu 0 h   {  ])4 5$  4 5"  4 54 5O 4 545$  64	5$  
 6" x;$  ?"  74 545$  "  	4
5$  
 6""?$  4 56"$  "  4 5"$  44556\$  f4 5
$  "   $  "4 >  "  G  4 >  "  G  44 55"m"b"[#$  4 50$  "  u1$  "  g2$  "  Y3$  "  K4$  "  =5$  "  /6$  "  !7$  "  8$  "  9$  '4 >  "  G  4 56'$  6C($  6)$  6[$  6]$  6'$  6`$  6,$  844 5@5$  44 5@5$  66 64 >  "  G  4! >  G "$  44#5
$  4 >  "  G  $6"4%56&$  >&4'4(554)5$  "  4*>  "  G  6+$  9+4(54,5$  4->  "  G  "   6.64.5$  4	4 55$  /6"`"\      s      g  port
	 g  file	)	C g  line		)	C g  column		)	C g  return	J g  c		J g  cur	   g  t	   g  result-chars	  g  cur	  g  escaped	u g  c	Y g  mark	;G g  type	 g  str	 g  num	v g  num	  g  filenamef  language/elisp/lexer.scm
 
	 	 	 		 	 		 	!		"	"	)		) 		D		J 		O		Y		]		a		b		l		r			 		 	 	 	 	 	' 	  	 !	 		 	 $	 $	 $		 	 *		 +	 +	 ,	 .	 .	  .	..	 .	,	0	0	!1	73	85	L6	`8	c8	+l8	o8	u7	z:	:	*		*	%*			<	<		=	
!?	5@	;@	BA	EA	"GA	P=	
TC	WC	b	fE	iE	r	vF	yF		G	G		H	H		I	I		J	J		M	M	M	M		N	N	N	N	P	P	O	O	Q	Q	V		X	W		)Z	*a	1a	6a	7e	Lf	Pf	Tg	Ug	$]g	fZ	jn	ko	no	,vo	vo	yp	p	q	q	q	m	Z	t	t	*t	u	%u	!v	%v	,v	%t	z	z										 	  g  nameg  lex C^R^   h   U   ] L 6M       g  filenamef  language/elisp/lexer.scm
			 		
   C        h   t   ] O C      l       g  port
		
  g  filenamef  language/elisp/lexer.scm

 		
  g  nameg  	get-lexer CR\zbdcefgjhQ    h   L  ]M$  	45 C4L5 H  $  "  $  	M N "  h$  "  $  	M N "  H$  "  /$  "  !	$  "  
$  "  $  K"   J$  "  M 
$  N"    CD      g  next
	  g  	quotation	  g  key		   g  filenamef  language/elisp/lexer.scm
				
									
				
					:	!	<		I		Z	!	\		i	 	 	 	% 	 	 	 
   C h       ]4 5
HHO C          g  port
		 g  lex		 g  finished			 g  paren-level			  g  filenamef  language/elisp/lexer.scm

				 		  g  nameg  get-lexer/1 CRC    @      g  m
		,  g  filenamef  language/elisp/lexer.scm		
 	'
	-
	4
B	<
	F
	V
		y		x
> 
? 	E 	#G 	J 
K 	Q 	S 	V 
W 	] 	0_ 	b 
 
 
!N 
"W
%
 	%
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                       ccache/language/elisp/runtime/value-slot.go                                                         0000644                 00000000751 15154557173 0014776 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4      h      ] g  guile	 	g  define-module*	 	 	g  language	g  elisp	g  runtime		g  
value-slot	
	 	g  filenameS	f  %language/elisp/runtime/value-slot.scm	g  set-current-module	 	 C 5      h(   g   ]4
5 4 >  "  G   C    _       g  m
		$  g  filenamef  %language/elisp/runtime/value-slot.scm
	
 		$
   C6                        ccache/language/elisp/runtime/macros.go                                                             0000644                 00000022453 15154557173 0014172 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0%      ] n 4        h      ] g  guile	 	g  define-module*	 	 	g  language	g  elisp	g  runtime		g  macros	
	 	g  filenameS	f  !language/elisp/runtime/macros.scm	g  importsS	 	 	 	g  set-current-module	 	 	g  
make-fluid	 	 	g  macro	g  function	g  lambda	g  macro-lambda	g  call-with-deferred-observers	 	 	g  module-export!	 	  	!g  current-module	"! 	#! 	$ 	%g  gensym	&g  lexical-let	'g  append	(' 	)' 	*g  macro-prog1	+* 	,g  progn	-g  prog1	.g  macro-prog2	/. 	0g  if	1g  nil	21 	3g  
macro-when	43 	5g  macro-unless	65 	7g  macro-error	8f  invalid clause in cond	9g  
macro-cond	:9 	;g  t	<g  	macro-and	=< 	>g  macro-or	?> 	@g  length	Af  invalid dotimes arguments	Bf  #expected symbol as dotimes variable	Cg  let	D
 	Eg  while	Fg  guile-primitive	Gg  <	HFG 	Ig  setq	Jg  1+	KFJ 	Lg  macro-dotimes	ML 	Nf  invalid dolist arguments	Og  not	PFO 	Qg  null?	RFQ 	Sg  car	TFS 	Ug  cdr	VFU 	Wf  "expected symbol as dolist variable	Xg  macro-dolist	YX 	Zf  catch with empty body	[g  catch	\F[ 	]g  with-always-lexical	^g  eq	_g  throw	`F_ 	ag  macro-catch	ba 	cf  #unwind-protect without cleanup code	dg  dynamic-wind	eFd 	f1 	gg  macro-unwind-protect	hg 	ig  	macro-pop	ji 	kg  cons	lg  
macro-push	ml C 5       h      ]4
5 4 >  "  G   4   h   p   -  1  3   C    h       g  cdr
			  g  filenamef  !language/elisp/runtime/macros.scm
					 			


   C5R4 #$     h   S   ] 45 6   K       g  filenamef  !language/elisp/runtime/macros.scm
	
 		
   C>  "  G  4%&) h0      - 1 3 45    4 5C            g  form1
			+ g  rest			+ g  temp			+  g  filenamef  !language/elisp/runtime/macros.scm
	%		
	&			&			'	 			+
   C5*R4 #+        h   S   ] 45 6   K       g  filenamef  !language/elisp/runtime/macros.scm
	$
 		
   C>  "  G  4,-   h       - 1 3   C              g  form1
			 g  form2			 g  rest				  g  filenamef  !language/elisp/runtime/macros.scm
	,			-	 				
	   C5.R4 #/     h   S   ] 45 6   K       g  filenamef  !language/elisp/runtime/macros.scm
	+
 		
   C>  "  G  40,2 h      - 1 3  C       g  	condition
			 g  thens			  g  filenamef  !language/elisp/runtime/macros.scm
	2			3	 			
   C53R4 #4     h   S   ] 45 6   K       g  filenamef  !language/elisp/runtime/macros.scm
	1
 		
   C>  "  G  401, h      - 1 3   C       g  	condition
			 g  elses			  g  filenamef  !language/elisp/runtime/macros.scm
	6			7	 			
   C55R4 #6     h   S   ] 45 6   K       g  filenamef  !language/elisp/runtime/macros.scm
	5
 		
   C>  "  G  4178%&0,        hp   ~  ] (  C 4L  5$  "  $  6(  #45     C Cv      g  tail
		p g  cur		p g  rest			p g  var		A	_  g  filenamef  !language/elisp/runtime/macros.scm
	@			A		
	B	
		C			D			D			D			C	
		F	!	!	F		$	F	.	)	F		-	E		1	G	 	5	G		8	H		<	E		=	I		A	I		E	J		J	J	+	M	J		a	O		d	O		f	O		i	P	!	j	O	 		p  g  nameg  iterate C       h       -  1  3 O Q  6           g  clauses
			 g  iterate		  g  filenamef  !language/elisp/runtime/macros.scm
	?			@	 			


   C59R4 #:     h   S   ] 45 6   K       g  filenamef  !language/elisp/runtime/macros.scm
	>
 		
   C>  "  G  4;02        h       ](   C 4L 5C       g  x
		  g  tail		   g  filenamef  !language/elisp/runtime/macros.scm
	Z			[			]			^			^			^	%		^			]	 			 	  g  nameg  iterate C   h8      )    3  C)   3  C- 1 3 O Q  6         g  x
		 g  x
	!	6 g  args	!	6 g  iterate		)	6  g  filenamef  !language/elisp/runtime/macros.scm
	V			W			V		)	Z	 			
 		 	!	6
   C5<R4 #=   h   S   ] 45 6   K       g  filenamef  !language/elisp/runtime/macros.scm
	U
 		
   C>  "  G  41%&0      h8      ]
(   C45    4L 5  C         g  x
		6 g  tail		6 g  var			6  g  filenamef  !language/elisp/runtime/macros.scm
	f			g			i			i			j		%	m		*	m		-	m	)	/	m		2	j	 		6	  g  nameg  iterate C  h8      )    3  C)   3  C- 1 3 O Q  6         g  x
		 g  x
	!	6 g  args	!	6 g  iterate		)	6  g  filenamef  !language/elisp/runtime/macros.scm
	b			c			b		)	f	 			
 		 	!	6
   C5>R4 #?   h   S   ] 45 6   K       g  filenamef  !language/elisp/runtime/macros.scm
	a
 		
   C>  "  G  4@7ABCDEH)IK h     - 1 3  $  (4 5	$  "  
4 5	"  $   6  $  "  4>  "  G    4	
   54 5	$    "  C           g  args
		  g  body		  g  t			4 g  var		L  g  count		L   g  filenamef  !language/elisp/runtime/macros.scm
	r			t			s			u			u			s		(	v		1	v		9	t		=	s		A	w		E	w		H	x		K	y		L	x		S	z		W	z	
	\	{		`	{		e	{		o	|	
  	  	  	  	  	  	 	|	
 		 
   C5LR4 #M      h   S   ] 45 6   K       g  filenamef  !language/elisp/runtime/macros.scm
	q
 		
   C>  "  G  4@7N%C&EPRIT)VW   h     - 1 3  $  (4 5	$  "  
4 5	"  $   6  45 $  l   	  
  4
   54 5	$    "   C6      g  args
		  g  body		  g  t			4 g  var		Q  g  	iter-list		Q  g  tailvar		Q   g  filenamef  !language/elisp/runtime/macros.scm
 		 		 		 		 		 		( 		1 		9 		= 		A 		E 		H 		K 		M 		Q 		Z 		^ 	
	` 	  	  	  	  	  	  	  	  	  	 		 
   C5XR4 #Y    h   T   ] 45 6   L       g  filenamef  !language/elisp/runtime/macros.scm
 
 		
   C>  "  G  47Z%&\]0^`  h     - 1 3 (  4>  "  G  "   45    45 45 45  	 
      C  ~      g  tag
		  g  body		  g  tagsym		*  g  	dummy-key		G  g  	elisp-key		N  g  value		U  g  arglist		`   g  filenamef  !language/elisp/runtime/macros.scm
 		 		 		 		 		& 		* 		. 		C 		G 		J 		N 		Q 		U 		` 		` 		d 	  	 		 
   C5aR4 #b       h   T   ] 45 6   L       g  filenamef  !language/elisp/runtime/macros.scm
 
 		
   C>  "  G  47cef    h@      - 1 3 (  4>  "  G  "      C           g  body
			< g  	clean-ups			<  g  filenamef  !language/elisp/runtime/macros.scm
 		 		 		 		 		' 	 			<
   C5gR4 #h        h   T   ] 45 6   L       g  filenamef  !language/elisp/runtime/macros.scm
 
 		
   C>  "  G  4-SIU      h    v   ]       C   n       g  	list-name
		  g  filenamef  !language/elisp/runtime/macros.scm
 		 	 		   C5iR4 #j       h   T   ] 45 6   L       g  filenamef  !language/elisp/runtime/macros.scm
 
 		
   C>  "  G  4Ik  h      ]   C            g  new-el
		 g  	list-name		  g  filenamef  !language/elisp/runtime/macros.scm
 		 	 			   C5lR #m    h   T   ] 45 6   L       g  filenamef  !language/elisp/runtime/macros.scm
 
 		
   C6         g  m
		(  g  filenamef  !language/elisp/runtime/macros.scm		
	)	
Y	$
	+
9	1
	5
	>

)	U
	a
	q
 
 
 
z 
 
 	
   C6                                                                                                                                                                                                                      ccache/language/elisp/runtime/subrs.go                                                              0000644                 00000056465 15154557173 0014056 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0]      ]  4   h      ] g  guile	 	g  define-module*	 	 	g  language	g  elisp	g  runtime		g  subrs	
	 	g  filenameS	f   language/elisp/runtime/subrs.scm	g  importsS	 	 	g  system	g  base	g  compile	 	 	 	g  set-current-module	 	 	g  
elisp-bool	g  eq	g  call-with-deferred-observers	 	 	g  module-export!	 	  	!g  current-module	"! 	#! 	$ 	%g  equal	&% 	'g  real?	(g  inexact?	)g  integer?	*g  floatp	+* 	,g  exact?	-g  integerp	.- 	/g  numberp	0/ 	1g  	wholenump	21 	3g  zerop	43 	5g  =	65 	7g  /=	87 	9g  <	:9 	;g  <=	<; 	=g  >	>= 	?g  >=	@? 	Ag  max	BA 	CA 	DA 	Eg  min	FE 	GE 	HE 	Ig  abs	JI 	KI 	LI 	Mg  exact->inexact	Ng  float	ON 	Pg  1+	QP 	RP 	SP 	Tg  1-	UT 	VT 	WT 	Xg  +	YX 	ZX 	[X 	\g  -	]\ 	^\ 	_\ 	`g  *	a` 	b` 	c` 	dg  modulo	eg  %	fe 	gg  floor	hg 	ig 	jg  ffloor	kj 	lg  ceiling	ml 	nl 	og  fceiling	po 	qg  truncate	rq 	sq 	tg  	ftruncate	ut 	vg  round	wv 	xv 	yg  fround	zy 	{g  consp	|{ 	}g  atomp	~} 	g  listp   g  nlistp   g  null   g  	nil-value g  car   g  cdr   g  car-safe   g  cdr-safe   g  nth   g  nthcdr   g  length       g  cons       g  list       g  	make-list       g  append       g  reverse       g  	copy-tree       g  runtime-error f  &too many arguments for number-sequence f   infinite list in number-sequence g  number-sequence   g  setcar   g  setcdr   g  reference-variable g  value-slot-module g  symbol-value   g  function-slot-module g  symbol-function   g  set-variable! g  set   g  fset   g  module-bound? g  resolve-interface g  module-variable g  resolve-module g  fluid? g  fluid-unset! g  variable-unset! g  
makunbound   g  fmakunbound   g  fluid-bound? g  boundp   g  fboundp   g  lambda g  fromS g  toS g  value f  list is not a function g  apply       g  funcall   g  throw     g  elisp-exception   g  t-value g  not   g  eval   g  compile-file g  load  C 5    hM  {  ]4
5 4 >  "  G     h      ] 6            g  a
		 g  b		  g  filenamef   language/elisp/runtime/subrs.scm
	 				!			!	 			  g  nameg  eq CR4 #$       h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	
 		
   C>  "  G     h      ] 6            g  a
		 g  b		  g  filenamef   language/elisp/runtime/subrs.scm
	$				%			%	 			  g  nameg  equal C%R4 #&    h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	#
 		
   C>  "  G  '()     h8      ]	4 5$  $4 5$  "  4 5"  6         g  num
		6 g  t		/  g  filenamef   language/elisp/runtime/subrs.scm
	*			+			+			,			,		%	-	#	,	-		6	+	 			6  g  nameg  floatp C*R4 #+  h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	)
 		
   C>  "  G  ,)       h       ]4 5$  4 5"  6          g  num
		  g  filenamef   language/elisp/runtime/subrs.scm
	0			1			1			2			1	 		  g  nameg  integerp C-R4 #.      h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	/
 		
   C>  "  G  ' h      ]4 56          g  num
		  g  filenamef   language/elisp/runtime/subrs.scm
	5			6			6	 		  g  nameg  numberp C/R4 #0       h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	4
 		
   C>  "  G  ,)       h0      ]4 5$  4 5$   
"  "  6             g  num
		*  g  filenamef   language/elisp/runtime/subrs.scm
	9			:			:			;			:			<		*	:	 		*  g  nameg  	wholenump C1R4 #2     h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	8
 		
   C>  "  G     h      ] 
6             g  num
		
  g  filenamef   language/elisp/runtime/subrs.scm
	?			@		
	@	 		
  g  nameg  zerop C3R4 #4 h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	>
 		
   C>  "  G     h      ] 6            g  num1
		 g  num2		  g  filenamef   language/elisp/runtime/subrs.scm
	E				F			F	 			  g  nameg  = C5R4 #6  h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	D
 		
   C>  "  G     h      ] 6           g  num1
		 g  num2		  g  filenamef   language/elisp/runtime/subrs.scm
	I				J		
	J			J	 			  g  nameg  /= C7R4 #8 h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	H
 		
   C>  "  G     h      ] 6            g  num1
		 g  num2		  g  filenamef   language/elisp/runtime/subrs.scm
	M				N			N	 			  g  nameg  < C9R4 #:  h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	L
 		
   C>  "  G     h      ] 6            g  num1
		 g  num2		  g  filenamef   language/elisp/runtime/subrs.scm
	Q				R			R	 			  g  nameg  <= C;R4 #< h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	P
 		
   C>  "  G     h      ] 6            g  num1
		 g  num2		  g  filenamef   language/elisp/runtime/subrs.scm
	U				V			V	 			  g  nameg  > C=R4 #>  h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	T
 		
   C>  "  G     h      ] 6            g  num1
		 g  num2		  g  filenamef   language/elisp/runtime/subrs.scm
	Y				Z			Z	 			  g  nameg  >= C?R4 #@ h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	X
 		
   C>  "  G  C   h      -  1  3  @ x       g  nums
			  g  filenamef   language/elisp/runtime/subrs.scm
	]			^	 			


  g  nameg  max CAR4 #D        h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	\
 		
   C>  "  G  G   h      -  1  3  @ x       g  nums
			  g  filenamef   language/elisp/runtime/subrs.scm
	a			b	 			


  g  nameg  min CER4 #H        h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	`
 		
   C>  "  G  KIR4 #L       h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	d
 		
   C>  "  G  ,M h      ]4 5$   6 C         g  num
		  g  filenamef   language/elisp/runtime/subrs.scm
	j			k			k			l	 		  g  nameg  float CNR4 #O h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	i
 		
   C>  "  G  RPR4 #S       h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	s
 		
   C>  "  G  VTR4 #W       h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	u
 		
   C>  "  G  ZXR4 #[       h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	w
 		
   C>  "  G  ^\R4 #_       h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	y
 		
   C>  "  G  b`R4 #c       h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	{
 		
   C>  "  G  dieR4 #f     h   R   ] 45 6   J       g  filenamef   language/elisp/runtime/subrs.scm
	}
 		
   C>  "  G  ijR4 #k       h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G  noR4 #p      h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G  stR4 #u      h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G  xyR4 #z      h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G    h      ] 6              g  el
			  g  filenamef   language/elisp/runtime/subrs.scm
 		 			 	 			  g  nameg  consp C{R4 #|       h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G    h      ] 6             g  el
		
  g  filenamef   language/elisp/runtime/subrs.scm
 		 		 		
 	 		
  g  nameg  atomp C}R4 #~      h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G    h      ] $  "   6          g  el
		  g  filenamef   language/elisp/runtime/subrs.scm
 		 		 		 		 		 	 		  g  nameg  listp CR4 #    h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G    h      ] $  "   6         g  el
		  g  filenamef   language/elisp/runtime/subrs.scm
 		 		 		 		 		 	 		  g  nameg  nlistp CR4 #   h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G    h      ] 6              g  el
			  g  filenamef   language/elisp/runtime/subrs.scm
 		 			 	 			  g  nameg  null CR4 #        h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G    h      ] (  C C        g  el
		  g  filenamef   language/elisp/runtime/subrs.scm
 		 		 	 		  g  nameg  car CR4 # h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G    h      ] (  C C        g  el
		  g  filenamef   language/elisp/runtime/subrs.scm
 		 		 	 		  g  nameg  cdr CR4 # h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G    h      ] $   CC       g  el
		  g  filenamef   language/elisp/runtime/subrs.scm
 		 			 		 	 		  g  nameg  car-safe CR4 #   h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G    h      ] $   CC       g  el
		  g  filenamef   language/elisp/runtime/subrs.scm
 		 			 		 	 		  g  nameg  cdr-safe CR4 #   h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G    hH     ] 
$  C"  #(  C
$  C" "       
      g  n
		A g  lst		A g  i			5 g  tail			5  g  filenamef   language/elisp/runtime/subrs.scm
 		 		
 		 		 		 	
	 		# 	
	& 		* 		- 	&	5 		5 	 		A	  g  nameg  nth CR4 #      h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G    h@     ] 
$  C"  "(  C
$  C" "        g  n
		? g  lst		? g  i			3 g  tail			3  g  filenamef   language/elisp/runtime/subrs.scm
 		 		
 		 		 	
	 		" 	
	( 		+ 	&	3 		3 	 		?	  g  nameg  nthcdr CR4 #     h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G  R4 #      h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G  R4 #      h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G  R4 #      h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G    h      ] 6             g  len
		
 g  obj		
  g  filenamef   language/elisp/runtime/subrs.scm
 		 	 		
	  g  nameg  	make-list CR4 #  h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G  R4 #      h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G  R4 #      h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G  R4 #      h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G  K        h     - 1 3 45	$  6(    C$  "  $  "  $  "   $    C"  W $  C"  ! $  C" 4 545"
$   $  "6"           g  from
		  g  rest		  g  t		5	L g  to		Y  g  sep		Y  g  t		b	w g  i	   g  result	    g  filenamef   language/elisp/runtime/subrs.scm
 		
 		 		 		 		 		" 		( 		- 		1 		4 	&	5 		5 		G 	.	I 		P 		X 		Y 		b 		b 		t 	'	{ 	  	9  	  	(  	  	  	;  	 	 	 	 	 	 	  	  	3  	9  	3  	3  	-  	'  	! 	&  	  	  	  	  	+  	  	  	 5		 
  g  nameg  number-sequence CR4 #      h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
 
 		
   C>  "  G        h(      ] (  (  "   "   C            g  cell
		# g  val		#  g  filenamef   language/elisp/runtime/subrs.scm

							 		#	  g  nameg  setcar CR4 #  h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
	
 		
   C>  "  G        h(      ] (  (  "   "   C            g  cell
		# g  val		#  g  filenamef   language/elisp/runtime/subrs.scm
							 		#	  g  nameg  setcdr CR4 #  h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm

 		
   C>  "  G          h      ] 6             g  sym
		
  g  filenamef   language/elisp/runtime/subrs.scm
		
	 		
  g  nameg  symbol-value CR4 #        h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm

 		
   C>  "  G          h      ] 6             g  sym
		
  g  filenamef   language/elisp/runtime/subrs.scm
		
	 		
  g  nameg  symbol-function CR4 #     h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm

 		
   C>  "  G          h      ] 6           g  sym
		 g  value		  g  filenamef   language/elisp/runtime/subrs.scm
"		#	 			  g  nameg  set CR4 #      h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
!
 		
   C>  "  G          h      ] 6           g  sym
		 g  value		  g  filenamef   language/elisp/runtime/subrs.scm
&		'	 			  g  nameg  fset CR4 #     h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
%
 		
   C>  "  G   	   h   1  ]	445 5$  i445 5$  945$  4>  "  G  "  4>  "  G  "  4>  "  G  "    C)      g  sym
	  g  var	"	y  g  filenamef   language/elisp/runtime/subrs.scm
*		+		+		+		+		,		,	"	",		",		'.		+.		,.	'	1.	/	3.	'	7.		8/		=/		B/		O0	 	   g  nameg  
makunbound CR4 #       h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
)
 		
   C>  "  G   	   h   2  ]	445 5$  i445 5$  945$  4>  "  G  "  4>  "  G  "  4>  "  G  "    C*      g  sym
	  g  var	"	y  g  filenamef   language/elisp/runtime/subrs.scm
4		5		5		5		5		6		7		"6		"6		'9		+9	
	,9	)	19	1	39	)	79		8:		=:		B:		O;	 	   g  nameg  fmakunbound CR4 #      h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
3
 		
   C>  "  G   	   hX   +  ]	445 5$  <445 5$  45$  45"  "  "  6   #      g  sym
		U g  var	$	N  g  filenamef   language/elisp/runtime/subrs.scm
?		B		B		B		A		C		C	"	$C		$C		)E		-E		.F		3F		5F		9F		:G		?G		AG		U@	 		U  g  nameg  boundp CR4 #     h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
>
 		
   C>  "  G   	   hX   ,  ]	445 5$  <445 5$  45$  45"  "  "  6   $      g  sym
		U g  var	$	N  g  filenamef   language/elisp/runtime/subrs.scm
K		N		N		N		M		O		O	#	$O		$O		)Q		-Q		.R		3R		5R		9R		:S		?S		AS		UL	 		U  g  nameg  fboundp CR4 #    h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
J
 		
   C>  "  G        hh   N  - 1 3  $  4 5"  > $  5 (  "   $  4 5"  	4	
 5"   @   F      g  func
			e g  args			e g  	real-func		[	e  g  filenamef   language/elisp/runtime/subrs.scm
Z		\		[		]		 ^		$[		*_		2`	%	4`	5	5`	 	9_		:a		Ba	0	Fa	<	Ha		Mb		Qb	*	Ub		[[		ee	 			e
  g  nameg  apply CR4 #  h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
Y
 		
   C>  "  G    h      - 1 3  6              g  func
			 g  args			  g  filenamef   language/elisp/runtime/subrs.scm
h		i	 			
  g  nameg  funcall CR4 # h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
g
 		
   C>  "  G          h      ] 6           g  tag
		 g  value		  g  filenamef   language/elisp/runtime/subrs.scm
n		o		o		o	 			  g  nameg  throw CR4 #  h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
m
 		
   C>  "  G          h   }   ] $  CC  u       g  x
		  g  filenamef   language/elisp/runtime/subrs.scm
t		u	 		  g  nameg  not CR4 #   h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
s
 		
   C>  "  G    h      ] 6       g  form
		  g  filenamef   language/elisp/runtime/subrs.scm
x		
y		y	%	y	 		  g  nameg  eval CR4 #     h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
w
 		
   C>  "  G    h       ]4 >  "  G  C         g  file
		  g  filenamef   language/elisp/runtime/subrs.scm
|		}		}		}	*	}	 		  g  nameg  load CR #     h   S   ] 45 6   K       g  filenamef   language/elisp/runtime/subrs.scm
{
 		
   C6   s      g  m
		(  g  filenamef   language/elisp/runtime/subrs.scm		
 	
	#
	)
	/
L	4
	8
		>

A	D
	H
	L

	P
I	T
	X
	\
	`
t	d
	i
D	s
	u
d	w
	y
	{
	}
 
5 
 
U 
 
 
' 
 
  
! 
# 
$X 
% 
' 
)n 
) 
* 
+ 
,a 
, 
-} 
. 
2 
4	
5y
6
7
9=!
:%
<)
?E3
Av>
CJ
FY
GZg
Hm
Is
K&w
L{
 @	M
   C6                                                                                                                                                                                                            ccache/language/elisp/runtime/function-slot.go                                                      0000644                 00000007034 15154557173 0015510 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4       hx      ] g  guile	 	g  define-module*	 	 	g  language	g  elisp	g  runtime		g  function-slot	
	 	g  filenameS	f  (language/elisp/runtime/function-slot.scm	g  
duplicatesS	g  last	 	g  importsS	g  subrs	 	 	g  macros	 	g  selectS	g  macro-lambda	g  lambda		g  macro-prog1	g  prog1		g  macro-prog2	g  prog2		 g  
macro-when	!g  when	" !	#g  macro-unless	$g  unless	%#$	&g  
macro-cond	'g  cond	(&'	)g  	macro-and	*g  and	+)*	,g  macro-or	-g  or	.,-	/g  macro-dotimes	0g  dotimes	1/0	2g  macro-dolist	3g  dolist	423	5g  macro-catch	6g  catch	756	8g  macro-unwind-protect	9g  unwind-protect	:89	;g  	macro-pop	<g  pop	=;<	>g  
macro-push	?g  push	@>?	A"%(+.147:=@ 	BA 	Cg  compile-tree-il	DC 	Eg  compile-progn	Fg  progn	GEF	Hg  
compile-if	Ig  if	JHI	Kg  compile-defconst	Lg  defconst	MKL	Ng  compile-defvar	Og  defvar	PNO	Qg  compile-setq	Rg  setq	SQR	Tg  compile-let	Ug  let	VTU	Wg  compile-lexical-let	Xg  lexical-let	YWX	Zg  compile-flet	[g  flet	\Z[	]g  compile-let*	^g  let*	_]^	`g  compile-lexical-let*	ag  lexical-let*	b`a	cg  compile-flet*	dg  flet*	ecd	fg  compile-with-always-lexical	gg  with-always-lexical	hfg	ig  compile-guile-ref	jg  	guile-ref	kij	lg  compile-guile-primitive	mg  guile-primitive	nlm	og  compile-while	pg  while	qop	rg  compile-function	sg  function	trs	ug  compile-defun	vg  defun	wuv	xg  compile-defmacro	yg  defmacro	zxy	{g  	compile-`	|g  `	}{|	~g  compile-quote	g  quote ~ GJMPSVY\_behknqtwz}  D  B  g  
re-exportsS g  eq g  equal g  floatp g  integerp g  numberp g  	wholenump g  zerop g  = g  /= g  < g  <= g  > g  >= g  max g  min g  abs g  float g  1+ g  1- g  + g  - g  * g  % g  ffloor g  fceiling g  	ftruncate g  fround g  consp g  atomp g  listp g  nlistp g  null g  car g  cdr g  car-safe g  cdr-safe g  nth g  nthcdr g  length g  cons g  list g  	make-list g  append g  reverse g  	copy-tree g  number-sequence g  setcar g  setcdr g  symbol-value g  symbol-function g  set g  fset g  
makunbound g  fmakunbound g  boundp g  fboundp g  apply g  funcall g  throw g  not g  eval g  load FILORUX[^adgjmpsvy|!$'*-0369<? ` g  set-current-module    C 5   h0   j   ]4
5	 4 >  "  G   Cb       g  m
		0  g  filenamef  (language/elisp/runtime/function-slot.scm
	
 		0
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                     ccache/language/elisp/compile-tree-il.go                                                            0000644                 00000104315 15154557173 0014210 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4  h      ] g  guile	 	g  define-module*	 	 	g  language	g  elisp	g  compile-tree-il		 	
g  filenameS	f  "language/elisp/compile-tree-il.scm	g  importsS	g  bindings	 	 	g  runtime	 	 	g  tree-il	 	 	g  system	g  base	g  pmatch	 	 	g  compile	 	 	g  srfi	g  srfi-1	  	!  	"g  srfi-8	#" 	$# 	%g  srfi-11	&% 	'& 	(g  srfi-26	)( 	*) 	+!$'* 		,g  exportsS	-g  compile-progn	.g  
compile-if	/g  compile-defconst	0g  compile-defvar	1g  compile-setq	2g  compile-let	3g  compile-lexical-let	4g  compile-flet	5g  compile-let*	6g  compile-lexical-let*	7g  compile-flet*	8g  compile-without-void-checks	9g  compile-with-always-lexical	:g  compile-guile-ref	;g  compile-guile-primitive	<g  compile-while	=g  compile-function	>g  compile-defmacro	?g  compile-defun	@g  	compile-`	Ag  compile-quote	B-./0123456789:;<=>?@A 	Cg  set-current-module	DC 	EC 	Fg  
make-fluid	Gg  bindings-data	Hg  disable-void-check	Ig  always-lexical	Jg  source-properties	Kg  location	Lg  
make-const	Mg  	nil-value	NM 	OM 	Pg  t-value	QP 	RP 	Sg  value-slot-module	TS 	US 	Vg  
value-slot	Wg  function-slot-module	XW 	YW 	Zg  function-slot	[g  ,	\g  unquote?	]g  ,@	^g  unquote-splicing?	_g  make-application	`g  make-primitive-ref	ag  call-primitive	bg  error	cg  report-error	dg  runtime-error	eg  make-module-ref	fg  ensure-fluid!	gg  generate-ensure-global	hg  make-sequence	ig  append	ji 	ki 	lg  map-globals-needed	mg  ensuring-globals	ng  with-fluids*	og  list	pg  map	qg  make-lambda	rg  make-lambda-case	sg  let-dynamic	tg  get-lexical-binding	ug  access-variable	vg  make-lexical-ref	wg  mark-global-needed!	xg  	fluid-ref	yg  reference-variable	zg  set-variable!	{g  make-lexical-set	|g  
fluid-set!	}g  nil	~g  length	f  ,expected symbol or list of 2 elements in let f  expected symbol in let g  process-let-bindings g  lexical g  all g  memq g  bind-lexically? g  reverse g  split-let-bindings g  for-each g  car g  compile-expr g  gensym g  make-let g  with-lexical-bindings g  generate-let g  generate-let* g  bind-arg-lexical? g  &rest f  'expected exactly one symbol after &rest g  required g  optional f  &invalid mode in split-lambda-arguments f  %expected symbol in argument list, got g  	&optional g  split-lambda-arguments f  expected list for argument-list f  function body must not be empty g  cons g  lset-intersection g  with-dynamic-bindings g  cdr g  make-conditional g  null? g  	make-void g  compile-lambda f  too many arguments to defvar g  string? f  0expected string as third argument of defvar, got f  expected symbol, got g  handle-var-def g  module-defined? g  resolve-interface g  
module-ref g  resolve-module g  fluid? g  find-operator g  contains-unquotes? g  unquote-cell? g  unquote-splicing-cell? g  process-backquote f  %non-pair expression contains unquotes f  $symbol-list construct has empty body g  and-map g  symbol? f  invalid symbol list g  with-added-symbols F  F  g  special-operator g  module-bound? g  fluid-bound? f  expected symbol in setq g  iterate g  make-letrec   g  lambda g  macro g  fromS g  toS g  value f  expected symbol as macro name f   expected symbol as function name g  compile-pair g  t g  compile-symbol g  valid-symbol-list-arg?   f  Invalid compiler options g  warningsS g  always-lexicalS f  "Invalid value for #:always-lexical f  Invalid compiler option g  process-options! g  make-bindingsC 5  h(t    ]4	
+,B5 4E >  "  G   4Fi5 GR4Fi5 HR4Fi5 IRJ        h       ]	 $  4 5(  CCC        g  x
		 g  props		  g  filenamef  "language/elisp/compile-tree-il.scm
	K
		L				L		
	M			M			N		 		  g  nameg  location CKRLO  h      ] 6      |       g  loc
		
  g  filenamef  "language/elisp/compile-tree-il.scm
	S
	
	T	 		
  g  nameg  	nil-value CMRLR h      ] 6      z       g  loc
		
  g  filenamef  "language/elisp/compile-tree-il.scm
	V
	
	W	 		
  g  nameg  t-value CPRRUVRYZR[      h      ] $   CC              g  sym
		  g  filenamef  "language/elisp/compile-tree-il.scm
	f
		g				g			g			g	 		  g  nameg  unquote? C\R]    h      ] $   CC              g  sym
		  g  filenamef  "language/elisp/compile-tree-il.scm
	i
		j				j			j			j	 		  g  nameg  unquote-splicing? C^R_` h       - 1 3  4 56             g  loc
			 g  sym			 g  args				  g  filenamef  "language/elisp/compile-tree-il.scm
	n
		o			o	 				
	  g  nameg  call-primitive CaRb        h      - 1 3 @        g  loc
			 g  args			  g  filenamef  "language/elisp/compile-tree-il.scm
	t
		u	 			
  g  nameg  report-error CcR_`bL       h(      - 1 3  4 54 56           g  loc
			$ g  msg			$ g  args				$  g  filenamef  "language/elisp/compile-tree-il.scm
	w
		y			y	,		y			z		"	z		$	x	 			$	
	  g  nameg  runtime-error CdR_efL h0      ] 4 54 54 5 6              g  loc
		) g  sym		) g  module			)  g  filenamef  "language/elisp/compile-tree-il.scm
 
	 		 	1	 		 		 		' 		) 	 			)	  g  nameg  generate-ensure-global CgRhklg  h      ]L  6    z       g  mod
		 g  sym		  g  filenamef  "language/elisp/compile-tree-il.scm
 		 	 			   C   h(      ] 44[ O 5 56              g  loc
		! g  bindings		! g  body			!  g  filenamef  "language/elisp/compile-tree-il.scm
 
	 		
 		 		! 	 		!	  g  nameg  ensuring-globals CmRan_`ope  h   q   ]LL  6   i       g  sym
		  g  filenamef  "language/elisp/compile-tree-il.scm
 		 	 		   Cqr 
       hX     ] 4 4 54 O 554 4 554 4	5	56     ~      g  loc
		S g  syms		S g  module			S g  vals			S g  body			S  g  filenamef  "language/elisp/compile-tree-il.scm
 
	 			 		 		 	-	 		 		( 		) 		. 		4 	1	6 		: 		; 		@ 		A 		E 	%	I 	2	J 	6	O 		Q 		S 	 		S	  g  nameg  let-dynamic CsRtGZ     h0   X  ]4[5$  6$  6 6      P      g  loc
		+ g  sym		+ g  module			+ g  handle-global			+ g  handle-lexical			+ g  handle-dynamic			+ g  lexical			+  g  filenamef  "language/elisp/compile-tree-il.scm
 
	 		 		 		 		 		# 		' 	$	+ 	 
		+	  g  nameg  access-variable CuRue    h   _   ] LLL 6   W       g  filenamef  "language/elisp/compile-tree-il.scm
 		 	 		
   Cv   h   u   ]L   6    m       g  lexical
		  g  filenamef  "language/elisp/compile-tree-il.scm
 		 	 		   CwGaxe     h0   z   ] 4[LL>  "  G  L 4L LL56   r       g  filenamef  "language/elisp/compile-tree-il.scm
 		 		 		  		- 	 		-
   C   h0      ]  O  O  O 6              g  loc
		) g  sym		) g  module			)  g  filenamef  "language/elisp/compile-tree-il.scm
 
	) 	 		)	  g  nameg  reference-variable CyRu_ezL        h0      ] L4L54LL 54LL5L 6            g  filenamef  "language/elisp/compile-tree-il.scm
 		 		 	#	 		 		 	$	) 		+ 	 			+
   C{     h   u   ]L  L 6  m       g  lexical
		  g  filenamef  "language/elisp/compile-tree-il.scm
 		 	 		   CwGa|e     h0   z   ] 4[LL>  "  G  L 4L LL5L6 r       g  filenamef  "language/elisp/compile-tree-il.scm
 		 		 		  		/ 	 		/
   C   h0      ]  O  O  O 6        g  loc
		/ g  sym		/ g  module			/ g  value			/  g  filenamef  "language/elisp/compile-tree-il.scm
 
	/ 	 		/	  g  nameg  set-variable! CzRp}~c  hP   #  ] $   C $  4 5	"  $  L 6 $  	  CL 6           g  b
		K  g  filenamef  "language/elisp/compile-tree-il.scm
 		 				 		 		 			 		 		 		  		! 		& 		* 			0 		2 		5 		6 		: 		= 		@ 		B 		I 	#	K 	 		K   C  h      ] O 6        g  loc
		 g  bindings		  g  filenamef  "language/elisp/compile-tree-il.scm
 
	 	 			  g  nameg  process-let-bindings CRZVItG 	 hX   G  ]&  C$  C$  ,[&  C4 5$  C[ 6C     ?      g  sym
		S g  module		S g  t			S g  always		(	Q g  t		=	Q  g  filenamef  "language/elisp/compile-tree-il.scm
 
	 		
 		 		 		 		! 		% 		( 		. 		2 		3 		5 		= 		Q 	 		S	  g  nameg  bind-lexically? CR      hh     ]"  O(  4545D45$  "" "           g  bindings
		c g  module		c g  tail			U g  lexical			U g  dynamic			U  g  filenamef  "language/elisp/compile-tree-il.scm
 
	 							"					"		'		+		.		1	&	4	 	@		C		H	.	K	(	U		U 		X 		Y 		c 	 		c	  g  nameg  split-let-bindings CRwG      h   q   ][ L 6   i       g  sym
		  g  filenamef  "language/elisp/compile-tree-il.scm
			 		   Cps   h   y   ] 6       q       g  el
			  g  filenamef  "language/elisp/compile-tree-il.scm
	"		=			/ 			   Ch     h   p   ]6   h       g  el
		  g  filenamef  "language/elisp/compile-tree-il.scm
&	(	&	5 		   C  h   p   ]6   h       g  el
		  g  filenamef  "language/elisp/compile-tree-il.scm
'	(	'	5 		   Ci        h   y   ] 6       q       g  el
			  g  filenamef  "language/elisp/compile-tree-il.scm
	"		=			/ 			   C h   y   ] 6       q       g  el
			  g  filenamef  "language/elisp/compile-tree-il.scm
	"		=			/ 			   CGhpsv        h   q   ]L   6    i       g  sym
		  g  filenamef  "language/elisp/compile-tree-il.scm
9	/	:	1 		   C    hH      ] L(  L4L56L4L5L 4LO L54L4L556         g  filenamef  "language/elisp/compile-tree-il.scm
2		3		"	.	"		6	.	'8	.	5"		:"	.	D"		F5	! 		F
   C      h   j  ]<4 54>  G 4O 45>  "  G  (  * 45454	 4
556454545	445455
 		
4[45 O 56       b      g  loc
	  g  module	  g  bindings		  g  body		  g  bind		  g  lexical		  g  dynamic		  g  lexical-syms		z  g  dynamic-syms	   g  all-syms		   g  vals	
    g  filenamef  "language/elisp/compile-tree-il.scm

									"		,		9		G#	
	L$		W		`"		e"	.	o"		q$		r&	#	z&		}'	# &	 (	 &	 )	 	 )	 &	 /	 1	 /	 +	 	 	  g  nameg  generate-let CRwG    h       ]4 L 5$  C[ L 6    {       g  sym
		  g  filenamef  "language/elisp/compile-tree-il.scm
F		G		G		H	 		   CphpG      h   h   ] LL 6       `       g  filenamef  "language/elisp/compile-tree-il.scm
[		[	3		[	* 			
   Cs   h     ] (  L4L56 4 54L 5$  745 L   4[  	 LO 56
L  L  4L 56      g  tail
	  g  sym	$  g  value		$  g  target		:	l  g  filenamef  "language/elisp/compile-tree-il.scm
L		M		N		N		O		P		!P	'	$P		$O		)Q		5Q		6R	 	:R		ET		JU		OV		PW		ZY		_Z		jW		lS		s]	"	w]		~_		`	 `	( `	 \	 	   g  nameg  iterate C       hP     ]4 54O 45>  "  G  O  Q 6             g  loc
		I g  module		I g  bindings			I g  body			I g  bind			I g  iterate		8	I  g  filenamef  "language/elisp/compile-tree-il.scm
C
	D		D		F		K		%F		8L	 		I	  g  nameg  generate-let* CRI h       ]	[&  C 6              g  arg
		 g  always		  g  filenamef  "language/elisp/compile-tree-il.scm
i
	j		k		k		k		l	 		  g  nameg  bind-arg-lexical? CRcb      h    ]b" (  /45454545
		
D" -&  $  "  $   645	45
454	$  	"  54	$  "  5
D$  45		$  	"  
	$  "  $   
"$   
"	6 
6&  *&  "l"""L            g  loc
	 g  args	 g  tail		 g  mode		 g  required		 g  optional		 g  lexical		 g  dynamic		 g  final-required		(	; g  final-optional			(	; g  final-lexical	
	(	; g  final-dynamic		(	; g  t		L	b g  rest		r  g  rest-lexical			{  g  final-required	
   g  final-optional	   g  final-lexical	   g  final-dynamic	   g  arg	 a g  bind-lexical		 a g  new-lexical	
 a g  new-dynamic	a  g  filenamef  "language/elisp/compile-tree-il.scm
n
	o		u		w		x		y		"z		(w		;{		B		D		Hu		K		L		L	
	\		^		_		f		l		n	
	q		r	
	u		{	
	~	! 	
 	! 	
 	  	) 	- 	  	
 	  	) 	- 	  	
 	 	 	 	 	 	
 	 	
 	 	" 	
 		"	
		#	#0	9	<	#E	,Y	]	a	g	j	l	
lu	p	tu	w	y	}				o	p	q	r	s	t	o	 S		  g  nameg  split-lambda-arguments CRcp     h   o   ]6   g       g  x
		  g  filenamef  "language/elisp/compile-tree-il.scm
			$ 		   C   h      ] C              g  name+sym
			 g  x			  g  filenamef  "language/elisp/compile-tree-il.scm
			"		 				   Ch      ] C              g  name+sym
			 g  x			  g  filenamef  "language/elisp/compile-tree-il.scm
			"		 				   C       h@   -  ]!4 54 54L 54L5D  %      g  args
		> g  syms		> g  pairs			> g  lexical-pairs		%	> g  dynamic-pairs		2	>  g  filenamef  "language/elisp/compile-tree-il.scm
												%		(		2		>	 		>  g  nameg  process-args CiwGV     h   q   ][ 6   i       g  sym
		  g  filenamef  "language/elisp/compile-tree-il.scm
			 		   CGGpqrpM   h   o   ]L 6g       g  x
		  g  filenamef  "language/elisp/compile-tree-il.scm
			 		   Chav{MsVv     h      ]L   6         g  name-sym
		  g  filenamef  "language/elisp/compile-tree-il.scm
	(			+		+		* 		   C     h   x  ]L4L LL4LO L5L4L4L55 4LL$  84L4L	4
LLL554LLL4L554L55"  4L5L(   "  4LL4LO L5 5 5 5	6      p      g  compiled-body
	2   g  filenamef  "language/elisp/compile-tree-il.scm
	
							#		(	(	2		2		5		?		@		E		K 	'	L	'	X		Y		b	)	j		k		s		x		 
	 	 	# 	 	 	 	 	 	 
   C     h8   q   ] [4L	54L	5LLLLLLLLL O 	6      i       g  filenamef  "language/elisp/compile-tree-il.scm
			
		
	2		 		2
   C    hH  <  ]$  "  4 >  "  G  (  4 >  "  G  "   4 >  G O Q 4>  G 
	4>  G 4$  	 "  >  G $  "  G 4	>  G 4>  G 4>  G 4>  "  G  	
[ O 
6       4      g  loc
	A g  args	A g  body		A g  required		NA g  optional		NA g  rest		NA g  lexical		NA g  dynamic		NA g  process-args		dA g  required-syms			vA g  required-pairs	
	vA g  required-lex-pairs		vA g  required-dyn-pairs		vA g  optional-syms	 A g  optional-pairs	 A g  optional-lex-pairs	 A g  optional-dyn-pairs	 A g  	rest-syms	 A g  
rest-pairs	 A g  rest-lex-pairs	 A g  rest-dyn-pairs	 A g  the-rest-sym	 A g  all-syms	 A g  all-lex-pairs	 A g  all-dyn-pairs	A  g  filenamef  "language/elisp/compile-tree-il.scm

												)		*		0		5		B		Q		l		y	 	 	 	 	! 	* 	6 	 	 	" 	+ 	 	 	 	# 	 	#			A	 "	A	  g  nameg  compile-lambda CR~c hP   F  ]$  :45$   6(  "  	45$   6C 6   >      g  loc
		M g  sym		M g  doc			M  g  filenamef  "language/elisp/compile-tree-il.scm

							
							)			$ 		* 	 	/ 	)	1 	 	2 		6		<!		?"		A!		I	*	M	 		M	  g  nameg  handle-var-def CRZ       h`   U  ] $  R445 5$  >445 545$  ["  $  &  CCCCC   M      g  sym
		] g  type		] g  op		)	Y g  op		?	Y  g  filenamef  "language/elisp/compile-tree-il.scm
(
	*			)		
+		+		+		)		,		,		),		),		,-		6-		?,		D.		H.		K.		Q.			T/		 		]	  g  nameg  find-operator CR\^      hP   3  ]	 $  @4 5$  "  4 5$  C4 5$  C 6C     +      g  expr
		K g  t		) g  t	7	I  g  filenamef  "language/elisp/compile-tree-il.scm
4
	5			5		
6		6		6		6	
	6	$	$6	7	&6	$	-6		08		58	"	78		78	
	G9	"	I9	 		K  g  nameg  contains-unquotes? CR~\  h(      ] $  4 5	$   6CC             g  expr
		"  g  filenamef  "language/elisp/compile-tree-il.scm
B
	C			C		
C		C		C		C	2	C	( 			"  g  nameg  unquote-cell? CR~^    h(      ] $  4 5	$   6CC             g  expr
		"  g  filenamef  "language/elisp/compile-tree-il.scm
E
	F			F		
F		F		F		F	;	F	( 			"  g  nameg  unquote-splicing-cell? CR~\^aicL   h     ]*45$  $  45$  "  45$  64 5$  45	"  $  45"  $  45"  $  	 
456	 $  45"  	4 56 6 6            g  loc
	  g  expr	  g  t			2 g  head		A  g  processed-tail		M  g  head-is-list-2		e  g  head-unquote		z  g  head-unquote-splicing	    g  filenamef  "language/elisp/compile-tree-il.scm
H
	I		I		J	
	J		K		K		)K	'	6K	
	;L		>L		AM		AM		DN	%	KN	<	MN	%	MM		RO	*	VO	%	WP	-	`P	*	eM		mQ	#	nR	(	sR	2	uR	(	zM	 S	, T	1 U	2 T	1 M	 V	 X	$ Y	$ Y	2 Y	$ W	 [	( \	$ ]	( ]	6 ]	( ^	( [	 a	 `	
 c	 1	 	  g  nameg  process-backquote CRchpi   h     ](  4 >  "  G  "   &  "  $  45"  $  "  4 >  "  G  [&   4	56&  "  	4
5Y4 4	5>  ZCZF            g  loc
	  g  fluid	  g  syms		  g  body		  g  old		c  g  new	    g  filenamef  "language/elisp/compile-tree-il.scm
i
	j			k		k		k		$l		(l		)l		0m		4m		5m	!	Fl		Kn		Qn		Xn		co		ir		mr		rq	(	|q	 t	! t	 u	 v	 t	 q	 q	( q	 	 	  g  nameg  with-added-symbols CR4hp    h      ] 456              g  loc
		 g  args		  g  filenamef  "language/elisp/compile-tree-il.scm
|
	}		}	 			   C5-R4Mhp    h`   
  ]"$  R$  ? 4545(  4 5"  4 4556CC         g  loc
		] g  args		] g  vx			[ g  vy			[ g  vx		 	Y g  vy		 	Y  g  filenamef  "language/elisp/compile-tree-il.scm

			)		0		<		=		H		M	*	W		Y	 		]	   C5.R4hzVL   h`   
  ]"$  R$  ?4 5$  $ 4 4554 5 6CCC         g  loc
		] g  args		] g  vx			[ g  vy			[ g  vx		 	Y g  vy		 	Y  g  filenamef  "language/elisp/compile-tree-il.scm

			%			3		8		A	-	I		J		U		W		 		]	   C5/R4haLVez     h     ]""  $  $  4 5$  z 4 4 4 4 4 554 554 	4
 554 554 54 45554 5 6CCC$  (   6","(        g  loc
	  g  args	  g  vx		  g  vy		  g  vx		$  g  vy		$  g  vx	   g  vy	    g  filenamef  "language/elisp/compile-tree-il.scm

			)			7		<		A		F		L		M		S		T		^		_		i		j		p		q		~			 	 	 	 	. 	 	 	 	
 		 	 	 	  	 	   C50R4hzVyc    hx     ] (   C 4 (  "  5$  54L54L  (  "  4L55CL6          g  args
		t g  last		t g  x			* g  sym		,	t g  val		,	t g  x		J	]  g  filenamef  "language/elisp/compile-tree-il.scm
												%					 	!	'	%	,		,			3		7		8		E		J	%	J		R		S	!	Z	%	^		j		k		r	!	t	 		t	  g  nameg  loop CM      h0      ]
 O  Q 44 556              g  loc
		) g  args		) g  loop			'  g  filenamef  "language/elisp/compile-tree-il.scm

				 	$		)	 		)	   C51R4V      h(      ]$   6C              g  loc
		! g  args		! g  vx			 g  vy			  g  filenamef  "language/elisp/compile-tree-il.scm

				 		!	   C52R4  h(      ]$   6C              g  loc
		! g  args		! g  vx			 g  vy			  g  filenamef  "language/elisp/compile-tree-il.scm

						 		!	   C53R4Z h(      ]$   6C              g  loc
		! g  args		! g  vx			 g  vy			  g  filenamef  "language/elisp/compile-tree-il.scm

				 		!	   C54R4V  h(      ]$   6C              g  loc
		! g  args		! g  vx			 g  vy			  g  filenamef  "language/elisp/compile-tree-il.scm

				 		!	   C55R4  h(      ]$   6C              g  loc
		! g  args		! g  vx			 g  vy			  g  filenamef  "language/elisp/compile-tree-il.scm

						 		!	   C56R4Z h(      ]$   6C              g  loc
		! g  args		! g  vx			 g  vy			  g  filenamef  "language/elisp/compile-tree-il.scm

				 		!	   C57R4I  h(      ]$   6C              g  loc
		! g  args		! g  vx			 g  vy			  g  filenamef  "language/elisp/compile-tree-il.scm

				 		!	   C59R4e    hP      ]"$  B$  /(  $  $   6CCCCC          g  loc
		M g  args		M g  vx			K g  vy			K g  vx		 	I g  vy		 	I  g  filenamef  "language/elisp/compile-tree-il.scm

			-	 	1		4	/	8		C	 		M	   C5:R4`        h(      ]$  (   6CC          g  loc
		% g  args		% g  vx			# g  vy			#  g  filenamef  "language/elisp/compile-tree-il.scm

			!	 		%	   C5;R4p_vhkMqr  h   l  ]B$  45 454 4 5  54 4 554	 454
 554 45	5	  	 6C      d      g  loc
	  g  args	  g  vx		  g  vy		  g  itersym		  g  compiled-body		#  g  	iter-call		:  g  	full-body		O  g  lambda-body		h  g  
iter-thunk		    
g  filenamef  "language/elisp/compile-tree-il.scm

										#		&		+	)	1	;	5	)	8	)	:		:		=		B	&	O		O		R		W	+	`	+	h		h		k		p	%	q	%	u	7	y	7	z 	7		% 	 	 %	 &	 '	 #	 $	 	   C5<R4yZ     h   B  ]2"  .$  %(  $  
 6CCC$  T$  ?&  )$  (  
 6"""{"w"s     :      g  loc
	  g  args	  g  vx			2 g  vy			2 g  vx		A  g  vy		A  g  vx		R  g  vy		R  g  vx		k  g  vy		k   
g  filenamef  "language/elisp/compile-tree-il.scm
*
	+		 .		$+		./		4+		-	 +	 		 	   C5=R4hzZ_eLmGc h     ]*$  $  $  p4 4 4 4 54 	54
 5 554 5 544 5>  "  G  C 6CC             g  loc
	  g  args	  g  vx		  g  vy		  g  vx		   g  vy		   g  tree-il		s   g  filenamef  "language/elisp/compile-tree-il.scm
1
	2		'4		+4		,7		1:		:>		?@		E@	*	G@	3	J@		KA		QA	+	SA		TB		aA		c>		e:		fC		q9		s7		s6			vD		yD	 E	 F	 D	 5	 5		 	 	   C5>R4hzZLc    hh     ]"$  V$  C$  ( 4 4 554 5 6 6CC             g  loc
		a g  args		a g  vx			_ g  vy			_ g  vx		 	] g  vy		 	]  g  filenamef  "language/elisp/compile-tree-il.scm
I
	J		'L		+L		0O		9R	-	EO		FU		QO		SN			YM		]M		 		a	   C5?R4   h(      ]$  (   6CC          g  loc
		% g  args		% g  vx			# g  vy			#  g  filenamef  "language/elisp/compile-tree-il.scm
W
	X		!Z	 		%	   C5@R4L    h(      ]$  (   6CC          g  loc
		% g  args		% g  vx			# g  vy			#  g  filenamef  "language/elisp/compile-tree-il.scm
\
	]		!_	 		%	   C5AR_yZp 	  hp     ]"45$   645$  4?6 $  4 5"  45456         g  loc
		m g  expr		m g  operator			m g  	arguments			m g  t			m g  t		.	m  g  filenamef  "language/elisp/compile-tree-il.scm
c
	d		e		d		g		g		g		f		%i		&j		,j		.j		.f		9l		Al		Ho		Lo		Mp		\s		ct		mn	 		m	  g  nameg  compile-pair CR}MPyV    h0      ]$   6$   6 6             g  loc
		* g  sym		*  g  filenamef  "language/elisp/compile-tree-il.scm
y
	z		{		z		 |			*}	
 		*	  g  nameg  compile-symbol CRKL h8      ]	4 5 $   6 $   6 6              g  expr
		1 g  loc			1  g  filenamef  "language/elisp/compile-tree-il.scm

														!		)		1	 		1  g  nameg  compile-expr CR h       ] &  C $   6C          g  value
		  g  filenamef  "language/elisp/compile-tree-il.scm

			
									 		  g  nameg  valid-symbol-list-arg? CRcI 
    hp   R  ] (  "   $  S (  	 6  $  C$  45$  \C6	6C    J      g  opt
		l g  key	.	j g  value		.	j  g  filenamef  "language/elisp/compile-tree-il.scm

															#		'	
	*		-		.	
	;		G		Q		]	!	a		f	"	j	 		l  g  nameg  process-options! CRGHImK 	      hH     ]45 Y4>  "  G  4 544 55ZD        g  expr
		F g  env		F g  opts			F g  compiled		*	?  g  filenamef  "language/elisp/compile-tree-il.scm

			 		%		!			$		*		-		0		<		F	 		F	  g  nameg  compile-tree-il CRC          g  m
		,  g  filenamef  "language/elisp/compile-tree-il.scm		
	-	=		6	=
	7	A		@	A
	A	F		J	F
6	K
	S
	V
	[		[
	]
	_
^	f
/	i
	n
	t
	w
1 
	 
y 
 
 
5 
 
J 
c 
"
(C
)i
0n
>
@Y
B0(
C4
DB
EE
IH
Li
L|
Mb
N
P
S
V
W
X
Y
Z
[
\
]z
^
_
c*
e	1
gI
i{W
jj\
m|c
ny
o
p
r
t"
 C	t$
   C6                                                                                                                                                                                                                                                                                                                    ccache/language/elisp/parser.go                                                                     0000644                 00000016746 15154557173 0012527 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] W 4       hL      ] g  guile	 	g  define-module*	 	 	g  language	g  elisp	g  parser		 	
g  filenameS	f  language/elisp/parser.scm	g  importsS	g  lexer	 	 	 	g  exportsS	g  
read-elisp	 	g  set-current-module	 	 	g  error	g  parse-error	g  
make-fluid	g  circular-definitions	g  make-hash-table	g  make-circular-definitions	g  circular-ref	f  invalid token for circular-ref	g  	hashq-ref	 f  undefined circular reference	!g  circular-def	"f  "invalid token for circular-define!	#g  
hashq-set!	$g  make-promise	%$ 	&$ 	'g  circular-define!	(g  promise?	)g  force	*g  force-promises!	+g  vector-length	,g  finish	-f  'lexer-buffer is not empty when finished	.g  peek	/g  get	0f  invalid lexer-buffer action	1g  make-lexer-buffer	2g  square-close	3g  paren-close	4f  got different token than peeked	5g  get-expression	6g  get-list	7g  dot	8g  length	9f  &expected exactly one element after dot	:g  quote	;::	<g  	backquote	=g  `	><=	?g  unquote	@g  ,	A?@	Bg  unquote-splicing	Cg  ,@	DBC	E;>AD 	Fg  quotation-symbols	Gg  eof	Hf  end of file during parsing	Ig  integer	Jg  float	Kg  symbol	Lg  	character	Mg  string	Ng  set-source-properties!	Og  source-properties	Pg  function	Qg  assq-ref	Rg  
paren-open	Sg  square-open	Tg  list->vector	Uf  expected expression, got	Vg  	get-lexerC 5       h0     ]4	
5 4 >  "  G         h      - 1 3 @              g  token
			 g  msg			 g  args				  g  filenamef  language/elisp/parser.scm
	"
		#	 				
	  g  nameg  parse-error CR4i5 R        h   y   ] 6   q       g  filenamef  language/elisp/parser.scm
	3
		4	 		
  g  nameg  make-circular-definitions CR   hH     ] &  "  4 >  "  G   4[5$  C 6        g  token
		G g  id	&	G g  value		2	G  g  filenamef  language/elisp/parser.scm
	6
		7			7			7			8			8			8		&	9		&	9		)	:		2	9		:	;		C	=		G	=	 		G  g  nameg  circular-ref CR!"#&    h   L   ] M C   D       g  filenamef  language/elisp/parser.scm
	I	 		
   C#      h   u   ] NL L 6m       g  
real-value
		  g  filenamef  language/elisp/parser.scm
	J			K			L	 		   C 	       h`   	  ] &  "  4 >  "  G  [ H44O 5>  "  G  O C          g  token
		\ g  value	*	\ g  table		*	\ g  id		*	\  g  filenamef  language/elisp/parser.scm
	C
		D			D			D			E			E			E		*	H		*	F		1	I		8	I		H	I	 		\  g  nameg  circular-define! C'R()*+        h     ] $  N4 5$   4 5"  4 >  "  G  4 5$   4 5C 6 $  \4 5"  H$  = 45$   45"  4>  "  G  "C
"C          g  data
	  g  len	e  g  i		k  g  el		y   g  filenamef  language/elisp/parser.scm
	U
		W				V		
	Y	
		Y			Y	
		Y			Z			Z	 		Z		 	Z	
	%	[	
	*	[		/	[	
	8	\	
	=	\		?	\	
	C	\		F	]		K	]	 	M	]		N	]	
	U	^		W	^	
	Z	_		^	V		_	`		e	`		k	a		p	b		t	b		y	c		y	c		|	d	 	d	 	e	& 	e	 	f	 	g	 	g	 	a	 *	   g  nameg  force-promises! C*R,-./0       hP      ]	 &  M$  6CM$  "  4L 5 N $  MC $  
MNC 6       g  action
		P g  result	@	H  g  filenamef  language/elisp/parser.scm
	t			u		
	u			v	
		w			w			z		#	{	!	)	{		2	|		@			E 		L 		P 	 		P   C      h      ]	H O C        g  lex
		 g  
look-ahead		  g  filenamef  language/elisp/parser.scm
	r
		s	 		  g  nameg  make-lexer-buffer C1R.23/456789       h     ]#4 5$  "  &  &4 5&  "  4>  "  G  C"  4 54 5C$  e	&  Y4 5&  "  4>  "  G  4 54
5$  "  4>  "  G  C"y"u             g  lex
	  g  	allow-dot	  g  close-square		  g  next			  g  type		  g  head		U	j g  tail		b	j g  tail	    g  filenamef  language/elisp/parser.scm
 
	 		 			 			 		 		 		 		 	!	  	/	$ 		% 		) 	 	+ 		, 		2 		7 		; 		@ 		I 		O 		U 		X 		b 		i 		j 		t 		x 		y 		} 	 	 	  	  	  	  	  	  	  	  	  	  	
  	  	  	  	
 .	 	  g  nameg  get-list C6REFR/GHIJKLMNOP5:<?BQFR6ST!'*U  h    ]!4 5$  6$  "  /$  "  !$  "  $  "  	$  ,$  4
45>  "  G  "   C$  54 5 $  4
45>  "  G  "   C$  "  !$  "  $  "  $  <454 5 $  4
45>  "  G  "   C$  24 5$  4
45>  "  G  "   C$  744 55$  4
45>  "  G  "   C$  6$  9454 54>  "  G  4>  "  G  C6             g  lex
	 g  token		 g  type		 g  result		e  g  result	   g  result	; g  result	Mv g  result	 g  setter	 g  expr	  
g  filenamef  language/elisp/parser.scm
 
	 		 			 			 		 		 		 		 		! 		* 		e 		e 		j 		n 		o 		t 		 	  	  	  	  	  	  	  	  	  	  	  	  		 	 	 	 	 	 	! 	, 	D 	E 	M 	R 	V 	W 	\ 	g 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 		 		 	 	 D	  g  nameg  get-expression C5RV1.G5, 	     hX   d  ]!45 Y4 54545&  "  454>  "  G  ZCZF \      g  port
		W g  lexer		S g  lexbuf			S g  next		$	S g  result		=	S  g  filenamef  language/elisp/parser.scm
 
	 	&	 		 		 		 		 		" 		$ 		$ 		) 		+ 		/ 		2 	
	7 		= 	
	@ 		D 		I 	 		W  g  nameg  
read-elisp CRC              g  m
		,  g  filenamef  language/elisp/parser.scm		
 	"
	1	
	1
	3
	6
	C
h	U

u	r
# 
% 	( 
F 
' 
 	)
   C6                           ccache/language/ecmascript/function.go                                                              0000644                 00000012561 15154557173 0014065 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0Y      ]  4        h      ] g  guile	 	g  define-module*	 	 	g  language	g  
ecmascript	g  function		 	
g  filenameS	f   language/ecmascript/function.scm	g  importsS	g  oop	g  goops	 	 	g  base	 	 	 	g  exportsS	g  *function-prototype*	g  *program-wrappers*	 	g  set-current-module	 	 	g  toplevel-define!	 	 	g  <js-program-wrapper>	 g  
make-class	!g  <js-object>	"g  nameS	#g  defined?	$# 	%# 	&g  is-a?	'& 	(& 	)g  <class>	*) 	+) 	,g  memq	-g  <object>	.- 	/- 	0g  class-precedence-list	10 	20 	3g  class-redefinition	43 	53 	6g  make-doubly-weak-hash-table	7g  make	8g  classS	9f  Function	:g  valueS	;g  *undefined*	<g  pput	=g  toString	>g  *this*	?g  format	@f  ~A	Ag  js-value	Bg  apply	Cg  with-fluid*	Dg  <js-array-object>	Eg  vector->list	Fg  js-array-vector	Gg  throw	Hg  	TypeError	Ig  call	Jg  pget	K7 	L7 	Mg  	<generic>	NM 	OM 	Pg  add-method!	QP 	RP 	Sg  <method>	TS 	US 	Vg  specializersS	Wg  <applicable>	Xg  <top>	YX 	ZX 	[g  formalsS	\g  o	]g  p	^\] 	_g  bodyS	`g  let	ag  wrapper	bg  	hashq-ref	cb\ 	dac 	ed 	fg  if	gJa] 	hJ] 	ifagh 	j`ei 	kj 	lg  make-procedureS	mg  	procedureS	ng  v	o\]n 	p<a]n 	qg  	prototypeS	r7:\89q 	sar 	ts 	ug  
hashq-set!	vu\a 	w`tvp 	xfapw 	y`ex 	zy 	{g  js-prototype	|\ 	}{a 	~fa} 	`e~    g  js-constructor a  fa  `e   C 5h    ]4	
5 4 >  "  G   "  +44 i!i   "5>  "  xG  "  q4%5$  b4(i+5$  K4,i/42i55$  -45i4 i!i   "5>  "  G  "  "t"  "l"  "d46i	5R47i!i89:;   h   h   -  1  3 C    `       g  args
			  g  filenamef   language/ecmascript/function.scm
		+ 			


   C5R4<ii=>?@A    h   w   ][ 4 56   o       g  this
		  g  filenamef   language/ecmascript/function.scm		"			"			"	 		
   C>  "  G  4<iiB>;CA    h   T   ] 4L 56      L       g  filenamef   language/ecmascript/function.scm		&	 		
   C&DAEF      h   t   ] 4L544L 55@ l       g  filenamef   language/ecmascript/function.scm		*		
	+			+	+		+			*	 		
   CGHB   hX      ]
[(  "  $   O 645$   O 6	
6             g  this-arg
		R g  array		R g  this			R  g  filenamef   language/ecmascript/function.scm		%				%			%			%		*	&			+	'			7	%		H	(			L	-		N	-		R	-		 		R	   C>  "  G  4<iiI>CA     h   \   ] 4L5L @   T       g  filenamef   language/ecmascript/function.scm		2			2	 		
   C h       - 1 3 [ O 6        g  this-arg
			 g  args			 g  this			  g  filenamef   language/ecmascript/function.scm		0	 			
   C>  "  G  4%J5  $  "  Ji $  !4J4LO"J5>  "  G  "   4RJi4LUVWiZ [^_klmbJ h(      ]
4 5$  66            g  o
		# g  p		# g  wrapper			#  g  filenamef   language/ecmascript/function.scm
	4
		5			5			6			7		#	8	 		#	   C5>  "  G  4%<5  $  "  <i $  !4<4LO"<5>  "  G  "   4R<i4LUVWiZZ [o_zlmb<7:89qu hX      ]4 5$  
64 	
54 >  "  G  6             g  o
		R g  p		R g  v			R g  wrapper			R g  wrapper		0	R  g  filenamef   language/ecmascript/function.scm
	:
		;			;			<			=			>		*	>	D	0	>		0	>		3	@	
	R	A	
 		R	   C5>  "  G  4%{5  $  "  {i $  !4{4LO"{5>  "  G  "   4R{i4LUVWi [|_lmb{ h       ]	4 5$  6C            g  o
		 g  wrapper		  g  filenamef   language/ecmascript/function.scm
	C
		D			D			E			F	 		   C5>  "  G  4%5  $  "  i $  !44LO"5>  "  G  "   Ri4LUVWi [|_lmb      h       ]	4 5$  6C            g  o
		 g  wrapper		  g  filenamef   language/ecmascript/function.scm
	I
		J			J			K			L	 		   C56            g  m
		, g  t
2 g  t
} g  t
	i	~ g  t


  g  filenamef   language/ecmascript/function.scm		
	1	
 		 	
 		 		7r		u	
v	!
5	$
	/
	4
v	:
	b	C

	I
 	
   C6                                                                                                                                                ccache/language/ecmascript/base.go                                                                  0000644                 00000047304 15154557173 0013155 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0N      ]0 4      h}      ] g  guile	 	g  define-module*	 	 	g  language	g  
ecmascript	g  base		 	
g  filenameS	f  language/ecmascript/base.scm	g  importsS	g  oop	g  goops	 	 	 	g  exportsS	g  *undefined*	g  *this*	g  <js-object>	g  *object-prototype*	g  js-prototype	g  js-props	g  js-prop-attrs	g  js-value	g  js-constructor	g  js-class	g  pget	g  	prop-keys	g  
prop-attrs	 g  prop-has-attr?	!g  pput	"g  has-property?	#g  pdel	$g  object->string	%g  object->number	&g  object->value/string	'g  object->value/number	(g  object->value	)g  ->primitive	*g  	->boolean	+g  ->number	,g  	->integer	-g  ->int32	.g  ->uint32	/g  ->uint16	0g  ->string	1g  ->object	2g  
call/this*	3g  	call/this	4g  lambda/this	5g  define-js-method	6g  
new-object	7g  new	8 !"#$%&'()*+,-./01234567 %	9g  set-current-module	:9 	;9 	<g  make-unbound	=< 	>< 	?g  
make-fluid	@g  defined?	A@ 	B@ 	Cg  is-a?	DC 	EC 	Fg  	<generic>	GF 	HF 	Ig  toplevel-define!	JI 	KI 	Lg  ensure-generic	ML 	NL 	Og  
make-class	Pg  	prototype	Qg  getterS	Rg  init-keywordS	Sg  	prototypeS	Tg  
init-thunkS	Ug  props	Vg  	init-formS	Wg  make-hash-table	XW	 	Yg  
init-valueS	Zg  value	[g  valueS	\g  constructor	]g  constructorS	^g  class	_f  Object	`g  classS	ag  nameS	bg  <class>	cb 	db 	eg  memq	fg  <object>	gf 	hf 	ig  class-precedence-list	ji 	ki 	lg  class-redefinition	ml 	nl 	og  make	po 	qo 	rg  add-method!	sr 	tr 	ug  <method>	vu 	wu 	xg  specializersS	yg  formalsS	zg  o	{z 	|g  bodyS	}g  hash-map->list	~g  lambda	g  k g  v   ~  z  }    g  make-procedureS g  	procedureS g  <string> g  p z  g  string->symbol   z    g  <top>     g  let g  h g  hashq-get-handle       g  if g  cdr   g  proto z                  g  or g  attrs z      g  and g  	hashq-ref         g  quote           g  attr z  z  e    z  g  ReadOnly    z  g  throw g  ReferenceError   z  g  
hashq-set!       !z    g  
DontDelete    z  g  begin !z        #z    "          g  with-fluid* g  make-syntax-transformer     g  macro g  $sc-dispatch     g  _ g  any ጤ g  syntax->datum     g  datum->syntax     g  syntax-violation     f  -source expression failed to match any pattern g  this g  	fluid-ref       g  toString g  format f  [object ~A] g  toLocaleString g  valueOf g  hasOwnProperty g  isPrototypeOf g  propertyIsEnumerable g  DontEnum g  
procedure? g  	TypeError g  default-value g  number? g  nan? g  string?g  string-lengthg  boolean?e  +nan.0g  string->numberg  inf?g  inexact->exactg  roundf  	undefined	f  null
f  truef  falsef  NaNf  0f  Infinityg  number->stringg  Booleang  Stringg  Numberg  mapg  	slot-set!g  initargszg  ctorz   g  not  7 z   !oS  "z! #" $g  new-o%g  apply&3z% '$& (' )C$ *)$z +(* ,#+ -, .- /. C 5      h7    ]4	
85 4; >  "  G   4>5 R4?i5 R4B5  $  "  4EiH5 $  14K4N4B5$  i"  5>  "  G  "   4B5  $  "  4EiH5 $  14K4N4B5$  i"  5>  "  G  "   4B5  $  "  4EiH5 $  14K4N4B5$  i"  5>  "  G  "   4B5  $  "  4EiH5 $  14K4N4B5$  i"  5>  "  G  "   4B5  $  "  4EiH5 $  14K4N4B5$  i"  5>  "  G  "   4B5  $  "  4EiH5 $  14K4N4B5$  i"  5>  "  G  "   " b4K4Oi  PQiRST       h   O   ] C   G       g  filenamef  language/ecmascript/base.scm
	*	 		
   C UQiVXTW  h   P   ] 	6H       g  filenamef  language/ecmascript/base.scm		+	' 		
   C QiY ZQiYR[ \QiYR] ^QiY_R`  a5>  " G  " 4B5$ 4Eid5$ ~4eih4ki55$ `4ni4Oi  PQiRST   h   O   ] C   G       g  filenamef  language/ecmascript/base.scm
	*	 		
   C UQiVXTW  h   P   ] 	6H       g  filenamef  language/ecmascript/base.scm		+	' 		
   C QiY ZQiYR[ \QiYR] ^QiY_R`  a5>  "  G  "  "
"  ""  "4B5  $  "  i $  !4K4qHa5>  "  G  "   4ti4qwxi y{|} h   n   ] C   f       g  k
		 g  v		  g  filenamef  language/ecmascript/base.scm
	2	 			   C     h   n   ]4 56 f       g  o
		  g  filenamef  language/ecmascript/base.scm
	1
		2	#		2	 		   C5>  "  G  4B5  $  "  i $  !4K4qHa5>  "  G  "   4ti4qwxii y|   h   }   ] 456 u       g  o
		 g  p		  g  filenamef  language/ecmascript/base.scm
	4
		5	
		5	 			   C5>  "  G  4B5  $  "  i $  !4K4qHa5>  "  G  "   4ti4qwxi y|        h8      ]44 55$  C4 5$  6C         g  o
		6 g  p		6 g  h			6 g  proto		#	6  g  filenamef  language/ecmascript/base.scm
	7
		8			8			8			8			9			:			;		#	;		+	<	
	3	=	 		6	   C5>  "  G  4B5  $  "  i $  !4K4qHa5>  "  G  "   4ti4qwxi y|        hP     ]
4 5$  44 55"  $  C4 5$  6C            g  o
		K g  p		K g  attrs				' g  t		'	K g  proto		9	K  g  filenamef  language/ecmascript/base.scm
	@
		A				A			B			B			B			B		'	A		3	C		9	C		A	D		I	E		J	F	 		K	   C5>  "  G  4B 5  $  "   i $  !4K 4qHa 5>  "  G  "   4t i4qwxi y|e       h      ]4 56              g  o
		 g  p		 g  attr			  g  filenamef  language/ecmascript/base.scm
	H
		I			I	 			   C5>  "  G  4B!5  $  "  !i $  !4K!4qHa!5>  "  G  "   4t!i4qwxi y|   h0      ]4 5$  
 64 56             g  o
		* g  p		* g  v			*  g  filenamef  language/ecmascript/base.scm
	K
		L			L			L			L			M			M			N		*	N	 
		*	   C5>  "  G  4B!5  $  "  !i $  !4K!4qHa!5>  "  G  "   4t!i4qwxii y|!   h      ] 456              g  o
		 g  p		 g  v			  g  filenamef  language/ecmascript/base.scm
	P
		Q	
		Q	 			   C5>  "  G  4B#5  $  "  #i $  !4K#4qHa#5>  "  G  "   4t#i4qwxi y| !   h0      ]4 5$  C4 >  "  G  C            g  o
		+ g  p		+  g  filenamef  language/ecmascript/base.scm
	S
		T			T			T			T			W	 		+	   C5>  "  G  4B#5  $  "  #i $  !4K#4qHa#5>  "  G  "   4t#i4qwxii y|#  h      ] 456        g  o
		 g  p		 g  v			  g  filenamef  language/ecmascript/base.scm
	Z
		[	
		[	 			   C5>  "  G  4B"5  $  "  "i $  !4K"4qHa"5>  "  G  "   4t"i4qwxi y|"   h0      ]
44 55$  C4 5$  6C        g  o
		/ g  p		/ g  proto			/  g  filenamef  language/ecmascript/base.scm
	]
		^			^			^			^			`			`		%	a		-	b	 
		/	   C5>  "  G   h      ] 6           g  this
		 g  f		  g  filenamef  language/ecmascript/base.scm
	e
		f	 			  g  nameg  
call/this* C2R43~   h       - 1 3    C         g  this
			 g  f			 g  args				  g  filenamef  language/ecmascript/base.scm
	h
		i	 				
	   C        h   p   ]	4 5L 4?6h       g  args
		 g  v			  g  filenamef  language/ecmascript/base.scm		h
 		   C h(   n   ]	4 5$   O @ 6 f       g  y
		' g  tmp		'  g  filenamef  language/ecmascript/base.scm
	h
 		'   C53R44~  h       - 1 3   C       w       g  formals
			 g  body			  g  filenamef  language/ecmascript/base.scm
	j
		k	 			
   C      h   p   ]	4 5L 4?6h       g  args
		 g  v			  g  filenamef  language/ecmascript/base.scm		j
 		   C h(   n   ]	4 5$   O @ 6 f       g  y
		' g  tmp		'  g  filenamef  language/ecmascript/base.scm
	j
 		'   C54R45!4  h(      - 1 3    C             g  object
			" g  name-and-args			" g  body				"  g  filenamef  language/ecmascript/base.scm
	l
		m			m			m			m	5		m	 			"	
	   C  h   p   ]	4 5L 4?6h       g  args
		 g  v			  g  filenamef  language/ecmascript/base.scm		l
 		   C h(   n   ]	4 5$   O @ 6 f       g  y
		' g  tmp		'  g  filenamef  language/ecmascript/base.scm
	l
 		'   C55RR4oii5i4!ii   h   s   ][ 4 56   k       g  this
		  g  filenamef  language/ecmascript/base.scm		s			s			s	 		
   C>  "  G  4!ii h   }   -  1  3 456  u       g  args
			  g  filenamef  language/ecmascript/base.scm		u			u			u			u	 			


   C>  "  G  4!ii     h      ] [C         		
   C>  "  G  4!ii     h       ]	[445 5$  CC          g  p
		 g  this		  g  filenamef  language/ecmascript/base.scm		y			y			y			y	 		   C>  "  G  4!ii       h   y   ]	[4 5C      q       g  v
		 g  this		  g  filenamef  language/ecmascript/base.scm	
	{			{	 		   C>  "  G  4!ii  h(      ]	[445 5$  4 5CC       g  p
		( g  this		(  g  filenamef  language/ecmascript/base.scm		}			}			}			}			~		"	~	#	$	~		%	~	 			(   C>  "  G       h      ] L 6          		
   CC  h`   U  ]4 545$  54 O 5$  45$  
	
 6CC$  
	
 6 CM      g  o
		` g  error?		` g  toString			` g  x		(	M  g  filenamef  language/ecmascript/base.scm
 
	 			 		 		 		 		 		 		( 		0 	
	1 		= 		A 		E 	"	G 		S 		W 		[ 	 	] 	 		`	  g  nameg  object->string C$R   h      ] L 6          		
   CC  h`   T  ]4 545$  54 O 5$  45$  
	
 6CC$  
	
 6 CL      g  o
		` g  error?		` g  valueOf			` g  x		(	M  g  filenamef  language/ecmascript/base.scm
 
	 			 		 		 		 		 		 		( 		0 	
	1 		= 		A 		E 	"	G 		S 		W 		[ 	 	] 	 		`	  g  nameg  object->number C%RC%       h       ]4 5$   6 C              g  o
		  g  filenamef  language/ecmascript/base.scm
 
	 		 		 	 		  g  nameg  object->value/string C&RC$        h       ]4 5$   6 C              g  o
		  g  filenamef  language/ecmascript/base.scm
 
	 		 		 	 		  g  nameg  object->value/number C'R&    h      ] 6z       g  o
		  g  filenamef  language/ecmascript/base.scm
 
	 	 		  g  nameg  object->value C(RC( h      ]4 5$   6 C       g  x
		  g  filenamef  language/ecmascript/base.scm
 
	 		 		 	 		  g  nameg  ->primitive C)R    h   3  ]	 $  { (  "  l $  "  V4 5$    
$  "  4 5"  $  "  4 5$  4 5
"  "  C  +      g  x
	  g  t		 g  t	5	M g  t	R	|  g  filenamef  language/ecmascript/base.scm
 
	 		 		 		 		' 		1 		4 	 	5 		D 	*	R 		a 		k 		l 		t 	  	  	 	   g  nameg  	->boolean C*RC% +  hh     ]4 5$   C4 5$  
 $  C
C (  
C &  C4 5$   64 5$  	 6
 6        g  x
		g  g  filenamef  language/ecmascript/base.scm
 
	 			 		 			 		! 		+ 		7 		9 			E 		L 		M 			W 		] 		a 		e 	"	g 	 		g  g  nameg  ->number C+R+        h@      ]	4 545$  
C
$  C45$  C456           g  x
		< g  n			<  g  filenamef  language/ecmascript/base.scm
 
	 			 		 		 		 		  		$ 		. 		4 	 	< 	 		<  g  nameg  	->integer C,R+       hx   P  ]4 545$  "  
$  "  45$  
C    4455
$         CC     H      g  x
		s g  n			s g  t			= g  t		#	: g  m		Y	s  g  filenamef  language/ecmascript/base.scm
 
	 			 		 		 		" 		# 		1 		A 		L 		M 	)	P 	9	X 	)	Y 		Y 		^ 		c 	
	n 		o 	 		s  g  nameg  ->int32 C-R+    h`     ]4 545$  "  
$  "  45$  
C    4455C            g  x
		Z g  n			Z g  t			= g  t		#	:  g  filenamef  language/ecmascript/base.scm
 
	 			 		 		 		" 		# 		1 		A 		L 		M 	 	P 	0	X 	 	Y 	 		Z  g  nameg  ->uint32 C.R+       h`     ]4 545$  "  
$  "  45$  
C      4455C            g  x
		Z g  n			Z g  t			= g  t		#	:  g  filenamef  language/ecmascript/base.scm
 
	 			 		 		 		" 		# 		1 		A 		L 		M 	 	P 	0	X 	 	Y 	 		Z  g  nameg  ->uint16 C/R	
 0& h   U  ] &  C (  C4 5$   $  CC4 5$   C4 5$  -4	 5$  
C 
$  C4 5$  C 64 56  M      g  x
		~  g  filenamef  language/ecmascript/base.scm
 
	
 		 		 		 		 			! 		' 		) 		, 	#	. 			8 		< 			F 		G 		Q 			S 		W 		\ 			^ 		` 		j 			l 		s 		v 		~ 	 		~  g  nameg  ->string C0R1oS[    hx     ] &  
 6 (  
 64 5$  	
 64 5$  
 64 5$  
 6 C            g  x
		r  g  filenamef  language/ecmascript/base.scm
 
	
 		 	$	 	1	 		 		 		" 	'	$ 		% 			/ 		= 		> 			H 		V 		W 			a 		o 	 		r  g  nameg  ->object C1Ro!  h   ~   ]L   6  v       g  pair
		  g  filenamef  language/ecmascript/base.scm
 				 		 		 	 		   C       h0      -  1  3 454O  >  "  G  C         g  pairs
			. g  o		.  g  filenamef  language/ecmascript/base.scm
 
	
 		 		 	 			.


  g  nameg  
new-object C6R4ii\6i>  "  G  4B75  $  "  7i $  !4K74qHa75>  "  G  "   t7i4qwxy|/oS     h      ] LL @       		
   CC7    hp   @  - 1 3 4 5$  L44 5$  "  54	O 54
5$  CC 6  8      g  o
			n g  initargs			n g  ctor			n g  t		&	9 g  o		;	d g  new-o		O	d  g  filenamef  language/ecmascript/base.scm
 
	
 		 		 		 		  	#	& 		; 		; 		> 		O 	
	R 		^ 		h 		j 		n 	 			n
   C56    
      g  m
		, g  t
	F	b g  t
   g  t
  g  t
Qm g  t
 g  t
 g  t
f{ g  t
 g  t
 g  t
		 g  t
 g  t
 g  t
CX g  t
s g  t
 g  t
  g  t
5U5j  g  filenamef  language/ecmascript/base.scm		
	-	%		/	%		1	%		4	%
	5	&		>	&
	?	(
	/	(	(
)	/	(9	(
_	1
	4
	7
		@
	H
	K
<	P
l	S
	Z
	]
	e
	o
	p		p
	r
I	t
	v
W	x
/	z
	|
  
" 
# 
$ 
%M 
& 
' 
) 
* 
, 
.@ 
/ 
1 
3 
50 
51 
5< 	5E 
5N 
 4	7
   C6                                                                                                                                                                                                                                                                                                                             ccache/language/ecmascript/spec.go                                                                  0000644                 00000002132 15154557173 0013163 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0B      ] ( 4      hm      ] g  guile	 	g  define-module*	 	 	g  language	g  
ecmascript	g  spec		 	
g  filenameS	f  language/ecmascript/spec.scm	g  importsS	g  system	g  base	 	 	g  parse	 	 	g  compile-tree-il	 	 	 	g  exportsS	 	g  set-current-module	 	 	g  invalidate-compilation-cache!	g  make-language	g  nameS	 g  titleS	!f  
ECMAScript	"g  readerS	#g  read-ecmascript/1	$g  	compilersS	%g  tree-il	&g  printerS	'g  writeC 5      h      ]4	
5 4 >  "  G   4i>   "  G  4i !"#     h   {   ] 6s       g  port
		 g  env		  g  filenamef  language/ecmascript/spec.scm
	 			 	# 			   C$%i &'i5
RC    x       g  m
		,  g  filenamef  language/ecmascript/spec.scm		
	-	
	K		 	!	 	
 	 
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                       ccache/language/ecmascript/parse.go                                                                 0000644                 00000432222 15154557173 0013352 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0z4     ]z 4    ho      ] g  guile	 	g  define-module*	 	 	g  language	g  
ecmascript	g  parse		 	
g  filenameS	f  language/ecmascript/parse.scm	g  importsS	g  system	g  base	g  lalr	 	 	g  tokenize	 	 	 	g  exportsS	g  read-ecmascript	g  read-ecmascript/1	g  make-parser	 	g  set-current-module	 	 	g  throw	g  syntax-error	 g  lexical-token	!  	"  	#g  and=>	$g  "source-location->source-properties	%g  make-tokenizer	&g  make-tokenizer/1	'g  call-with-input-string	(f   	)g  	read-char	*g  *eof-object*	+g  	lr-driver	,g  	*default*	-g  *error*	.,- 	/g  *eoi*	0/	% 	1g  lbrace	21	$ 	3g  lparen	43	# 	5g  lbracket	65	" 	7g  dot	87	! 	9g  	semicolon	:9	  	;g  +	<;	 	=g  -	>=	 	?g  ++	@?	 	Ag  --	BA	 	Cg  !	DC	 	Eg  ~	FE	 	Gg  break	HG	 	Ig  new	JI	 	Kg  var	LK	 	Mg  return	NM	 	Og  void	PO	 	Qg  for	RQ	 	Sg  switch	TS	 	Ug  while	VU	 	Wg  continue	XW	 	Yg  function	ZY	 	[g  this	\[	 	]g  with	^]	 	_g  if	`_	 	a	 	bg  delete	cb	 	dg  try	ed	
 	fg  do	gf		 	hg  typeof	ih	 	jg  null	kj	 	lg  true	ml	 	ng  false	on	 	pg  
Identifier	qp	 	rg  StringLiteral	sr	 	tg  NumericLiteral	ut	 	vg  RegexpLiteral	wv 	x.02468:<>@BDFHJLNPRTVXZ\^`acegikmoqsuw &	y,	 	zy 	{,	 	|{ 	},	 	~} 	,	  g  colon 	P    ,	    ,	    ,	    1	S  Y	R  p	Q  .468<>@BDFJP\cikmosuw  .2468:<>@BDFHJLNPRTVX\^`acegikmoqsuw % 1	W  .  3	[  .  3	\  .  ,	    3	^  p	]  .  9	`  p	_  .  3	a  .  3	b  .  3	c  .  9	e  .468<>@BDFJP\cikmosuw  p	g  .  .468J\kmosuw  9	m  p	l  .  ,	    t	t  .  g  rbracket 	v  g  comma 	u  .468<>@BDFJP\cikmosuw  g  rbrace 	~  p	}  r	|  t	{  .2468:<>@BDFHJLNPRTVX\^`acegikmow & ,	    9      .  ,    ,.    ,2  g  or    g  ?      ,6  g  &&      ,:  g  bor      ,>  g  ^      ,B  g  &      ,F  g  ==    g  !=    g  ===    g  !==      ,P  g  <    g  >    g  <=    g  >=    g  
instanceof    g  in      ,]  g  <<    g  >>    g  >>>      ,a  =   ;     ,d  g  *    g  %   g  /    ,h  ,r  ,u 	?  
A  g  =  g  +=  g  -=  g  *=  g  %=  g  <<=  g  >>=  g  >>>=  g  &=  g  bor=  g  ^=   !g  /="!  #	
 " $,v %3  &5  '7  ($%&' ),w *) +,	 ,5  -7  .+%,- /,	 0/ 1,	 21 3,	 43 5,	 65 7,	 87 9,	 :9 ;,	 <; =,	 >= ?,	 @? A,	 BA C,	 DC E,	 FE G,	 HG I,	 JI K,	 LK M,	 NM O,	 PO Q,	 RQ S,	 TS2468:<>@BDFHJLNPRTVXZ\^`acegikmoqsuw %U,	 VU W,	 XW Y,	 ZY [/  \.[ ] ^p  _.^ `p  ar  bt  c.`ab d,o ed f
	 gU  h.g ig  finallyji  kg  catchlk  m.jl n,q on p9  q.p r3  s.r tg  rparenut  vp  w.uv x9  y.x z,	 {z |9  }K  ~.468|<>@BDFJ}P\cikmosuw ,p  ,	  9  . ,	    ,	  ,	    ,	  9  . ,	  ,j  ,i  ,m  ,n  ,k  ,l  ,	  ,	  ,	  ,	      .468<>@BDFJP\cikmosuw     . t  . 	 { 	 } ,	    .     .   .2468:<>@BDFHJLNPRTVX\^`acegikmoqsuw &,	  ,	  ,(  ,   ,  ,!  ,"  ,#  ,$  ,'  ,)  ,%  ,&  ,*  ,s  ,t  p . t .468<>@BDFJP\cikmosuw ,~  p . ,  ,	  ,	 g  accept/  ,	  3	 . ,	  ,	  ,	  3
 . 3 . ,	  ,	 j ,	   t .  t . t .v ,	  1 	. 
t  .
 ,	  t . t . p . 9 .468<>@BDFJP\cikmosuw 9  . ,  ,,  ,0    !  ",4 #  $"# %,8 &! '%& (,< )" *() +,@ ,# -+, .,D /' 0& 1% 2$ 3./012 4,K 5, 6+ 7* 8) 9( :456789 ;,V <; =- >	
 "= ?,	 @? A,	 BA C,	 DC E,	 FE G,	 HG I,	 JI K,	 LK M1 N.46M8<>@BDFJP\cikmosuw O,	 PO Q,	 RQ S.`ab T,	 UT V,	 WV X,	 YX Z, [Z \6 ].\ ^,5 _^ `,9 a` b,= cb d,A ed f,E gf h,L ih j,M kj l,N ml n,O on p,X qp r,W sr t,Y ut v,Z wv x,[ yx z,\ {z |,^ }|  ~,_ ~  ,`   ,b   ,c   ,f  ,e  ,g  ,-  ,|  7 . ,{  ,y  t9 8 . ,	  : . t; .v p> . ,	  ,	  1A . tB . ,	 2468:<>@BDFHJLNPRTVXZ\^`acegikmoqsuw %pE . 1F . 1H . ,	  ,	 K  9M L . tN .468<>@BDFJP\cikmosuw 9P . 9S .468<>@BDFJP\cikmosuw ,	  ,	  ,	  ,	  f .468<>@BDFJP\cikmosuw ,	  h . ,}  ,z  ,	  1k . tl . tm . tn . ,	 g  elseo  ,	  1q . r . ,	 2468:<>@BDFHJLNPRTVXZ\^`acegikmoqsuw %,	  ,	  v g  caseu g  defaultt . ,	  ,	  9| .468<>@BDFJP\cikmosuw t . t .468<>@BDFJP\cikmosuw ,  t .468<>@BDFJP\cikmosuw 9  .  . ,3 # ,7 & ,; ) 	,? 
	, ,C /012 ,G 56789 ,H 56789 ,I 56789 ,J 56789 ,Q  ,R  ,S  ,T  ,U  t  . !,+ "! #,	 $# %,	 &% ',1 (' ),x *) +1 ,.+ -9 ..- / 0./ 1,	 21 3 4.3 5 6.5 7,	 87 9 :.9 ;,	 <; = >.= ?t @.? A,	 BA Ct D.4C68<>@BDFJP\cikmosuw E9 F.E G,	 HG It J.I Kt L.K Mt N.4M68<>@BDFJP\cikmosuw O,	 PO Q R.Q S,	 TS U,	 VU W,	 XW Y,	 Z	 [	 \!	 ]	 ^	 _	 `	 a	 b	 c	 d	 e	 f	 g	 h	 i	 j	 k	 l	 m	 n	 o	 p	 q	 r	 s	 t	 u	 v	 w	 x	 y	 z	 {	 |	 }YZ[\]^_`abcdefghijklmnopqrstuvwxyz{| $~ .~ ,	  ,	 2468:<>@BDFHJLNPRTVX\^`acegikmoqsuw % . ,	   . ,	   . ,	  t . t .468<>@BDFJP\cikmosuw ,	  ,	  ,	  t . ,/  ,	  ,	   . ,	 	 	 !	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	  $,	 2468:<>@BDFHJLNPRTVX\^`acegikmoqsuw %,	 2468:<>@BDFHJLNPRTVX\^`acegikmoqsuw %,	  ,	  ,	  ,	  t . ,	  ,	  ,	  ,	  ,	 2468:<>@BDFHJLNPRTVX\^`acegikmoqsuw %,	  ,	  ,	  ,	  xz|~#(*.02468:<>@BDFHJLNPRTVXZ\]_cefhmoqswy{~.	!$'*-3:<>@BDFHJLNPRSUWY[]_acegikmoqsuwy{}# 
 "$&(*,.02468:<>@BDFHJLNPRTVX}	I	&	F	'	D	(	B	)	@	*	>	+	<	,	:	-	8	.	6	/	5	0	4	1	3	2	2	3	1	4	0	5	-	6	,	7	+	8	(	9	%	:	$	; 	!	<	 	=		>		?		@		A		B		C		D			E
		F		G		H			I		J		K		L		M		N	O 	
 *	2	T	0	U 
		V 	
 &			X 	2	Y 
	I	Z  	2	d!  
"	I	f#" $		h%		i&$% '	,	j(	+	k)'( *	2	n+* 
,	2	o-, 
.	2	p/. 
0	2	q10 
2	2	r32 
4	2	s54 
6	F	w7	'	x8	&	y9678 :	I	z;: <	*	=	) >	
 ?	 @<= 	
>? )A	H BA C	. DC E	. FE G	 H 	
G (I	 J 	
I &K<= L 	
>? 'M	# N	" OMN P	I QP R	I SR T	 ŌUT V	I ǌWV X	I ȌYX Z	J ˌ[	G ̌\	E ͌]	C Ό^	A ό_	? Ќ`	= ьa	; Ҍb	9 ӌc	7 Ԍd	5 Ռe	0 ֌fZ[\]^_`abcde g	 ٌhg i	. یji k	F ߌlk m	 猤n 	
m &o	F 茤po q	F 錤rq s	@ ꌤts u	> 댤vu w	< 쌤xw y	: 팤zy {	8 |{ }	6 ~} 	6  	6  	6  	5  	5  	5  	5  	5  	5  	3  	3  	3  	3  	3  	2  
	2  
	2  
	F 	I 	F	/ 	I 		 	# 	 		 	I 	H. 	F/ 	0 	F2	'3 	F4 	*5 	< 	I= 	? 	
 &	@ 	
 &	C	D 	
 *	G 	
 &	I 	J 	IO 	GQ	0R\]^_`abcd 	IT 	GU\]^_`abcd 	AV_`abcd 	?W`abcd 	=Xabcd 	;Ybcd 	9Zcd 	7[d 	7\d 	7]d 	7^d 	5_ 	5` 	5a 	5b 	5c 	Id 	Ge\]^_`abcd 	Fg 	Fi  	Fj  	p 	
 *	s 	
 *	w	x	y	 
	Iz
 	{ 	I} 	~ 	
 &	I 	I 	F 	 	
 *		 	 	
 &	 	
 * 	I!  "	#" $	%	&$% '	I(' )	* 	
) &+	, 	
+ &-	. 	
- &/	I0/ 1	G21\]^_`abcd 3	4 	
3 &5	6 	
5 *7	
8 	
7? '9% :	; 	
: &<	= 	
< &>	I?> @	A 	
@ &B	C 	
B &D	E 	
D &F	
G 	
F? 'H	I 	
H &J	K 	
J &L	M 	
L &N	O 	
N &Pg  lambdaQg  appendRQ SQ Tg  beginUT Vg  blockWg  for-inXg  refYW ZG [M \ ]g  label^ _g  string`g  regexpag  numberbg  string->numbercg  string-appenddf  .eg  number->stringfg  arraygf hg  unquote-splicingig  $2jhi kfj la
 ml ng  objecton pg  string->symbolqg  arefrg  prefs tg  callug  postincvg  postdecwg  preincxg  predecyg  andC 5    h    ]4	
5 4 >  "  G   "#$      hp     - . , 3 #  "   6$  <&  / 45	$  "  
6""         g  message
		m g  token		m g  t		M	b  g  filenamef  language/ecmascript/parse.scm
	
		!		&	!		&			)			-			0			:			>			D			H			M			M			_			e		 		m  g  nameg  syntax-error CR%   h      ]	45 4 56         g  port
		 g  parse		  g  filenamef  language/ecmascript/parse.scm
	#
		$			$			%			%	 		  g  nameg  read-ecmascript CR&   h      ]	45 4 56         g  port
		 g  parse		  g  filenamef  language/ecmascript/parse.scm
	'
		(			(			)			)	 		  g  nameg  read-ecmascript/1 CR4'i()i5*R+!#&)+-/1359;@BDFHJKLOQSUWYfhjlnprtvxz|~	!#&(*,.024689;=?ACEGIKMO" h      ] $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "   C             g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $1		p   	 	   C"    hX      ] $  &  		"  "  $  &  	"   "   6           g  ___stack
		T g  ___sp		T g  ___goto-table			T g  ___push			T g  
yypushback			T g  tok			T g  $1		+	T  		T	   C"*    hP      ] $  &  
	"   "   $  &  	"   "   6        g  ___stack
		O g  ___sp		O g  ___goto-table			O g  ___push			O g  
yypushback			O g  tok			O  		O	   C"      hX      ] $  &  		"  "  $  &  	"   "   	6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      hX      ] $  &  		"  "  $  &  	"   "   	6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"KP h  p  ]M $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    			$  	&  
		"   "   	$  	&  		"   "    		

$  
&  

	"   "   
$  
&  	
"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		   	6       h      g  ___stack
		 g  ___sp		 g  ___goto-table			 g  ___push			 g  
yypushback			 g  tok			 g  tok		M	 g  $6		p	 g  tok	 	 g  tok		 	 g  tok	
!	 g  tok	f	 g  $2		 g  tok		  g  filenamef  language/ecmascript/parse.scm	K	Y 			   C"KP     h`    ]] $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    			$  	&  
		"   "   	$  	&  		"   "    		

$  
&  	
	"  
"  

$  
&  	
"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		    	6            g  ___stack
	Z g  ___sp	Z g  ___goto-table		Z g  ___push		Z g  
yypushback		Z g  tok		Z g  tok		MZ g  $7		pZ g  tok	 Z g  tok		 Z g  tok	
!Z g  $4	DZ g  tok	kZ g  tok	Z g  $2	Z g  tok	Z  g  filenamef  language/ecmascript/parse.scm?	L	m 	Z	   C"P  h  K  ]= $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    			$  	&  
		"   "   	$  	&  		"   "    		

$  
&  

	"   "   
$  
&  	
"   "    	$  &  
	"   "   $  &  	"   "   		  	6     C      g  ___stack
	 g  ___sp	 g  ___goto-table		 g  ___push		 g  
yypushback		 g  tok		 g  tok		M g  $5		p g  tok	  g  tok		  g  tok	
! g  tok	f  g  filenamef  language/ecmascript/parse.scm	M	M 		   C"P    h   ^  ]E $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    			$  	&  
		"   "   	$  	&  		"   "    		

$  
&  

	"   "   
$  
&  	
"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		 	6      V      g  ___stack
	 g  ___sp	 g  ___goto-table		 g  ___push		 g  
yypushback		 g  tok		 g  tok		M g  $6		p g  tok	  g  tok		  g  tok	
! g  tok	f g  tok	  g  filenamef  language/ecmascript/parse.scm	N	X 		   C"P h   p  ]M $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    			$  	&  
		"   "   	$  	&  		"   "    		

$  
&  	
	"  
"  

$  
&  	
"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		 	6h      g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $6		p  g  tok	   g  tok		   g  tok	
!  g  $3	D  g  tok	k  g  tok	   g  filenamef  language/ecmascript/parse.scm	O	a 	 	   C"P       hP    ]U $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    			$  	&  
		"   "   	$  	&  		"   "    		

$  
&  	
	"  
"  

$  
&  	
"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		  	6     {      g  ___stack
	K g  ___sp	K g  ___goto-table		K g  ___push		K g  
yypushback		K g  tok		K g  tok		MK g  $7		pK g  tok	 K g  tok		 K g  tok	
!K g  $4	DK g  tok	kK g  tok	K g  tok	K  g  filenamef  language/ecmascript/parse.scm:	P	l 	K	   C"       hX      ] $  &  		"  "  $  &  	"   "   	 6       g  ___stack
		X g  ___sp		X g  ___goto-table			X g  ___push			X g  
yypushback			X g  tok			X g  $1		+	X  g  filenamef  language/ecmascript/parse.scm	T	Q	' 		X	   C"S   h   $  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		4	 56       g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	R	A 	 	   C"      hX      ] $  &  		"  "  $  &  	"   "   	6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"TS        h   a  ]% $  &  		"  "  $  &  	"   "    	$  &  		"  "  $  &  	"   "   		"   "  0$  %&  4 5"  ""  " 	6   Y      g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R  g  $1		u   	g  filenamef  language/ecmascript/parse.scm 	V	9 	T	4 	T	= 	T	4 	T	M 	T	V 	T	8 	U	9 	U	C 	U	9 	 	   C" hX      ] $  &  		"  "  $  &  	"   "   	6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   CU     h      ]
	 
6             g  ___stack
		 g  ___sp		 g  ___goto-table			 g  ___push			 g  
yypushback			  g  filenamef  language/ecmascript/parse.scm			X	 			   C"       hX      ] $  &  		"  "  $  &  	"   "   	6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      hX      ] $  &  		"  "  $  &  	"   "   	6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      hX      ] $  &  		"  "  $  &  	"   "   	6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      hX      ] $  &  		"  "  $  &  	"   "   	6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      hX      ] $  &  		"  "  $  &  	"   "   	6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      hX      ] $  &  		"  "  $  &  	"   "   	6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      hX      ] $  &  		"  "  $  &  	"   "   	6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      hX      ] $  &  		"  "  $  &  	"   "   	6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      hX      ] $  &  		"  "  $  &  	"   "   	6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      hX      ] $  &  		"  "  $  &  	"   "   	6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      hX      ] $  &  		"  "  $  &  	"   "   	6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      hX      ] $  &  		"  "  $  &  	"   "   	6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      hX      ] $  &  		"  "  $  &  	"   "   	6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      hX      ] $  &  		"  "  $  &  	"   "   	6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"V   h     ]% $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   			 6   
      g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $2		p  g  tok	    	g  filenamef  language/ecmascript/parse.scm 	i	* 	 	   C"        hX      ] $  &  		"  "  $  &  	"   "   	
6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"TS        h   a  ]% $  &  		"  "  $  &  	"   "    	$  &  		"  "  $  &  	"   "   		
"   "  0$  %&  4 5"  ""  " 	6   Y      g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R  g  $1		u   	g  filenamef  language/ecmascript/parse.scm 	m	3 	k	. 	k	7 	k	. 	k	G 	k	P 	k	2 	l	3 	l	= 	l	3 	 	   C"K       h      ] $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		 	6           g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R   g  filenamef  language/ecmascript/parse.scm 	o	6 	 	   C"   hX      ] $  &  		"  "  $  &  	"   "   	 6       g  ___stack
		X g  ___sp		X g  ___goto-table			X g  ___push			X g  
yypushback			X g  tok			X g  $1		+	X  g  filenamef  language/ecmascript/parse.scm	T	p	4 		X	   C"S   h   $  ]- $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		4	 56       g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $2		p  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	q	R 	 	   C"      hX      ] $  &  		"  "  $  &  	"   "   	 6       g  ___stack
		X g  ___sp		X g  ___goto-table			X g  ___push			X g  
yypushback			X g  tok			X g  $1		+	X  g  filenamef  language/ecmascript/parse.scm	T	r	< 		X	   C"S   h   $  ]- $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		4	 56       g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $2		p  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	s	^ 	 	   C"      hX      ] $  &  		"  "  $  &  	"   "   	 6       g  ___stack
		X g  ___sp		X g  ___goto-table			X g  ___push			X g  
yypushback			X g  tok			X g  $1		+	X  g  filenamef  language/ecmascript/parse.scm	T	t	' 		X	   C"      h     ]% $  &  		"  "  $  &  	"   "    	$  &  		"  "  $  &  	"   "   		  	6           g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R  g  $1		u   	g  filenamef  language/ecmascript/parse.scm 	u	3 	 	   C"  hX      ] $  &  		"  "  $  &  	"   "   	 6       g  ___stack
		X g  ___sp		X g  ___goto-table			X g  ___push			X g  
yypushback			X g  tok			X g  $1		+	X  g  filenamef  language/ecmascript/parse.scm	T	v	+ 		X	   C"      h     ]% $  &  		"  "  $  &  	"   "    	$  &  		"  "  $  &  	"   "   		  	6           g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R  g  $1		u   	g  filenamef  language/ecmascript/parse.scm 	w	7 	 	   C"  h      ] $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		 	6              g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R   	 	   C"    h      ] $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		 	6              g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R   	 	   C"U hP      ] $  &  
	"   "   $  &  	"   "   	6       g  ___stack
		P g  ___sp		P g  ___goto-table			P g  ___push			P g  
yypushback			P g  tok			P  g  filenamef  language/ecmascript/parse.scm	L	{	! 		P	   C"      h      ] $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "   		 	6              g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $1		p   	 	   C"_  h    ]U $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "    		$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   			 
6 z      g  ___stack
	 g  ___sp	 g  ___goto-table		 g  ___push		 g  
yypushback		 g  tok		 g  $7		+ g  tok		R g  tok	  g  $5		  g  tok	
  g  tok	& g  $3	I g  tok	p g  tok	  g  filenamef  language/ecmascript/parse.scm		I 		   C"_      hx  K  ]= $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "    		$  &  
	"   "   $  &  	"   "   			 6  C      g  ___stack
	v g  ___sp	v g  ___goto-table		v g  ___push		v g  
yypushback		v g  tok		v g  $5		+v g  tok		Rv g  tok	 v g  $3		 v g  tok	
 v g  tok	&v  g  filenamef  language/ecmascript/parse.scmk 	: 	v	   C"f     h   r  ]M $  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    			$  	&  
		"   "   	$  	&  		"   "    		

$  
&  

	"   "   
$  
&  	
"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		 	6j      g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  tok	   g  $5	   g  tok		   g  tok	
!  g  tok	f  g  $2	  g  tok	   g  filenamef  language/ecmascript/parse.scm 	Q 	 	   C"U      hx  K  ]= $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "    		$  &  
	"   "   $  &  	"   "   			 6  C      g  ___stack
	v g  ___sp	v g  ___goto-table		v g  ___push		v g  
yypushback		v g  tok		v g  $5		+v g  tok		Rv g  tok	 v g  $3		 v g  tok	
 v g  tok	&v  g  filenamef  language/ecmascript/parse.scmk 	D 	v	   C"Q     h  L  ]= $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    			$  	&  
		"   "   	$  	&  		"   "    		

$  
&  

	"   "   
$  
&  	
"   "    	$  &  
	"   "   $  &  	"   "   		  	6   D      g  ___stack
	 g  ___sp	 g  ___goto-table		 g  ___push		 g  
yypushback		 g  tok		 g  $6		+ g  tok		R g  tok	  g  tok		  g  tok	
! g  tok	f  g  filenamef  language/ecmascript/parse.scm 	K 		   C"Q    h  q  ]M $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "    		$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   			 
6      i      g  ___stack
	 g  ___sp	 g  ___goto-table		 g  ___push		 g  
yypushback		 g  tok		 g  $7		+ g  tok		R g  tok	  g  $5		  g  tok	
  g  tok	& g  tok	k g  tok	  g  filenamef  language/ecmascript/parse.scm 	V 		   C"Q       h  q  ]M $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    			$  	&  			"  	"  	
	$  	&  		"   "    		$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		
 	6      i      g  ___stack
	 g  ___sp	 g  ___goto-table		 g  ___push		 g  
yypushback		 g  tok		 g  $7		+ g  tok		R g  tok	  g  tok		  g  $4	
  g  tok	& g  tok	k g  tok	  g  filenamef  language/ecmascript/parse.scm 	V 		   C"Q       hX    ]] $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "    		$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   			  	6           g  ___stack
	S g  ___sp	S g  ___goto-table		S g  ___push		S g  
yypushback		S g  tok		S g  $8		+S g  tok		RS g  tok	 S g  $6		 S g  tok	
 S g  tok	&S g  $4	IS g  tok	pS g  tok	S g  tok	S  g  filenamef  language/ecmascript/parse.scm? 	a 	S	   C"Q  h  q  ]M $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    			$  	&  
		"   "   	$  	&  		"   "    		

$  
&  	
	"  
"  

$  
&  	
"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		 	6      i      g  ___stack
	 g  ___sp	 g  ___goto-table		 g  ___push		 g  
yypushback		 g  tok		 g  $7		+ g  tok		R g  tok	  g  tok		  g  tok	
! g  $3	D g  tok	k g  tok	  g  filenamef  language/ecmascript/parse.scm 	Z 		   C"Q       hX    ]] $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "    		$  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   			  	6           g  ___stack
	S g  ___sp	S g  ___goto-table		S g  ___push		S g  
yypushback		S g  tok		S g  $8		+S g  tok		RS g  tok	 S g  $6		 S g  tok	
 S g  tok	&S g  tok	kS g  $3	S g  tok	S g  tok	S  g  filenamef  language/ecmascript/parse.scm? 	e 	S	   C"Q  hX    ]] $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    			$  	&  			"  	"  	
	$  	&  		"   "    		$  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		
  	6           g  ___stack
	S g  ___sp	S g  ___goto-table		S g  ___push		S g  
yypushback		S g  tok		S g  $8		+S g  tok		RS g  tok	 S g  tok		 S g  $5	
 S g  tok	&S g  tok	kS g  $3	S g  tok	S g  tok	S  g  filenamef  language/ecmascript/parse.scm? 	e 	S	   C"Q  h    ]m $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "    		$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   				 6      g  ___stack
	 g  ___sp	 g  ___goto-table		 g  ___push		 g  
yypushback		 g  tok		 g  $9		+ g  tok		R g  tok	  g  $7		  g  tok	
  g  tok	& g  $5	I g  tok	p g  tok	 g  $3	 g  tok	 g  tok	D  g  filenamef  language/ecmascript/parse.scm 	p 		   C"QK   hP    ]U $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    			$  	&  
		"   "   	$  	&  		"   "    		

$  
&  	
	"  
"  

$  
&  	
"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		  	6|      g  ___stack
	P g  ___sp	P g  ___goto-table		P g  ___push		P g  
yypushback		P g  tok		P g  $8		+P g  tok		RP g  tok	 P g  tok		 P g  tok	
!P g  $4	DP g  tok	kP g  tok	P g  tok	P  g  filenamef  language/ecmascript/parse.scm: 	k 	P	   C"QK  h    ]e $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "    		$  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   				 6         g  ___stack
	 g  ___sp	 g  ___goto-table		 g  ___push		 g  
yypushback		 g  tok		 g  $9		+ g  tok		R g  tok	  g  $7		  g  tok	
  g  tok	& g  tok	k g  $4	 g  tok	 g  tok	 g  tok	?  g  filenamef  language/ecmascript/parse.scm 	v 		   C"QK     h    ]e $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    			$  	&  			"  	"  	
	$  	&  		"   "    		$  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   			
 6         g  ___stack
	 g  ___sp	 g  ___goto-table		 g  ___push		 g  
yypushback		 g  tok		 g  $9		+ g  tok		R g  tok	  g  tok		  g  $6	
  g  tok	& g  tok	k g  $4	 g  tok	 g  tok	 g  tok	?  g  filenamef  language/ecmascript/parse.scm 	v 		   C"QK     h    ]u $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "    		$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   	
		  	
6        g  ___stack
	 g  ___sp	 g  ___goto-table		 g  ___push		 g  
yypushback		 g  tok		 g  $10		+ g  tok		R g  tok	  g  $8		  g  tok	
  g  tok	& g  $6	I g  tok	p g  tok	 g  $4	 g  tok	 g  tok	D g  tok	  g  filenamef  language/ecmascript/parse.scm   		   C"W       h    ]U $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "    		$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   			 
6 {      g  ___stack
	 g  ___sp	 g  ___goto-table		 g  ___push		 g  
yypushback		 g  tok		 g  $7		+ g  tok		R g  tok	  g  $5		  g  tok	
  g  tok	& g  $3	I g  tok	p g  tok	  g  filenamef  language/ecmascript/parse.scm 	\ 		   C"TKWX    hh    ]] $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "    		$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		 	   	6             g  ___stack
	a g  ___sp	a g  ___goto-table		a g  ___push		a g  
yypushback		a g  tok		a g  $8		+a g  tok		Ra g  tok	 a g  $6		 a g  tok	
 a g  tok	&a g  $4	Ia g  tok	pa g  tok	a g  tok	a  g  filenamef  language/ecmascript/parse.scm? 	a 	a	   C"W  h     ]% $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		 6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $2		p  g  tok	    	g  filenamef  language/ecmascript/parse.scm  	8 	 	   C"Y    h      ] $  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		 	6           g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M   g  filenamef  language/ecmascript/parse.scm  	- 	 	   C"G h     ]% $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		 6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $2		p  g  tok	    	g  filenamef  language/ecmascript/parse.scm  	2 	 	   C"Z    h      ] $  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		 	6           g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M   g  filenamef  language/ecmascript/parse.scm  	' 	 	   C"M h     ]% $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		 6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $2		p  g  tok	    	g  filenamef  language/ecmascript/parse.scm  	4 	 	   C"[    h      ] $  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		 	6           g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M   g  filenamef  language/ecmascript/parse.scm  	) 	 	   C"] hx  K  ]= $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "    		$  &  
	"   "   $  &  	"   "   			 6  C      g  ___stack
	v g  ___sp	v g  ___goto-table		v g  ___push		v g  
yypushback		v g  tok		v g  $5		+v g  tok		Rv g  tok	 v g  $3		 v g  tok	
 v g  tok	&v  g  filenamef  language/ecmascript/parse.scmk 	> 	v	   C"S     hx  K  ]= $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "    		$  &  
	"   "   $  &  	"   "   			6   C      g  ___stack
	u g  ___sp	u g  ___goto-table		u g  ___push		u g  
yypushback		u g  tok		u g  $5		+u g  tok		Ru g  tok	 u g  $3		 u g  tok	
 u g  tok	&u  g  filenamef  language/ecmascript/parse.scmk 	B 	u	   C"       h      ] $  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		 	6            g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M   g  filenamef  language/ecmascript/parse.scm  	  	 	   C"   h      ]% $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		6       g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $2		p  g  tok	    		 	   C"S      h8  8  ]5 $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "   		4	5 	6 0      g  ___stack
	7 g  ___sp	7 g  ___goto-table		7 g  ___push		7 g  
yypushback		7 g  tok		7 g  tok		M7 g  $3		p7 g  tok	 7 g  $2		 7 g  tok	
 7  g  filenamef  language/ecmascript/parse.scm% 	: 	7	   C"  h     ]% $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		 6           g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $2		p  g  tok	    	g  filenamef  language/ecmascript/parse.scm  	. 	 	   C"S    h8  8  ]5 $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "   		4	5 	6 0      g  ___stack
	7 g  ___sp	7 g  ___goto-table		7 g  ___push		7 g  
yypushback		7 g  tok		7 g  tok		M7 g  $3		p7 g  tok	 7 g  $2		 7 g  tok	
 7  g  filenamef  language/ecmascript/parse.scm% 	: 	7	   C"  hX      ] $  &  		"  "  $  &  	"   "   	 6       g  ___stack
		X g  ___sp		X g  ___goto-table			X g  ___push			X g  
yypushback			X g  tok			X g  $1		+	X  g  filenamef  language/ecmascript/parse.scm	T 	 		X	   C"S  h     ]% $  &  		"  "  $  &  	"   "    	$  &  		"  "  $  &  	"   "   		4 5 	6	      g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R  g  $1		u   	g  filenamef  language/ecmascript/parse.scm  	+ 	 	   C"      h     ]% $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		 6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $2		p  g  tok	    	g  filenamef  language/ecmascript/parse.scm  	) 	 	   C"    h8  8  ]5 $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "   			  	6 0      g  ___stack
	7 g  ___sp	7 g  ___goto-table		7 g  ___push		7 g  
yypushback		7 g  tok		7 g  $4		+7 g  tok		R7 g  tok	 7 g  $2		 7 g  tok	
 7  g  filenamef  language/ecmascript/parse.scm& 	7 	7	   C"\       h      ] $  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		 	6           g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M   g  filenamef  language/ecmascript/parse.scm  	$ 	 	   C"        h     ]% $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		 6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	    	g  filenamef  language/ecmascript/parse.scm  	2 	 	   C"]    h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   			 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm  	5 	 	   C"   h     ]% $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		  6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $2		p  g  tok	    	g  filenamef  language/ecmascript/parse.scm  	2 	 	   C"d^  h   $  ]- $  &  		"  "  $  &  	"   "    	$  &  		"  "  $  &  	"   "    			$  	&  
		"   "   	$  	&  		"   "   		!6        g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  $2		u  g  tok		    
g  filenamef  language/ecmascript/parse.scm  	% 	 	   C"d    h   $  ]- $  &  		"  "  $  &  	"   "    	$  &  		"  "  $  &  	"   "    			$  	&  
		"   "   	$  	&  		"   "   		! 6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  $2		u  g  tok		    
g  filenamef  language/ecmascript/parse.scm  	' 	 	   C"d    h@  I  ]= $  &  		"  "  $  &  	"   "    	$  &  		"  "  $  &  	"   "    			$  	&  			"  	"  	
	$  	&  		"   "    	$  &  
	"   "   $  &  	"   "   		!
  	6  A      g  ___stack
	> g  ___sp	> g  ___goto-table		> g  ___push		> g  
yypushback		> g  tok		> g  $4		+> g  tok		R> g  $3		u> g  tok		 > g  $2	
 > g  tok	 >  g  filenamef  language/ecmascript/parse.scm+ 	- 	>	   C"k      hx  K  ]= $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "    		$  &  
	"   "   $  &  	"   "   		"	 6  C      g  ___stack
	v g  ___sp	v g  ___goto-table		v g  ___push		v g  
yypushback		v g  tok		v g  $5		+v g  tok		Rv g  tok	 v g  $3		 v g  tok	
 v g  tok	&v  g  filenamef  language/ecmascript/parse.scmk 	3 	v	   C"i    h      ] $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		#  	6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R   g  filenamef  language/ecmascript/parse.scm  	 	 	   C"[        hP      ] $  &  
	"   "   $  &  	"   "   	$6       g  ___stack
		P g  ___sp		P g  ___goto-table			P g  ___push			P g  
yypushback			P g  tok			P  g  filenamef  language/ecmascript/parse.scm	L 	 		P	   C"j   hP      ] $  &  
	"   "   $  &  	"   "   	$6       g  ___stack
		P g  ___sp		P g  ___goto-table			P g  ___push			P g  
yypushback			P g  tok			P  g  filenamef  language/ecmascript/parse.scm	L 	 		P	   C"l   hP      ] $  &  
	"   "   $  &  	"   "   	$6       g  ___stack
		P g  ___sp		P g  ___goto-table			P g  ___push			P g  
yypushback			P g  tok			P  g  filenamef  language/ecmascript/parse.scm	L 	 		P	   C"n   hP      ] $  &  
	"   "   $  &  	"   "   	$6       g  ___stack
		P g  ___sp		P g  ___goto-table			P g  ___push			P g  
yypushback			P g  tok			P  g  filenamef  language/ecmascript/parse.scm	L 	  		P	   C"X  h`      ] $  &  		"  "  $  &  	"   "   	$ 6             g  ___stack
		Z g  ___sp		Z g  ___goto-table			Z g  ___push			Z g  
yypushback			Z g  tok			Z g  $1		+	Z  g  filenamef  language/ecmascript/parse.scm	Q 	% 		Z	   C"_  h`      ] $  &  		"  "  $  &  	"   "   	$ 6             g  ___stack
		Z g  ___sp		Z g  ___goto-table			Z g  ___push			Z g  
yypushback			Z g  tok			Z g  $1		+	Z  g  filenamef  language/ecmascript/parse.scm	Q 	( 		Z	   C"`  h`      ] $  &  		"  "  $  &  	"   "   	$ 6             g  ___stack
		Z g  ___sp		Z g  ___goto-table			Z g  ___push			Z g  
yypushback			Z g  tok			Z g  $1		+	Z  g  filenamef  language/ecmascript/parse.scm	Q 	( 		Z	   C"a  h`      ] $  &  		"  "  $  &  	"   "   	$ 6             g  ___stack
		Z g  ___sp		Z g  ___goto-table			Z g  ___push			Z g  
yypushback			Z g  tok			Z g  $1		+	Z  g  filenamef  language/ecmascript/parse.scm	Q 	) 		Z	   C"abcde      h   F  ] $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		$444555  	6 >      g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R   g  filenamef  language/ecmascript/parse.scm  	-  	7  	G  	V  	Z  	G  	7  	- 		 	   C"    hX      ] $  &  		"  "  $  &  	"   "   	$6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      hX      ] $  &  		"  "  $  &  	"   "   	$6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      h      ]% $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		$6       g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $2		p  g  tok	    		 	   C"g      h      ] $  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		% 	6           g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M   g  filenamef  language/ecmascript/parse.scm  	' 	 	   C"k        h     ] $  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		%6            g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  tok	    g  filenamef  language/ecmascript/parse.scm  	/ 	 	   C"f     h     ]% $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		%6           g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $2		p  g  tok	    	g  filenamef  language/ecmascript/parse.scm  	3 	 	   C"f    h0  '  ]- $  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    			$  	&  
		"   "   	$  	&  		"   "   		% 	6        g  ___stack
	. g  ___sp	. g  ___goto-table		. g  ___push		. g  
yypushback		. g  tok		. g  tok		M. g  tok	 . g  $2	 . g  tok		 .  
g  filenamef  language/ecmascript/parse.scm! 	9 	.	   C"f        hp  :  ]5 $  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "    		

$  
&  

	"   "   
$  
&  	
"   "   		%	6   2      g  ___stack
	m g  ___sp	m g  ___goto-table		m g  ___push		m g  
yypushback		m g  tok		m g  tok		Mm g  tok	 m g  tok	 m g  $2		 m g  tok	
!m  g  filenamef  language/ecmascript/parse.scmf 	A 	m	   C"        hX      ] $  &  		"  "  $  &  	"   "   	& 6       g  ___stack
		X g  ___sp		X g  ___goto-table			X g  ___push			X g  
yypushback			X g  tok			X g  $1		+	X  g  filenamef  language/ecmascript/parse.scm	T 	) 		X	   C"S  h     ]% $  &  		"  "  $  &  	"   "    	$  &  		"  "  $  &  	"   "   		&4 5 	6	      g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R  g  $1		u   	g  filenamef  language/ecmascript/parse.scm  	1 	 	   C"S      h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		&4	 56       g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm  	; 	 	   C"S  hH  I  ]= $  &  		"  "  $  &  	"   "    	$  &  		"  "  $  &  	"   "    			$  	&  
		"   "   	$  	&  		"   "    	

$  
&  	
	"  
"  

$  
&  	
"   "   		&44 55 	6  A      g  ___stack
	F g  ___sp	F g  ___goto-table		F g  ___push		F g  
yypushback		F g  tok		F g  $4		+F g  tok		RF g  $3		uF g  tok		 F g  tok	
 F g  $1	F  g  filenamef  language/ecmascript/parse.scm* 	C 	F	   C"m      hP      ] $  &  
	"   "   $  &  	"   "   	'6       g  ___stack
		P g  ___sp		P g  ___goto-table			P g  ___push			P g  
yypushback			P g  tok			P  g  filenamef  language/ecmascript/parse.scm	L 	 		P	   C"Sm       h      ] $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "   		'45 	6       g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $1		p   g  filenamef  language/ecmascript/parse.scm  	 	 	   C"o       h      ] $  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		( 	6           g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M   g  filenamef  language/ecmascript/parse.scm  	$ 	 	   C"n        h     ]% $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		(6           g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $2		p  g  tok	    	g  filenamef  language/ecmascript/parse.scm  	= 	 	   C"       h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		)	  6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm  	I 	 	   C"S  h  ]  ]E $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "    		$  &  		"  "  $  &  	"   "   		)4	  56     U      g  ___stack
	 g  ___sp	 g  ___goto-table		 g  ___push		 g  
yypushback		 g  tok		 g  $5		+ g  tok		R g  tok	  g  $3		  g  tok	
  g  tok	& g  $1	I  g  filenamef  language/ecmascript/parse.scmo 	h 		   C"     hX      ] $  &  		"  "  $  &  	"   "   	*6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"p   h`      ] $  &  		"  "  $  &  	"   "   	*456             g  ___stack
		Z g  ___sp		Z g  ___goto-table			Z g  ___push			Z g  
yypushback			Z g  tok			Z g  $1		+	Z  g  filenamef  language/ecmascript/parse.scm	P 	# 		Z	   C"     hX      ] $  &  		"  "  $  &  	"   "   	*6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      hX      ] $  &  		"  "  $  &  	"   "   	+6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      hX      ] $  &  		"  "  $  &  	"   "   	+6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"q   h8  8  ]5 $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    			$  	&  			"  	"  	
	$  	&  		"   "   		+
  	6 0      g  ___stack
	7 g  ___sp	7 g  ___goto-table		7 g  ___push		7 g  
yypushback		7 g  tok		7 g  tok		M7 g  $3		p7 g  tok	 7 g  tok		 7 g  $1	
 7  g  filenamef  language/ecmascript/parse.scm& 	G 	7	   C"r       h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		+	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm  	9 	 	   C"I   h   $  ]- $  &  		"  "  $  &  	"   "    	$  &  		"  "  $  &  	"   "    			$  	&  
		"   "   	$  	&  		"   "   		+ 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  $2		u  g  tok		    
g  filenamef  language/ecmascript/parse.scm  	8 	 	   C"      hX      ] $  &  		"  "  $  &  	"   "   	,6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"Is h      ] $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		, 	6        g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R   g  filenamef  language/ecmascript/parse.scm  	( 	 	   C"t       h     ]% $  &  		"  "  $  &  	"   "    	$  &  		"  "  $  &  	"   "   		-  	6   	      g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R  g  $1		u   	g  filenamef  language/ecmascript/parse.scm  	2 	 	   C"t      h     ]% $  &  		"  "  $  &  	"   "    	$  &  		"  "  $  &  	"   "   		-  	6   	      g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R  g  $1		u   	g  filenamef  language/ecmascript/parse.scm  	0 	 	   C"q      h8  8  ]5 $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    			$  	&  			"  	"  	
	$  	&  		"   "   		-
  	6 0      g  ___stack
	7 g  ___sp	7 g  ___goto-table		7 g  ___push		7 g  
yypushback		7 g  tok		7 g  tok		M7 g  $3		p7 g  tok	 7 g  tok		 7 g  $1	
 7  g  filenamef  language/ecmascript/parse.scm& 	C 	7	   C"r       h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		-	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm  	5 	 	   C"     h      ] $  &  
	"   "   $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		. 	6            g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M   g  filenamef  language/ecmascript/parse.scm  	  	 	   C"   h      ]% $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		.6       g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $2		p  g  tok	    		 	   C" hX      ] $  &  		"  "  $  &  	"   "   	/ 6       g  ___stack
		X g  ___sp		X g  ___goto-table			X g  ___push			X g  
yypushback			X g  tok			X g  $1		+	X  g  filenamef  language/ecmascript/parse.scm	T 	* 		X	   C"S  h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		/4	 56       g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm  	= 	 	   C"     hX      ] $  &  		"  "  $  &  	"   "   	06          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      hX      ] $  &  		"  "  $  &  	"   "   	06          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      hX      ] $  &  		"  "  $  &  	"   "   	16          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"u   h      ] $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "   		1  	6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $1		p   g  filenamef  language/ecmascript/parse.scm  	4 	 	   C"v       h      ] $  &  
	"   "   $  &  	"   "    	$  &  		"  "  $  &  	"   "   		1  	6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  tok		M  g  $1		p   g  filenamef  language/ecmascript/parse.scm  	4 	 	   C"  hX      ] $  &  		"  "  $  &  	"   "   	26          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"b    h      ] $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		2  	6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R   g  filenamef  language/ecmascript/parse.scm  	/ 	 	   C"O        h      ] $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		2  	6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R   g  filenamef  language/ecmascript/parse.scm  	- 	 	   C"h        h      ] $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		2  	6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R   g  filenamef  language/ecmascript/parse.scm  	/ 	 	   C"w       h      ] $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		2  	6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R   g  filenamef  language/ecmascript/parse.scm  	+ 	 	   C"x       h      ] $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		2  	6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R   g  filenamef  language/ecmascript/parse.scm  	+ 	 	   C";        h      ] $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		2  	6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R   g  filenamef  language/ecmascript/parse.scm  	* 	 	   C"=        h      ] $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		2  	6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R   g  filenamef  language/ecmascript/parse.scm  	* 	 	   C"E        h      ] $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		2  	6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R   g  filenamef  language/ecmascript/parse.scm 	* 	 	   C"C        h      ] $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "   		2  	6         g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $2		+  g  tok		R   g  filenamef  language/ecmascript/parse.scm 	* 	 	   C"  hX      ] $  &  		"  "  $  &  	"   "   	36          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"    h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		3	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	L 	 	   C"  h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		3	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	L 	 	   C"   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		3	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	L 	 	   C"     hX      ] $  &  		"  "  $  &  	"   "   	46          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C";    h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		4	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 
	I 	 	   C"=   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		4	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	I 	 	   C"     hX      ] $  &  		"  "  $  &  	"   "   	56          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"    h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		5	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	D 	 	   C"   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		5	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	D 	 	   C"   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		5	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	E 	 	   C"     hX      ] $  &  		"  "  $  &  	"   "   	66          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"    h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		6	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	D 	 	   C"   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		6	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	D 	 	   C"   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		6	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	E 	 	   C"   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		6	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	E 	 	   C"   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		6	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	M 	 	   C"   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		6	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	E 	 	   C"     hX      ] $  &  		"  "  $  &  	"   "   	76          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"    h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		7	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	L 	 	   C"   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		7	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	L 	 	   C"   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		7	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	M 	 	   C"   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		7	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	M 	 	   C"   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		7	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 	U 	 	   C"     hX      ] $  &  		"  "  $  &  	"   "   	86          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"    h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		8	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm "	F 	 	   C"   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		8	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm #	F 	 	   C"   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		8	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm $	G 	 	   C"   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		8	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm %	G 	 	   C"     hX      ] $  &  		"  "  $  &  	"   "   	96          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"    h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		9	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm (	R 	 	   C"   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		9	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm )	R 	 	   C"   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		9	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm *	S 	 	   C"   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		9	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm +	S 	 	   C"     hX      ] $  &  		"  "  $  &  	"   "   	:6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"    h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		:	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm .	G 	 	   C"     hX      ] $  &  		"  "  $  &  	"   "   	;6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"    h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		;	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 0	S 	 	   C"     hX      ] $  &  		"  "  $  &  	"   "   	<6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"    h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		<	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 3	I 	 	   C"     hX      ] $  &  		"  "  $  &  	"   "   	=6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"    h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		=	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 5	U 	 	   C"     hX      ] $  &  		"  "  $  &  	"   "   	>6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"    h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		>	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm 8	I 	 	   C"     hX      ] $  &  		"  "  $  &  	"   "   	?6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"    h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		?	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm :	U 	 	   C"     hX      ] $  &  		"  "  $  &  	"   "   	@6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"y   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		@	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm =	I 	 	   C"     hX      ] $  &  		"  "  $  &  	"   "   	A6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"y   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		A	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm ?	U 	 	   C"     hX      ] $  &  		"  "  $  &  	"   "   	B6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"    h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		B	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm B	H 	 	   C"     hX      ] $  &  		"  "  $  &  	"   "   	C6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"    h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		C	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm D	T 	 	   C"     hX      ] $  &  		"  "  $  &  	"   "   	D6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"_    h  ]  ]E $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "    		$  &  		"  "  $  &  	"   "   		D	 6   U      g  ___stack
	} g  ___sp	} g  ___goto-table		} g  ___push		} g  
yypushback		} g  tok		} g  $5		+} g  tok		R} g  tok	 } g  $3		 } g  tok	
 } g  tok	&} g  $1	I}  g  filenamef  language/ecmascript/parse.scmpG	d 	}	   C"     hX      ] $  &  		"  "  $  &  	"   "   	E6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"_    h  ]  ]E $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "    	

$  
&  

	"   "   
$  
&  	
"   "    		$  &  		"  "  $  &  	"   "   		E	 6   U      g  ___stack
	} g  ___sp	} g  ___goto-table		} g  ___push		} g  
yypushback		} g  tok		} g  $5		+} g  tok		R} g  tok	 } g  $3		 } g  tok	
 } g  tok	&} g  $1	I}  g  filenamef  language/ecmascript/parse.scmpI	t 	}	   C"     hX      ] $  &  		"  "  $  &  	"   "   	F6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      h   6  ]5 $  &  		"  "  $  &  	"   "    	$  &  		"  "  $  &  	"   "    			$  	&  			"  	"  	
	$  	&  		"   "   		F
 6       .      g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  $2		u  g  tok		   g  $1	
    g  filenamef  language/ecmascript/parse.scm L	\ 	 	   C"    hX      ] $  &  		"  "  $  &  	"   "   	G6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"      h   6  ]5 $  &  		"  "  $  &  	"   "    	$  &  		"  "  $  &  	"   "    			$  	&  			"  	"  	
	$  	&  		"   "   		G
 6       .      g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  $2		u  g  tok		   g  $1	
    g  filenamef  language/ecmascript/parse.scm N	d 	 	   C" hP      ] $  &  
	"   "   $  &  	"   "   	H6       g  ___stack
		P g  ___sp		P g  ___goto-table			P g  ___push			P g  
yypushback			P g  tok			P  g  filenamef  language/ecmascript/parse.scm	LO	 		P	   C"  hP      ] $  &  
	"   "   $  &  	"   "   	H6       g  ___stack
		P g  ___sp		P g  ___goto-table			P g  ___push			P g  
yypushback			P g  tok			P  g  filenamef  language/ecmascript/parse.scm	LP	 		P	   C"!  hP      ] $  &  
	"   "   $  &  	"   "   	H6       g  ___stack
		P g  ___sp		P g  ___goto-table			P g  ___push			P g  
yypushback			P g  tok			P  g  filenamef  language/ecmascript/parse.scm	LQ	 		P	   C"  hP      ] $  &  
	"   "   $  &  	"   "   	H6       g  ___stack
		P g  ___sp		P g  ___goto-table			P g  ___push			P g  
yypushback			P g  tok			P  g  filenamef  language/ecmascript/parse.scm	LR	 		P	   C"  hP      ] $  &  
	"   "   $  &  	"   "   	H6       g  ___stack
		P g  ___sp		P g  ___goto-table			P g  ___push			P g  
yypushback			P g  tok			P  g  filenamef  language/ecmascript/parse.scm	LS	 		P	   C"  hP      ] $  &  
	"   "   $  &  	"   "   	H6       g  ___stack
		P g  ___sp		P g  ___goto-table			P g  ___push			P g  
yypushback			P g  tok			P  g  filenamef  language/ecmascript/parse.scm	LT	 		P	   C"  hP      ] $  &  
	"   "   $  &  	"   "   	H6       g  ___stack
		P g  ___sp		P g  ___goto-table			P g  ___push			P g  
yypushback			P g  tok			P  g  filenamef  language/ecmascript/parse.scm	LU	 		P	   C"  hP      ] $  &  
	"   "   $  &  	"   "   	H6       g  ___stack
		P g  ___sp		P g  ___goto-table			P g  ___push			P g  
yypushback			P g  tok			P  g  filenamef  language/ecmascript/parse.scm	LV	 		P	   C"  hP      ] $  &  
	"   "   $  &  	"   "   	H6       g  ___stack
		P g  ___sp		P g  ___goto-table			P g  ___push			P g  
yypushback			P g  tok			P  g  filenamef  language/ecmascript/parse.scm	LW	  		P	   C"  hP      ] $  &  
	"   "   $  &  	"   "   	H6       g  ___stack
		P g  ___sp		P g  ___goto-table			P g  ___push			P g  
yypushback			P g  tok			P  g  filenamef  language/ecmascript/parse.scm	LX	 		P	   C"  hP      ] $  &  
	"   "   $  &  	"   "   	H6       g  ___stack
		P g  ___sp		P g  ___goto-table			P g  ___push			P g  
yypushback			P g  tok			P  g  filenamef  language/ecmascript/parse.scm	LY	 		P	   C"  hP      ] $  &  
	"   "   $  &  	"   "   	H6       g  ___stack
		P g  ___sp		P g  ___goto-table			P g  ___push			P g  
yypushback			P g  tok			P  g  filenamef  language/ecmascript/parse.scm	LZ	  		P	   C"     hX      ] $  &  		"  "  $  &  	"   "   	I6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"T   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		I	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm ]	9 	 	   C"     hX      ] $  &  		"  "  $  &  	"   "   	J6          g  ___stack
		U g  ___sp		U g  ___goto-table			U g  ___push			U g  
yypushback			U g  tok			U g  $1		+	U  		U	   C"T   h   %  ]- $  &  		"  "  $  &  	"   "    	$  &  
	"   "   $  &  	"   "    	$  &  		"  "  	$  &  	"   "   		J	 6          g  ___stack
	  g  ___sp	  g  ___goto-table		  g  ___push		  g  
yypushback		  g  tok		  g  $3		+  g  tok		R  g  tok	   g  $1		    
g  filenamef  language/ecmascript/parse.scm _	E 	 	   Cz       h  q   ] 	
 !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvJwxyz{|}~'' 	
 !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxy 6    i       g  filenamef  language/ecmascript/parse.scm
	.
	3	 	
  g  nameg  make-parser CRC         g  m
		,  g  filenamef  language/ecmascript/parse.scm		
	
	#
	'
	,		,		,		+
     	.
 
	     
   C6                                                                                                                                                                                                                                                                                                                                                                               ccache/language/ecmascript/compile-tree-il.go                                                       0000644                 00000141671 15154557173 0015234 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]\ 4  h      ] g  guile	 	g  define-module*	 	 	g  language	g  
ecmascript	g  compile-tree-il		 	
g  filenameS	f  'language/ecmascript/compile-tree-il.scm	g  importsS	g  tree-il	 	 	g  ice-9	g  receive	 	 	g  system	g  base	g  pmatch	 	 	g  srfi	g  srfi-1	 	 	 	g  exportsS	 	 g  set-current-module	!  	"  	#g  make-syntax-transformer	$# 	%# 	&g  ->	'g  macro	(g  $sc-dispatch	)( 	*( 	+g  any	,g  each-any	-+,	.+- 	/g  syntax-object	0g  
quasiquote	1g  top	21 	3g  ribcage	4g  dummy	5g  type	6g  arg	7456 	8g  m-14365c91dc5cf6c7-1	981 	:922 	;f  l-14365c91dc5cf6c7-6	<f  l-14365c91dc5cf6c7-7	=f  l-14365c91dc5cf6c7-8	>;<= 	?37:> 	@3 	Ag  x	BA 	C9 	Df  l-14365c91dc5cf6c7-3	ED 	F3BCE 	G2?@F 	Hg  hygiene	IH 	J/0GI 	Kg  map	LK 	MK 	Ng  unquote	O/NGI 	Pg  syntax-violation	QP 	RP 	Sf  -source expression failed to match any pattern	Tg  @implv	U++ 	Vg  sym	W4V 	Xg  m-14365c91dc5cf6c7-e	YX1 	ZY2 	[f  l-14365c91dc5cf6c7-13	\f  l-14365c91dc5cf6c7-14	][\ 	^3WZ] 	_Y 	`f  l-14365c91dc5cf6c7-10	a` 	b3B_a 	c2^@b 	d/&cI 	eg  @	f/ecI 	gg  quote	h/gcI 	i/cI 	j/cI 	kg  impl	l/kcI 	mijl 	nhm 	og  @impl	p+-	q4V6 	rg  m-14365c91dc5cf6c7-18	sr1 	ts22 	uf  l-14365c91dc5cf6c7-1d	vf  l-14365c91dc5cf6c7-1e	wf  l-14365c91dc5cf6c7-1f	xuvw 	y3qtx 	zs 	{f  l-14365c91dc5cf6c7-1a	|{ 	}3Bz| 	~2y@} 	/&~I  g  apply /~I  /T~I  g  empty-lexical-environment g  lexical g  econs g  assq-ref g  toplevel g  lookup g  parse-tree-il g  begin k  g  js-init g  comp g  source-properties g  location g  pmatch/source g  let g  clause 4A  g  m-14365c91dc5cf6c7-4d 1  22  f  l-14365c91dc5cf6c7-52 f  l-14365c91dc5cf6c7-53 f  l-14365c91dc5cf6c7-54   3    f  l-14365c91dc5cf6c7-4f   3B  2@  /I  g  res /I  /I  g  loc /I  /I  g  if /I  g  set-source-properties! /I    g  make-parameter g  current-return-tag g  abort g  error f  return outside function g  const g  return g  gensym f  return g  
parameter?     g  	scm-error g  wrong-type-arg f  parameterize f  Not a parameter: ~S   g  	primitive g  make-prompt-tag g  prompt f  val g  lambda-case g  k g  val   g  with-return-prompt g  block f   compilation not yet implemented: g  for-in f  %enum  f  
%continue  g  %enum g  	%continue g  letrec   g  make-enumerator g  lambda   g  	->boolean g  pget g    &  g  length g    &  o  o  g  = g  var N  g  	call/this N  g  pop g    &  N      0  g  e   g  	statement   g    &    &    &  g  *undefined* T    &    g  for   g  true   g  while g  dof  %loop g  %loop g  typeofg  voidg  deleteg  arefg  pdel	g  pref
g  newg  ^=g  ^g  bor=g  borg  &=g  &g  >>>=g  >>>g  <<=g  <<g  >>=g  >>g  %=g  %g  *=g  *g  /=g  /g  -=g  -g  += g  +!g  pput"g  ref#g  set!$g  object%g  
new-object&g  cons'f  bad prop-val pair(g  array)g  	new-array*g  call+g  
call/this*,g  string-append-g  symbol->string.f   /g  	comp-body0 1g  define2f  bad var form3g  predec4g  preinc5g  postdec6g  inline7g  set8g  postinc9g  or:g  and;g  bior<g  bxor=g  band>g  !==?g  not@g  eqv?Ag  ===Bg  !=Cg  equal?Dg  ==Eg  inFg  has-property?Gg  >=Hg  >Ig  <=Jg  <Kg  shiftLg  modMg  !Ng  logical-notOg  ~Pg  bitwise-notQg  ->numberRg  thisSg  get-thisTg  stringUg  numberVg  falseWg  nullXg  reverse!Yg  memqZg  reverse[g  foldC 5       h     ]4	
5 4" >  "  G   4%&'*.JMO     h   >   ]  C      6       g  tmp-14365c91dc5cf6c7-c
		
  		
   C       h   P   ]45 C    H       g  dummy
		 g  type		 g  arg			  			   CRS h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  'language/ecmascript/compile-tree-il.scm
	
 		"  g  
macro-typeg  syntax-rulesg  patternsg  typeg  argg  ...    C5&R4%T'*Udfnh        h   >   ]   C  6       g  dummy
		 g  sym		  			   CRS   h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  'language/ecmascript/compile-tree-il.scm
	
 		"  g  
macro-typeg  syntax-rulesg  patternsg  sym   C5TR4%o'*p    h   O   ]  C   G       g  dummy
		 g  sym		 g  arg			  			   CRS  h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  'language/ecmascript/compile-tree-il.scm
	!
 		"  g  
macro-typeg  syntax-rulesg  patternsg  symg  argg  ...   C5oR  h      ] C           g  filenamef  'language/ecmascript/compile-tree-il.scm
	$
		%	 		
  g  nameg  empty-lexical-environment CR        h      ]   C              g  name
		 g  gensym		 g  env			  g  filenamef  'language/ecmascript/compile-tree-il.scm
	'
		(			(	 			  g  nameg  econs CR  h       ]
4 5$  C  C         g  name
		 g  env		 g  t			  g  filenamef  'language/ecmascript/compile-tree-il.scm
	*
		+			+			,	 			  g  nameg  lookup CRe 	 h0      ]4  4 45 5 5D           g  exp
		, g  env		, g  opts			,  g  filenamef  'language/ecmascript/compile-tree-il.scm
	.
		0			1				1			2			2		!	2		$	1		&	0		,	/	 		,	  g  nameg  compile-tree-il CR     h       ]	 $  4 5(  CCC        g  x
		 g  props		  g  filenamef  'language/ecmascript/compile-tree-il.scm
	6
		7				7		
	8			8			9		 		  g  nameg  location CR4%'*p 	    hX   P   ]            C      H       g  dummy
		R g  x		R g  clause			R  		R	   CRS h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  'language/ecmascript/compile-tree-il.scm
	?
 		"  g  
macro-typeg  syntax-rulesg  patternsg  xg  clauseg  ...   C5R4i5R  h0      ]	45 $  "  45    C       g  expr
		0 g  t			!  g  filenamef  'language/ecmascript/compile-tree-il.scm
	J
		K			K				K			K	&		K	-		K	&	&	L		(	M		)	M		,	M		/	K	 		0  g  nameg  return CR    h     ]4545$  "  4 >  "  G  4		
 5Y    45 4 5 4545   	     ZCZF       g  
body-thunk
	  g  tag		  g  t-14365c91dc5cf6c7-67		  g  val		|   g  filenamef  'language/ecmascript/compile-tree-il.scm
	O
		P			P				P				P			Q		F	R		H	R	!	M	R		O	Q		S	S		U	S		Z	S		\	T		^	T	 	`	T	/	c	T	 	f	T		i	T		k	U		l	U		q	V		v	W	&	z	W	.	|	W	&	|	W	 	X	 	Y	" 	Y	; 	Y	" 	Z	% 	Z	2 	Z	% 	Y	" 	X	 	U	 	S	 &	   g  nameg  with-return-prompt CRe 	
K    h   t   ] L 6      l       g  x
		
  g  filenamef  'language/ecmascript/compile-tree-il.scm
		
	 		
   C !"#$%&' h`   (  ]! $  N  $  5(    4L 5 C 6 6 6        g  x
		_ g  vx		W g  vy			W g  vx		 	O g  vy		 	O  g  filenamef  'language/ecmascript/compile-tree-il.scm
~				,	"	.	-	0	<	3	-	5	-	;	-	F	"	K	)	O	"	S	)	W	"	[	)	_	" 		_   C()    h   t   ] L 6      l       g  x
		
  g  filenamef  'language/ecmascript/compile-tree-il.scm
{		
{	" 		
   C*       h   t   ] L 6      l       g  x
		
  g  filenamef  'language/ecmascript/compile-tree-il.scm
v		
v	" 		
   C    h   t   ] L 6      l       g  x
		
  g  filenamef  'language/ecmascript/compile-tree-il.scm
r	 	
r	, 		
   C      h   t   ] L 6      l       g  x
		
  g  filenamef  'language/ecmascript/compile-tree-il.scm
m	 	
m	, 		
   C+,-.  h      ]44 556           g  x
		  g  filenamef  'language/ecmascript/compile-tree-il.scm
Z		[	"	[	1	[	D	[	"	[	 		   Ce      h   t   ] C    l       g  x
		  g  filenamef  'language/ecmascript/compile-tree-il.scm
_	'	_	3 		   C/   h   d   ] LLLL 6  \       g  filenamef  'language/ecmascript/compile-tree-il.scm
a		b	 		
   C      h   t   ] L 6      l       g  x
		
  g  filenamef  'language/ecmascript/compile-tree-il.scm
X		
X	" 		
   C01e2   h     ]1 $    $  H(  4L 5 C(    C 6(    C 6 6             g  form
	  g  vx	  g  vy		  g  vx		 	b g  vy		 	b g  vx		?	b g  vy		?	b g  vx		f  g  vy		f   	g  filenamef  'language/ecmascript/compile-tree-il.scm
K		L		,N		/N	$	:N		=L		KP		OP	$	YP		^Q	"	bQ		dL		rP		vP	$ P	 Q	" Q	 Q	" Q	 	    C3456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVW      h8  N  ]4 >  "  G  " 8," 8" 7" 7" 7B" 7 " 6" 64" 5" 5^" 4" 4D" 3" 3*" 2" 2" 1x" 0" 0^" /" /D" ." .(" -" -" ,i" +" +K" *" *"" )Y" (" (" &" %" #" "" !w" " " " " /" " !" " " I" " " " _" _" ]" " q" '" " P" " " " " _" " S" " G" 
" 
;" 	" 	/" " #" " " " v" " " " s"  } $  i  &  D$  0(  45" 64 5" 64 5" 64 5" 64 5" 6} $    &  $  $  $  (  x454	5	4
4
	55
	  4
5    	   " 5
	"""""" $ b  & F$ ;$  $ 		$  		
(  4	54
5 $   45 "  	454
54$  "  5         4$  "  5    " 4^"V
"L	"B"8"."*"  $     &  $  $  (  4	54
5	  4	5 4	5            " 3U	"I"?"5"1"' $   !& $  $  (  4"54	5	4
#4
	55
$	 4
5	       4
5 #        #   " 2.
	""""" $  \  %&  @$  5(  % 45 " 1"""" $  \  &&  @$  5(  45  " 1M";"1"-"# $    '&  $  $  (&  n$  c		$  H		
(  .(  $) 454
5 " 0""
"x	"n"j"`"V"R"H $    '&  $  $  *&  l$  a		$  F		
(  ,(  ") 45+
  " /""
"	""""}"y"o $    ,&  c$  X$  =(  #, 4-.O 5 " /!""""" $  w  /&  [$  P$  5(  401  5" ."}"s"i"e"[ $  w  2&  [$  P$  5(  403  5" .""""" $  w  4&  [$  P$  5(  405  5" -"q"g"]"Y"O $  w  6&  [$  P$  5(  407  5" -""""" $  w  8&  [$  P$  5(  409  5" ,"e"["Q"M"C $  w  :&  [$  P$  5(  40;  5" ,""""" $  w  <&  [$  P$  5(  40=  5" +"Y"O"E"A"7 $  w  >&  [$  P$  5(  40?  5" +""""" $  w  @&  [$  P$  5(  40A  5" *"M"C"9"5"+ $  w  B&  [$  P$  5(  40C  5" *""""" $  w  D&  [$  P$  5(  40E  5" )"A"7"-")" $    0&  $  $  (&  $  		$  l		
(  R$  G(  -F 454
545 " ("h"^"Z
"P	"F"B"8"."*"  $    0&  $  $  *&  $  		$  j		
(  P$  E(  +F 45+
 45 " '"k"a"]
"S	"I"E";"1"-"# $    0&  $  $  G&  s$  h		(  N$  C
(  )4H5I4
5  " &"
"w"s	"i"e"["Q"M"C $    (&  d$  Y$  >(  $J 4545 " &0""""" $  ~  *&  b$  W$  <(  "J 45+  " %"I"?"5"1"' $  ;  K&  L 4-MO 5" %I"" $  ;  N&  O 4-PO 5" %"" $  S  Q&  7$  ,(  4R455" $"I"?";"1 $  {  S&  _$  T$  9(  454-TO 5" $7""""" $    S&  $  $  (&  $  		$  o		
(  U$  J(  04U454
54-VO 55" #_"""
"	"""""" $    S&  $  $  *&  $  		$  m		
(  S$  H(  .4U45+
 4-WO 55" "c"""
"	"""""" $    U&  r$  g$  LX J      " !" """ $    &  $  z$  _(  E4-Y54-Z5 4[\O 5   "  "z"p"f"b"X $  1  &  4-]O 5"  """ $  N  &  2$  '(  45"  Y"""" $  ,  &  (  ^"  """ $  1  _&  4-`O 5" "J"@ $  N  G&  2$  '(  4H5" """" $   a& t$ i$ N(& 2$ '		$ 		
(  (  4545 b   4
545 b   cC J    +  45 b   F          " ""~
"t	"j"f"\"R"N"D $ `  a& D$ 9$ *& $  		$  		
(  (  4545 b   cC J  +
  +  45 b   F  +
       " ""
"	"""""" $    a&  $  $  G&  c$  X		(  >(  44H5
I
cC 
+   
 " 
"9"5	"+"'"""" $   d& t$ i$ N(& 2$ '		$ 		
(  (  4545 b   4
545 b   cE J    +  45 b   F          " L""
"	"""~"t"p"f $ `  d& D$ 9$ *& $  		$  		
(  (  4545 b   cE J  +
  +  45 b   F  +
       " "5"1
"'	"""""" $    d&  $  $  G&  c$  X		(  >(  44H5
I
cE 
+   
 " 
"["W	"M"I"?"5"1"' $   e& o$ d$ I(& -$ "		$ 		
(  (  4545 b   4
545 b   J    45 b   F   fC +        " ""
"޽	"޳"ޯ"ޥ"ޛ"ޗ"ލ $ `  e& D$ 9$ *& $  		$  		
(  (  4545 b   J  +
  45 b   F  +
 cC  +       " "\"X
"N	"D"@"6","(" $    e&  $  $  G&  $  		(  v(  l4G 5
45 b  
 g4H5cC  +      " 
"J"F	"<"8"."$" " $   h& t$ i$ N(& 2$ '		$ 		
(  (  4545 b   4
545 b   J    45 b   F   cE  +        " u"ڵ"ڱ
"ڧ	"ڝ"ڙ"ڏ"څ"ځ"w $ `  h& D$ 9$ *& $  		$  		
(  (  4545 b   J  +
  45 b   F  +
 cE  +       " 
"F"B
"8	"."*" """ $    h&  $  $  G&  $  		(  v(  l4G 5
45 b  
 I4H5cE  +      " 
"4"0	"&"""""
"  $    &  r$  g$  L(  2 45 45  " K"ׅ"{"q"m"c $    &  $  $  g$  L		(  2 45 4545 " "	"""ֹ"ֵ"֫ $    i&  $  $  x(  ^4545 	b	 	   		  		 45  " 	""""" $    j&  o$  d$  I(  / 45 45+  " <"j"`"V"R"H $    3&  d$  Y$  >(  $k 4545 " """""Թ $    1&  d$  Y$  >(  $l 4545 " &"L"B"8"4"* $    5&  d$  Y$  >(  $m 4545 " "ӽ"ӳ"ө"ӥ"ӛ $    n&  n$  c$  H(  .co cp 4545  " "$"""" $  ~  q&  b$  W$  <(  "cp 4545 " 
}"җ"ҍ"҃""u $    r&  n$  c$  H(  .co cs 4545  " 	""""" $  ~  t&  b$  W$  <(  "cs 4545 " 	_"q"g"]"Y"O $    u&  d$  Y$  >(  $v 4545 " """"" $  ~  w&  b$  W$  <(  "cw 4545 " K"U"K"A"="3 $  ~  x&  b$  W$  <(  "cx 4545 " ""Ͼ"ϴ"ϰ"Ϧ $  ~  y&  b$  W$  <(  "cy 4545 " 9";"1"'"#" $  ~  z&  b$  W$  <(  "cz 4545 " "ή"Τ"Κ"Ζ"Ό $    ;&  i$  ^$  C(  ){ 454C 5 "  """"" $    9&  d$  Y$  >(  ${ 4545 " "͋"́"w"s"i $    =&  d$  Y$  >(  $| 4545 " 
""""" $  ~  ?&  b$  W$  <(  "c? 4545 " "o"e"["W"M $  ~  A&  b$  W$  <(  "cA 4545 " """"" $  ~  C&  b$  W$  <(  "cC 4545 " o"U"K"A"="3 $  ~  E&  b$  W$  <(  "cE 4545 " ""ʾ"ʴ"ʰ"ʦ $  \  }&  @$  5(  ~ 45 " u"S"I"E"; $  \  &  @$  5(   45 " """" $  `  C&  D$  9(  cC +
 45 " "y"o"k"a $  n  E&  R$  G(  -cE  45 +
  " *"""" &    "  " $  L  &  0$  %(  + "  ""u"q"g $  L  &  0$  %(  + "  ^"$""" &  
+ "  0" &  
+ "  " &  
+ "  "Ǿ4 5$  44 5>  "  G  "   C  N      g  x
	8 g  e	8 g  vx	m g  vy	m g  vx	 g  vy	 g  vx	 g  vy	 g  vy	  g  vx	 g  vy	 g  vy	! g  %enum	; g  	%continue		; g  e	
S g  vx	8 g  vy	8 g  vx	* g  vy	* g  vx	  g  vy	  g  vx	 g  vy		 g  vx	
( g  vy	( g  	%continue	9 g  e	F g  vx	I- g  vy	I- g  vx	b g  vy	b g  vx	s g  vy	s g  	%continue	 g  e		 g  vx	>W g  vy	>W g  vx	WI g  vy	WI g  vx	h? g  vy	h? g  %loop	5 g  	%continue		5 g  e	
/ g  vx	h g  vy	h g  vx	 g  vy	 g  vx	% g  vy	% g  vx	 g  vy	 g  vx	6 g  vy	6 g  vx	O g  vy	O g  vx	` g  vy	` g  vx	y g  vy		y g  vx	
 g  vy	 g  vx	 g  vy	 g  vx	& g  vy	& g  vx	7 g  vy	7 g  vx	P g  vy		P g  vx	
a g  vy	a g  vx		[ g  vy		[ g  vx		M g  vy		M g  vx			C g  vy			C g  vx		l	 g  vy		l	 g  vx			 g  vy			 g  vx			 g  vy			 g  vx		
_ g  vy		
_ g  vx	

Q g  vy	

Q g  vx	

G g  vy	

G g  vx	
p
 g  vy	
p
 g  vx	

 g  vy	

 g  vx	

 g  vy	

 g  vx	
c g  vy	
c g  vx	U g  vy	U g  vx	K g  vy	K g  vx	t g  vy	t g  vx	 g  vy	 g  vx	 g  vy	 g  vx	g g  vy	g g  vx	Y g  vy	Y g  vx	 O g  vy	 O g  vx	x g  vy	x g  vx	 g  vy	 g  vx	 g  vy	 g  vx	k g  vy	k g  vx	] g  vy	] g  vx	$S g  vy	$S g  vx	| g  vy	| g  vx	 g  vy	 g  vx	 g  vy	 g  vx	o g  vy	o g  vx	a g  vy	a g  vx	(W g  vy	(W g  vx	 g  vy	 g  vx	 g  vy	 g  vx	 g  vy	 g  vx	 g  vy	 g  vx	 g  vy	 g  vx	, g  vy	, g  vx	E g  vy		E g  vx	
V g  vy	V g  vx	m g  vy	m g  vx	 g  vy	 g  vx	 g  vy	 g  vx	' g  vy	' g  vx	@ g  vy		@ g  vx	
Q g  vy	Q g  vx	h g  vy	h g  vx	 g  vy	 g  vx	 g  vy	 g  vx	  g  vy	  g  vx	9 g  vy		9 g  vx	
P g  vy	P g  v	c g  vx	L g  vy	L g  vx	> g  vy	> g  vx	4 g  vy	4 g  vx	] g  vy	] g  vx	v g  vy	v g  vx	 g  vy	 g  vx	 g  vy	 g  vx	,a g  vy	,a g  vx	r g  vy	r g  vx	 g  vy	 g  vx	E g  vy	E g  vx	7 g  vy	7 g  vx	- g  vy	- g  vx	VC g  vy	VC g  vx	o5 g  vy	o5 g  vx	+ g  vy	+ g  vx	 g  vy		 g  vx	
 g  vy	 g  vx	 g  vy	 g  vx	T? g  vy	T? g  vx	m1 g  vy	m1 g  vx	~' g  vy	~' g  vx	 g  vy		 g  vx	
 g  vy	 g  vx	 g  vy	 g  vx	P g  vy	P g  vx	i g  vy	i g  vx	z g  vy	z g  vx	 g  vy	 g  vx	v g  vy	v g  vx	l g  vy	l g  syms	&b g  vx	 g  vy	 g  vx	 g  vy	 g  vx	 g  vy	 g  vx	*P g  vy	*P g  vx	a g  vy	a g  vx	 g  vy	 g  vx	 g  vy	 g  vx	 g  vy	 g  vx	r g  vy	r g  vx	 h g  vy	 h g  vx	9Z g  vy		9Z g  vx	
JP g  vy	JP g  what	cB g  sym	j? g  what	5 g  sym	2 g  what	, g  sym	) g  vx	 g  vy	 g  vx	 g  vy	 g  vx	 g  vy	 g  vx	 g  vy		 g  vx	
 g  vy	 g  what	 g  sym	 g  what	H g  sym	O g  vx	 g  vy	 g  vx	 g  vy	 g  vx	& g  vy	& g  vx	? g  vy		? g  v	
X g  vx	R g  vy	R g  vx	D g  vy	D g  vx	: g  vy	: g  vx	, g  vy		, g  vx	
" g  vy	" g  what	5 g  sym	< g  what	X g  sym	_ g  what	 g  sym	 g  vx	c g  vy	c g  vx	| g  vy	| g  vx	 g  vy	 g  vx	 g  vy		 g  vx	
 g  vy	 g  what	 g  sym	| g  what	r g  sym	!o g  vx	  g  vy	  g  vx	 { g  vy	 { g  vx	 q g  vy	 q g  vx	  c g  vy		  c g  v	
 * U g  vx	 " g  vy	 " g  vx	 " g  vy	 " g  vx	 " g  vy	 " g  vx	 ! g  vy		 ! g  vx	
 ! g  vy	 ! g  what	!! g  sym	!! g  what	!*! g  sym	!1! g  what	!d! g  sym	!k! g  vx	"0# g  vy	"0# g  vx	"I#| g  vy	"I#| g  vx	"Z#r g  vy	"Z#r g  vx	"s#d g  vy		"s#d g  vx	
"#Z g  vy	"#Z g  what	"#L g  sym	"#I g  what	"#? g  sym	"#< g  vx	#$ g  vy	#$ g  vx	#$ g  vy	#$ g  vx	#$v g  vy	#$v g  vx	#$h g  vy		#$h g  what	
#$Z g  sym	$$W g  vx	$&) g  vy	$&) g  vx	$& g  vy	$& g  vx	$& g  vy	$& g  vx	$& g  vy		$& g  vx	
$% g  vy	$% g  what	%% g  sym	%% g  what	%/% g  sym	%6% g  what	%i% g  sym	%p% g  vx	&:' g  vy	&:' g  vx	&S' g  vy	&S' g  vx	&d'| g  vy	&d'| g  vx	&}'n g  vy		&}'n g  vx	
&'d g  vy	&'d g  what	&'V g  sym	&'S g  what	&'I g  sym	&'F g  vx	'( g  vy	'( g  vx	'( g  vy	'( g  vx	'( g  vy	'( g  vx	'(r g  vy		'(r g  what	
((d g  sym	((a g  vx	()1 g  vy	()1 g  vx	()# g  vy	()# g  vx	() g  vy	() g  vx	)B) g  vy	)B) g  vx	)[) g  vy	)[) g  vx	)l) g  vy	)l) g  vx	)}) g  vy		)}) g  vx	)* g  vy	)* g  vx	** g  vy	** g  vx	* * g  vy	* * g  what	*3* g  sym		*:* g  vx	*+@ g  vy	*+@ g  vx	*+2 g  vy	*+2 g  vx	*+( g  vy	*+( g  vx	+Q+ g  vy	+Q+ g  vx	+j+ g  vy	+j+ g  vx	+{+ g  vy	+{+ g  vx	+,V g  vy	+,V g  vx	+,H g  vy	+,H g  vx	,,> g  vy	,,> g  vx	,g, g  vy	,g, g  vx	,, g  vy	,, g  vx	,, g  vy	,, g  vx	,-v g  vy	,-v g  vx	--h g  vy	--h g  vx	--^ g  vy	--^ g  vx	-- g  vy	-- g  vx	-- g  vy	-- g  vx	-- g  vy	-- g  vx	.. g  vy	.. g  vx	.). g  vy	.). g  vx	.:.| g  vy	.:.| g  vx	./ g  vy	./ g  vx	./ g  vy	./ g  vx	./ g  vy	./ g  vx	/./ g  vy	/./ g  vx	/G/ g  vy	/G/ g  vx	/X/ g  vy	/X/ g  vx	/01 g  vy	/01 g  vx	/0# g  vy	/0# g  vx	/0 g  vy	/0 g  vx	0B0 g  vy	0B0 g  vx	0[0 g  vy	0[0 g  vx	0l0 g  vy	0l0 g  vx	01C g  vy	01C g  vx	015 g  vy	015 g  vx	01+ g  vy	01+ g  vx	1T1 g  vy	1T1 g  vx	1m1 g  vy	1m1 g  vx	1~1 g  vy	1~1 g  vx	12\ g  vy	12\ g  vx	12N g  vy	12N g  vx	22D g  vy	22D g  vx	2m2 g  vy	2m2 g  vx	22 g  vy	22 g  vx	22 g  vy	22 g  vx	23r g  vy	23r g  vx	33d g  vy	33d g  vx	3"3Z g  vy	3"3Z g  vx	33 g  vy	33 g  vx	33 g  vy	33 g  vx	33 g  vy	33 g  vx	44 g  vy	44 g  vx	4%4v g  vy	4%4v g  vx	464l g  vy	464l g  vx	45 g  vy	45 g  vx	44 g  vy	44 g  vx	44 g  vy	44 g  vx	55 g  vy	55 g  vx	575 g  vy	575 g  vx	5H5~ g  vy	5H5~ g  vx	55 g  vy	55 g  vx	55 g  vy	55 g  vx	66d g  vy	66d g  vx	6'6V g  vy	6'6V g  vx	6u6 g  vy	6u6 g  vx	66 g  vy	66 g  vx	67H g  vy	67H g  vx	67: g  vy	67: g  vx	7w7 g  vy	7w7 g  vx	77 g  vy	77 g  vx	78 g  vy	78 g  vx	78 g  vy	78 g  res	8Z8 g  loc	8c8 Fg  filenamef  'language/ecmascript/compile-tree-il.scm
	\
		]			f												f	.	2	4	5	9	 ;	;	@	D	G	&K	-Q	&S	S		W	Y	`	*b	l	4w	y	z	)|	#~	(	#				"	/	"			f	3	7	 9	9	<	@	F	F		J	L	Q	$S	T	)V	#X	(Z	+`	3b	7l	Hw	7|	7	=	7	3	>	>	D	L	>	>	I	V	I	>	3	3	+	(	#				"	(	1	"	"	-	:	-	"			f	~		 										$		)	#	(	+	3	D	3	3	>	>	I	V	I	>	3	3	+	(	#				"	/	"			f	s	w	y	z	~	 					&	-	&						*		)	#	(	+	1	1	<	I	<	1	+	(	#			)	#	(	+	3	D	3	3	>	K	>	3	3	+	(	#				"	/"	"%	(	9	f					f							f						f	s	}				f				"		0		2		5		=	f									f	
#	
'	
9	
A	f	
	
	
	
	f	'	+	=	E	f					f	+	/	A	I	f					f	/	3	E	M	f					f	3	7	I	Q	f					f	y						f	t	~					f	[	c	g		i	l	w	|			f				&	.	f						f	}	}	~	}		f	:z	<z	D{	Rz	[	f	x	x	x		f	u	u	v	u	'	f	p	p	p	q	r	p	p		f	k	k	k	l	m	k	k		f	d	f	f	g	i	g	f	d		f	Z	&Z	*]		3_	"@]		A`	U]		f	f	X	X	X		f	V		f	>T	F	f	oJ	pK	~J		f	H		f	[9	c9	f	_	j	_	n	`	s	`	x	`	}	`	'~;	;		_		_		`		`		`		`	'=	=	*=	9=	*>	*?	1@	1>	*A	*=	=		_		_		`		`		`		`	'	d	C	!D	(E	(F	(C	!	e	#	d	&	`	F	f	,	,		_		_			`		`		`		`	'.	.	".	1!.	"#/	".0	)71	)?/	"A2	"H.	H.	K	_	O	_	S	`	X	`	]	`	b	`	'd	d	f4	q5	 z6	 7	 4		e		d		`		f	P$	X$	\%		^&	b'	d'	#f'	2i'	#m)	#t'	w&	|%			f	-	5	8	_	<	_	@	`	E	`	J	`	O	`	'P	X	[	_	_	_	c	`	h	`	m	`	r	`	't	v	*x	9{	*}	*	1	1	*	*			_		_		`		`		`		`	'	d		! 	(!	("	(	!	e		d		`		f						_		_		`		`		`		`	'		"	1	"	" 	)		)	"	"			_	!	_	%	`	*	`	/	`	4	`	'6	d	8	C	%L	 S	 ]	_	e	i	d	l	`		f	 "	 *	 .		 0	 4	 6	$ 8	3 ;	$ ?	$ F	 I	 N		 Y	f	  	! 	!
	_	!	_	!	`	!	`	!	`	!!	`	'!" 	!* 	!-	_	!1	_	!5	`	!:	`	!?	`	!D	`	'!F 	!Q 	&!Z 	&!d 	!d 	!g	_	!k	_	!o	`	!t	`	!y	`	!~	`	'!	d	! 	!! 	(! 	(! 	(! 	-! 	0! 	-! 	(! 	!!	e	!	d	!	`	!	f	" 	" 	"	_	"	_	"	`	"	`	"	`	"	`	'" 	" 	" 	" 	" 	"	_	"	_	"	`	"	`	"	`	"	`	'"	d	" 	" 	 # 	 # 	 # 	+# 	:# 	+# 	+#  	+#' 	 #* 	#,	e	#6	d	#9	`	#P	f	# 	# 	# 	# 	#	_	$	_	$	`	$	`	$	`	$	`	'$	d	$ 	$ 	$% 	$' 	%$) 	4$, 	%$. 	%$7 	%$> 	$A 	$C	e	$M	d	$P	`	$^	f	% 	% 	%	_	%	_	%	`	%	`	%!	`	%&	`	'%' 	%/ 	%2	_	%6	_	%:	`	%?	`	%D	`	%I	`	'%K 	%V 	&%_ 	&%i 	%i 	%l	_	%p	_	%t	`	%y	`	%~	`	%	`	'%	d	% 	!% 	(% 	(% 	(% 	3% 	B% 	3% 	3% 	3% 	(% 	!%	e	%	d	%	`	%	f	& 	& 	&	_	&	_	&	`	&	`	&	`	&	`	'& 	& 	& 	& 	& 	&	_	&	_	&	`	&	`	&	`	&	`	'&	d	& 	' 	 ' 	 ' 	 ' 	+' 	:' 	+'! 	+'* 	+'1 	 '4 	'6	e	'@	d	'C	`	'Z	f	' 	' 	( 	( 	(		_	(	_	(	`	(	`	(	`	( 	`	'("	d	($ 	(% 	(/ 	(1 	&(3 	5(6 	&(8 	&(A 	&(H 	(K 	(M	e	(W	d	(Z	`	(h	f	( 	( 	( 	 ( 	( 	) 	) 	)	f	) 	) 	) 	 ) 	) 	) 	) 	)	f	*+ 	*3 	*6	_	*:	_	*>	`	*C	`	*H	`	*M	`	'*O 	*Q 	*\ 	(*f 	*h 	*p 	*{ 	*~	`	*	f	* 	* 	* 	 + 	+	 	+ 	+ 	+"	f	+ 	+ 	+ 	+ 	+	f	, 	, 	,% 	,0 	,8	f	, 	, 	, 	, 	,	f	-( 	-* 	-, 	!-/ 	-1 	-3 	-5 	,-8 	-9 	-B 	(-M 	-P 	-X	f	- 	- 	- 	!- 	- 	)- 	4- 	-	f	.F 	.H 	.J 	!.M 	.O 	.Q 	.S 	,.V 	.W 	.` 	(.k 	.n 	.v	f	. 	. 	. 	!. 	. 	+. 	6. 	.	f	/d 	/n 	/w 	'/ 	/	f	/ 	/ 	/ 	!/ 	/ 	'0  	20 	0	f	0x 	0z 	0| 	!0 	0 	&0 	10 	0	f	1 	1 	1 	!1 	1	 	'1 	21 	1%	f	1 	1 	1 	!1 	1 	&1 	11 	1	f	2 	2 	2& 	2* 	%23 	26 	2>	f	2 	2 	2 	2 	2	f	3. 	38 	3A 	3L 	3T	f	3 	3 	3 	!3 	3 	&3 	13 	3	f	4B 	4D 	4F 	!4I 	4J 	&4S 	14^ 	4f	f	4 	4 	4 	!4 	4 	&4 	14 	4	f	5T		5V		5X		!5[		5\		&5e		15p		5x	f	5	}	5	}	5	}	5	f	63	{	6=	{	6H	{	6P	f	6	y	6	y	6	y	!6	y	6	y	&6	y	56	y	6	f	7	u	7	u	7		u	!7	u	7	v	7	v	"7#	v	7%	w	7,	u	74	f	7V	s	7j	f	7	q	7	f	7	o	8 	f	8"	m	8.	f	88	k	8D	f	8N	i	8O	i	8R	i	8Z	f		8	  g  nameg  comp CRX"Y     h    ][" " "  "  "  7 $     " (  45DC $  =  $  (4L>  G  "u"" $  5  $   &   "9"E"A"= $  E  $  0&  (   """"" $    $  &  $  $  }
	
$  h

(  T	  4	5$  "  	4	L 5$  "  	 "&"*"&"""""" $    $  &  y$  n$  Y
	
(  E4	5$  "  	4	L 5$  "  	 "s"s"o"k"g"c"_ z      g  in
	 g  out	 g  rvars		 g  vx		#	: g  vy		#	: g  vx		Z  g  vy		Z  g  sub-out		s  g  rvars		s  g  vx	   g  vy	   g  vx	 ! g  vy	 ! g  vx	  g  vy	  g  vx	2 g  vy	2 g  vx	C g  vy	C g  vx	\ g  vy	\ g  vx		m g  vy	
m g  vx	~ g  vy	~ g  t	 g  vx	 g  vy	 g  vx	 g  vy	 g  vx	/ g  vy	/ g  vx		@ g  vy	
@ g  t	]v  #g  filenamef  'language/ecmascript/compile-tree-il.scm
				.0		:/			@		A3		K3			M		a(		e		f*		k*		r*		v)		 ,	 +	 	 $	" 	 $	1 $	9 $	 &	 %		 	#								$	!				L	U	]	k	$z					 -		  g  nameg  lp CZK,-.  h      ]44 556           g  x
		  g  filenamef  'language/ecmascript/compile-tree-il.scm
8		9	 	9	/	9	B	9	 	9	 		   C[e       h   t   ] C    l       g  x
		  g  filenamef  'language/ecmascript/compile-tree-il.scm
<		<	+ 		   C 
      hp     ],O Q 4>  G 454544 55454	5 C      g  e
		p g  body		p g  formals			p g  formal-syms			p g  lp			 g  out			p g  rvars			p g  names		-	p g  syms		8	p g  e		R	p  
g  filenamef  'language/ecmascript/compile-tree-il.scm

						(			"5		'7		-7		08		87		;;		@;		R;		R7		V<		[<		d=		o<	 		p	  g  nameg  	comp-body C/RC        g  m
		,  g  filenamef  'language/ecmascript/compile-tree-il.scm		
	$
	'
z	*
	.
		6
~	H		H
	J
	O
      	\
      
 	      
   C6                                                                        ccache/language/ecmascript/impl.go                                                                  0000644                 00000037723 15154557173 0013210 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0?      ] 4        h      ] g  guile	 	g  define-module*	 	 	g  language	g  
ecmascript	g  impl		 	
g  filenameS	f  language/ecmascript/impl.scm	g  importsS	g  oop	g  goops	 	 	g  base	 	 	g  function	 	 	g  array	 	 	 	g  exportsS	g  js-init	g  get-this	g  typeof	g  bitwise-not	 g  logical-not	!g  shift	"g  mod	#g  band	$g  bxor	%g  bior	&g  make-enumerator	' !"#$%& 	(g  
re-exportsS	)g  *undefined*	*g  *this*	+g  
call/this*	,g  pget	-g  pput	.g  pdel	/g  has-property?	0g  	->boolean	1g  ->number	2g  
new-object	3g  new	4g  	new-array	5)*+,-./01234 	6g  set-current-module	76 	86 	9g  defined?	:9 	;9 	<g  	js-module	=g  is-a?	>= 	?= 	@g  	<generic>	A@ 	B@ 	Cg  toplevel-define!	DC 	EC 	Fg  ensure-generic	GF 	HF 	Ig  <js-module-object>	Jg  <class>	KJ 	LJ 	Mg  memq	Ng  <object>	ON 	PN 	Qg  class-precedence-list	RQ 	SQ 	Tg  class-redefinition	UT 	VT 	Wg  
make-class	Xg  <js-object>	Yg  module	Zg  	init-formS	[g  current-module	\[ 	]g  
init-thunkS	^g  init-keywordS	_g  moduleS	`g  getterS	ag  nameS	bg  make	cb 	db 	eg  add-method!	fe 	ge 	hg  <method>	ih 	jh 	kg  specializersS	lg  <string>	mg  formalsS	ng  o	og  p	pno 	qg  bodyS	rg  string->symbol	sro 	t,ns 	ut 	vg  make-procedureS	wg  	procedureS	xg  <symbol>	yg  let	zg  v	{g  module-variable	|<n 	}{|o 	~z} 	~  g  if g  variable-ref z  g  next-method   z  y    g  <top>     noz  -nsz    g  module-define! |oz    g  
prop-attrs g  cond g  module-local-variable |o  g  quote     g  
DontDelete g  ReadOnly     }  g  else       ns    g  	prop-keys n  g  append g  hash-map->list g  lambda g  k z    g  module-obarray |        g  resolve-interface g  map g  string-split g  
js-require g  <js-global-object> \  g  NaN e  +nan.0 g  Infinity e  +inf.0 g  	undefined g  require g  Object g  *object-prototype* g  Array g  *array-prototype* g  init-js-bindings! f  	undefined f  object g  boolean? f  boolean g  number? f  number g  string? f  string g  
procedure? f  function f  scm g  lognot g  ->primitive g  ash g  logand g  logxor g  logior g  modulo g  + g  a g  b   g  string-append     g  ->string             1  1      g  -     g  *     g  /     g  <     g  string<     g  <=     g  string<=     g  >=     g  string>=     g  >   g  string>  g  obj-and-prototypesg  js-prototypeg  make-hash-table	g  for-each
g  
hashq-set!g  filterg  prop-has-attr?g  DontEnumC 5h+  !  ]4	
'(55	 48 >  "  G   4;<5  $  "  4?<iB5 $  14E<4H4;<5$  <i"  <5>  "  G  "   4;I5$ #4?IiL5$ l4MiP4SIi55$  4VIi4WiXi YZ\][      h   P   ] 6   H       g  filenamef  language/ecmascript/impl.scm		'	 		
   C^_`<i 	 aI5>  "  G  "  4EI4WiXi YZ\][  h   P   ] 6   H       g  filenamef  language/ecmascript/impl.scm		'	 		
   C^_`<i 	 aI5>  "  G  "  4EI4WiXi YZ\][  h   P   ] 6   H       g  filenamef  language/ecmascript/impl.scm		'	 		
   C^_`<i 	 aI5>  "  G  "  4EI4WiXi YZ\][  h   P   ] 6   H       g  filenamef  language/ecmascript/impl.scm		'	 		
   C^_`<i 	 aI5>  "  G  4;,5  $  "  ,i $  !4E,4dBa,5>  "  G  "   4g,i4djkIili mpquvw,r     h   }   ] 456 u       g  o
		 g  p		  g  filenamef  language/ecmascript/impl.scm
	)
		*	
		*	 			   C5>  "  G  4;,5  $  "  ,i $  !4E,4dBa,5>  "  G  "   4g,i4djkIixi mpqv{<      h(      ]
44 55$  CL  6           g  o
		$ g  p		$ g  v			$  g  filenamef  language/ecmascript/impl.scm
	+
		,			,			,			,			-			.		$	+
 			$	   C  h   m   ] O C      e       g  real-next-method
		
  g  filenamef  language/ecmascript/impl.scm
	+
 		
   Cw5>  "  G  4;-5  $  "  -i $  !4E-4dBa-5>  "  G  "   4g-i4djkIili mqvw-r       h      ] 456              g  o
		 g  p		 g  v			  g  filenamef  language/ecmascript/impl.scm
	0
		1	
		1	 			   C5>  "  G  4;-5  $  "  -i $  !4E-4dBa-5>  "  G  "   4g-i4djkIixi mqvw<   h      ]4 56              g  o
		 g  p		 g  v			  g  filenamef  language/ecmascript/impl.scm
	2
		3			3	 			   C5>  "  G  4;5  $  "  i $  !4E4dBa5>  "  G  "   4gi4djkIixi mpqv<{   h8      ]44 55$  C44 55$  CL  6            g  o
		3 g  p		3  g  filenamef  language/ecmascript/impl.scm
	4
		5				5	 		5				5			5	1		6				6		$	6			(	5		*	6	+	3	4
 		3	   C h   m   ] O C      e       g  real-next-method
		
  g  filenamef  language/ecmascript/impl.scm
	4
 		
   Cw5>  "  G  4;5  $  "  i $  !4E4dBa5>  "  G  "   4gi4djkIili mpqvwr h   }   ] 456 u       g  o
		 g  p		  g  filenamef  language/ecmascript/impl.scm
	8
		9			9	 			   C5>  "  G  4;5  $  "  i $  !4E4dBa5>  "  G  "   4gi4djkIi mqv   h   n   ] C   f       g  k
		 g  v		  g  filenamef  language/ecmascript/impl.scm
	;	 			   C<   h       ]444 5554L  56       g  o
		   g  filenamef  language/ecmascript/impl.scm
	:
		;	
	
	;	+		;	;		;	+		;	
		:
	 	;	 			    C        h   m   ] O C      e       g  real-next-method
		
  g  filenamef  language/ecmascript/impl.scm
	:
 		
   Cw5>  "  G  bI_r       h       ]444 .5556        g  modstr
		  g  filenamef  language/ecmascript/impl.scm
	?
			A			A			A	/		A			A			@	 		  g  nameg  
js-require CR"  +4E4WiIi   a5>  "  xG  "  q4;5$  b4?iL5$  K4MiP4Si55$  -4Vi4WiIi   a5>  "  G  "  "t"  "l"  "d4;<5  $  "  <i $  !4E<4dBa<5>  "  G  "   4g<i4djki mqvw[ h   f   ]6   ^       g  o
		  g  filenamef  language/ecmascript/impl.scm
	D
		E	 		   C5>  "  G  )     h     ]4 >  "  G  4 >  "  G  4 >  "  G  4 	>  "  G  4 
>  "  G   6            g  mod
		z  g  filenamef  language/ecmascript/impl.scm
	G
		H				H			H			H			I			I		!	I	 	&	I		/	J		5	J		<	J		E	K		K	K		R	K		[	P		a	P		h	P		v	Q		z	Q	 		z  g  nameg  init-js-bindings! CR*b[       h(      ]45   $   C45\45 6          g  t
		%  g  filenamef  language/ecmascript/impl.scm
	S
		T				T			V			W		%	W		 		%
  g  nameg  js-init CR*     h   c   ] [C  [       g  filenamef  language/ecmascript/impl.scm
	Y
 		
  g  nameg  get-this CR)=X  hh     ] &  C (  C4 5$  C4 5$  C4 5$  	C4
 5$  C4 5$  CC       	      g  x
		a  g  filenamef  language/ecmascript/impl.scm
	\
	
	]			]			]			^			_			!	]		#	_		%	`			/	]		1	`		3	a			=	]		?	a		A	b			K	]		M	b		O	c			[	]		]	c		`	d	 		a  g  nameg  typeof CRiR0     h      ]44 55C       g  x
		  g  filenamef  language/ecmascript/impl.scm
	g
		h			h			h			h	 		  g  nameg  logical-not C Ri!Ri#Ri$Ri%Ri"R4;5  $  "  i $  !4E4dBa5>  "  G  "   4gi4djklili mqvw      h   u   ] 6      m       g  a
		
 g  b		
  g  filenamef  language/ecmascript/impl.scm
	r
	
	s	 		
	   C5>  "  G  4;5  $  "  i $  !4E4dBa5>  "  G  "   4gi4djkli mqvw      h   }   ] 456 u       g  a
		 g  b		  g  filenamef  language/ecmascript/impl.scm
	u
		v			v	 			   C5>  "  G  4;5  $  "  i $  !4E4dBa5>  "  G  "   4gi4djkli mqvw      h   }   ]4 56 u       g  a
		 g  b		  g  filenamef  language/ecmascript/impl.scm
	x
		y			y	 			   C5>  "  G  4;5  $  "  i $  !4E4dBa5>  "  G  "   4gi4djk mqvw1  h      ]4 545C      }       g  a
		 g  b		  g  filenamef  language/ecmascript/impl.scm
	{
		|		
	|			|	 			   C5>  "  G  4;5  $  "  i $  !4E4dBa5>  "  G  "   4gi4djk mqvw1  h      ]4 545C      }       g  a
		 g  b		  g  filenamef  language/ecmascript/impl.scm
	~
				
					 			   C5>  "  G  4;5  $  "  i $  !4E4dBa5>  "  G  "   4gi4djk mqvw1  h      ]4 545C             g  a
		 g  b		  g  filenamef  language/ecmascript/impl.scm
 
	 		
 		 	 			   C5>  "  G  4;5  $  "  i $  !4E4dBa5>  "  G  "   4gi4djk mqvw1      h      ]4 545C             g  a
		 g  b		  g  filenamef  language/ecmascript/impl.scm
 
	 		
 		 	 			   C5>  "  G  4;5  $  "  i $  !4E4dBa5>  "  G  "   4gi4djk mqvw1      h      ]4 545C             g  a
		 g  b		  g  filenamef  language/ecmascript/impl.scm
 
	 		
 		 	 			   C5>  "  G  4;5  $  "  i $  !4E4dBa5>  "  G  "   4gi4djklili mqvw  h   w   ] 6      o       g  a
		
 g  b		
  g  filenamef  language/ecmascript/impl.scm
 
	
 	 		
	   C5>  "  G  4;5  $  "  i $  !4E4dBa5>  "  G  "   4gi4djk mqvw1        h      ]4 545C             g  a
		 g  b		  g  filenamef  language/ecmascript/impl.scm
 
	 		
 		 	 			   C5>  "  G  4;5  $  "  i $  !4E4dBa5>  "  G  "   4gi4djklili mqvw  h   w   ] 6      o       g  a
		
 g  b		
  g  filenamef  language/ecmascript/impl.scm
 
	
 	 		
	   C5>  "  G  4;5  $  "  i $  !4E4dBa5>  "  G  "   4gi4djk mqvw1        h      ]4 545C             g  a
		 g  b		  g  filenamef  language/ecmascript/impl.scm
 
	 		
 		 	 			   C5>  "  G  4;5  $  "  i $  !4E4dBa5>  "  G  "   4gi4djklili mqvw  h   w   ] 6      o       g  a
		
 g  b		
  g  filenamef  language/ecmascript/impl.scm
 
	
 	 		
	   C5>  "  G  4; 5  $  "   i $  #4E 4dBa 5>  "  G  "   4g i4djk mqvw1  h      ]4 545C             g  a
		 g  b		  g  filenamef  language/ecmascript/impl.scm
 
	 		
 		 	 			   C5>  "  G  4; 5  $  "   i $  #4E 4dBa 5>  "  G  "   4g i4djklili mqvw   h   w   ] 6      o       g  a
		
 g  b		
  g  filenamef  language/ecmascript/impl.scm
 
	
 	 		
	   C5>  "  G          h       ] $   44 55CC             g  o
		  g  filenamef  language/ecmascript/impl.scm
 
	 		 		 	"	 		 		 	 		  g  nameg  obj-and-prototypes CR		
      h   i   ]L  6     a       g  k
		  g  filenamef  language/ecmascript/impl.scm
 		 	& 		   C  h   r   ]L O 4 56    j       g  o
		  g  filenamef  language/ecmascript/impl.scm
 		 		 	 		   C4    h      ]4L  5C |       g  p
		  g  filenamef  language/ecmascript/impl.scm
 		 	$	 	:	 	$	 	 		   Ch   o   ] C   g       g  k
		 g  v		  g  filenamef  language/ecmascript/impl.scm
 	- 			   C 
     hH      ]	4	54O 4 5>  "  G  4 O 4	55@             g  obj
		B g  props			B  g  filenamef  language/ecmascript/impl.scm
 
	 			 		 		 		! 		, 		6 		@ 		B 	 		B  g  nameg  make-enumerator C&RC         g  m
		0 g  t
	8	T g  t
cx g  t
| g  t
o g  t
 g  t
 g  t


 g  t
 g  t
 g  t
 g  t
 g  t
 g  t
 g  t
 g  t
 g  t
(= g  t
Pe g  t
x g  t
   g  t
!! g  t
"" g  t
## g  t
$% g  t
&!&7  g  filenamef  language/ecmascript/impl.scm		
	1	&
\	)
u	+
h	0
	2
	4

	8
	:
5	?
:	C
	D
	G
m	S
	Y
	\
	f
Y	g
`	j
g	l
n	m
u	n
|	p
}	r
	u
	x
	{
	~
 
! 
I 
q 
  
! 
" 
# 
$ 
& 
(  
+ 
 )	+
   C6                                              ccache/language/ecmascript/tokenize.go                                                              0000644                 00000054403 15154557173 0014071 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0X      ] 4  h      ] g  guile	 	g  define-module*	 	 	g  language	g  
ecmascript	g  tokenize		 	
g  filenameS	f   language/ecmascript/tokenize.scm	g  importsS	g  ice-9	g  rdelim	 	 	g  srfi	g  srfi-1	 	g  selectS	g  unfold-right	 	 	g  system	g  base	g  lalr	 	 	 	g  exportsS	g  
next-token	 g  make-tokenizer	!g  make-tokenizer/1	"g  
tokenize/1	# !" 	$g  set-current-module	%$ 	&$ 	'g  throw	(g  syntax-error	)g  and=>	*g  "source-location->source-properties	+g  port-filename	,g  	port-line	-g  port-column	.g  catch	/. 	0. 	1g  ftell	2g  source-location	32 	42 	5g  port-source-location	6g  eof-object?	7g  	peek-char	8f  EOF while reading a token	9g  read-delimited	:g  peek	;g  
read-until	<g  char-numeric?	=g  memv	>abcdef 	?ABCDEF 	@g  	char-hex?	Ag  char->integer	Bg  digit->number	Cg  char-downcase	Dg  hex->number	Eg  	read-char	Fg  lexical-token	GF 	HF 	Ig  /	Jg  char=?	Kg  	read-line	Lf  EOF while in multi-line comment	Mg  /=	Ng  read-regexp	Og  
read-slash	Pg  string	Qg  char-alphabetic?	Rg  string-append	Sg  reverse	Tg  RegexpLiteral	Uf  (regexp literals may not contain newlines	Vf   	Wg  StringLiteral	Xf  (octal escape sequences are not supported	Yf  bad hex character escape	Zg  integer->char	[g  string->number	\f  (string literals may not contain newlines	]g  read-string	^f  break	_g  break	`^_	af  else	bg  else	cab	df  new	eg  new	fde	gf  var	hg  var	igh	jf  case	kg  case	ljk	mf  finally	ng  finally	omn	pf  return	qg  return	rpq	sf  void	tg  void	ust	vf  catch	wv.	xf  for	yg  for	zxy	{f  switch	|g  switch	}{|	~f  while	g  while ~ f  continue g  continue  f  function g  function  f  this g  this  f  with g  with  f  default g  default  f  if g  if  f  throw ' f  delete g  delete  f  in g  in  f  try g  try  f  do g  do  f  
instanceof g  
instanceof  f  typeof g  typeof  f  null g  null  f  true g  true  f  false g  false  `cfiloruwz}  g  
*keywords* f  abstract g  abstract  f  enum g  enum  f  int g  int  f  short g  short  f  boolean g  boolean  f  export g  export  f  	interface g  	interface Ō f  static g  static Ȍ f  byte g  byte ˌ f  extends g  extends Ό f  long g  long ь f  super g  super Ԍ f  char g  char ׌ f  final g  final ڌ f  native g  native ݌ f  synchronized g  synchronized  f  class g  class ㌤ f  float g  float 挤 f  package g  package 錤 f  throws g  throws 쌤 f  const g  const  f  goto g  goto  f  private g  private  f  	transient g  	transient  f  debugger g  debugger  f  
implements g  
implements  f  	protectedg  	protected f  volatileg  volatilef  doubleg  double	f  import
g  import	
f  publicg  public g  *future-reserved-words*g  list->stringg  	assoc-reff  &word is reserved for the future, dude.g  string->symbolg  
Identifierg  read-identifierf  error reading exponent: EOFg  +g  -f  !error reading exponent: non-digite  1.0g  expte  0.0f  $bad digit reading hexadecimal numberf  invalid digit in octal sequence g  read-numeric!f  {"g  lbrace#!"$f  }%g  rbrace&$%'f  ((g  lparen)'(*f  )+g  rparen,*+-f  [.g  lbracket/-.0f  ]1g  rbracket2013f  .4g  dot5346f  ;7g  	semicolon8679f  ,:g  comma;9:<f  <=g  <><=?f  >@g  >A?@Bf  <=Cg  <=DBCEf  >=Fg  >=GEFHf  ==Ig  ==JHIKf  !=Lg  !=MKLNf  ===Og  ===PNOQf  !==Rg  !==SQRTf  +UTVf  -WVXf  *Yg  *ZXY[f  %\g  %][\^f  ++_g  ++`^_af  --bg  --cabdf  <<eg  <<fdegf  >>hg  >>ighjf  >>>kg  >>>ljkmf  &ng  &omnpf  |qg  borrpqsf  ^tg  ^ustvf  !wg  !xvwyf  ~zg  ~{yz|f  &&}g  &&~|}f  ||g  orf  ?g  ?f  :g  colonf  =g  =f  +=g  +=f  -=g  -=f  *=g  *=f  %=g  %=f  <<=g  <<=f  >>=g  >>=f  >>>=g  >>>=f  &=g  &=f  |=g  bor=f  ^=g  ^=#&),/258;>ADGJMPSUWZ]`cfilorux{~ .g  *punctuation*f  /If  /=M g  *div-punctuation*g  assv-refg  
string-refg  string-lengthg  	substringf  !bad syntax: character not allowedg  read-punctuationg  *eoi*g  NumericLiteralf  unexpected right parenthesisg  srfi-9 g  throw-bad-struct  g  lexical-token-sourceg  lexical-token-categoryf  unexpected right bracketf  unexpected right braceg  reverse!C 5h:    ]4	
#5 4& >  "  G   '()*        h       - 1 3  456       g  what
			  g  loc			  g  form				  g  args				   g  filenamef   language/ecmascript/tokenize.scm
	
									 		 			 	
	  g  nameg  syntax-error C(R+,-01        h   [   ] L 6S       g  filenamef   language/ecmascript/tokenize.scm
	#			#	, 		
   C   h   h   -  1  3 C     `       g  args
			  g  filenamef   language/ecmascript/tokenize.scm
	#	 			


   C4   h@      ]!4 54 54 54 O 5 C          g  port
		= g  input	&	= g  line		&	= g  column		&	= g  offset		&	=  g  filenamef   language/ecmascript/tokenize.scm
	
		 		
	!			"			#		&	 	 		=  g  nameg  port-source-location C5R67(89:   hH   4  ]4455$  	64 54455$  
6C   ,      g  delims
		E g  port		E g  loc			E g  token		&	E  g  filenamef   language/ecmascript/tokenize.scm
	'
		(			(			(			(			)			)			*		$	*	/	&	*		&	*		)	+		,	+		4	+		8	+		<	,		B	,	 		E	  g  nameg  
read-until C;R6<=>?   h@      ]	4 5$  C4 5$  C4 5$  C 6          g  c
		= g  t		= g  t	*	=  g  filenamef   language/ecmascript/tokenize.scm
	/
		0			0			1			1		"	2		*	1		=	3	 			=  g  nameg  	char-hex? C@RA   h      ]4 5	0C          g  c
		  g  filenamef   language/ecmascript/tokenize.scm
	5
		6			6			6	 		  g  nameg  digit->number CBR<BAC     h(      ]4 5$   6	
44 55	aC         g  c
		&  g  filenamef   language/ecmascript/tokenize.scm
	8
		9			9			:			;			;		!	;		#	;	1	$	;		%	;	 		&  g  nameg  hex->number CDRE76HIJK(LMN       h0  %  ]4 >  "  G  4 545$   C4/5$  4 >  "  G   64*5$  4 >  "  G  "  c45$  		
64*5$  54 5/$  4 >  "  G   64 5"4 5"4 5"$  1=$  4 >  "  G   C C 6          g  port
	, g  loc	, g  div?		, g  c1		, g  c		}   g  filenamef   language/ecmascript/tokenize.scm
	=
		?			@			>			B		(	A		,	D		2	D		4	E		@	A		A	F		Z	G		[	H		g	A		h	I		}	J		~	L	
 	K	 	M	 	M	
 	N	
 	K	 	O	 	O	 	O	
 	Q	 	R	 	S	 	S	 	U	 	U	
 	J	 	J	 	J	 	A	 	W	 	X		X	4	X	 	Y	"#	Y	,	[	 +	,	  g  nameg  
read-slash CORP7JE6Q<RSHT;(UV      hx  %  ]B4/\
5" G4 54/5$  4 >  "  G  "  45$  "  T45		$  	"  ;45		$  	"  #4$5		$  	"  	4_5			$  454	5
 C4 >  "  G  4 5"L4 5"<4\5$  @4 >  "  G  4 54 544\55"64 5"             g  port
	q g  loc	q g  terms		q g  str		\ g  head		\ g  
terminator		\ g  c		A  g  flags		A  g  t		H  g  t			\  g  t			q  g  t		   g  value	   g  echar	+R  g  filenamef   language/ecmascript/tokenize.scm
	]
		_			_			`			a			a			c	
	+	b		,	d	
	A	f	
	B	g		H	g		V	h		\	h		k	i		q	h	 	j	 	h	 	k	 	h	 	g	 	m	* 	n	* 	m	$ 	l	 	l	$ 	l	 	o	 	p	 	p	, 	p	 	f	
 	f	 	f	/	f	
	q	
	b		r	
%	s	+	s	
.	t	9	u	@	u	(J	u	R	t	V	w	\	w	
\	`	]	`	i	`	5q	`	 4	q	  g  nameg  read-regexp CNREP7JHW6<(XY@ZD[R;\        hX  5  ]J4 54\
5" (4 545$  4 >  "  G   C4\5$ 4 >  "  G  4 5'$  "  "$  "  \$  " sb$  " df$  " Un$  
" Fr$  " 7t$  	" (v$  " 0$  <4 545$   "  45$  4	
5"   "  x$  s4 54 5"  4	455"  =45$  .45$  4	45455"  ""  ""  Xu$  M4 54 54 5	4 5
444	
5	55
	"  4454 55"	64 5" -      g  port
	W g  loc	W g  c			W g  terms		W g  str		F g  
terminator		%F g  c		x g  next	@ g  a	T g  b	] g  a	 g  b	 g  c		 g  d	
	 g  echar	<  g  filenamef   language/ecmascript/tokenize.scm
	z
		{				{			|			|		 		 		% 		( 		4 	
	5 		J 	 	Q 		S 		_ 	
	` 		r	~		x	~	 		
	 	 	 	 	# 	- 	. 	2 	7 	M		
N 	T 	W 	] 	d 	h 	k 	>u 	y 	z 	 	 	$ 	 	 	) 	# 	: 	  			
 	 	 	 	 	 	 	 	 	 	 	. 	 	 	 	# 	%* 	!6 	< 	@ 	F 	F 	G 	W 	 J	W	  g  nameg  read-string C]RRR6Q<JSH(E7  h    ]*"  45$  "  T45$  "  ;45$  "  #4$5$  "  	4_5$  V445545$  	 C4
5$  
645	 C4 >  "  G  4 5"4 5"       x      g  port
	 g  loc	 g  c		  g  chars		  g  t			q g  t		!	m g  t		6	j g  t		M	g g  word	   g  t	   g  value	    g  filenamef   language/ecmascript/tokenize.scm
 
	 		 		 		 		! 		0 		6 		E 		M 		\ 		n 		u 		v 		y 	"  	  	  	  	
  	   	  	
  	  	  	*  	  	*  	  	  	  	$  	  	  	  	' 	 %		  g  nameg  read-identifier CRJ7E6B<(@D   h  /  ]:44 5.5$  0"  4 54 545$  6" ?" *45$  C45$  .4 >  "  G  4 5	
45"4e5$  "  	4E5$ 4 >  "  G  4 545$  45"  f4+5$  4 >  "  G  	"  A4-5$  4 >  "  G  
"  45$  	"  45"  k45$  "  45$  24 >  "  G  4 54	
455"
$  	"  4	
5C4 5
"4.5$  4 >  "  G  "  d45$  "  45$  :4 >  "  G  4 5454	
5""4 5	"C45"405$ Y4x5$  "  	4X5$  4 >  "  G  4 545$  "  4>  "  G  "  <45$  .4 >  "  G  4 5	45"C
"45$  "  45$  C45$  n485$  "  	495$  4>  "  G  "   4 >  "  G  4 5	45"yC
"k"["W      '      g  port
	 g  loc	 g  c0		! g  c1		* g  c1		Eo g  acc		Eo g  t	   g  c	 O g  add	O g  c	U g  e	U g  c	W g  dec	W g  n	W g  t	 g  c	> g  c	3 g  acc	3 g  c	M g  acc	M g  t	o  g  filenamef   language/ecmascript/tokenize.scm

											!		$		*		-		7		=		E"		F$	
	P#		T%	
	^#		_&	
	q'		|(		}(	 (	 '	
 )	 )	
 )	 #	 *	
 +	 +	 ,	 ,	 -	 -	, -	 /	 ,	 /	-0	,	0	-11	;,	B3	F3	,L3	O+	
U5	V6	`6	f6	0p6	q7	8	8	*8	/8	88	*8	:	:	:	1:	*:	;:	5	5	5	;	
#	<	
=	
>	>	>	.>	?	!@	*A	"1A	4:A	;A	>B	H@	OE	WE	W=	
X=	`=	.l=	
o"	r"	"							/			
	
									
		 	!	#(	0	3	?	I	M	N	X	\	f	g	o	}	&			!					 			 		  g  nameg  read-numeric C RRR       h     ]
(   C4 4
55$  D45$  "  4L 45 5  "4
5   "           g  nodes
	  g  puncs	  g  t		   g  filenamef   language/ecmascript/tokenize.scm
							,		8		,					%	(	*	7	-	(	/	%	3	!	8	9	:	%	A	/	F	3	G	7	L	B	P	7	S	9	U	3	Z	/	[	%	`	+	h	!	i	,	n	8	r	,	v	&	y	  	 !	 	  g  nameg  lp CO   Q  4 i5  E7H(      hp   F  ]""  U45$  )4 >  "  G  4 5"$   C64 5L " >      g  port
		o g  loc		o g  c			[ g  tree			[ g  	candidate			[ g  t			[  g  filenamef   language/ecmascript/tokenize.scm
					
					*		3	$	6	4	@		F		P	
	U		[	
	[		\		o	 		o	   C O  R75EO]6QJ< H     hP    ]"4 54 5	$  "  /$  "  !$  "   $  "  $  4 >  "  G   6
$  "  $  4 >  "  G   6/$  
 6"$  "  '$   645$  C4	5$  "  "4
$5$  "  	4
_5$   645$  4 5 C 6       g  port
	O g  div?	O g  c		O g  loc		O g  t	  g  t	  g  value	9G  g  filenamef   language/ecmascript/tokenize.scm

			
						V		o		x	 	 	 	 	 	 	 		 	 		 	 		 	 				%		&		0	1	19		?	F		O		  	O	  g  nameg  
next-token CRHW    hX     ]4L M5  $  : &  , 
&  "  &  "  "  "  N C           g  tok
		T g  cat	!	E  g  filenamef   language/ecmascript/tokenize.scm
												!	#	!		'	'	+		,		4	'	8		9		A	'	B		Q	 		T
   C       h      ]	H O C        g  port
		 g  div?		  g  filenamef   language/ecmascript/tokenize.scm

		 		  g  nameg  make-tokenizer C RH(+(.1"%7W     hh    ]M$  C4LM5  $   &   
"   "   $   M N " $  }"  14 &   "  	4 	5>  "  KG  "  DM $  9M &  
"  	4
5&  	M N "  ""  "" F$   M N " 2$  }"  14 &   "  	4 	5>  "  KG  "  DM $  9M &  
"  	4
5&  	M N "  ""  ""  $   M N "  $  }"  14 &   "  	4 	5>  "  KG  "  DM $  9M &  
"  	4
5&  	M N "  ""  ""  $  	M N"    $  : &  , 
&  "  &  "  "  "  N C            g  tok
	b g  key	6 g  s	   g  s	.M g  s	 g  cat/S  g  filenamef   language/ecmascript/tokenize.scm
				
	
				
					 		*	+	6		F		H		U		Z		^	!	a	!	~	 	 	 	 	5 	 	B 	 	 	 	 	 	 	 	 	! 	!	$	'	+	.	5.	O	BS	V	X	u	z	|				!	!					5		B							"	%	/	'/	5	+9	:	"B	+F	G	"O	+P	"_	 N	b
   C       h       ]HHH O C              g  port
		 g  div?		 g  eoi?			 g  stack			  g  filenamef   language/ecmascript/tokenize.scm

				 		  g  nameg  make-tokenizer/1 C!R       h8   #  ]4 5"   45 &  6""        g  port
		6 g  next			6 g  out			/ g  tok			/  g  filenamef   language/ecmascript/tokenize.scm

																$		)		/		/		0		6	 		6  g  nameg  tokenize CR!      h8   %  ]4 5"   45 &  6""        g  port
		6 g  next			6 g  out			/ g  tok			/  g  filenamef   language/ecmascript/tokenize.scm

																$		)		/		/		0		6	 		6  g  nameg  
tokenize/1 C"RC            g  m
		, g  lp
(( g  	punc-tree
(*  g  filenamef   language/ecmascript/tokenize.scm		
9	
	
'	'
O	/
	5
	8
	=
`	]
(	z
* 	- 
0 	4 
 
&S
&VJ	&ZI
&]z	&ay
(	(	#(	(	*~
.S
0
7
9^
:
 	:
   C6                                                                                                                                                                                                                                                              ccache/language/ecmascript/array.go                                                                 0000644                 00000022541 15154557173 0013355 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0I%      ]  4    h      ] g  guile	 	g  define-module*	 	 	g  language	g  
ecmascript	g  array		 	
g  filenameS	f  language/ecmascript/array.scm	g  importsS	g  oop	g  goops	 	 	g  base	 	 	g  function	 	 	 	g  exportsS	g  *array-prototype*	g  	new-array	 	g  set-current-module	 	 	g  defined?	  	! 	"g  js-array-vector	#g  is-a?	$# 	%# 	&g  
<accessor>	'& 	(& 	)g  toplevel-define!	*) 	+) 	,g  ensure-accessor	-, 	., 	/g  <js-array-object>	0g  <class>	10 	20 	3g  memq	4g  <object>	54 	64 	7g  class-precedence-list	87 	97 	:g  class-redefinition	;: 	<: 	=g  
make-class	>g  <js-object>	?g  vector	@g  
init-valueS	A  	Bg  accessorS	Cg  init-keywordS	Dg  vectorS	Eg  nameS	Fg  make	Gg  classS	Hf  Array	Ig  	prototypeS	Jg  pput	Kg  length	Lg  valueS	Mg  constructorS	Ng  
hashq-set!	Og  *program-wrappers*	Pg  	prototype	Qg  constructor	Rg  pget	SF 	TF 	Ug  	<generic>	VU 	WU 	Xg  add-method!	YX 	ZX 	[g  <method>	\[ 	][ 	^g  specializersS	_g  <top>	`_ 	a_ 	bg  formalsS	cg  o	dg  p	ecd 	fg  bodyS	gg  cond	hg  and	ig  integer?	jid 	kg  exact?	lkd 	mg  >=	nmd
 	ohjln 	pg  let	qg  v	r"c 	sqr 	ts 	ug  if	vg  <	wg  vector-length	xwq 	yvdx 	zg  
vector-ref	{zqd 	|g  next-method	}| 	~uy{} 	pt~  o  g  or g  symbol? d  g  eq? g  quote K  d  h  g  string? d  g  string=? f  length d  h    wr    g  else }  g    g  make-procedureS g  	procedureS cdq  m
d  hjl  g  vect r    w  vd  g  vector-set! dq  g  new g  make-vector g  1+ d  
      g  vector-move-left! 

  g  set! r  dq  p  u  p    g  ->uint32 q  
      g  min   

  p  p    g    g  setter     g  toString g  *this* g  format f  ~A g  concat g  + g  map g  error f  )generic array concats not yet implemented g  join g  string-join g  ->string f  , g  pop g  *undefined* g  pushC 5    h   w  ]4	
5 4 >  "  G   4!"5  $  "  4%"i(5 $  14+"4.4!"5$  "i"  "5>  "  G  "   4!/5$  4%/i25$  43i649/i55$  @4</i4=i>i ?@AB"iCD  E/5>  "  G  "  :4+/4=i>i ?@AB"iCD  E/5>  "  G  "  :4+/4=i>i ?@AB"iCD  E/5>  "  G  "  :4+/4=i>i ?@AB"iCD  E/5>  "  G  F/GHIJKK"     hp   K  -  1  3 4544	 5>  "  G  4
5"  (  C"
 "    C      g  vals
			l g  o		l g  vect		<	l g  i		B	a g  vals		B	a  g  filenamef  language/ecmascript/array.scm
	
	
					+								!		!	!		"	!		-	!		6	"		<	"		B	#		H	$		R	%	#	S	%		V	&		Y	&		a	&		a	#	 			l


  g  nameg  	new-array CR4Fi>iGHLiMi5R4NiOiii>  "  G  4JiiPi>  "  G  4JiiQi>  "  G  4!R5  $  "  Ri $  !4+R4TWER5>  "  G  "   4ZRi4T]^/ia befik"wK 	     h8    ]
45$  45$  ~
$  %4 545$  CL  6$  	"  $  "  45$  45"  $  4 56L  6$  	"  $  "  45$  45"  $  4 56L  6$  	"  $  "  45$  45"  $  4 56L  6}      g  o
	8 g  p	8 g  v		'	E g  t		V	 g  t	   g  t	 !  g  filenamef  language/ecmascript/array.scm
	2
		3			3			3			3				3	&	 	3			!	4		'	4			,	5		3	5		7	5		<	6		E	2
	H	8		L	8		P	8	%	Q	8		V	8			d	9		n	9		o	9		u	9	*	w	9	 	3	 	:	 	:		 	2
 	8	 	8	 	8	% 	8	 	8		 	9	 	9	 	9	 	9	* 	9	 	3	 	:	 	:		 	2
 	8	 	8	 	8	% 	8	 	8			9		9		9		9	*	9	%	3	(	:	0	:		8	2
 9	8	   C        h   n   ] O C      f       g  real-next-method
		
  g  filenamef  language/ecmascript/array.scm
	2
 		
   C5>  "  G  4!J5  $  "  Ji $  !4+J4TWEJ5>  "  G  "   4ZJi4T]^/iaa bfK"wik    h0  k  ]"  $  	"  $  "  45$  45"  $  N4 5445
54
4	4
5455
>  "  G  45 6L  645$  45$  v
$  j4 54
5$  	C4
54
4
5
>  "  G  445 >  "  G  C"""c      g  o
	0 g  p	0 g  v		0 g  t			@ g  vect		K  g  new		Z  g  vect	 $ g  new	 $  g  filenamef  language/ecmascript/array.scm
	=
			G			G			G	%		G			G			%	H		/	H		0	H		6	H	*	8	H		D	>		E	I		K	I			N	J		Q	J	#	Z	J		Z	J		]	K		c	K	'	f	K	,	m	K	A	u	K	'	}	K	 	M	 	=
 	>	 	>	 	>	 	>	 	>		 	>	& 	>		 	?	 	?		 	@	 	@	 	@	 	A	 	C	 	C	' 	C	 	C	 	D	 	D	+ 	D		E	"	F	 1	0	   C  h   n   ] O C      f       g  real-next-method
		
  g  filenamef  language/ecmascript/array.scm
	=
 		
   C5>  "  G  4Jii" h   t   ][ 4 56   l       g  this
		  g  filenamef  language/ecmascript/array.scm		Q			Q			Q	 		
   C>  "  G  4JiiRKRK     h      ]4 56 x       g  x
		  g  filenamef  language/ecmascript/array.scm
	U			U	0		U	8		U	0		U	& 		   CF/GHID#"w h     -  1  3 [444554 5?4
5"  i(  	
64
5$  =454
45>  "  G  45"6 
"             g  rest
		  g  this	  g  len		*  g  rv		4  g  objs		:  g  i		:  g  v		h   g  filenamef  language/ecmascript/array.scm		T			T			T	!		T	,		T	!		T		 	U		*	T		*	T		-	W		4	T		:	X		@	Y		H	Y	:	R	Y		S	\		X	\		\	\		`	Y		a	]		f	]	'	h	]		h	]		k	^		q	^	& 	^	 	`	 	`	# 	`	 	`	 	b	 	b	 	X	 	X	 	X	 $		 


   C>  "  G  4JiiRK    hh   R  -  1  3 ["  >
$   $  4 5"  64455"4455"J      g  	separator
			h g  this		h g  i			P g  l			P  g  filenamef  language/ecmascript/array.scm		e			f			f		$	g		%	g	%	*	g	/	,	g	%	2	g	@	4	g		7	h		8	i		;	i		E	i		H	i		P	h		P	e		Q	e		T	e		Z	e	'	\	e		^	e		_	e		`	e	6	h	e	 			h


   C>  "  G  4JiiRKJ      hH      ][ 44 55
$  C4 54 >  "  G  C       g  this
		H g  len		H g  ret		,	H  g  filenamef  language/ecmascript/array.scm		l			l			l	"		l			l			l			m			m		#	o		*	o		,	o		,	o		/	p	
	5	p		8	p		=	p	
 		H
   C>  "  G  JiiRKJ      h`   	  -  1  3 ["  ?(  45644455>  "  G  " "             g  args
			Y g  this		Y g  args			Q  g  filenamef  language/ecmascript/array.scm		t			u			v		!	v		#	v		%	v		&	w		+	w		.	w	$	4	w	/	6	w	$	8	w		;	w	9	@	w		K	x		Q	x		Q	t	 			Y


   C6     o      g  m
		, g  t
	4	P g  t

 g  t
	  g  filenamef  language/ecmascript/array.scm		
	-	
 		 	
		"	
J		`	
			
	
	)		)	4	)		)
	-
	/
	/		/
	0
	0		0
	2
	=
	P
j	S
 	d
	k
	s
 	
   C6                                                                                                                                                                ccache/language/objcode/spec.go                                                                     0000644                 00000006512 15154557173 0012444 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.02      ] D 4  h      ] g  guile	 	g  define-module*	 	 	g  language	g  objcode	g  spec		 	
g  filenameS	f  language/objcode/spec.scm	g  importsS	g  system	g  base	 	 	g  vm	 	 	g  program	 	 	 	g  exportsS	 	g  set-current-module	 	 	g  make-program	g  current-module	g  save-module-excursion	 g  objcode->value	!g  map	"g  cdr	#g  sort!	$g  assv-ref	%g  binding:index	&g  append!	'g  collapse-locals	(g  program?	)g  program-objects	*g  program-meta	+g  program-free-variables	,g  program-bindings	-g  program-sources	.g  program-objcode	/g  objects	0g  meta	1g  	free-vars	2g  blocs	3g  sources	4g  objcode?	5g  error	6f  /Object for disassembly not a program or objcode	7g  decompile-value	8g  invalidate-compilation-cache!	9g  make-language	:g  nameS	;g  titleS	<f  Guile Object Code	=g  readerS	>g  printerS	?g  write-objcode	@g  	compilersS	Ag  value	Bg  decompilersS	Cg  for-humans?SC 5      h     ]4	
5 4 >  "  G          h    d   ] 4L>  "  G  4L 5 LLD \       g  filenamef  language/objcode/spec.scm
	 				!			"			"	 		
   C h0      ]4 545 &  45 DO 6       g  x
		0 g  e		0 g  opts			0 g  thunk			0  g  filenamef  language/objcode/spec.scm
	
																#			0		 			0	  g  nameg  objcode->value C R!"#  h      ] C      {       g  x
		
 g  y		
  g  filenamef  language/objcode/spec.scm
	,			,	)		,	1			,	& 		
	   C$%&    h   r  ]!"  n(  4564455$  $4 >  "  G  "45 " " j      g  locs
		 g  ret		t g  locs			t g  b			t g  t		.	t  g  filenamef  language/objcode/spec.scm
	(
		)			*			+			+			-			-		!	/		&	/		.	/		.	.	
	7	1		@	1	#	E	1		R	2		Z	2		[	4		f	4	)	i	4		l	5		t	4		t	)		u	)			)	 		  g  nameg  collapse-locals C'R()*+,-'./0123456       h     ]34 5$  t4 54 54 54 54 5$  45"  4 5	
$  	45 "   D4 5$   D 6             g  x
	  g  env	  g  opts		  g  objs		0  g  meta		0  g  	free-vars		0  g  binds		0  g  srcs		0  g  blocs		L   	g  filenamef  language/objcode/spec.scm
	7
		9			8			:			;			<		#	=		*	>		0	:		@	?		A	?		L	?		O	@		W	A		b	B		c	B	(	m	A	 	@	 	F	 	8	 	G	 	I	 	I	 	 	  g  nameg  decompile-value C7R48i>   "  G  49i:;<=>?i@A i BA7i C5RC             g  m
		,  g  filenamef  language/objcode/spec.scm		
	
	(
@	7
A	K
_	L	l	O	x	P		K
 
	
   C6                                                                                                                                                                                       ccache/language/assembly.go                                                                         0000644                 00000023304 15154557173 0011722 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0&      ] g 4       h      ] g  guile	 	g  define-module*	 	 	g  language	g  assembly	 		g  filenameS	
f  language/assembly.scm	g  importsS	g  rnrs	g  bytevectors	 	 	g  system	g  base	g  pmatch	 	 	g  vm	g  instruction	 	 	g  srfi	g  srfi-1	 	g  selectS	g  fold	 	 	  	!g  exportsS	"g  byte-length	#g  addr+	$g  align-program	%g  
align-code	&g  align-block	'g  assembly-pack	(g  assembly-unpack	)g  object->assembly	*g  assembly->object	+"#$%&'()* 		,g  set-current-module	-, 	., 	/g  *program-header-len*	0g  	*len-len*	1g  load-program	2g  error	3f  unknown instruction	4g  
load-array	5g  bytevector-length	6g  load-symbol	7g  string-length	8g  load-wide-string	9g  load-string	:g  load-number	;g  instruction-length	<g  *program-alignment*	=g  	make-list	>g  nop	?> 	@g  code-alignment	Ag  append	BA 	CA 	Dg  	make-int8	ED
 	Fg  make-int8:0	GEF 	HD 	Ig  make-int8:1	JHI 	KGJ 	Lg  *abbreviations*	Mg  map	Ng  *expansions*	Og  	assoc-ref	Pg  	make-true	QP 	Rg  
make-false	SR 	Tg  make-nil	UT 	Vg  make-eol	WV 	Xg  char?	Yg  char->integer	Zg  
make-char8	[g  make-char32	\g  integer?	]g  exact?	^g  
make-int64	_g  bytevector->u8-list	`g  make-bytevector	ag  big	bg  make-uint64	cg  
make-int16	dg  string->symbol	eg  integer->char	fg  u8-list->bytevectorC 5       h     ]4	
 !+5 4. >  "  G   	/R	0R1/"234056789:;  hP    ]1" " " z" '"  "   $  ~  &  d$  U$  =$  $$  45"  
C 6 6 6 6
C $  A  &  +$   (  45C"9"5"1"- $  A  	&  +$   (  4
5C"""" $  D  &  .$  #(  	4
5C"""" $  A  &  +$   (  4
5C"F"B">": $  A  &  +$   (  4
5C"""" $  #  45
$  	45C""        g  assembly
	N g  vx	'  g  vy		'  g  vy		=  g  vx		P  g  vy		P  g  vx		^	 g  vx   g  vy	   g  vx	   g  vy	   g  vx 5 g  vy	 5 g  vx	- g  vy	- g  vxF g  vy	F g  vx	_| g  vy	_| g  vx g  vy	 g  vx	 g  vy	 g  vx g  vy	 g  vx	 g  vy	 g  vx*J  g  filenamef  language/assembly.scm
	%
		&		g	4		p	4	#	q	4	0	x	4	,	~	4	 	7	 	7	
 	7	 	7	
 	7	 	7	
 	7	 	7	
 	&	 	2	 	2	 	2	 	&	 	0	!	0	(	0	-	&	l	.	o	.	v	.	w	.	|	&		,		,		,		&		*		*		*		&	1	'	9	'	=	&	>	(	
E	(	J	&	 ,	N  g  nameg  byte-length C"R	<R"   h   y   ]4 5C   q       g  x
		 g  len		  g  filenamef  language/assembly.scm
	=			=			=	 			   C    h      ] 6    ~       g  addr
		 g  code		  g  filenamef  language/assembly.scm
	<
		=	 			  g  nameg  addr+ C#R=?       h      ] 6         g  addr
		 g  	alignment		 g  
header-len			  g  filenamef  language/assembly.scm
	A
		C	 		C			B			B			E			B	 			  g  nameg  code-alignment C@R       h   z   ]C    r       g  addr
		  g  filenamef  language/assembly.scm
	G
		H	 		  g  nameg  align-block C&RC@   h      ]45  6         g  code
		 g  addr		 g  	alignment			 g  
header-len			  g  filenamef  language/assembly.scm
	J
		K			K	 			  g  nameg  
align-code C%R%<   h      ] 6          g  prog
		 g  addr		  g  filenamef  language/assembly.scm
	N
		O	 			  g  nameg  align-program C$RKLR4Mi   h   p   ]  C      h       g  x
		
  g  filenamef  language/assembly.scm
	Z			Z			Z	!			Z	 		
   CLi5NROL       h       ]	4 5$  C C              g  code
		 g  t		  g  filenamef  language/assembly.scm
	\
		]			]	 		  g  nameg  assembly-pack C'RON   h       ]	4 5$  C C              g  code
		 g  t		  g  filenamef  language/assembly.scm
	`
		a			a	 		  g  nameg  assembly-unpack C(RQSUWXYZ[\]^_`abc'D h    ]	 &  C &  C &  C (  C"  64 5$  )4 5 $  4 5 C4 5 CC4	 5$ #4
 5$ "  O        
$  "  $  44	5
 5CC"  ?
 $  3 $  44	5
 5C"r"n"  P  $  B        $  . 
$          "      C"q"m	 $    $     6""""         g  x
	 g  b   g  bv   g  bv  g  nG[  g  filenamef  language/assembly.scm
	i
			j			j			j			k			j			l		&	j		(	m		.				8	j		9 		C 		G 			I 		J 		S 		V 		W 		` 		c	j		d	n		n	j		o	n		y	n		 	y	 	y	 	o		 	z	 	z	 	{	* 	{	  	|	> 	|	" 	z	 	z	 	o		 	t	 	o		 	t	 	u	 	u	  	v	+ 	v	! 	w	? 	w	#	u	 	u		o			q		o		)	q	#-	q	1	r	5	r	A	r	%G	r	K	s	Q	s	 W	s	2Z	s	c	o		h	o	l	o		r	o	!v	o	z	p		p	,	p		p	 G	  g  nameg  object->assembly C)R6d9[eZ^fabcDVTRP   h  <  ]" " " n" =" " a" m" y" /"  "  > $  5  &  !$  (  6CCCC $  8  &  "$  (  C"""" $    &  $  z$  e$  P$  ;
	
(  '               	6""""""" $  ;  &  %$  (  6"""" $    &  $  $  $  $  
	
$  p

$  [$  F$  1(  4	 5
	C""""""""""" $    
&  $  $  $  $  
	
$  p

$  [$  F$  1(  4	 5
	C""""""""""" $  u  &  _$  T$  ?(  +        $  C       C"/"+"'"#" $  I  &  3$  ((   $  C C"""" $  "  &  (  C""" $  "  &  (  C"m"i"e $  "  &  (  C"<"8"4 $  "  &  (  C"""     4      g  code
	 g  vx	;	j g  vy		;	j g  vx		T	f g  vy		T	f g  vx	y  g  vy		y  g  vx	   g  vy	   g  vx Q g  vy	 Q g  vx	 I g  vy	 I g  vx	 E g  vy	 E g  vx	 A g  vy	 A g  vx		= g  vy	
= g  vxb g  vy	b g  vx	{ g  vy	{ g  vx g  vy	 g  vx	 g  vy	 g  vx	{ g  vy	{ g  vx	w g  vy	w g  vx		s g  vy	
s g  vx	o g  vy	o g  vx	k g  vy	k g  vx	'g g  vy	'g g  vx	8c g  vy	8c g  vxw g  vy	w g  vx	o g  vy	o g  vx	k g  vy	k g  vx	g g  vy	g g  vx		c g  vy	
c g  vx	_ g  vy	_ g  vx	[ g  vy	[ g  vx	W g  vy	W g  vx	(S g  vy	(S g  vx g  vy	 g  vx	 g  vy	 g  vx	 g  vy	 g  n	 g  vxK g  vy	K g  vx	!C g  vy	!C g  vx\x g  vy	\x g  vx g  vy	 g  vx g  vy	 g  vx g  vy	  Ng  filenamef  language/assembly.scm
 
	 		d 		l 	  	, 	- 	3 	4 	9 	= 	 	 	C 	X 	Z 	] 	^ 	c 	3 	H 	J 	M 	N 	S 	 	 	 	 	 	 	 	1 		5 	> 	C 	o 	t 	 '	  g  nameg  assembly->object C*RC              g  m
		,  g  filenamef  language/assembly.scm		
	.			1	
	6	"
w	%
|	:
	<
	A
	]	G

M	J
	N
	V		U
	Z		Y
m	\
7	`
	i
 
 	
   C6                                                                                                                                                                                                                                                                                                                             ccache/language/tree-il.go                                                                          0000644                 00000223161 15154557173 0011447 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0Y&     ]p 4      h.      ] g  guile	 	g  define-module*	 	 	g  language	g  tree-il	 		g  filenameS	
f  language/tree-il.scm	g  importsS	g  srfi	g  srfi-1	 	 	g  srfi-11	 	 	g  system	g  base	g  pmatch	 	 	g  syntax	 	 	 	g  exportsS	g  tree-il-src	g  <void>	g  void?	 g  	make-void	!g  void-src	"g  <const>	#g  const?	$g  
make-const	%g  	const-src	&g  	const-exp	'g  <primitive-ref>	(g  primitive-ref?	)g  make-primitive-ref	*g  primitive-ref-src	+g  primitive-ref-name	,g  <lexical-ref>	-g  lexical-ref?	.g  make-lexical-ref	/g  lexical-ref-src	0g  lexical-ref-name	1g  lexical-ref-gensym	2g  <lexical-set>	3g  lexical-set?	4g  make-lexical-set	5g  lexical-set-src	6g  lexical-set-name	7g  lexical-set-gensym	8g  lexical-set-exp	9g  <module-ref>	:g  module-ref?	;g  make-module-ref	<g  module-ref-src	=g  module-ref-mod	>g  module-ref-name	?g  module-ref-public?	@g  <module-set>	Ag  module-set?	Bg  make-module-set	Cg  module-set-src	Dg  module-set-mod	Eg  module-set-name	Fg  module-set-public?	Gg  module-set-exp	Hg  <toplevel-ref>	Ig  toplevel-ref?	Jg  make-toplevel-ref	Kg  toplevel-ref-src	Lg  toplevel-ref-name	Mg  <toplevel-set>	Ng  toplevel-set?	Og  make-toplevel-set	Pg  toplevel-set-src	Qg  toplevel-set-name	Rg  toplevel-set-exp	Sg  <toplevel-define>	Tg  toplevel-define?	Ug  make-toplevel-define	Vg  toplevel-define-src	Wg  toplevel-define-name	Xg  toplevel-define-exp	Yg  <conditional>	Zg  conditional?	[g  make-conditional	\g  conditional-src	]g  conditional-test	^g  conditional-consequent	_g  conditional-alternate	`g  <application>	ag  application?	bg  make-application	cg  application-src	dg  application-proc	eg  application-args	fg  
<sequence>	gg  	sequence?	hg  make-sequence	ig  sequence-src	jg  sequence-exps	kg  <lambda>	lg  lambda?	mg  make-lambda	ng  
lambda-src	og  lambda-meta	pg  lambda-body	qg  <lambda-case>	rg  lambda-case?	sg  make-lambda-case	tg  lambda-case-src	ug  lambda-case-req	vg  lambda-case-opt	wg  lambda-case-rest	xg  lambda-case-kw	yg  lambda-case-inits	zg  lambda-case-gensyms	{g  lambda-case-body	|g  lambda-case-alternate	}g  <let>	~g  let?	g  make-let g  let-src g  	let-names g  let-gensyms g  let-vals g  let-body g  <letrec> g  letrec? g  make-letrec g  
letrec-src g  letrec-in-order? g  letrec-names g  letrec-gensyms g  letrec-vals g  letrec-body g  <fix> g  fix? g  make-fix g  fix-src g  	fix-names g  fix-gensyms g  fix-vals g  fix-body g  <let-values> g  let-values? g  make-let-values g  let-values-src g  let-values-exp g  let-values-body g  	<dynwind> g  dynwind? g  make-dynwind g  dynwind-src g  dynwind-winder g  dynwind-body g  dynwind-unwinder g  <dynlet> g  dynlet? g  make-dynlet g  
dynlet-src g  dynlet-fluids g  dynlet-vals g  dynlet-body g  <dynref> g  dynref? g  make-dynref g  
dynref-src g  dynref-fluid g  <dynset> g  dynset? g  make-dynset g  
dynset-src g  dynset-fluid g  
dynset-exp g  <prompt> g  prompt? g  make-prompt g  
prompt-src g  
prompt-tag g  prompt-body g  prompt-handler g  <abort> g  abort? g  
make-abort g  	abort-src g  	abort-tag g  
abort-args g  
abort-tail g  parse-tree-il g  unparse-tree-il g  tree-il->scheme g  tree-il-fold g  make-tree-il-folder g  post-order! g  
pre-order! g  	tree-il=? g  tree-il-hash  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~  g  set-current-module     g  format f  #<tree-il ~S> g  print-tree-il g  make-syntax-transformer     g  borrow-core-vtables g  macro g  $sc-dispatch     g  _   g  vector-length g  %expanded-vtables g  vtable-offset-user g  map g  datum->syntax g  symbol-append g  < g  > g  make- g  ? g  - g  any   g  syntax-object g  define g  top   g  ribcage   g  t-9d61459b896-a19 g  t-9d61459b896-a17 g  t-9d61459b896-a18   g  m-9d61459b896-a1a     f  l-9d61459b896-a1e f  l-9d61459b896-a1f f  l-9d61459b896-a20     g  acc     f  l-9d61459b896-a15    g  lpg  ng  fieldsg  out  f  l-9d61459b896-9e1	f  l-9d61459b896-9e2
f  l-9d61459b896-9e3f  l-9d61459b896-9e4	
  g  pred f  l-9d61459b896-9df  g  ctor f  l-9d61459b896-9dd  g  type f  l-9d61459b896-9db  g  sfields f  l-9d61459b896-9d7  !  " #f  l-9d61459b896-9d5$# %"$ &g  stem'& (f  l-9d61459b896-9d3)( *') +g  vtable,+ -f  l-9d61459b896-9d1.- /,. 0 1 2f  l-9d61459b896-9ca3f  l-9d61459b896-9cb4f  l-9d61459b896-9cc5234 6015 7g  x87 9f  l-9d61459b896-9c7:9 ;8: <!%*/6; =g  hygiene>= ?<> @g  make-procedure-with-setterA@<> Bg  lambdaCB<> D7<> ED Fg  
struct-refGF<> Hg  vIH<> JDI Kg  struct-set!LK<> MI Ng  syntax-violationON PN Qf  -source expression failed to match any patternRg  each-anySRR Tg  t-9d61459b896-9eaUg  t-9d61459b896-9e9Vg  t-9d61459b896-9ecWg  t-9d61459b896-9ebXTUVW Yg  m-9d61459b896-9edZY [ZZZZ \f  l-9d61459b896-9f1]f  l-9d61459b896-9f2^f  l-9d61459b896-9f3_f  l-9d61459b896-9f4`\]^_ aX[` ba!%*/6; cb> dg  make-structedb> f
b> g hg  t-9d61459b896-9fbig  t-9d61459b896-9fcjhi kg  m-9d61459b896-9fdlk mll nf  l-9d61459b896-a01of  l-9d61459b896-a02pno qjmp rq!%*/6; sr> t7r> ut vg  andwvr> xg  struct?yxr> zyt {g  eq?|{r> }g  struct-vtable~}r> ~t g  t-9d61459b896-a05 g  m-9d61459b896-a06  f  l-9d61459b896-a09  !%*/6; K> g  vtable-index-printer> >  g  t-9d61459b896-a0cg  t-9d61459b896-a0b g  m-9d61459b896-a0d  f  l-9d61459b896-a11f  l-9d61459b896-a12  !%*/6; > g  
vector-ref> > g  reverseg  beging  t-9d61459b896-a24 g  m-9d61459b896-a25  f  l-9d61459b896-a29  6; > g  make-record-typef  <fix>g  srcg  namesg  gensymsg  valsg  body g  record-predicateg  record-accessorg  record-modifierf  <let-values>g  exp f  	<dynwind>g  winderg  unwinder f  <dynref>g  fluid f  <dynset> f  <prompt>g  tagg  handler f  <abort>g  argsg  tail g  source-propertiesg  locationg  abortg  errorf  unrecognized tree-ilg  promptg  dynsetg  dynrefg  dynletg  dynwindg  
let-valuesg  fixg  letrec*g  letrecg  letg  constg  lambda-caseg  and=>g  set!g  toplevelg  @@g  and-mapg  symbol?g  @g  lexicalg  	primitiveg  ifg  applyg  void   f  unhandled recordg  schemeg  decompile-tree-il   g  foldRg  dummyg  seed g  m-9d61459b896-1211  f  l-9d61459b896-1216f  l-9d61459b896-1217   f  l-9d61459b896-1213 8  B>  g  tree > g  down> g  up> > g  fold-values> 	g  proc
	> g  exps> > g  null?>  g  values> > g  car>  g  cdr>  > g  foldts>     g  list!g  let*-values"!> #g  record-case$#> %2> &> '%& (@> )(& *M> +*& ,S> -,& .Y> /g  test0/> 1g  
consequent21> 3g  	alternate43> 5.024 6`> 7> 86
7 9f> :9 ;k> <> =;< >q> ?g  inits@?> A>@<4 B}> C> DBC< E> FEC< G> HGC< I> JI&< K> L> M> NK<LM O> Pg  fluidsQP> ROQC< S> T> UST V> WVT& X> Y> Z> [XY<Z \> ]> ^\Y7] _g  else`_> ag  setterba ca dg  string-lengtheg  symbol->stringfg  struct-layoutgg  struct-nfieldshg  	hash-bitsig  make-variable-transformerjg  identifier?kg  logcountlg  most-positive-fixnummg  hashqng  maxog  hashC 5h    ]4	
5 4 >  "  G     h      ]4 56              g  exp
		 g  port		  g  filenamef  language/tree-il.scm
	B
		C				C			C	 			  g  nameg  print-tree-il CR4      h   _   ]L  6      W       g  f
		
  g  filenamef  language/tree-il.scm
	P	"	
	P	. 		
   C?ACEGDJLM 
       h8   w   ]   	   C       o       g  t-9d61459b896-a19
		1 g  t-9d61459b896-a17		1 g  t-9d61459b896-a18			1  		1	   CPQScef   h      ]  C       g  t-9d61459b896-9ea
		 g  t-9d61459b896-9e9		 g  t-9d61459b896-9ec			 g  t-9d61459b896-9eb			  			   Cgsuwz| h    X   ]    C   P       g  t-9d61459b896-9fb
		 g  t-9d61459b896-9fc		  			   C     h   X   ]   C     P       g  t-9d61459b896-a0c
		 g  t-9d61459b896-a0b		  			   CR   h   9   ] C1       g  t-9d61459b896-a24
		  		   C    h     ]x"  45$   
	4L O 54L 4	554L 4
554L 455"  n
(  "  	
4L 4
55		 45$  4?"  
45
	"
 	4	5

$  4
?"  
4	5
	 	4	5

$  4
?"  
4	5
	  	4	5

$  4
?"  
4	5
	
	" "@4545$  @6
 "             g  n
	 g  out	 g  vtable		 g  stem		% g  fields		/ g  sfields		? g  type		S g  ctor		e g  pred		w g  n			}  g  fields	
	}  g  out		}  g  acc	   g  tmp	   g  tmp	   g  tmp		 ' g  tmp	
$ g  tmp		.\ g  tmp	
9Y g  tmp		k g  tmp	
v g  tmp	 g  tmp	  g  filenamef  language/tree-il.scm		I				J			J			J				K			L	 		L		$	M	1	%	M		%	L		.	N	3	/	N	 	/	L		2	O	!	?	L		B	R		G	R	/	K	R	>	O	R	F	Q	R	/	S	R		S	L		V	S		[	S	/	_	S	>	c	S	/	e	S		e	L		h	T		m	T	/	s	T	C	u	T	/	w	T		w	L		}	U	 	a	 	c	 	d	 	e	( 	f	+ 	f	? 	f	B 	f	+ 	e	( 	e	 	g	& 	g	 	c	 	U	 	W	#.	Y	#k	^	#	V	!	U		K		l		l		I		I		I	 =	
   CPQ       h(   g   ]	4 5$   O @ 6 _       g  x
		' g  tmp		'  g  filenamef  language/tree-il.scm
	F	 		'   C5Ri
Riii      h   h   ] $   CC      `       g  x
		  g  filenamef  language/tree-il.scm
	n
 		  g  nameg  void? CR       h   n   ]  C      f       g  src
		
  g  filenamef  language/tree-il.scm
	n
 		
  g  nameg  	make-void C R4@i       h   V   ] 
C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 
C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5!Ri"R"iii"        h   i   ] $   CC      a       g  x
		  g  filenamef  language/tree-il.scm
	n
 		  g  nameg  const? C#R"      h      ]  C    x       g  src
		 g  exp		  g  filenamef  language/tree-il.scm
	n
 			  g  nameg  
make-const C$R4@i     h   V   ] 
C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 
C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5%R4@i      h   V   ] C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5&Ri	'R'iii'       h   q   ] $   CC      i       g  x
		  g  filenamef  language/tree-il.scm
	n
 		  g  nameg  primitive-ref? C(R'      h      ]  C           g  src
		 g  name		  g  filenamef  language/tree-il.scm
	n
 			  g  nameg  make-primitive-ref C)R4@i    h   V   ] 
C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 
C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5*R4@i      h   V   ] C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5+Ri	,R,iii,       h   o   ] $   CC      g       g  x
		  g  filenamef  language/tree-il.scm
	n
 		  g  nameg  lexical-ref? C-R,        h      ]  C         g  src
		 g  name		 g  gensym			  g  filenamef  language/tree-il.scm
	n
 			  g  nameg  make-lexical-ref C.R4@i  h   V   ] 
C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 
C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5/R4@i      h   V   ] C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C50R4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C51Ri	2R2iii2       h   o   ] $   CC      g       g  x
		  g  filenamef  language/tree-il.scm
	n
 		  g  nameg  lexical-set? C3R2        h      ]  C       g  src
		 g  name		 g  gensym			 g  exp			  g  filenamef  language/tree-il.scm
	n
 			  g  nameg  make-lexical-set C4R4@i h   V   ] 
C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 
C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C55R4@i      h   V   ] C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C56R4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C57R4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C58Ri	9R9iii9       h   n   ] $   CC      f       g  x
		  g  filenamef  language/tree-il.scm
	n
 		  g  nameg  module-ref? C:R9 h      ]  C       g  src
		 g  mod		 g  name			 g  public?			  g  filenamef  language/tree-il.scm
	n
 			  g  nameg  make-module-ref C;R4@i h   V   ] 
C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 
C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5<R4@i      h   V   ] C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5=R4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5>R4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5?Ri	@R@iii@       h   n   ] $   CC      f       g  x
		  g  filenamef  language/tree-il.scm
	n
 		  g  nameg  module-set? CAR@ h      ]  C             g  src
		 g  mod		 g  name			 g  public?			 g  exp			  g  filenamef  language/tree-il.scm
	n
 			  g  nameg  make-module-set CBR4@ih   V   ] 
C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 
C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5CR4@i      h   V   ] C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5DR4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5ER4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5FR4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5GRi	HRHiiiH       h   p   ] $   CC      h       g  x
		  g  filenamef  language/tree-il.scm
	n
 		  g  nameg  toplevel-ref? CIRH       h      ]  C           g  src
		 g  name		  g  filenamef  language/tree-il.scm
	n
 			  g  nameg  make-toplevel-ref CJR4@i     h   V   ] 
C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 
C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5KR4@i      h   V   ] C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5LRi	MRMiiiM       h   p   ] $   CC      h       g  x
		  g  filenamef  language/tree-il.scm
	n
 		  g  nameg  toplevel-set? CNRM       h      ]  C         g  src
		 g  name		 g  exp			  g  filenamef  language/tree-il.scm
	n
 			  g  nameg  make-toplevel-set COR4@i    h   V   ] 
C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 
C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5PR4@i      h   V   ] C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5QR4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5RRi		SRSiiiS       h   s   ] $   CC      k       g  x
		  g  filenamef  language/tree-il.scm
	n
 		  g  nameg  toplevel-define? CTRS    h      ]  C         g  src
		 g  name		 g  exp			  g  filenamef  language/tree-il.scm
	n
 			  g  nameg  make-toplevel-define CUR4@i h   V   ] 
C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 
C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5VR4@i      h   V   ] C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5WR4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5XRi	
YRYiiiY       h   o   ] $   CC      g       g  x
		  g  filenamef  language/tree-il.scm
	n
 		  g  nameg  conditional? CZRY        h      ]  C       g  src
		 g  test		 g  
consequent			 g  	alternate			  g  filenamef  language/tree-il.scm
	n
 			  g  nameg  make-conditional C[R4@i       h   V   ] 
C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 
C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5\R4@i      h   V   ] C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5]R4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5^R4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5_Ri	`R`iii`       h   o   ] $   CC      g       g  x
		  g  filenamef  language/tree-il.scm
	n
 		  g  nameg  application? CaR`        h      ]  C         g  src
		 g  proc		 g  args			  g  filenamef  language/tree-il.scm
	n
 			  g  nameg  make-application CbR4@i    h   V   ] 
C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 
C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5cR4@i      h   V   ] C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5dR4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5eRi	fRfiiif       h   l   ] $   CC      d       g  x
		  g  filenamef  language/tree-il.scm
	n
 		  g  nameg  	sequence? CgRf   h      ]  C    |       g  src
		 g  exps		  g  filenamef  language/tree-il.scm
	n
 			  g  nameg  make-sequence ChR4@i h   V   ] 
C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 
C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5iR4@i      h   V   ] C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5jRi	kRkiiik       h   j   ] $   CC      b       g  x
		  g  filenamef  language/tree-il.scm
	n
 		  g  nameg  lambda? ClRk     h      ]  C         g  src
		 g  meta		 g  body			  g  filenamef  language/tree-il.scm
	n
 			  g  nameg  make-lambda CmR4@i h   V   ] 
C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 
C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5nR4@i      h   V   ] C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5oR4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5pRi	qRqiiiq       h   o   ] $   CC      g       g  x
		  g  filenamef  language/tree-il.scm
	n
 		  g  nameg  lambda-case? CrRq        h    
  , 	3 	  
C        g  src
		 g  req		 g  opt			 g  rest			 g  kw			 g  inits			 g  gensyms			 g  body			 g  	alternate			  	g  filenamef  language/tree-il.scm
	n
 				  g  nameg  make-lambda-case CsR4@i   h   V   ] 
C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 
C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5tR4@i      h   V   ] C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5uR4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5vR4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5wR4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5xR4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5yR4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5zR4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5{R4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5|Ri	}R}iii}       h   g   ] $   CC      _       g  x
		  g  filenamef  language/tree-il.scm
	n
 		  g  nameg  let? C~R}        h      ]  C             g  src
		 g  names		 g  gensyms			 g  vals			 g  body			  g  filenamef  language/tree-il.scm
	n
 			  g  nameg  make-let CR4@i    h   V   ] 
C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 
C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5R4@i      h   V   ] C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5R4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5R4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5R4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5Ri	Riii       h   j   ] $   CC      b       g  x
		  g  filenamef  language/tree-il.scm
	n
 		  g  nameg  letrec? CR     h      ]  C           g  src
		 g  	in-order?		 g  names			 g  gensyms			 g  vals			 g  body			  g  filenamef  language/tree-il.scm
	n
 			  g  nameg  make-letrec CR4@i  h   V   ] 
C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 
C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5R4@i      h   V   ] C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5R4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5R4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5R4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5R4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5Ri	Riii       h   j   ] $   CC      b       g  x
		  g  filenamef  language/tree-il.scm
	n
 		  g  nameg  dynlet? CR     h      ]  C       g  src
		 g  fluids		 g  vals			 g  body			  g  filenamef  language/tree-il.scm
	n
 			  g  nameg  make-dynlet CR4@i     h   V   ] 
C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 
C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5R4@i      h   V   ] C N       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] C       ]       g  x
			 g  v			  g  filenamef  language/tree-il.scm
	n
 				   C5R4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5R4@i      h   V   ] 	CN       g  x
		  g  filenamef  language/tree-il.scm
	n
 		   Ch   e   ] 	C      ]       g  x
		
 g  v		
  g  filenamef  language/tree-il.scm
	n
 		
	   C5R4ii5R   h       - 1 3   C              g  src
			 g  names			 g  gensyms				 g  vals				 g  body				 g  defrec-9d61459b896-c7e				  g  filenamef  language/tree-il.scm
 
 				
	  g  nameg  make-fix CR4ii5R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4ii5R     h      - 1 3   C          g  src
			 g  exp			 g  body				 g  defrec-9d61459b896-c80				  g  filenamef  language/tree-il.scm
 
 				
	  g  nameg  make-let-values CR4ii5R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4ii5R h      - 1 3   C        g  src
			 g  winder			 g  body				 g  unwinder				 g  defrec-9d61459b896-c82				  g  filenamef  language/tree-il.scm
 
 				
	  g  nameg  make-dynwind CR4ii5R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4ii5R  h      - 1 3   C            g  src
			 g  fluid			 g  defrec-9d61459b896-c84				  g  filenamef  language/tree-il.scm
 
 				
	  g  nameg  make-dynref CR4ii5R4@i4ii54ii55R4@i4ii54ii55R4ii5R      h      - 1 3   C          g  src
			 g  fluid			 g  exp				 g  defrec-9d61459b896-c86				  g  filenamef  language/tree-il.scm
 
 				
	  g  nameg  make-dynset CR4ii5R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4ii5R    h      - 1 3   C        g  src
			 g  tag			 g  body				 g  handler				 g  defrec-9d61459b896-c88				  g  filenamef  language/tree-il.scm
 
 				
	  g  nameg  make-prompt CR4ii5R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4ii5R       h      - 1 3   C        g  src
			 g  tag			 g  args				 g  tail				 g  defrec-9d61459b896-c8a				  g  filenamef  language/tree-il.scm
 
 				
	  g  nameg  
make-abort CR4ii5R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4@i4ii54ii55R4@i      h   )   ] 
C !       g  x
		  		   C     h   8   ] 
C       0       g  x
			 g  v			  				   C5R    h       ]	 $  4 5$  CCC       g  x
		  g  props		  g  filenamef  language/tree-il.scm
 
	 			 		
 		 		 		 		 		   g  nameg  location CR h   u   ] 6m       g  x
		  g  filenamef  language/tree-il.scm
 		 	 		  g  nameg  retrans Ch$sBmUOJB;4.)[b  <     h0    ]4 5" " " " " ^" " 0" [" " " " 
" 
L" 	" 	&" " " _" " " B" " " i" " s" " " ("   $    &  v$  g$  N$  5
	
(  45454	56 6 6 6 6 6 6 $  z  	&  d$  Y$  D$  /
	
(  
45454	56"""""" $  ^  &  H$  =$  ((  45456""{"w"s"o $  B  &  ,$  !(  456"*"&""" $  ~  &  h$  ]$  H$  3
	
(  45454	56"""""" $  z  &  d$  Y$  D$  /
	
(  45454	56"""""" $  ^  &  H$  =$  ((  45456""""" $    &  x$  m$  X$  C
	
$  .

(  4	5456""""
""" $    &  y$  n$  Y$  D
	
$  /

(  4	5456"x"t"p"l"h"d"` $    &  y$  n$  Y$  D
	
$  /

(  4	5456""""""" $    &  x$  m$  X$  C
	
$  .

(  4	5456"="9"5"1"-")"% $  %  &  456"" $  =  &  '$  (  6"""" $    &  $  $  $  
	
$  

$  $  $  s$  ^(  J$  ?(  +(  !!	45456	"""""""""""""" $ /   & $ $  $  
	
$  

$  $  $  $  {(  g$  \(  H$  =(  )!	45454"56	"~"z"v"r"n"j"f"b"^"Z"V"R"N"J"F $  Y  #&  C$  8$  #(  $456""""" $  d  %&  N$  C$  .(  $  &456""{"w"s"o"k $    '&  $  $  n(&  X$  M
	
(  9$  .(  	$  )	456"""""""""" $  H  (&  2$  '(  $  *6"q"m"i"e"a $    '&  $  $  +&  $  v
	
$  a

(  M$  B(  .4,-	5$  $  .	456"""""""""""" $  q  +&  [$  P$  ;(  '4,-5$  $  /6""""""	" $    '&  $  $  0&  $  v
	
$  a

(  M$  B(  .4,-	5$  $  .	456"U"Q"M"I"E"A"="9"5"1"-") $  q  0&  [$  P$  ;(  '4,-5$  $  /6""""""" $    '&  $  $  1&  z$  o
	
$  Z

(  F$  ;(  '	$  $  2	456" """"""""""" $    '&  $  $  p1&  Z$  O
	
(  ;$  0(  	$  2		456"C"?";"7"3"/"+"'"#" $  j  1&  T$  I$  4(   $  $  
36""""""" $  J  1&  4$  )(  $  
36"]"Y"U"Q"M $  H  4&  2$  '(  $  56""""" $  z  6&  d$  Y$  D$  /
	
(  745454	56""}"y"u"q"m $  A  8&  +$   945456"%"!" $  &  :&  (  ;6"""           g  exp
	+ g  retrans	+ g  loc		+ g  vx	  g  vy	  g  vx	  g  vy	  g  vx	  g  vy	  g  vx		   g  vy	
   g  vx	3 g  vy	3 g  vx	L g  vy	L g  vx	] g  vy	] g  vx		n g  vy	
n g  vx	 g  vy	 g  vx	 g  vy	 g  vx	 g  vy	 g  vx	!] g  vy	!] g  vx	:U g  vy	:U g  vx	n g  vy	n g  vx	 g  vy	 g  vx	 g  vy	 g  vx		 g  vy	
 g  vx	k g  vy	k g  vx	c g  vy	c g  vx	!_ g  vy	!_ g  vx		2[ g  vy	
2[ g  vx	| g  vy	| g  vx	 g  vy	 g  vx	 g  vy	 g  vx	m g  vy	m g  vx	e g  vy	e g  vx	a g  vy	a g  vx		 ] g  vy	
 ] g  vx	1Y g  vy	1Y g  vx	~ g  vy	~ g  vx	 g  vy	 g  vx	 g  vy	 g  vx		 g  vy	
 g  vx	 g  vy	 g  vx	 g  vy	 g  vx	1 g  vy	1 g  vx	B g  vy	B g  vx		S g  vy	
S g  vx	d g  vy	d g  vx	: g  vy	: g  vx	2 g  vy	2 g  vx	. g  vy	. g  vx		* g  vy	
* g  vx	& g  vy	& g  vx	Kj g  vy	Kj g  vx	{ g  vy	{ g  vx	 g  vy	 g  vx	 g  vy	 g  vx	 g  vy	 g  vx	 g  vy	 g  vx		 g  vy	
 g  vx	 g  vy	 g  vx	  g  vy	  g  vx	1 g  vy	1 g  vx	B g  vy	B g  vx	S g  vy	S g  vx	j g  vy	j g  vx			 g  vy			 g  vx		 g  vy		 g  vx	
 g  vy	
 g  vx		 g  vy	
 g  vx	, g  vy	, g  vx	= g  vy	= g  vx	N g  vy	N g  vx	_ g  vy	_ g  vx	p g  vy	p g  vx	 g  vy	 g  vx	 g  vy	 g  vx			m g  vy			m g  vx		3	e g  vy		3	e g  vx		D	a g  vy		D	a g  vx		~	 g  vy		~	 g  vx			 g  vy			 g  vx			 g  vy			 g  vx		
 g  vy		
 g  vx	

 g  vy	

 g  vx	

 g  vy	

 g  vx		
0
w g  vy	

0
w g  vx	
G
o g  vy	
G
o g  vx	

 g  vy	

 g  vx	

 g  vy	

 g  vx	
 g  vy	
 g  vx	 g  vy	 g  vx	 g  vy	 g  vx		2 g  vy	
2 g  vx	C g  vy	C g  vx	Z g  vy	Z g  vx	2 g  vy	2 g  vx	* g  vy	* g  vx	& g  vy	& g  vx	C
 g  vy	C
 g  vx	\ g  vy	\ g  vx	m g  vy	m g  vx		 g  vy	
 g  vx	 g  vy	 g  vx	 g  vy	 g  vx	 g  vy	 g  vx	4~ g  vy	4~ g  vx	Ez g  vy	Ez g  vx	W g  vy	W g  vx	O g  vy	O g  vx	K g  vy	K g  vx		C g  vy	
C g  vx	? g  vy	? g  vx	7 g  vy	7 g  vx	h g  vy	h g  vx	  g  vy	  g  vx	 g  vy	 g  vx		 g  vy	
 g  vx	 g  vy	 g  vx	} g  vy	} g  vx	2u g  vy	2u g  vx	Cq g  vy	Cq g  vx	 g  vy	 g  vx	 g  vy	 g  vx	% g  vy	% g  vx	 g  vy	 g  vx	6 g  vy	6 g  vx	O g  vy	O g  vx	` g  vy	` g  vx		q g  vy	
q g  vx	 g  vy	 g  vx	 g  vy	 g  vx	' g  vy	'  g  filenamef  language/tree-il.scm
 
	 		 		 		 	  	  	$  	  	  	  	 	 	
 	 	 	 	 	 	" 	& 	& 	} 	 	 	 	  	 	I 	Q 	U 	 	 	, 	 	 	A 	W 	[ 	 	 	 	D 	"M 	U 	Y 	 	( 	 	 	x 	( 	 	 	 	" 	" 	& 	\ 	f 	j 	 	 	 	 	 	 	 	 	 	 	 		U 		] 		a 		 	!	 		 		 		 	
T 	*
X 	
_ 	
g 	
k 	
 	
 	
 	
 	e 	)q 	t 	?x 	 	 	 	 	 	 	3 	 	 	 	( 	 	> 	 	 	 	P 	\ 	_ 	2c 	n 	r 	 	. 	 	= 	# 	+ 	/ 	 	) 	 	 	 	P 	"T 	W 	1[ 	e 	i 	 	 	 	 		 	 	 	 	 	 	 	 	 	+ 	 	 	# 	 	+  g  nameg  parse-tree-il CR`deY]^_'+,0126789=>?@DEFGHLMQRSWXkopBquvwxyz{|"&fj} y   hP  
  ]I &  C&  '4 54 54545C	&  64
 54 54 5454545 C&  4 5 C&  4 54 5 C&  14 54 54 5 45 C&  14 54 54 5$  "   C &  F4! 54" 54# 54$ 5$  "   45 C%&  4& 5' C(&  &4) 54* 5' 45 C+&  !4, 54- 5.45 C/&  040 541 5$  245 C23C4&  45 546 547 548 549 54: 54; 54< 5	=45 45 	$  4	5 "  C>&  4? 5@ CA&  4B 5C45CD&  >4E 54F 54G 54H 5I4545 CJ&  S4K 54L 54M 54N 54O 5$  P"  Q4545 CR&  >4S 54T 54U 54V 5W4545 CX&  &4Y 54Z 5[4545 C\&  64] 54^ 54_ 5`454545 Ca&  :4b 54c 54d 5e454545 Cf&  4g 5h45 Ci&  &4j 54k 5l4545 Cm&  64n 54o 54p 5q454545 Cr&  84s 54t 54u 5v454545 Cwx 6    |
      g  tree-il
	L g  rtd	L g  proc		(	A g  args		(	A g  test		^	 g  
consequent		^	 g  	alternate		^	 g  name	   g  name	   g  gensym	   g  name	   g  gensym	   g  exp	   g  mod	. g  name	. g  public?	. g  mod	R| g  name	R| g  public?	R| g  exp	R| g  name	 g  name	 g  exp	 g  name	 g  exp	 g  meta	$ g  body	$ g  req	d g  opt	d g  rest	d g  kw	d g  inits	d g  gensyms	d g  body	d g  	alternate		d g  exp	 g  exps	 g  names		+ g  gensyms		+ g  vals		+ g  body		+ g  	in-order?	V g  names	V g  gensyms	V g  vals	V g  body	V g  names	 g  gensyms	 g  vals	 g  body	 g  exp	 g  body	 g  winder	8 g  body	8 g  unwinder	8 g  fluids	Uz g  vals	Uz g  body	Uz g  fluid	 g  fluid	 g  exp	 g  tag	 g  body	 g  handler	 g  tag	!D g  args	!D g  tail	!D  Cg  filenamef  language/tree-il.scm
 
	 		 		 		.		/		6	'	?		I 		f		g		n	#	u	A	~	  	 		  	 	  	 	 	% 	  		 	&	-	6 	\	b	d	j	q	r	/{	 		 				 				 	!	"		"	"		#		, 	v&	&	*&	'	&	(	(	*(	$(	G&	 	+	 	.	.	.	 	1	1	!1	8*1	3 	f4	h4	n4	s5	|5	$4	 	8	8	8	88	 	;	;	;	*;	 	>	 >	'>	*.?	7>	@ 	]B	^B	gB	-pC	yB	 	F	F	F	 	I	I	I	(I	 	L	L	L	&L	>L	 	)O	*O	1O	%:P	CO	H 	 }	L  g  nameg  unparse-tree-il CR  h0      - . , 3 #  #  4 5C             g  e
		* g  env		* g  opts			*  g  filenamef  language/tree-il.scm
R
	R	6	S	
	!S		)S	
	*S	 		*	  g  nameg  tree-il->scheme CR28@GMRSXY]^_`defjkpqy{|} :h`  '	  ]" (  "   $  
L 6 &  4 5L 4L4L  556&  4 5L 4L4L  556&  4 5L 4L4L  556&  4	 5L 4L4L  556
&  ?4 54 54 5L 4L4L4L4L  55556&  +4 54 5L 4L4L  556&  4 5L 4L4L  556&  /4 54L  5L $  4L5"  6&  `4 54 54 5L $  "4L4L4L4L  5555"  4L4L4L  5556&  /4 54 5L 4L4L4L  5556&  /4 54 5L 4L4L4L  5556&  /4  54! 5L 4L4L4L  5556"&  /4# 54$ 5L 4L4L4L  5556%&  ?4& 54' 54( 5L 4L4L4L4L  55556)&  ?4* 54+ 54, 5L 4L4L4L4L  55556-&  4. 5L 4L4L  556/&  /40 541 5L 4L4L4L  55562&  ?43 544 545 5L 4L4L4L4L  555566&  ?47 548 549 5L 4L4L4L4L  55556L 6   	      g  tree
	] g  result	] g  rtd		!] g  exp		2	J g  exp		Y	q g  exp	   g  exp	   g  test	  g  
consequent	  g  	alternate	  g  proc	9 g  args	9 g  exps	H` g  body	o g  result	z g  inits	 g  body	 g  	alternate	 g  vals	6 g  body	6 g  vals	Lm g  body	Lm g  vals	 g  body	 g  exp	 g  body	 g  body	" g  winder	" g  unwinder	" g  fluids	?i g  vals	?i g  body	?i g  fluid	x g  fluid	 g  exp	 g  tag	 g  body	 g  handler	 g  tag	+U g  args	+U g  tail	+U  )g  filenamef  language/tree-il.scm
`		b			b		b		b		c		!d		9f		>f		Hf		Jf		Rd		`h		eh		oh		qh		yd	 j	 j	 j	 j	 d	 l	 l	 l	 l	 d	 n	 o	 p	  p	+ p	 o	n	n	d	%r	,r	-r	+7r	9r	Ad	Ot	Tt	^t	`t	hd	rv	zv	x	y	w	d	|	}	~	~	)~	5~	)~	}			#	/	#	|	d		#	(	 2	4	6	>d	U	Z	_	 i	k	m	ud				 			d				)			d				 	+	 	 	"	*d	J	O	T	 Y	-c	 e	g	i	qd			 		d				*			d				$	*	$
			d	6	;	@	*E	4O	*Q	S	U	]	 	]	  g  nameg  loop C      h    |  ]O  Q 6t      g  leaf
		  g  down		  g  up			  g  seed			  g  tree			  g  loop			   g  filenamef  language/tree-il.scm
X
	`	 		 	  g  nameg  tree-il-foldg  documentationf Traverse TREE, calling LEAF on each leaf encountered, DOWN upon descent
into a sub-tree, and UP when leaving a sub-tree.  Each of these procedures is
invoked as `(PROC TREE SEED)', where TREE is the sub-tree or leaf considered
and SEED is the current result, intially seeded with SEED.

This is an implementation of `foldts' as described by Andy Wingo in
``Applications of fold to XML transformation''. CR4
 "$'&)+-502487:=<A@DCFHJNLMRQUTW[YZ^]` 9       h  B   ]	
     45               ! "	##  $%  	#   #   &'  #  ('  #  )'  #  *  #  +# ,  -  ./ '  #  01 21    34 #  5  64    7  8       C  :       g  dummy
	 g  seed	  		   CPQ     h(      ]	4 5$  @ 6             g  x
		" g  tmp		"  g  filenamef  language/tree-il.scm

 		"  g  
macro-typeg  syntax-rulesg  patternsg  seedg  ...   C5R`decY]^_2867@GDEFMRQSXWkpqy{|fj} E     h    ]! &  Z4 54 5445 4L5>  "  G  445 4L5>  "  G  " Y&  4 54 54	 5445 4L5>  "  G  445 4L5>  "  G  44	5 4L5>  "  G  " 
&  R4 54 >  "  G  4 >  "  G  445 4L5>  "  G  " u&  d4 54 >  "  G  4 >  "  G  4 >  "  G  445 4L5>  "  G  " 	&  @4 54 >  "  G  445 4L5>  "  G  " &  @4 54 >  "  G  445 4L5>  "  G  " y&  84 5$  "445 4L5>  "  G  "   " 9&  y4 54 54 5H4LJ5K445 4L5>  "  G  $  "445 4L5>  "  G  "   " &  04  544 5 4L5>  "  G  " !&  l4" 54# 54$ >  "  G  44"5 4L5>  "  G  44#5 4L5>  "  G  " %&  l4& 54' 54( >  "  G  44&5 4L5>  "  G  44'5 4L5>  "  G  " )&  l4* 54+ 54, >  "  G  44*5 4L5>  "  G  44+5 4L5>  "  G  " $-&  X4. 54/ 544.5 4L5>  "  G  44/5 4L5>  "  G  " 0&  41 542 543 54415 4L5>  "  G  4425 4L5>  "  G  4435 4L5>  "  G  " :4&  45 546 547 54455 4L5>  "  G  4465 4L5>  "  G  4475 4L5>  "  G  " 8&  .49 54495 4L5>  "  G  " v:&  X4; 54< 544;5 4L5>  "  G  44<5 4L5>  "  G  " =&  4> 54? 54@ 544>5 4L5>  "  G  44?5 4L5>  "  G  44@5 4L5>  "  G  "  A&  4B 54C 54D 544B5 4L5>  "  G  44C5 4L5>  "  G  44D5 4L5>  "  G  "   4L  5$  C C            g  x
	 g  rtd	 g  proc			e g  args			e g  test	   g  
consequent	   g  	alternate	   g  exp	I g  exp	\ g  exp	 g  exp	E g  body	X g  inits	 g  body	 g  	alternate	 g  exps	> g  vals	X g  body	X g  vals	& g  body	& g  vals	@ g  body	@ g  exp	 g  body	 g  body	 g  winder	 g  unwinder	 g  fluids	 g  vals	 g  body	 g  fluid	%H g  fluid	b g  exp	b g  tag	2 g  body	2 g  handler	2 g  tag	S g  args	S g  tail	S g  t  (g  filenamef  language/tree-il.scm
				"		,	"	7		@		J	"	W		q	 	 	" 	 	 	( 	 	 	' 	 	)	3	!>	U	 	 	  				"			%	/	%:	Q	`		a
	k
	!v
						"				+			&	3	J	o	y												2	W	a	n	w				"	"	 "	#	#	!#		"&	,&	7&	@'	J'	 U'	^(	h(	"s(		+	+	+	,	,	,	-	-	-		(0	20	=0	T	g3	q3	|3	4	4	4		7	7	7	8	8	8	9	9	 !9	>	Z<	d<	o<	x=	=	=	>	>	>	B	B	 	  g  nameg  lp C   h      ]
O  Q 6       g  f
		 g  x		 g  lp			  g  filenamef  language/tree-il.scm

		 			  g  nameg  post-order! CR`decY]^_28@GMRSXkpqy{|fj} ;   h0    ])4L  5$  "   &  Z45454454L5>  "  G  4454L5>  "  G  " &  45454	54454L5>  "  G  4454L5>  "  G  44	54L5>  "  G  " 
&  .454454L5>  "  G  " &  .454454L5>  "  G  " &  .454454L5>  "  G  " y&  .454454L5>  "  G  " C&  845$  "4454L5>  "  G  "   " &  y454545H4LJ5K4454L5>  "  G  $  "4454L5>  "  G  "   " &  0454454L5>  "  G  " J&  Z45454454L5>  "  G  4454L5>  "  G  " &  Z45454454L5>  "  G  4454L5>  "  G  "  &  Z4!54"544!54L5>  "  G  44"54L5>  "  G  " $#&  X4$54%544$54L5>  "  G  44%54L5>  "  G  " &&  4'54(54)544'54L5>  "  G  44(54L5>  "  G  44)54L5>  "  G  " :*&  4+54,54-544+54L5>  "  G  44,54L5>  "  G  44-54L5>  "  G  " .&  .4/544/54L5>  "  G  " v0&  X41542544154L5>  "  G  44254L5>  "  G  " 3&  44545546544454L5>  "  G  44554L5>  "  G  44654L5>  "  G  "  7&  4854954:544854L5>  "  G  44954L5>  "  G  44:54L5>  "  G  "   C      g  x
	0 g  t			 g  x	0 g  rtd		!- g  proc		9  g  args		9  g  test	  g  
consequent	  g  	alternate	  g  exp	A g  exp	Tw g  exp	 g  exp	 g  body	# g  inits	D g  body	D g  	alternate	D g  exps	 g  vals	> g  body	> g  vals	X g  body	X g  vals	 g  body	 g  exp	b g  body	b g  body	 g  winder	 g  unwinder	 g  fluids	z g  vals	z g  body	z g  fluid	 g  fluid	 g  exp	 g  tag	1 g  body	1 g  handler	1 g  tag	& g  args	& g  tail	&  )g  filenamef  language/tree-il.scm
E		F			F		F		!G		>I			HI	$	SI			\J			fJ	$	sJ		 G	 M		 M	$ M		 N		 N	* N		 O		 O	) O		G	!R		+R	#6R		MG	WU		aU	"lU		G	X		X	$X		G	[		[	'[		G	^		_		_	#_	/G	Kb	Ub		Vc		`c	$kc		yd		zd	d	7d	G	g		g	!g		G	j		j	j		k		%k	0k		JG	]n		gn	tn		}o		o	o		G	r		r	r		s		s	s		G	!v		+v	"6v		?w		Iw	#Tw		nG	z		z	 z		{		{	"{		|		|	$|		G				!+		4		>	K		T		^	i		G				 		G				 							G	8		B	M		V		`	k		t		~	"		G											 		
			 	0  g  nameg  lp C   h      ]
O  Q 6       g  f
		 g  x		 g  lp			  g  filenamef  language/tree-il.scm
D
	E	 			  g  nameg  
pre-order! CRdef  h      ]444 555	C        g  x
		  g  filenamef  language/tree-il.scm

							$						 		  g  nameg  struct-nfields CgRg   h     ] $  T$  K &  ?"  -
$  C4 5$  	"C4 5"CC $  $$  4 5$  
 6CC C        g  a
	  g  b	  g  n			K g  t		"	K  g  filenamef  language/tree-il.scm

														 						!		"		.		5		:	0	<		@		C		I		K			L		S		Y			`		d		g			k		l			q		t		v			z			 	 		 	 $	 	  g  nameg  	tree-il=? CR4h4iij     h   [   ] 6S       g  var
		  g  filenamef  language/tree-il.scm		 		   Ckl   h   [   ]6S       g  var
		  g  filenamef  language/tree-il.scm		 		   CPQ    h(   h   ]	  4?$  @ 6     `       g  x
		# g  tmp		#  g  filenamef  language/tree-il.scm
	 		#   C55hRgmln o h0    ]:"  t4545
$  C"  ;$  /4L 5	 	5"C4	5""  45
$  C4L 5	 	54L 5	 	54L 5	 	5C $   " $   "V 6      g  exp
	0 g  depth	0 g  s			z g  len			z g  h			z g  i		*	e g  h		*	e g  h1		C	Z g  l		~
 g  h	 
 g  h1	   g  l	 
 g  h	 
 g  h1	   g  l	 
 g  h	 
 g  h1	 
  g  filenamef  language/tree-il.scm
																#	
	*		/		3		6		7	$	>	.	A	?	C	$	C		K		L		Q		R		T	2	U		V		W		b		e		f		m		p		z		~			 	 	 	 	 	
 	 	 	' 	/ 	 	 	 	 	 	 	2 	 	 	 	 	 	 	' 	/ 	 	 	 	 	 	 	2 	 	 	 	 	 	 	' 	/ 	 	 	 				2								 	(	0	 [	0	  g  nameg  hash-exp C       h      ]	O Q  
6         g  exp
		 g  hash-exp	
	  g  filenamef  language/tree-il.scm

		 		  g  nameg  tree-il-hash CRC         g  m
		,  g  filenamef  language/tree-il.scm		
 	B
	n
e 
r 
       
       
      R
      X
      ֢
      D
      
      -
      6	      
 	      
   C6                                                                                                                                                                                                                                                                                                                                                                                                                ccache/language/scheme/spec.go                                                                      0000644                 00000003727 15154557173 0012310 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] : 4    h      ] g  guile	 	g  define-module*	 	 	g  language	g  scheme	g  spec		 	
g  filenameS	f  language/scheme/spec.scm	g  importsS	g  system	g  base	g  compile	 	 	 	 	g  compile-tree-il	 	 	g  decompile-tree-il	 	 	 	g  exportsS	 	g  set-current-module	 	 	 g  invalidate-compilation-cache!	!g  make-language	"g  nameS	#g  titleS	$f  Scheme	%g  readerS	&g  and=>	'g  module-variable	(g  current-reader	)g  variable-ref	*g  	fluid-ref	+g  read	,g  	compilersS	-g  tree-il	.g  decompilersS	/g  	evaluatorS	0g  primitive-eval	1g  printerS	2g  write	3g  make-default-environmentS	4g  make-fresh-user-module	5g  module-define!	6g  
make-fluid	7g  module-set!	8g  format	9g  simple-formatC 5    h     ]4	
5 4 >  "  G   4 i>   "  G  4!i"#$%&'()*+   h0      ]
444555$  "   6          g  port
		- g  env		- g  t			-  g  filenamef  language/scheme/spec.scm
	!			$			$				$	%		$	:		$	%		$			$			$	 
		-	   C,-i .-i /0  h   w   ] 6o       g  x
		 g  module		  g  filenamef  language/scheme/spec.scm
	,			,	# 			   C12i345(6789       h@      ]45  4 45 >  "  G  4 >  "  G   C            g  m
		;  g  filenamef  language/scheme/spec.scm
	/			2			2		
	6			6	&		6	6		6		#	<		)	<	#	0	<	 		;
   C5RC      }       g  m
		,  g  filenamef  language/scheme/spec.scm		
	-	
	K	 	Z	*	f	+		
 	
   C6                                          ccache/language/scheme/decompile-tree-il.go                                                         0000644                 00000202662 15154557173 0014655 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0     ] 4    h      ] g  guile	 	g  define-module*	 	 	g  language	g  scheme	g  decompile-tree-il		 	
g  filenameS	f  %language/scheme/decompile-tree-il.scm	g  importsS	g  tree-il	 	 	g  srfi	g  srfi-1	 	 	g  srfi-26	 	 	g  ice-9	g  receive	 	 	g  vlist	 	 	g  match	 	  	!g  system	"g  base	#g  syntax	$!"# 	%$ 	& % 	'g  exportsS	( 	)g  set-current-module	*) 	+) 	,g  do-decompile	-g  use-derived-syntax?S	.-		/g  avoid-lambda?S	0/		1g  	use-case?S	21		3g  strip-numeric-suffixes?S	43		5.024 	6g  choose-output-names	7g  	hashq-ref	8g  if	98 	:g  begin	;g  let	<g  lambda*	=g  define*	>g  define	?g  lambda	@g  map	Ag  list	Bg  let*	Cg  letrec*	Dg  letrec	Eg  append	FE 	GE 	Hg  length	Ig  and	Jg  or	KH 	LH 	Mg  x	NM 	Og  else	Pg  reverse	QP 	RP 	SO 	TS 	Ug  eqv?	Vg  quote	Wg  memv	Xg  case	Yg  c	ZVO 	[g  _	\Z[	]IY\ 	^] 	_g  cond	`g  
take-while	ag  identity	bg  drop	cg  car	dg  cdr	eg  cons	fg  take	gg  <void>	hg  <const>	ig  	const-exp	jg  self-evaluating?	kg  
<sequence>	lg  sequence-exps	mg  <application>	ng  application-proc	og  application-args	pg  <primitive-ref>	qg  primitive-ref-name	rg  <lexical-ref>	sg  lexical-ref-gensym	tg  <lexical-set>	ug  lexical-set-gensym	vg  lexical-set-exp	wg  set!	xg  <module-ref>	yg  module-ref-mod	zg  module-ref-name	{g  module-ref-public?	|g  @	}g  @@	~g  <module-set>	g  module-set-mod g  module-set-name g  module-set-public? g  module-set-exp g  <toplevel-ref> g  toplevel-ref-name g  <toplevel-set> g  toplevel-set-name g  toplevel-set-exp g  <toplevel-define> g  toplevel-define-name g  toplevel-define-exp g  <lambda> g  lambda-meta g  lambda-body g  assq-ref g  documentation g  case-lambda* g  case-lambda   g  <lambda-case> g  lambda-case-req g  lambda-case-opt g  lambda-case-rest g  lambda-case-kw g  lambda-case-inits g  lambda-case-gensyms g  lambda-case-body g  lambda-case-alternate g  cons* g  list-ref g  	list-head g  optionalS g  	list-tail g  keyS g  caddr g  allow-other-keysS   g  <conditional> g  conditional-test g  conditional-consequent g  conditional-alternate VU  g  v VV  g  
last-datum     Z    g  void? g  <let> g  let-gensyms g  let-vals g  let-body g  <letrec> g  letrec-in-order? g  letrec-gensyms g  letrec-vals g  letrec-body g  <fix> g  fix-gensyms g  fix-vals g  fix-body g  <let-values> g  let-values-exp g  let-values-body g  call-with-values g  make-lambda g  	<dynwind> g  dynwind-body g  dynwind-winder g  dynwind-unwinder g  dynamic-wind g  <dynlet> g  dynlet-fluids g  dynlet-vals g  dynlet-body g  with-fluids g  <dynref> g  dynref-fluid g  	fluid-ref g  <dynset> g  dynset-fluid g  
dynset-exp g  
fluid-set! g  <prompt> g  
prompt-tag g  prompt-body g  prompt-handler g  call-with-prompt g  <abort> g  	abort-tag g  
abort-args g  
abort-tail g  apply g  abort g  error f  unhandled record g  make-hash-table 8V|}w>=:;BDCIJ_X?<WU  g  for-each g  
hashq-set! g  string->char-set f  
0123456789 g  string-skip-right g  string-length g  
string-ref g  	substring g  string->symbol g  symbol->string g  hashq-create-handle! g  memq g  	top-level g  vhash-foldq* g  lexical-ref? g  reverse! g  => g  cadr g  fold g  vhash-consq g  	let-names g  letrec-names g  	fix-names g  
vlist-null g  	sort-list g  any g  and=> g  string-append f  -g  number->stringC 5      h0    ] 4	
&'(5 4+ >  "  G   ,      h      ] @           g  e
		 g  env		 g  opts			  g  filenamef  %language/scheme/decompile-tree-il.scm
	
			 			  g  nameg  decompile-tree-il CR567  h      ]L  6             g  s
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
	,		
	,	! 		
  g  nameg  output-name C9:        h0      ] (  C"   C $   (   C""        g  es
		/  g  filenamef  %language/scheme/decompile-tree-il.scm
	4			5		
	2			8			5	 		/  g  nameg  build-begin C:;       h      ]!"  5 $  (  &  $  C  C  C  C $  C  &  -$  "(  $  C"""""}              g  e
	  g  w		5 g  x			5 g  w	H  g  x		H  g  w		a	} g  x		a	}  g  filenamef  %language/scheme/decompile-tree-il.scm
	:			;		.	>		;	;	 	   g  nameg  build-lambda-body C:        h8      ] $  (  &  $  C  C  C  C        g  e
		7 g  w		1 g  x			1  g  filenamef  %language/scheme/decompile-tree-il.scm
	@			A		*	C	 		7  g  nameg  build-begin-body C<=>?  h   H  ]""  uL $  e$  T&  8$  '$   C  C  C  C  C  CL $  M$  B&  ,$  !$   C"D"@"<"8"4      @      g  name
	  g  e	  g  w			g g  x			g g  w		2	S g  x		2	S g  w	   g  x	   g  w	   g  x	    
g  filenamef  %language/scheme/decompile-tree-il.scm
	E			F		?	L			K	M		{	F	 	I		 	F	 	 	  g  nameg  build-define C;@AB    h  m  ][4 54L 5" "  L$  $  $  $  (  $  s(  i$  Z
		&  E
$  ;

$  '(  $   CCCCCCCCCCCCCC$  $  $  (  x$  h(  ]$  M
		&  7
$  ,

$  $  C"""""""""""$  B$  .(  $  (  C"B">":"6"2    e      g  names
	 g  vals	 g  body		 g  v		 g  x		2  g  w		E  g  x		E  g  w		Z  g  w		m  g  w			|  g  x	
	|  g  w	   g  x	   g  w	   g  x	  g  w	 g  x	 g  w	 g  w	- g  w		< g  x	
< g  w	U{ g  x	U{ g  x	 g  w	 g  x	  g  filenamef  %language/scheme/decompile-tree-il.scm
	O			P			P			Q			P	 	W		 	P	i	T		w	P	 
		  g  nameg  	build-let CCD@A;G?H 	      hX    ]| $  "  454L 5" " "  ]L$  T$  J&  5$  +$  44L55CCCCCC$ )$ $  (  $  
	
$  
(  
$  &  $  $  $  t$  i(  ^$  N	$  7$  ,4545$  	45C"""""""""""""""{"w"s"o$  ;$  '(  $  C"1"-")"%$  B$  .(  $  (  C"""""        g  	in-order?
	V g  names	V g  vals		V g  body		V g  v		$V g  w		E  g  x		E  g  x		[  g  x	  g  w	  g  x	  g  w	  g  w		  g  x	
  g  w	  g  w	  g  x	  g  w	 g  x	 g  w	0 g  w	? g  x	? g  x	 g  w	 g  x	 g  x	R g  w	&N g  x	&N  g  filenamef  %language/scheme/decompile-tree-il.scm
	Z			[		
	[			[	'		\			]		#	[		j	h			o	i		}	h		 	[	T	c	[	c	!b	c	f	c		h	d	k	d	x	d		e		[		_		[	 	V	  g  nameg  build-letrec C8     h     ]#$  &  d$  Q&  4"    C$  (    C""  C  C  C  C       g  test
	  g  
consequent	  g  	alternate		  g  w		  g  x		  g  w		(	s g  x		(	s  g  filenamef  %language/scheme/decompile-tree-il.scm
	m			n		9	p		C	n		W	o		i	p	 	 	  g  nameg  build-if CI h0      ] (  C"   C $   (   C""         g  xs
		.  g  filenamef  %language/scheme/decompile-tree-il.scm
	r			s			v			s	 		.  g  nameg  	build-and CJ   h0      ] (  C"   C $   (   C""         g  xs
		.  g  filenamef  %language/scheme/decompile-tree-il.scm
	x			y			|			y	 		.  g  nameg  build-or CILNORT8        hp  l  ]I" 	 $    &  45$  45"  $  	"  $  4L  5 C"  $  I45"  4L  5 C$  #(  	4L54L 	5C""$  "4L  5 C"p4L  5 C4L  5 C $  R  &  <$  1&  $  (  C""""""    d      g  e
	l g  w	 g  x		 g  tail-len		&  g  len		;  g  ls		c  g  n		c  g  p-ls		c  g  xs		s  g  w		   g  w	   g  wh g  x	h g  w	5` g  x	5`  g  filenamef  %language/scheme/decompile-tree-il.scm
 		 		S 		T 		[ 		c 		{ 		| 	  	  	  	  	.  	  	  	  	  	  	  	  	  	 	 	 	S 	X 	 	l  g  nameg  build-else-tail C8U     h   Z   ] LL 6R       g  filenamef  %language/scheme/decompile-tree-il.scm	 	 		
   CVWX     h    ] " d" A$ 4$ & $  $  
		&  
$  

$  O LQ $  (  }$  k&  S$  D(  9$  ' 4L 54L4L55CL66 6 L6L66 6 L6L6L6L6L6L6L6L6$ $  &  $  $  
		&  
$  

$  $  (  {$  k&  U$  J(  ?$  /$  $4L 54L4L55C""""""""""""""""$  [$  F&  0$  %$  $  C"J"F"B">":"6       g  v
	 g  e	 g  v		 g  w		L g  x		L g  w		/F g  x		/F g  w		H: g  x		H: g  w			Y4 g  x	
	Y4 g  w		r( g  x		r( g  failure	 " g  w	  g  w	  g  x	  g  failure	  g  w	  g  w	   g  x	   g  w	_m g  x	_m g  w	pi g  x	pi g  w	a g  x	a g  w		] g  x	
] g  w	U g  x	U g  w	I g  w	E g  x	E g  w	9 g  w	1 g  x	1 g  w	~ g  x	~ g  w	 g  x	 g  w	 g  x	  +g  filenamef  %language/scheme/decompile-tree-il.scm
 		 	  		  	  		  	  	%  	  		 	R 	 	! 		" 	' 	%/ 	0 		5 	 		  g  nameg  build-case-else-tail CL^RO     h     ]A45 $  4 5"  $  	"  $   D"  $  X45"   D$  ;(  0$  &  	 D D D""$  "~ D "j           g  clauses
	  g  tail-len		  g  len		  g  ls		=  g  n		=  g  p-ls		=  g  cs		M  g  w		i  g  w		u  g  w	    
g  filenamef  %language/scheme/decompile-tree-il.scm
 		 		7 		9 		= 		V 		X 		X 	  	1  	&  	  	  	  	  	  	  	  	 	   g  nameg  clauses+tail CH_G@  h      ] 4L 5C          g  test
		 g  
consequent		  g  filenamef  %language/scheme/decompile-tree-il.scm
 		 	(	 	 			   C       h   C  ]4 5
$  C$  L  644LO  5$  ;&  $  "  4L5"  4L5"  4L55C    ;      g  tests
	  g  consequents	  g  	alternate		  g  key			  g  w		L	} g  x		L	}  g  filenamef  %language/scheme/decompile-tree-il.scm
 		 			 		# 		& 	#	* 		, 		0 		B 		f 	  	 	 	  g  nameg  
build-cond CUVW`a@UVW      hp    ]YL  "  $  $  &  o$  f$  Q$  H(  ?$  1
		&  
$  
(  
 CCCCCCCCCCCC$  $  &  $  |$  e$  Z(  O$  ?
		&  )
$  
(  
$  C""""""""""""             g  t-df5d6f08a2a2c7b-4dd8
	i g  v	i g  w		  g  x		  g  w		+  g  x		+  g  w		D  g  x		D  g  w		b  g  w			q  g  x	
	q  g  w	   g  w	 e g  x	 e g  w	 a g  x	 a g  w	 Y g  x	 Y g  w	M g  w		I g  x	
I g  w	-=  g  filenamef  %language/scheme/decompile-tree-il.scm
 	/	 	  		  	 	i   CHbEcdXGef    h    ]KL$  (  "  "  $  &  $  $  "  $  " {$  _(  S$  ?
		&  "
$  
(  

" 7" 2" -" (	
" " " " "  "  $  &  $  $  "  $  ""  $  (  r$  [
		&  ;
$  ,
(  
$  "  ""  ""  ""  "	
"  "z"  "o"  "g"  "Y"  "Q"  "C44O  55454L4L4	 54	5554L >  G 454
4554
4L4555
			$  
L 644
4L4	5555CL 6         g  tests
	 g  consequents	 g  	alternate		 g  test		 g  w		)  g  x		)  g  w		B  g  x		B  g  w		o  g  w			~  g  x	
	~  g  w	  g  x	  g  w	
 g  x	
 g  w	: g  w		I g  x	
I g  w	f| g  v	 g  datum-lists	 g  n	 g  tail	 g  clauses	+ g  tail	+ g  n		c g  datum-lists	
c g  consequents	c  g  filenamef  %language/scheme/decompile-tree-il.scm
 		 		 		 	(	 					I	0		M	0		N	0		U	0	)	Y			0		0		0		0	)!		 	
 	 	* 	 	
 	 	
 	 	/ 	0 	0 	/ 	 	
! 	$. 	5 	< 	= 	!B 	)L 	!M 	!R 	)W 	.a 	)c 	!c 	n 	r 	| 	~ 	 	 	/ 	4 	/ 	 	 	
 7		  g  nameg  build-cond-or-case Cg9hiVjkl@mno?Hpqrs7tuvwxyz{|}~<AGcXLROUVWG8      h  0  ]" "  $   & $ $  "  $   C45$  45"  $  	"  $   C" $ 4	5
$  (  $  &  $  (  $  &  $  $  j$  `(  V$  G&  2$  ((  4	
 5  C C C C C C C C C C C C C C C C C$  j

$  [

$  G(  =$  .(  $&  		" C C C C C C C	"q C C C $   
& $ $ & u$ j$  "  $  "$ >( 3		$ #		

& $ (  $  &  $  (  $  &  $  $  t$  i(  ^$  N&  8$  -(  "$    C"""""{"w"s"o"k"g"c"_"["W"S"O"K"G"C"?";"7"3"/"+"'"# $   
& $ $ & l$ a$  "  $  "$ 5( *		$ 		

& $  (  $  &  $  (  $  &  $  $  k$  `(  U$  E&  /$  $(     C""""""""""""""""""|"x"t"p"l"h"d"`"\      (      g  e
	 g  w	 g  x		 g  w		0 g  x		0 g  tail-len		Q g  len		f g  ls	  g  n	  g  p-ls		  g  datum	
  g  w	  g  w	  g  x	  g  w	 } g  w	 z g  x	 z g  w	 t g  x	 t g  w	k g  w	'h g  x	'h g  w	D_ g  w	
  g  w	 g  x	 g  w	 g  w	 g  w( g  x	( g  w	A g  x	A g  w	R g  x	R g  w	k g  x	k g  w		 g  w	
 g  x	 g  w	 g  w	 g  x	 g  w	 g  w	 g  x	 g  w	 g  x	 g  w	4 g  w	C g  x	C g  w	` g  w g  x	 g  w	 g  x	 g  w	 g  x	 g  w	7 g  x	7 g  w		c g  w	
r g  x	r g  w	z g  w	v g  x	v g  w	j g  w	f g  x	f g  w	^ g  x	^ g  w	 R g  w	N g  x	N g  w	,B  Jg  filenamef  %language/scheme/decompile-tree-il.scm
M			N		7	0		;	0		<	0		C	0	)	GN	HV	N	r	0	v	0	w	0	~	0	)N	kR	N	>	0	B	0	C	0	J	0	)NN	0P	FN	 	  g  nameg  simplify-test C8UXW_IJ;   h     ] &  C&  24 5"   C45$  $  "C"&  4 5L4	L56
&  4 54 54L54	L5$  $  l&  W$  M
		$  9
$  /$  %4	545$  L 	4L
56CCCCCCCC&   6&  4 5L6&  (4 54 54L54L5 C&  14 54 54 5$  "   C&  F4 54  54! 54" 5$  "   4L5 C#&  $ 6%&  !4& 54' 54L5 C(&  4) 54* 5L4L56+& 4, 54- 5$ 4L54./5$ " /"  "  j$  `0&  K$  A	$  -
$  	$  0
	CCCCCCC$  e1&  O$  D	$  /
$  	$  1
	C":"6"2"."*"&$  B2&  ,$  !		$  2	C""""$  B&  ,$  !		$  	C""""C3C4& 45 546 547 548 549 54: 54; 54< 5	4	L5
$  "  $  "  	$  $$  4=
?"  
4L4L55C$  "  $  4L	5$  4=
?"  
$  14L4L55 C2$  04L4L55 C1$  14L4L55C0$  04L4L55CC	$  4L	5"  45$  45"  
$  4>
5"  4?
5$  .@4	A4?4B
554	L4?555"  $  LC4D4	A4	L4	E554	L4B554	F55$  G"  5"  4D4D4D555$  d$  "  2$  04L4L55 C1$  "  0$  04L4L55CC24L4L55CH& 	H4I 54J 54K 5LM44L554L54N5$  "  
4L5 " " M" " " " " T" |" " Z$ PM& ;$ 1
		$ 		O& $  $  "  $  C$  (  $  &  $  (  
$  

$  o(  e$  VP&  A$  7$  !$  P 4L5CCCCCCCCCCCCCCCCCCCCC$ lM& V$ K
		$ 6		Q&  $ $  "  $  ";$  (  $  &  $  (  $  
$  

$  r(  g$  WP&  A$  6$  $  P4L5C""{"w"s"o"k"g"c"_"["W"S"O"K"G"C"?";"7"3"/$  M&  $  w
	
$  b

$  M(  B$  2R&  $  R	4L5C"""""""""L$  $  M&  $  
	
$  

$  t(  i$  YM&  C$  8$  #L	  4L56"""""""""""L$  |$  qM&  [$  P
	
$  ;

$  &(  &  L	 6"B">":"6"2"."*"&$  M&  $  z
	
$  e

$  PS&  :$  /$  $(  &  	L	6""""""""""|$  PM&  :$  /
	
$  
(  
M	 C"-")"%"!"L$  $  M&  t$  i
		$  "  	$  "
$  =

	$  &$  (  L
	 6"""""""~"z$  M&  $  
		$  "  	$  "5
$  g

	$  P$  E(  :$  *T&  $  	L
	6""""""""""L$  $  M&  $  
	
$  u
(  j
$  ZM&  D$  9$  $(  L	4L	 56"""""""""""$  M&  $  
	
$  
(  
$  M&  n$  c$  NS&  8$  -$  "(  L	4L	56"?";"7"3"/"+"'"#"""""U& n4V 54W 54X 54L 4	L54	L54L55" $ Y&  $  	$  (  

$  

$  (  	$  	(  	$  yP&  d$  Z$  D$  :(  "  4L544L55$  	PCCCCCCCCCCCCCCCCC$ Y&  $  	$  (  

$  

$  (  	$  	(  	$  sT&  ]$  R$  ;$  0(  "  	4L5$  	TC""	""""""""""""""Z&  C4[ 54\ 54] 54^ 5L4	L54	L54L56_&  94` 54a 54b 5L4	L54	L54L56c&  74d 54e 5f4L4L554L4g55 Ch&  @4i 54j 54k 5l4L54L4L554L5 Cm&  E4n 54o 54p 5q4	A4	L54	L554L4L55Cr&  4s 5t4L5 Cu&  &4v 54w 5x4L54L5 Cy&  @4z 54{ 54| 5}4L54L4L554L5 C~&  B4 54 54 54L54D4	L54L5 5C 6          g  e
	 g  rtd	 g  exp		!	L g  exps		[	j g  proc	 ! g  args	 ! g  v	 ! g  w	  g  x	  g  w	  g  x	  g  w		  g  x	
  g  gensym	>H g  gensym	^x g  exp	^x g  mod	 g  name	 g  public?	 g  mod	 g  name	 g  public?	 g  exp	 g  name	#6 g  exp	#6 g  name	L] g  exp	L] g  meta	s g  body	s g  body	 g  doc	 g  w	
 g  x	
 g  w	 g  x		 g  w	
 g  x	 g  w	y g  x	y g  w	3q g  x		3q g  w	
Dm g  x	Dm g  w	 g  x	 g  w	 g  x		 g  w	 g  x	 g  w	 g  x		 g  req	] g  opt	] g  rest	] g  kw	] g  inits	] g  gensyms	] g  body	] g  	alternate		] g  names	
v g  alt-expansion	r g  formals	r g  key	r g  alt-expansion	 g  nreq	 g  nopt	 g  restargs	 g  reqargs	 g  optargs	 g  kwargs	Q g  formals	j g  key	u g  test	9 g  
consequent	9 g  	alternate	9 g  simplify-test	9 g  v	B9 g  w	y g  x	y g  w		 g  x	
 g  w	 g  x	 g  w	 g  x	 g  w	 g  w	 g  x	 g  w	 g  w	" g  x	" g  w	7 g  w	F g  x	F g  w	_ g  x	_ g  w	
9 g  x	
9 g  w		
1 g  x	

1 g  w	
- g  x	
- g  w		
% g  x		
% g  w		B
 g  w		Q
 g  x		Q
 g  w		n
 g  w		
 g  x		
 g  w			 g  w			 g  x			 g  w			 g  x			 g  w	
J
 g  x	
J
 g  w		
c
 g  x	

c
 g  w	
t
 g  x	
t
 g  w	

 g  w	

 g  x	

 g  w	
 g  x	
 g  w		 g  x	
 g  w	 g  x	 g  w	2 g  w	A g  x	A g  w	Z g  x	Z g  w	k g  x	k g  w	2 g  x	2 g  w		* g  x	
* g  w	& g  x	& g  w	 g  w	G g  x	G g  w		` g  x	
` g  w	q g  x	q g  w	 g  x	 g  w	 g  w	7 g  x	7 g  w		/ g  x	
/ g  w	' g  w	N g  x	N g  w		g g  x	
g g  w	 g  x	 g  w	 g  w	 g  x	 g  w		  g  x	
  g  w	( g  x	( g  w	F} g  w	Uy g  x	Uy g  w	Q g  x	Q g  w		I g  x	
I g  w	A g  w	= g  x	= g  w	5 g  x	5 g  w	- g  w	f5 g  x	f5 g  w		- g  x	
- g  w	% g  w	! g  x	! g  w	 g  x	 g  w	 g  x	 g  w	 g  gensyms	V g  vals	V g  body	V g  v	z g  w	 g  x	 g  w	 g  x		 g  w	
 g  w	 g  x	 g  w	} g  w	w g  w	t g  x	t g  w	n g  x	n g  s	<J g  w	 g  x	 g  w	 g  x		 g  w	
 g  w	 g  x	 g  w	 g  w	 g  w	 g  x	 g  w	/{ g  x	/{ g  s	Sa g  	in-order?	 g  gensyms	 g  vals	 g  body	 g  gensyms	; g  vals	; g  body	; g  exp	Qz g  body	Qz g  body	 g  winder	 g  unwinder	 g  fluids	 g  vals	 g  body	 g  fluid	- g  fluid	C[ g  exp	C[ g  tag	x g  body	x g  handler	x g  tag	 g  args	 g  tail	  g  filenamef  %language/scheme/decompile-tree-il.scm
 		 			2		 		) 		/ 			0 		: 			= 	.	A 		T 		` 		j 			r 	  	  	$  		  	  	$  	  	 	(	 	) 	H	,	!P 	d 		e	,	!n 	'w 		 	 	 	 	 		 	 		 	 	 	! 		 	3 		 	) 		, 	5 		> 	U 	] 		e 	}		~			'						X	i							% 	n	v		~		%				  	 	 						"		%				 	 	 			!		!	 	  	( 	)!	,"	"/!	9	;$	> 	A 	I 	J$	M%	"N$	Y	['	^ 	a 	i 	j'	m(	#n'	x*	#y*	2*	+	*	,	,	"*	-	-	'-	7-	'-	F*	.	*	/	0	!1	%2	*2	52	*3	*4	/3	*1	%0	!5	!*	6	7	 
8	$9	)9	:9	E9	:9	) :	)%;	./:	)0<	)7<	29<	);8	$>=	(B=	$D>	(I?	(K7	 Q@	 Q*	TA	j*	rB	uD	uD	F	 	 	 	F	G	&F	D	I	 	 	 	I	J	'I	C	 	 	 	C	 	X		X	X	%X	Y	&Z	0Z	1Z	-6[	!?[	@X			0		0		0		0	)X		u	}		X				0		!	0		"	0		)	0	)	-X			|		|		|		X		
x	
x	
x	
X		xt	 u	 v	 t	X		p	p	X		m	m	X		k	+X		n	0	r	0	s	0	z	0	)~X		i	i	X			0		0		0		0	)X		of	qf	uX		b	%b	!'b	+	2	-b	1X		]	]	!]		2	]		X		A 	]		`	i	r	z		4	<	*<	?	-	!K	N	$V	W	X	\	^			I	S	,S	V	-	!b	f	h	s	w		 						 	!	*	3	;		C 	W		[ 	^ 	f 	g		i	l	p	&t	v	y		 						 	 	 						 						 	 	 	 			 	"		#	,		5 	I		J	Q	(Z		c 						 	 	 						 							(			 	q	  g  nameg  recurse C  h@    - /   0  3 #  #  #  #  4 >  G O 	
O O 	O 
O O O O O Q Q 
Q 
Q Q 	Q Q 	Q 
	Q 4 5D      g  e
	@ g  env	@ g  use-derived-syntax?		@ g  avoid-lambda?		@ g  	use-case?		@ g  strip-numeric-suffixes?		@ g  output-name-table		F@ g  occurrence-count-table		F@ g  output-name	 @ g  build-begin		 @ g  build-lambda-body	
 @ g  build-begin-body	 @ g  build-define	 @ g  	build-let	 @ g  build-letrec	 @ g  build-if	 @ g  	build-and	 @ g  build-or	 @ g  build-else-tail	 @ g  build-case-else-tail	 @ g  clauses+tail	 @ g  
build-cond	 @ g  build-cond-or-case	 @ g  recurse	 @  g  filenamef  %language/scheme/decompile-tree-il.scm
	!
	8	*		I	)	6	@	 	@	
g  use-derived-syntax?S	g  avoid-lambda?S	g  	use-case?S	g  strip-numeric-suffixes?S	   g  nameg  do-decompile C,RHH 4i4Hi554i        h   ~   ]L  6     v       g  t-df5d6f08a2a2c7b-6cc8
		  g  filenamef  %language/scheme/decompile-tree-il.scm
,	 		   CO >  "  G  7        h   u   ]L  6      m       g  name
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
-		
-	 		
   CO K 4i5  h`     ]	4 L 5$  G4 5$  5-4 5&  #04 5&   C4 
5 " C C C         g  str
		] g  i		]  g  filenamef  %language/scheme/decompile-tree-il.scm
4		5		5	
	6		6		6	!	6		"6		%7		16		48	#	;8	3	=8	#	A6		E9	"	T9	 		]  g  nameg  base-name-string CO Q      h      ]4L 4 556             g  sym
		  g  filenamef  %language/scheme/decompile-tree-il.scm
;		<		<	,	<		<	
 		   CO K     h0      ]	4M  
5
$   MN"   C            g  s
		+ g  h		+  g  filenamef  %language/scheme/decompile-tree-il.scm
N		O		O		P		P		P	
	Q	$	Q		'R		(R		)R	
 		+  g  nameg  increment-occurrence-count! C h0      ]
 $  CL$  4M5"  M  6             g  s
		* g  name		* g  name			*  g  filenamef  %language/scheme/decompile-tree-il.scm
\		I			]		^		_		^		*a	 		*	  g  nameg  set-source-name! C        hh     ]
 $  "  *4M  545$  "  	$  C4M 54 5$  C C       g  a
		g g  b		g g  h			7 g  h		J	g  g  filenamef  %language/scheme/decompile-tree-il.scm
i		I			k	
	l		l	>	l		l		m		!m	!	#m		'm		2n	(	3n	 	4n		:I		>k	
	Al		Hl	>	Jl		Jl		Mm		Tm	!	Vm		Zm		cn	(	dn	 	en	 		g	  g  nameg  add-conflict! C    h(      ]4L  5$  C C       g  name
		( g  h		( g  t			(  g  filenamef  %language/scheme/decompile-tree-il.scm
E	
	F		F		G		G		 G	3	#G	-	$G	!	'H	! 
		(   C h0      ]4L  5$  C4M 5C             g  name
		* g  h		* g  t			*  g  filenamef  %language/scheme/decompile-tree-il.scm
V	
	W		W		X		X		X	-	&X	!	)Y	! 			*   Cg8e  h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   ChV    h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   Cmnos7pqh   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   Cr`  h   |   ]L  C       t       g  s*
			  g  filenamef  %language/scheme/decompile-tree-il.scm
			&		! 			   Ch   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d65
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
	 		
   Ctuvwh   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   Ch   |   ]L  C       t       g  s*
			  g  filenamef  %language/scheme/decompile-tree-il.scm
			&		! 			   C  h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d65
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
	 		
   Cx{|}h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   C~  h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   Ch   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   C    h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   C  h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   Ch   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   C  h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   CI      h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   CJ      h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   C_      h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   CX      h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   CO      h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   C      h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   Ch   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   Ckl:  h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   C  h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   C?    h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   C<      h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   Ch   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   C      h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   C;      h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   CB      h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   CE@    h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   Ch   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   Ch   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   C    h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   Ch   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   Ch   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   CCD    h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   Ch   ~   ]L L 6      v       g  t-df5d6f08a2a2c7b-6dd7
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
	 		
   C      h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   Ch   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   Ch   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   Ch   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   Ch   ~   ]L L 6      v       g  t-df5d6f08a2a2c7b-6deb
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
	 		
   Ch   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   C      h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   C      h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   C  h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   Ch   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   C      h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   Ch   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   C      h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   C      h   ~   ]LL  6      v       g  t-df5d6f08a2a2c7b-6d57
		
  g  filenamef  %language/scheme/decompile-tree-il.scm
z	 		
   C   h  -  ]a &  /4M54M
54L5L	O 6&  /4M54M
54L5	L	O 6
&  4 54 545$  T45$  "  	4M54M5$  4L	4M
5>  "  G  "   "   4L>  "  G  L6&  84 54M54M
54L5L	O 6&  {4 54M
5
$  MN"   4O 444M$  "  	4M55L555L	O 6&  4 54 54M54M
54L54L	O >  "  G  4M
5
$  MN"   4O 444M$  "  	4M55L5554L	O >  "  G   "P &  P4! 54M$  ""  #54M
$  ""  #54L5$L	O 6%&  4& 54' 54M54M
54L54(L	O >  "  G  4M$  ""  #54M
$  ""  #54L54)L	O >  "  G   "6*&  84+ 54M54M
54L5,L	O 6-&  4. 54/ 54M54M
54L540L	O >  "  G  4M54M
54L541L	O >  "  G   "L2&  ^43 544 54M54M
54L545L	O >  "  G   "6& -47 548 549 5L $ 4M:54M
:54L54;L	O >  "  G  4M<54M
<54L54=L	O >  "  G  4M>54M
>54L54?L	O >  "  G  4M@54M
@54L54AL	O >  "  G  4MB54M
B54L54CL	O >  "  G  4MD54M
D54L54EL	O >  "  G  "   4M54M
54L54FL	O >  "  G  4L>  "  G  4L>  "  G   "G&  U4H 54MI54M
I54L54JL	O >  "  G  L6K&  F4L 5$   "54MM54M
M54L5NL	O 6O& 4P 54Q 54R 54S 54T 54U 54V 54W 5	4MX5
4M
X54
L54YL	O >  "  G  
$  "  $  "  	$  4MZ5
4M
Z54
L54[L	O >  "  G  
4MM5
4M
M54
L54\L	O >  "  G  
4M]5
4M
]54
L54^L	O >  "  G  
"   4M_5
4M
_54
L54`L	O >  "  G  
L $  H4Ma5
4M
a54
L54bL	O >  "  G  
"   4c$  "  $  	 "  4de$  "  55
4dM
54fgL54L>  "  G  4L
>  "  G  4L>  "  G  4L>  "  G  	$  	 "?Ch& R4i 54j 54k 54l 54M_54M
_54L54mL	O >  "  G  L $  4Ma54M
a54L54nL	O >  "  G  4M<54M
<54L54oL	O >  "  G  "   4L>  "  G  4L>  "  G  4L>  "  G  L4fgL4dM556p& 4q 54r 54s 54t 54u 54M_54M
_54L5	4vL	O 	>  "  G  	L $  4Ma54M
a54L5	4wL	O 	>  "  G  	4M<54M
<54L5	4xL	O 	>  "  G  	"   4M$  y"  z54M
$  y"  z54L5	4{L	O 	>  "  G  	4L>  "  G  4L>  "  G  4dM54fgL54|LO >  "  G  L6}& 4~ 54 54 54 54M_54M
_54L54L	O >  "  G  4My54M
y54L54L	O >  "  G  L $  4Ma54M
a54L54L	O >  "  G  4M<54M
<54L54L	O >  "  G  "   4L>  "  G  4L>  "  G  4dM54fgL54LO >  "  G  L6&  p4 54 54M54M
54L54L	O >  "  G  4L>  "  G   "&  4 54 54 54M54M
54L54L	O >  "  G  4L>  "  G  4L>  "  G   "]&  4 54 54 54M54M
54L54L	O >  "  G  4L>  "  G  4L>  "  G   "&  U4 54M54M
54L54L	O >  "  G   "i&  p4 54 54M54M
54L54L	O >  "  G  4L>  "  G   "&  4 54 54 54M54M
54L54L	O >  "  G  4MX54M
X54L54L	O >  "  G  4L>  "  G  4L>  "  G   "&  4 54 54 54M54M
54L54L	O >  "  G  4M54M
54L54L	O >  "  G  4L>  "  G  4L>  "  G   "A 6       -      g  e
	 g  rtd	 g  bname			> g  s		+	> g  	conflicts		+	> g  bname		M	u g  s		b	u g  	conflicts		b	u g  proc	  g  args	  g  gensym	   g  name	   g  name	H g  bname	 H g  s	5H g  	conflicts	5H g  gensym	W g  h	c g  	conflicts	 g  gensym	 g  exp	 g  bname	) g  s	& g  	conflicts	& g  h	3S g  	conflicts	 g  public?	
 g  bname	
 g  s	
 g  	conflicts	
 g  public?	  g  exp	  g  bname	+h g  s	@e g  	conflicts	@e g  bname	{ g  s	 g  	conflicts	 g  name	 g  bname	 g  s	 g  	conflicts	 g  name	" g  exp	" g  bname	-j g  s	Bg g  	conflicts	Bg g  bname	q g  s	 g  	conflicts	 g  name	 g  exp	 g  bname	 g  s	 g  	conflicts	 g  test	9Q g  
consequent	9Q g  	alternate	9Q g  bname	L g  s	a g  	conflicts	a g  bname	 g  s	 g  	conflicts	 g  bname	 g  s	 g  	conflicts	 g  bname	U g  s	-R g  	conflicts	-R g  bname	\ g  s	q g  	conflicts	q g  bname	 g  s	 g  	conflicts	 g  bname	% g  s	" g  	conflicts	" g  exps	` g  bname	i g  s	~ g  	conflicts	~ g  body	 g  bname	 g  s	 g  	conflicts	 g  req	<
 g  opt	<
 g  rest	<
 g  kw	<
 g  inits	<
 g  gensyms	<
 g  body	<
 g  	alternate		<
 g  bname	
S g  s	h g  	conflicts	h g  bname	
 g  s	 g  	conflicts	 g  bname	
	4 g  s			1 g  	conflicts			1 g  bname	
	;	x g  s		P	u g  	conflicts		P	u g  bname	
		 g  s			 g  	conflicts			 g  bname	
	

 g  s		
 g  	conflicts		
 g  names	

G
 g  
base-names	
R
 g  body-bindings	
a
 g  names	
 g  gensyms	
 g  vals	
 g  body	
 g  bname	
5 g  s	2 g  	conflicts	2 g  bname	B g  s	W| g  	conflicts	W| g  bname	 g  s	 g  	conflicts	 g  	in-order?	J g  names	J g  gensyms	J g  vals	J g  body	J g  bname	[ g  s	p g  	conflicts		p g  bname	 g  s	 g  	conflicts		 g  bname	& g  s	# g  	conflicts		# g  bname	= g  s	^ g  	conflicts		^ g  
base-names	 g  bindings	 g  names	 g  gensyms	 g  vals	 g  body	 g  bname	 ] g  s	5Z g  	conflicts	5Z g  bname	d g  s	y g  	conflicts	y g  bname	 g  s	 g  	conflicts	 g  bname	/ g  s	, g  	conflicts	, g  
base-names	f g  bindings	u g  exp	 g  body	 g  bname	 g  s	 g  	conflicts	 g  winder	/ g  body	/ g  unwinder	/ g  bname	<y g  s	Qv g  	conflicts	Qv g  fluids	< g  vals	< g  body	< g  bname	 g  s		 g  	conflicts		 g  fluid	K g  bname	T g  s	i g  	conflicts	i g  fluid	 g  exp	 g  bname	 g  s	 g  	conflicts	 g  tag	. g  body	. g  handler	. g  bname	;x g  s	Pu g  	conflicts	Pu g  bname	 g  s	 g  	conflicts	 g  tag	 g  args	 g  tail	 g  bname	O g  s	'L g  	conflicts	'L g  bname	V g  s	k g  	conflicts	k  g  filenamef  %language/scheme/decompile-tree-il.scm
s			
	w			"	w		w		x			"	x		 y		%y	2	+y		+x		>z		F	
	Gw		K	"	Mw		Mw		Px		T	"	Vx		Wy		\y	2	by		bx		uz		}	
 	 	 	  	 I	 c	 J	! e	 	 	 	 	 	- 	 			
w	 w	#x	*y	/y	25y	5x	Hz	P	
ZO	cO	hP	iP	nP	
sQ	$uQ	~R	R	R	
				,	,I	c	J	!e		,						
w		w	w	x		x	y	y	2y	x	z	*O	3O	8P	9P	>P	
CQ	$EQ	NR	OR	PR	
T	^	a	f	,g	,lI	pc	sJ	!xe		,						0	
w		/	;	>w	w	x		/	;	>x	y	y	2y	x	
z		
%w	)	+w	+w	.x	2	4x	5y	:y	2@y	@x	Ez	iw	q	*s	6y	9{w	{w	~x		*	6	9x	y	y	2y	x	z		?	
w	w	x	y	y	2y	x	z		
'w	+	-w	-w	0x	4	6x	7y	<y	2By	Bx	Gz	kw	qw	tx	{y	y	2y	x	z		0	
w	w	x	y	y	2y	x	z		;$	
E	Fw	J	Lw	Lw	Ox	S	Ux	Vy	[y	2ay	ax	fz	w		0w	w	x		0x	y	y	2y	x	z	w		w	w	x		x	y	y	2y	x	z	w		1w	w	x		1!x	"y	'y	2-y	-x	2z	Vw	Z	\w	\w	_x	c	ex	fy	ky	2qy	qx	vz	w		1w	w	x		1x	y	y	2y	x	z	w		w	w	x		x	y	y	2y	x	z	&	8	Q	1Y	
cw	g	*iw	iw	lx	p	*rx	sy	xy	2~y	~x	z		2	
		w		0w	w	x		0x	y	y	2y	x	z		
Mw	Q	Sw	Sw	Vx	Z	\x	]y	by	2hy	hx	mz			w		w	w	x		x	y	y	2y	x	z	w		w	w	x			 x		y		y	2	y		x		z		5w		9		;w		;w		>x		B		Dx		Ey		Jy	2	Py		Px		Uz		}w				w		w		x				x		y		y	2	y		x		z				w			0	w		w		x			0	x		y		y	2	y		x		z	
	
	'
 	/
&	4
+	=
0	I
1	#
;	-
>	4
C	=
E	#
G	
G	
J	 
R	
U	
a	
d	
x	
	
	
	
	
	

w	
	
w	
w	
x	
	x	y	y	2y	x	z	;	<w	@	3Bw	Bw	Ex	I	3Kx	Ly	Qy	2Wy	Wx	\z	w		Ew	w	x		Ex	y	y	2y	x	z				
		.		'	
Uw	Y	[w	[w	^x	b	dx	ey	jy	2py	px	uz		w		3w	w	x		3x	y	y	2y	x	z	w		Ew	w	x		Ex	y	y	2y	x	z	+w	3	5	&;	/=w	=w	@x	H	J	&P	/Rx	Sy	Xy	2^y	^x	cz				 						
w		 w	 w	#x	'	)x	*y	/y	25y	5x	:z	^w	b	dw	dw	gx	k	mx	ny	sy	2yy	yx	~z		w		3w	w	x		3x	y	y	2y	x	z	w		Ew	w	x		Ex	y	y	2y	x	z	4	H	^	 f	i	u	x			
w		w	w	x		x	y	y	2y	x	z				
6w	:	<w	<w	?x	C	Ex	Fy	Ky	2Qy	Qx	Vz	z			-	
w		w	w	x		x	y	y	2y	x	z		!	<	D	
Nw	R	)Tw	Tw	Wx	[	)]x	^y	cy	2iy	ix	nz		5	
w		w	w	x		x	y	y	2y	x	z		%	5	
5w	9	;w	;w	>x	B	Dx	Ey	Jy	2Py	Px	Uz	yw	}	w	w	x		x	y	y	2y	x	z				*	
w		w	w	x		x	y	!y	2'y	'x	,z	Pw	T	Vw	Vw	Yx	]	_x	`y	ey	2ky	kx	pz							3	
	  g  nameg  recurse C        h@      ]
O L
L	LLLLLLLLL Q  6              g  e
		9 g  bindings		9 g  recurse			9  g  filenamef  %language/scheme/decompile-tree-il.scm
r		s	 		9	  g  nameg  recurse-with-bindings C h      ]M  6           g  s
		 g  name		  g  filenamef  %language/scheme/decompile-tree-il.scm
			
 			  g  nameg  set-output-name! C7       h@      ]
4M  5$  "  
4M 5$  "  
C             g  a
		: g  b		: g  t			 g  t		&	8  g  filenamef  %language/scheme/decompile-tree-il.scm
		M	'	M	#	M	'	&M	#	9	# 		:	   C77       h   ~   ]L  Cv       g  t-df5d6f08a2a2c7b-6e32
		  g  filenamef  %language/scheme/decompile-tree-il.scm
!	, 		   C       h(      ] $   "  	4M 5L O 6           g  s*
		$  g  filenamef  %language/scheme/decompile-tree-il.scm
	#	I			
	J	!			$ 	% 		$   C 7   h   ~   ]L  Cv       g  t-df5d6f08a2a2c7b-6e32
		  g  filenamef  %language/scheme/decompile-tree-il.scm
!	, 		   C       h(      ] $   "  	4M 5L O 6           g  s*
		$  g  filenamef  %language/scheme/decompile-tree-il.scm
	#	I			
	J	!			$ 	% 		$   C 
h     ])L 4M 5$  "   $   "  	4M 54L O 5$  ^4455"  84L O 5$  444	555""  ""  6      g  s
	  g  t		! g  the-conflicts	8  g  the-source-name		8  g  prefix		^  g  i		d  g  name		d   g  filenamef  %language/scheme/decompile-tree-il.scm
		h	 	h		h	=	$I		(c		+J	!	0e		8		=		P#		Q%	)	T&	*	\'	*	^%	)	^%		d(		e		x)		{+	)	|,	)	-	* /	+ -	* ,	) +	# (	 	 	    C  h    ]cHHHHHHO 	O 
O Q 	Q 
Q K45 O K45 K45 LO K45 K45 KO L 	
Q 4 >  "  G  HH	O Q 45 K4
JO 5K4O J>  "  G  JJD         g  e
	 g  use-derived-syntax?	 g  strip-numeric-suffixes?		 g  lexical-gensyms		 g  top-level-intern!		 g  occurrence-count-table		 g  	base-name		 g  source-name-table		 g  conflict-table		 g  increment-occurrence-count!			/ g  set-source-name!	
	/ g  add-conflict!		/ g  table		L	X g  table		f	t g  recurse-with-bindings	   g  output-name-table	  g  sorted-lexical-gensyms	  g  set-output-name!	   g  filenamef  %language/scheme/decompile-tree-il.scm
?		EA		HD		LD		[L	%	bU		fU		w[	 	~g	 r	 	" 	
 	1	 		   C O  6RC        g  m
		, g  
primitive?
x      ) g  compute-base-namex      ) g  table	x+y g  digits	y| g  base-name-string	{4{  g  filenamef  %language/scheme/decompile-tree-il.scm		
	
x	!
x+	x!+	%x'$	x)+	%x++	x+$	x.,	x$	x,	y3	y3	&y3	y3	      ,
 	      .
   C6                                                                               ccache/language/scheme/compile-tree-il.go                                                           0000644                 00000002251 15154557173 0014334 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]  4        h      ] g  guile	 	g  define-module*	 	 	g  language	g  scheme	g  compile-tree-il		 	
g  filenameS	f  #language/scheme/compile-tree-il.scm	g  importsS	g  tree-il	 	 	 	g  exportsS	 	g  set-current-module	 	 	g  save-module-excursion	g  macroexpand	g  c	g  compile	g  load	g  eval	 	g  current-moduleC 5   h  o   ]4	
5 4 >  "  G      h0      ]4L>  "  G  4L 5 45  D       g  x
		0 g  cenv	&	0  g  filenamef  #language/scheme/compile-tree-il.scm
														!							"			&			0	 	 		0
   C      h      ] O 6        g  x
		 g  e		 g  opts			  g  filenamef  #language/scheme/compile-tree-il.scm
	
			 			  g  nameg  compile-tree-il CRC g       g  m
		,  g  filenamef  #language/scheme/compile-tree-il.scm		
	
 	
   C6                                                                                                                                                                                                                                                                                                                                                        ccache/language/bytecode/spec.go                                                                    0000644                 00000003163 15154557173 0012634 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0[      ] + 4   h      ] g  guile	 	g  define-module*	 	 	g  language	g  bytecode	g  spec		 	
g  filenameS	f  language/bytecode/spec.scm	g  importsS	g  system	g  base	 	 	g  vm	g  objcode	 	 	 	g  exportsS	 	g  set-current-module	 	 	g  bytecode->objcode	g  compile-objcode	g  objcode->bytecode	g  decompile-objcode	g  invalidate-compilation-cache!	 g  make-language	!g  nameS	"g  titleS	#f  Guile Bytecode Vectors	$g  readerS	%g  read	&g  printerS	'g  write	(g  	compilersS	)g  decompilersS	*g  for-humans?SC 5   h     ]4	
5 4 >  "  G         h      ]4 5D        g  x
		 g  e		 g  opts			  g  filenamef  language/bytecode/spec.scm
	
			
			 			  g  nameg  compile-objcode CR      h      ]4 5D          g  x
		 g  e		 g  opts			  g  filenamef  language/bytecode/spec.scm
	
			
			 			  g  nameg  decompile-objcode CR4i>   "  G  4 i!"#$%   h   y   ] 6q       g  port
		 g  env		  g  filenamef  language/bytecode/spec.scm
	!			!	# 			   C&'i(i )i *5RC              g  m
		,  g  filenamef  language/bytecode/spec.scm		
 	
	
	
	 		#		$		
 		
   C6                                                                                                                                                                                                                                                                                                                                                                                                              ccache/language/glil/spec.go                                                                        0000644                 00000003126 15154557173 0011764 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0>      ] - 4 h      ] g  guile	 	g  define-module*	 	 	g  language	g  glil	g  spec		 	
g  filenameS	f  language/glil/spec.scm	g  importsS	g  system	g  base	 	 	 	 	g  compile-assembly	 	 	 	g  exportsS	 	g  set-current-module	 	 	g  write	g  unparse-glil	g  
write-glil	g  compile-asm	 g  invalidate-compilation-cache!	!g  make-language	"g  nameS	#g  titleS	$f  +Guile Lowlevel Intermediate Language (GLIL)	%g  readerS	&g  read	'g  printerS	(g  parserS	)g  
parse-glil	*g  	compilersS	+g  assembly	,g  for-humans?SC 5     h     ]4	
5 4 >  "  G       h      - 1 3 4 5@         g  exp
			 g  port			  g  filenamef  language/glil/spec.scm
	
						 			
  g  nameg  
write-glil CR   h      ]4 5D        g  x
		 g  e		 g  opts			  g  filenamef  language/glil/spec.scm
	
			
			 			  g  nameg  compile-asm CR4 i>   "  G  4!i"#$%&     h   u   ] 6m       g  port
		 g  env		  g  filenamef  language/glil/spec.scm
	"			"	# 			   C'i()i*+i ,5RC        g  m
		,  g  filenamef  language/glil/spec.scm		
 	
	
	 
	!	u	%		 
 	
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                           ccache/language/glil/compile-assembly.go                                                            0000644                 00000120523 15154557173 0014300 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0;      ]L 4  h      ] g  guile	 	g  define-module*	 	 	g  language	g  glil	g  compile-assembly		 	
g  filenameS	f  "language/glil/compile-assembly.scm	g  importsS	g  system	g  base	g  syntax	 	 	g  pmatch	 	 	 	 	g  assembly	 	 	g  vm	g  instruction	 	 	g  program	 	 g  selectS	!g  make-binding	"! 	# " 	$g  ice-9	%g  receive	&$% 	'& 	(g  vlist	)$( 	*) 	+g  srfi	,g  srfi-1	-+, 	.g  fold	/. 	0- / 	1g  rnrs	2g  bytevectors	312 	43 	5#'*04 
	6g  exportsS	7 	8g  set-current-module	98 	:8 	;g  	vlist-ref	<g  vlist-length	=g  vhash-fold-right2	>g  fold2	?g  vector-length	@g  vector-fold2	Ag  make-record-type	Bf  <variable-cache-cell>	Cg  key	DC 	Eg  <variable-cache-cell>	Fg  make-variable-cache-cell	Gg  record-predicate	Hg  variable-cache-cell?	Ig  make-procedure-with-setter	Jg  record-accessor	Kg  record-modifier	Lg  variable-cache-cell-key	Mg  reverse!	Ng  assq-ref	Og  filename	Pg  line	Qg  column	Rg  limn-sources	Sg  append	TS 	US 	Vg  dump-object	Wg  return	XW 	YX 	Zg  load-program	[g  addr+	\g  	make-meta	]g  object->assembly	^g  
immediate?	_g  	last-pair	`g  scheme-list?	ag  vhash-assoc	bg  number?	cg  string?	dg  keyword?	eg  
vhash-cons	fg  array?	gg  error	hf  )build-constant-store: unrecognized object	ig  array-shape	jg  vector->list	kg  <glil-program>	lg  glil-program-body	mg  glil-program-meta	ng  <glil-const>	og  glil-const-obj	pg  <glil-kw-prelude>	qg  glil-kw-prelude-kw	rg  <glil-toplevel>	sg  glil-toplevel-name	tg  glil-toplevel-op	ug  <glil-module>	vg  glil-module-mod	wg  glil-module-name	xg  glil-module-public?	yg  glil-module-op	zg  
vlist-null	{g  build-constant-store	|f  unhandled record	}g  build-object-table	~g  make-open-binding	g  make-closed-binding g  map f  unknown binding type g  open-binding f  broken bindings g  close-binding g  cdr g  stable-sort g  reverse g  close-all-bindings g  
open-arity f  bad arities g  close-arity g  begin-arity g  compile-program g  byte-length g  vlist-null? g  dump-constants g  align-program g  	tail-call 
    g  	make-list g  nop   g  glil->assembly   g  
make-false     g  
object-ref g  long-object-ref f  vcache cell key not in table g  glil-program? g  compile-objtable f  unrecognized constant   g  vector g  <glil-std-prelude> g  glil-std-prelude-nreq g  glil-std-prelude-nlocs g  glil-std-prelude-else-label g  br-if-nargs-ne g  assert-nargs-ee g  reserve-locals g  assert-nargs-ee/locals 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 g  br-if-nargs-lt g  assert-nargs-ge g  bind-optionals g  	push-rest g  br-if-nargs-gt g  glil-kw-prelude-nreq g  glil-kw-prelude-nopt g  glil-kw-prelude-rest g  !glil-kw-prelude-allow-other-keys? g  glil-kw-prelude-nlocs g  glil-kw-prelude-else-label g  and=> f  kw not in objtable g  max g  1+ g  bind-optionals/shuffle g  bind-optionals/shuffle-or-br g  bind-kwargs g  	bind-rest g  <glil-bind> g  glil-bind-vars g  <glil-mv-bind> g  glil-mv-bind-vars g  glil-mv-bind-rest g  integer? g  truncate-values g  length g  <glil-unbind> g  <glil-source> g  glil-source-props g  <glil-void> g  void     f  const not in table g  <glil-lexical> g  glil-lexical-local? g  glil-lexical-boxed? g  glil-lexical-op g  glil-lexical-index g  ref g  local-boxed-ref g  	local-ref g  set g  local-boxed-set g  	local-set g  box g  	empty-box g  fix g  fix-closure g  bound? g  variable-bound?     g  local-bound? f  what g  long-local-ref g  variable-ref     g  variable-set     g  long-local-set g  make-variable   g  long-local-bound? g  free-boxed-ref g  free-ref g  free-boxed-set f  what. g  toplevel-ref g  toplevel-set g  long-toplevel-ref g  long-toplevel-set f  toplevel name not in objtable g  link-now  g  define  f  unknown toplevel var kindf  module vcache not in objtablef  unknown module var kindg  <glil-label>g  glil-label-label	g  align-block
g  <glil-branch>g  glil-branch-instg  glil-branch-labelg  <glil-call>g  glil-call-instg  glil-call-nargsg  instruction?f  Unknown instruction:g  instruction-popsg  instruction-lengthf  ,Unknown length for variable-arg instruction:f  /Wrong number of stack arguments to instruction:g  <glil-mv-call>g  glil-mv-call-nargsg  glil-mv-call-rag  mv-callg  <glil-prompt>g  glil-prompt-labelg  glil-prompt-escape-only?g  promptg  load-numberg  number->string g  string-bytes-per-char!g  load-string"g  
align-code#g  load-wide-string$f  bad string bytes per char%g  symbol->string&g  load-symbol'g  make-symbol(' )( *g  keyword->symbol+g  make-keyword,+ -, .g  string-append/f  list0f  	 too long1g  list2g  cons32 43 5g  
array-type6g  
load-array7g  uniform-array->bytevector8g  array-contents9g  
make-array:f   dump-object: unrecognized object;f  vector<f   write-table: unrecognized object=g  dup>= ?g  
vector-set@? A@ B C
 DBC ED F
 Gg  	new-frameHG Ig  callJI KCJ C 5   h  A  ]4	
5675 4: >  "  G   ;     hH   6  ] 
$  D4L 54L >  G   " .      g  i
		G g  s0		G g  s1			G g  pair			. g  s0		/	G g  s1		/	G  g  filenamef  "language/glil/compile-assembly.scm
	$			%		
	%			&			'	%		'	6		'	%		'			(		"	(	!	%	(	,	.	(		2	'		9	)		G	)	
 		G	  g  nameg  lp C<     h(      ]O  Q 456           g  proc
		$ g  vhash		$ g  s0			$ g  s1			$ g  lp			$  g  filenamef  "language/glil/compile-assembly.scm
	#
		$			$		$	$	 		$	  g  nameg  vhash-fold-right2 C=R  h8      ] (  D4L  >  G   "         g  ls
		6 g  s0		6 g  s1			6 g  s0			6 g  s1			6  g  filenamef  "language/glil/compile-assembly.scm
	,			-			.			/			/			/		!	/		(	0		6	0	
 
		6	  g  nameg  lp C        h       ]O  Q 6           g  proc
		 g  ls		 g  s0			 g  s1			 g  lp			  g  filenamef  "language/glil/compile-assembly.scm
	+
		,	 			  g  nameg  fold2 C>R?       h@      ] L$  *4L L >  G   "D            g  i
		; g  s0		; g  s1			; g  s0			5 g  s1			5  g  filenamef  "language/glil/compile-assembly.scm
	4			5	
		5			6			6	!		6		 	6	
	'	7		5	7		;	8	
 		;	  g  nameg  lp C h0      ]45O  Q 
6             g  proc
		* g  vect		* g  s0			* g  s1			* g  len				* g  lp			*  g  filenamef  "language/glil/compile-assembly.scm
	2
		3				3			4	 		*	  g  nameg  vector-fold2 C@R4AiBD5ERE      h      - 1 3   C              g  key
			 g  defrec-4ed7d27bcd936f9-49d			  g  filenamef  "language/glil/compile-assembly.scm
	@
 			
  g  nameg  make-variable-cache-cell CFR4GiEi5HR4Ii4JiEiC54KiEiC55LRMNOPQ h   C  ]9"  (  6454545$  E(  "  $  ""y"Y "K     ;      g  sources
	  g  in	  g  out		  g  filename		  g  addr		7  g  new-filename		7  g  line		7  g  column		7   g  filenamef  "language/glil/compile-assembly.scm
	B
		C			D			E			F			G			G	&		G	1	!	G		"	H		'	H		*	H	(	,	H		-	I		2	I	 	5	I	*	7	I		7	F		D	K		H	J	
	N	Q		O	Q		V	Q	)	\	Q	4	]	Q	!	^	Q		b	J	
	e	R		l	S		|	R			W	 	W	 	L	 	M	 	L	 	C	 	C	 	C	 '	   g  nameg  limn-sources CRRUVYZ[    h0     ]44 
554
5C       g  bindings
		/ g  sources		/ g  arities			/ g  tail			/ g  body			/  g  filenamef  "language/glil/compile-assembly.scm
	\
		]			]			]			]			]			]			_		 	`		(	_	 		/	  g  nameg  	make-meta C\R]        h      ] 6{       g  x
		  g  filenamef  "language/glil/compile-assembly.scm
	f
		g	 		  g  nameg  
immediate? C^R_    h0      ]	 $  ! &  C4 5$  CCC           g  x
		, g  p		*  g  filenamef  "language/glil/compile-assembly.scm
	k
		l				l			m			m			m			n			n			o		"	o		%	p		&	p		'	p	 		,  g  nameg  scheme-list? C`Ra^bcde<HL.  h      ]L  6      z       g  x
		
 g  store		
  g  filenamef  "language/glil/compile-assembly.scm
 		
 	 		
	   Cfghi?  h      ]L  6      z       g  x
		
 g  store		
  g  filenamef  "language/glil/compile-assembly.scm
 		
 	 		
	   Cj h`  r  ]
4 5$   C45$   C45$  "  #45$  "  $  "  45$  4 5 645$   4L  4	55456$  "4
L O  5456$  $4L 4L  55456"  #45$  4 5 66$  F45
45  $  '4
L O  455456""  j      g  store
	^ g  x	^ g  store	   g  store	   g  store	   g  store	DV  g  filenamef  "language/glil/compile-assembly.scm
	z			~			}		 			}		! 	
	+ 		, 	
	1 	
	; 		< 	
	C 	
	G 		H 	
	M 	
	W	}		\	|		c	|		g	|		h 		r	}		s 		x 	&  	  	 	|	 	|	 	|	  	 	}	  	  	 	|	 	|	 	|	  	 	}	  	  	!  	5  	!  	!  	  	 	|	 	|	 	|	  	 	}	 	|		|		|		 	 		}	 		}	 	 	5$ 	1' 	)* 	#+ 	/ 	0 	< 	D 	D 	K	|	R	|	V	|	 H	^	  g  nameg  add-to-store Cklm.nopqrstuvwxyF        h     ]" &  %4 54 >  "  G  L6&  4 5L 6&  4 5L 6	&  #4
 54 >  "  G  L 6&  A4 54 54 54 >  "  G  L 4 56C         g  x
	  g  store	  g  rtd		  g  body			4 g  obj		C	M g  kw		\	f g  name		u  g  mod	   g  name	   g  public?	    
g  filenamef  "language/glil/compile-assembly.scm
 		 		4 		< 		M 		U 		f 		n 	  	  	  	  	/  	  	 	 	  g  nameg  walk Cz     h(      ]O Q O Q  6        g  x
		' g  add-to-store	
	' g  walk			'  g  filenamef  "language/glil/compile-assembly.scm
	y
	 	 		'  g  nameg  build-constant-store C{Rklm.kmlae<no^pqrstFuvwxy       hx    ]* &  D4 >  "  G  4 >  "  G  4 5$  C 456&  74 54	5$  C45$  C456
&  )4 545$  C456&  D4 54 >  "  G  4545$  C456&  ]4 54 54 54 >  "  G  4 545$  C456C       g  x
	w g  table	w g  rtd		w g  obj		b  g  kw	   g  name	  g  x	  g  mod	,t g  name	,t g  public?	,t g  x	Rt  g  filenamef  "language/glil/compile-assembly.scm
 		 		4 		@ 		H 		O 		S 		[ 		e 		o 		s 		 	  	  	  	  	  	  	  	  	  	  	  	  	  	  	 	 	 	 	E 	P 	5R 	R 	U 	a 	i 	p 	t 	 (	w	   Czg| 	       h@      ] &  %4 54 >  "  G  6 6           g  x
		< g  rtd		< g  body			4  g  filenamef  "language/glil/compile-assembly.scm
 
	 		4 		8 	 		<  g  nameg  build-object-table C}R  h      ]  C           g  name
		 g  boxed?		 g  index			  g  filenamef  "language/glil/compile-assembly.scm
 
	 	 			  g  nameg  make-open-binding C~R! h      ]   6         g  open-binding
		 g  start		 g  end			  g  filenamef  "language/glil/compile-assembly.scm
 
	 		
 	#	 		 	 			  g  nameg  make-closed-binding CR~g        hh     ]1 $  T  $  ;$  "(  
6 6 6 6 6         g  v
		e g  vx		] g  vy			] g  vx		 	U g  vy		 	U g  vx		1	M g  vy		1	M  g  filenamef  "language/glil/compile-assembly.scm
 		 		E 		I 		M 		Q 		U 		Y 		] 		a 		e 	 		e   C      h      ]45  C        g  bindings
		 g  vars		 g  start			  g  filenamef  "language/glil/compile-assembly.scm
 
	 	
	 		 	
	 		 		 	 			  g  nameg  open-binding CR.    h      ]L4 LL 5C           g  o
		 g  tail		  g  filenamef  "language/glil/compile-assembly.scm
 		 	 	 	 			   Cg       hh   H  ]2 $  R  $  9$   4O 5C 6 6 6     @      g  bindings
		c g  end		c g  vx			[ g  vy			[ g  vx		 	S g  vy		 	S g  vx		1	K g  vy		1	K  g  filenamef  "language/glil/compile-assembly.scm
 
	 		8 		J 		O 		S 	
	W 		[ 	
	_ 		c 	
 		c	  g  nameg  close-binding CR  h      ] C             g  x
		
 g  y		
  g  filenamef  "language/glil/compile-assembly.scm
			)		1			& 		
	   C h0      ] (  44 5564 56          g  bindings
		- g  end		-  g  filenamef  "language/glil/compile-assembly.scm
 
	 			 							!					 		!		-	 		-	  g  nameg  close-all-bindings CR     h`   4  ]$    "  >$    "  )$    "  $    "    C     ,      g  addr
		[ g  nreq		[ g  nopt			[ g  rest			[ g  kw			[ g  arities			[  g  filenamef  "language/glil/compile-assembly.scm

	
				
		*	
	4
		=	
	G
		N	
	W	
	Z		 		[	  g  nameg  
open-arity CRg hH     ]"(  C$  /$   C66      g  addr
		H g  arities		H g  vx			@ g  vy			@ g  vx		(	8 g  vy		(	8  g  filenamef  "language/glil/compile-assembly.scm

								3		<		@	
	D		H	
 
		H	  g  nameg  close-arity CR        h       ]4 56              g  end
		 g  start		 g  nreq			 g  nopt			 g  rest			 g  kw			 g  arities			  g  filenamef  "language/glil/compile-assembly.scm

		&		 			  g  nameg  begin-arity CR{Z[U      hx   s  ])4 54 54>  "  G  45$  C4>  G 4545	4	4	
55Ck      g  glil
		x g  all-constants			x g  prog			x g  	tablecode		A	x g  addr		A	x g  prog		Q	x  g  filenamef  "language/glil/compile-assembly.scm

												)%		3$		7+	 	D+		I,		Q,		U.	
	W/		b/		c.	
 		x  g  nameg  compile-assembly CRkml.SRM\ZU[   h   o  ]? (  45454455454455
	4	L5$  			"  
	
4
$  45"  5C4 L >  G 
	 	
45 "g      g  body
	  g  code	  g  bindings		  g  source-alist		  g  label-alist		  g  arities		  g  addr		  g  code		<  g  bindings		<  g  sources			<  g  labels	
	<  g  arities		<  g  meta		S  g  meta-pad		k  g  subcode	   g  bindings	   g  source-alist		   g  label-alist	
   g  arities	    g  filenamef  "language/glil/compile-assembly.scm
<		>			@		@	"	@		A		B		B	&	'B		(C		/D		2D	!	<D		<@			GF		SF		[G		bG	2	cG	-	fG	%	kF		oH		vI		yH	 L	 M	" M	6 M	" N	" H	 Q	 Q	 Q	 P		 T	 T	 V	 T	 '	 	  g  nameg  lp Cg|        hP   1  ]" &  24 54 5O Q 
6 6       )      g  glil
		I g  	constants		I g  rtd			I g  meta			A g  body			A g  lp		+	A  g  filenamef  "language/glil/compile-assembly.scm
9
	:		+<		9<	 	;<	/	<<	D	==		>=	)	A<		E:	 		I	  g  nameg  compile-program CR=aHLg}U[   hH    ]44 L 5$  U $    		"  !"      		"  G D4 5$  s44 5L 5$  U $    		"  !"      		"  G D 64 5$  L4	 54
 54L >  G 45	4	54	5D 6         g  obj
	E g  idx	E g  codes		E g  addr		E g  t		E g  idx			T g  load		U	h g  len		U	h g  t	   g  idx	   g  load	   g  len	   g  table	 = g  prog	= g  	tablecode	= g  addr	= g  prog		$=  g  filenamef  "language/glil/compile-assembly.scm
i		k		j		m	7	m	(	Z		"Z		$[		4[		:]		@^		F^	(	I]		T]		Xm		an		fo		hn		ip		sj		tr		wr	 r	 q	 t	9 t	* Z	 Z	 [	 [	 ]	 ^	 ^	( ]	 ]	 t	 u	  v	  u	 w	 w	 x	 j	 }	 }	 ~	}				$	'	#2	3	=	A	E	 :	E	   C<.S 
   h`     ]45$  D4 O >  G 454	    5	D      g  	constants
		` g  table		` g  addr			` g  elts		+	` g  addr		+	` g  len		:	`  g  filenamef  "language/glil/compile-assembly.scm
X
	a		`		c		d		c		h	
	"		%		*h	
	.f		3		:		:		=		C		I		O	0	R		Y		^		`	
 		`	  g  nameg  compile-objtable CRkmla}U[pqgno]rtsF uyvwx	
| h0  Q  ] &  4 >  "  G  4 >  "  G  4 5$  ;		 $  	  "  	 	   D4 5	4 	5
4		>  G 4
4
55D&  4 54 54 5
	"  F
$    
 "     	 	   "  F	$  9		 $  %
$  ""  		  "  "|"  "t4455D& @4 54 54 54 54 5
	$      "      	
$  "  	 	   
$  	 	   "  @$    	 	   "  	 	   4
4
4
    555445	
5D!& 4" 54# 54$ 54% 54& 54' 54( 5
	4)45*5$  "  4+,5$      "      4-	4./4.*55?$  
$  0"  1"  0  	 	   $  
$  "   "   2    
$  	"  
$  "  
  
$  $3  
 
   "  4
4
4
4
    5555445	
$  	"  5D4&  45 5465D7&  k48 549 5	4:5$   ;	$  "  
  D;4<5	$  "  
  465D=&  4>5D?&  4@ 5DA&  BDC&  4D 54E5		$  	 

D45

$  ;
 $    "      D+F6G& e4H 54I 54J 54K 5
	$  $  
L$  "	$  M  "  
N  "  
O$  "	$  P  "  
Q  "  z
R$  R  "  c
S$  S  "  L
T$  U
  "  4
V$  "	$  N W"  
X  "  	4+Y
5"    
L$  &	$  Z ["  Z  "  
O$  &	$  Z \"  ]  "  
R$  ^_]  "  l
S$  ^]  "  Q
T$  U  "  8
V$  &	$  Z W"  `  "  	4+Y
5"  N
L$  	$  a"  b"  +
O$  	$  c"  	4+d 5"  	4+Y
5  De& 4f 54g 5	L$  "  O$ 4)44h	55*5

$  t
 $  +L$  i"  O$  j"  
  "  1L$  k"  O$  l"  
 
   D4)4	5*5$  "  	4+m	5 $   "     nL$  o"  O$  _"   Dp$  c4)4	5*5

$  
"  	4+m	5


 $  
 "  
 
  qD+r	6s&  4t 54u 54v 54w 5
		
 L$  "  O$  4)44h55*5$  "  	4+x5 $  +L$  i"  O$  j"    "  1L$  k"  O$  l"      D+y6z&  +4{ 54|5		4	5D}&  *4~ 54 5		  

D&  4 54 5	45$  "  4+>  "  G  45


$  c45$  	  D	$  "	 	   D+456
	$    D+	6&  ,4 54 5		  

D&  64 54 5		$  "  
  

D+ 6  I      g  glil
	. g  bindings	. g  source-alist		. g  label-alist		. g  	constants		. g  arities		. g  addr		. g  rtd		. g  t		<  g  i			G	 g  table		   g  prog	
   g  	tablecode	   g  addr	   g  x	   g  nreq	  g  nlocs		  g  
else-label	
  g  x	z g  nreq	 g  nopt		 g  rest	
 g  nlocs	 g  
else-label	 g  bind-required	 g  bind-optionals	 g  	bind-rest	 g  x	 g  nreq	 g  nopt		 g  rest	
 g  kw	 g  allow-other-keys?	 g  nlocs	 g  
else-label	 g  t	<T g  kw-idx	T g  bind-required	 g  ntotal	 g  bind-optionals-and-shuffle	 g  bind-kw	M g  	bind-rest	z g  code	 g  vars	 g  vars	x g  rest		x g  props	 g  obj	O g  t		O g  x	
 g  t	
O g  i	G g  local?	s g  boxed?		s g  op	
s g  index	s g  a	k\ g  b	k\ g  x	 g  op	
x g  name		
x g  t	
	
 g  x		p	~ g  t			 g  i		
 g  x		
 g  t	


5 g  i	

5
n g  x	
`
n g  op	
u g  mod		
u g  name	

u g  public?	
u g  key	
u g  t	

 g  i	
k g  x	]k g  label	 g  code		 g  inst	 g  label		 g  x	
 g  inst	 g  nargs		 g  pops	
 g  key	/ g  x	CQ g  x	n| g  x	 g  nargs	 g  ra		 g  x	
 g  label	& g  escape-only?		& g  x	
&  _g  filenamef  "language/glil/compile-assembly.scm

			4		<		G		G		O		S		U		c		i	$	o	6	r			 	 	 	 	 	# 		 	 	& 	 	 	 	 	 	 	#	#			$	$		
$	*	-	
4	9	=	D	#E	I	
Y	
`	7c	2d	%g	
z									#	#			$ 	$							-	##	+'	#*	3	5	:	&>	C	$G	J	W	Y	^	/b	%g	-k	%p	y	~	0	&	.	&												-	0	<	<	K	O	Q	T	\	^	d	$j	$o	x	~	%	%					-	5	-																								!	'	-	3	@	G	J	M	U	W	]	c	i	o	r	z	z	}		&	&				#		&								 		*	,	4	+=	J		L!	M!	%Y!	4b!	f"	x!			(	)	(		/	1	/		6			:	9	<	<		=	9	?	?				+	1	$7	6:	G	K@	O@	W	D	E	E	
F	G	H	I	F	J	K	L	F	M	F	N	F	O	0F	6P	8Q	FS	ST	WT	[T	eU	kV	kU	xW	~Y	Z	\	W	^	_	a	W	c	W	g	W	j	'W	-l	/m	?o	Np	Rp	Vp	iq	or	qr	"wr	2q	s	s	"s	2s	9s	2t	t	t	q	
C			x	{	
{	{	{		{	
	z		~		~			"		+	,	"	.	+	8		H	"	J	+	W	"	Y	+	d	"	j	"	m		p~		~																	
										1		1								#				#				
	
x	
	
	
	
	
*	
.	
2	
5	
=	
A	
C	
N	
T	/
Z	/
]	
_	
`	

n	
r	
x	
	
	
	
	
	
	
	+
	
	
	
	
	
	
	

		
		(		(%	5	7	(D	F	(Q	W	Z	]	k	o	u	
}																				$	(	)	/	@	 C	Q	Z	b	*h	*k	 n	|			"														
			&	*		.	  g  nameg  glil->assembly CR]HVLbc !"#g$%&U)d*-`./01.S[4f5i678?9:; +   h  a	  ]:4 5$   C4 5$  4 564 5$  4 5  C4 5$  >4	 5$  
   C	$    		6 6 $  E4 54	5$    C	$  45664 5$  44 5564 5$  4 5       $  445>  "  G  "       "  7(  
64545" " $  *4 544 45556" 	4  5$  4! 5$  Y44! 5544" 545544#4$ 5 4455		5564% 54&5"  m$  )4545"444" 55'	  	   56
"( 6 $  4" 5
4& 5  $  4& 5       $  44)55"  *    "  <$  
64 545"
""B">       Y	      g  x
	 g  addr	 g  t			 g  key		\  g  str	   g  key	   g  len	V g  tail	V g  objects	\ g  codes	\ g  addr	\ g  code	v g  kar	 g  type	G g  shape	G g  contents	N g  len	W g  i	] g  codes	] g  addr	] g  code	r g  len		 g  tail	A g  i	G g  codes	G g  addr	G g  code	f  g  filenamef  "language/glil/compile-assembly.scm

								"		%	*	/		0		:		<		=		F		K		U		V	
	\		h		z		~	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 	 			
			"	#	&	*	/,	.	3	A	G	M	/P	V	\	b	l	m	r	%v	v	{		*				,									
			
																		/			
		
#	$	-	.	1	=	C	
E
	H	N	Q	W	]	b	f	g	n	%r	r	w	|	#}					#			+	!	.	!	!				&	!	!							3	/	'	!										#	%	'	)	/ 	5 	 ; 	4> 	A	G	L	P	Z	[	b	%f	f	k	p	#q				&	 		  g  nameg  dump-object CVRa hp   v  ]4 L 5"  
L 6$  I$  ; $    	D    	D""  n      g  x
		n g  i		n g  addr			n g  pair			n g  idx		.	f  g  filenamef  "language/glil/compile-assembly.scm
$		%		%		.	
	&		$&		'&		+&	
	.'		.'	
	6(		:(		<)		I*		K)		M+		S+	,	Y,	,	\+		d-		f+	 		n	  g  nameg  ref-or-dump C]bcdV[HL`> h(      ]4L L >  G D              g  x
		! g  codes		! g  addr			! g  subcode			! g  addr			!  g  filenamef  "language/glil/compile-assembly.scm
@		A	+	A		B		!B	 		!	   C.S1U4f5i"678@     h(      ]4L L >  G D              g  x
		! g  codes		! g  addr			! g  subcode			! g  addr			!  g  filenamef  "language/glil/compile-assembly.scm
e		f	4	f		g	&	!g	 		!	   C?9g<      h(      ]4L L >  G D              g  x
		! g  codes		! g  addr			! g  subcode			! g  addr			!  g  filenamef  "language/glil/compile-assembly.scm
R		S	2	S		T	$	!T	 		!	   C "    h  W  ];4 5$   45D4 5$  "  #4 5$  "   $  "  4 5$  4 545D4 5$  4	 5 "q4
 5$  N4L O  >  G 44 5    5	D $  C4L  >  G 4L  >  G 4455D" 4 5$  4 5$  j4L 4 5>  G 4L 4 5>  G 44 5 		5445545D4 54L O >  G 4L 4 5>  G 445	4		  		 	  5	5	D 6 $  4 5      $  m4 5
4 5  $  N4 L O  >  G 44 5!    5	D"i"e"a O      g  x
	 g  i	 g  addr		 g  t			 g  code		b	q g  codes	   g  addr	   g  len	   g  car-code	4 g  addr	4 g  cdr-code	4 g  addr	4 g  type	c g  addr	c g  shape	~ g  addr	~ g  bv	 g  contents	> g  codes	> g  addr	> g  shape	> g  addr	> g  len		3 g  codes	 g  addr	 g  len	  g  filenamef  "language/glil/compile-assembly.scm
/		1			0		3		4		 4		"3		#5	
	-5		.5	
	36	
	=5		>6	
	E7	
	I5		J7	
	O8	
	Y0		Z:		b:		g;		q;		r<		|0		}=	 =	 >	 0	 @	
 C	 @	
 ?	 D	 E	! E	 F	 F	! F	5 F	 D	 H	 D	 I	 0	 J	 J	, J	J		K	!K	.K	!K	 L	2M	4L	
9[	C0	D[	K[	O[	P\	S\	(b\	f\	k]	n]	+}]	]	^	^	 ^	.^	 ^	^	
`	a	`	c	c	e	h	#e	d	i	 i	-i	 i	
j	k	%k	
l	m	5m	+!n	8"n	+(o	++l	7j	<q	>j	Bs	Fs	F0	IN	M0	NO	^O	bN	cP	kP	5rP	1uP	)xP	#yP	}N	~R	
U	R	
Q	V	W	!W	X	X	#X	7X	V	Z	V	 		  g  nameg  dump1 C=>][A h@   A  ]45 4L  45>  G D   9      g  obj
		= g  idx		= g  code			= g  addr			= g  pre			= g  valcode		&	= g  addr		&	=  g  filenamef  "language/glil/compile-assembly.scm
v		y	&	z	)	y	&	y		{	5	|	<	%{	5	){		/}	.	6}	'	;	'	=}	 		=	   CE<Z.SYUFHCK[     h   J  ]9O O  Q Q 4O  	>  G 4 5				44	
55	 445   45545		D   B      g  	constants
	  g  ref-or-dump	  g  dump1		  g  codes		8  g  addr		8  g  len		G  g  pre-prog-addr		Y  g  prog		x   g  filenamef  "language/glil/compile-assembly.scm
#
	#v		0		7v		;u		@		G		G		N		Y		\		`		d	"	e		f	$	l	1	p	$	q		x		x		|		~	) 	 	 	! 	 	 	 	- 	 	 	 	 "	   g  nameg  dump-constants CRC 9      g  m
		,  g  filenamef  "language/glil/compile-assembly.scm		
	#
	+
	2
	@
	B
*	\
	f
	k
	y
T 
) 
 + 
" 
%[ 
'I 
(
*h
+
-
39
;,X
b
p|
      #
 	      
   C6                                                                                                                                                                              ccache/language/brainfuck/spec.go                                                                   0000644                 00000002221 15154557173 0012774 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0y      ] , 4  h      ] g  guile	 	g  define-module*	 	 	g  language	g  	brainfuck	g  spec		 	
g  filenameS	f  language/brainfuck/spec.scm	g  importsS	g  compile-tree-il	 	 	g  compile-scheme	 	 	g  parse	 	 	g  system	g  base	 	 	 	g  exportsS	 	g  set-current-module	 	 	 g  invalidate-compilation-cache!	!g  make-language	"g  nameS	#g  titleS	$f  	Brainfuck	%g  readerS	&g  read-brainfuck	'g  	compilersS	(g  tree-il	)g  scheme	*g  printerS	+g  writeC 5h     ]4	
5 4 >  "  G   4 i>   "  G  4!i"#$%&     h   z   ] 6r       g  port
		 g  env		  g  filenamef  language/brainfuck/spec.scm
	&			&	# 			   C'(i)i *+i5
RC      w       g  m
		,  g  filenamef  language/brainfuck/spec.scm		
	-	$
	K	%	 	'	 	$
 	
   C6                                                                                                                                                                                                                                                                                                                                                                                ccache/language/brainfuck/parse.go                                                                  0000644                 00000004022 15154557173 0013155 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] # 4   h#      ] g  guile	 	g  define-module*	 	 	g  language	g  	brainfuck	g  parse		 	
g  filenameS	f  language/brainfuck/parse.scm	g  exportsS	g  read-brainfuck	 	g  set-current-module	 	 	g  <bf-nop>	g  reverse-without-nops	g  	read-char	g  eof-object?	g  process-input-char	g  	<bf-move>	 		 	g  <bf-increment>	 		 	g  
<bf-print>	 	g  	<bf-read>	  	!g  	<bf-loop>	" C 5h  x   ]4	
5 4 >  "  G     hH   9  ]!"  7(  C&  "" "1      g  lst
		H g  cur		= g  result			= g  head			= g  tail			=  g  filenamef  language/brainfuck/parse.scm
	*
		+			-			/			0			/			1			1		"	1		.	2	
	5	3		=	3	
	=	+		@	,		H	+	 		H  g  nameg  reverse-without-nops CR        hX   9  ]"  J4 545$  45(  CC]$  64 5"" 1      g  p
		W g  parsed		P g  chr			P g  parsed		!	/  g  filenamef  language/brainfuck/parse.scm
	>
		?			@			@			B			A			C		!	C		)	D	
	4	G		8	A		>	H		?	J		J	J		P	J		P	?		Q	?		W	?	 		W  g  nameg  read-brainfuck CR !" 
     hh     ] >$  C <$  C +$  C -$  C .$  C ,$  C [$  45C	C             g  chr
		a g  p		a  g  filenamef  language/brainfuck/parse.scm
	U
		V			W			V			X		#	V		%	Y		/	V		1	Z		;	V		=	[		G	V		I	\		S	V		U	]		V	]		]	]		`	^	
 		a	  g  nameg  process-input-char CRC     p       g  m
		(  g  filenamef  language/brainfuck/parse.scm		
	*
l	>
	U
 	
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                               ccache/language/brainfuck/compile-tree-il.go                                                        0000644                 00000006733 15154557173 0015045 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ] X 4      h      ] g  guile	 	g  define-module*	 	 	g  language	g  	brainfuck	g  compile-tree-il		 	
g  filenameS	f  &language/brainfuck/compile-tree-il.scm	g  importsS	g  system	g  base	g  pmatch	 	 	g  tree-il	 	 	 	g  exportsS	 	g  set-current-module	 	 	g  	tape-size	g  parse-tree-il	g  let	g  pointer	g  tape	  	!g  const	"!
 	#g  apply	$g  	primitive	%g  make-vector	&$% 	'" 	(g  compile-body	)g  void	*) 	+g  begin	,g  reverse	-g  	<bf-loop>	.g  gensym	/g  letrec	0g  iterate	10 	2g  lambda	3g  lambda-case	4 	5g  if	6g  =	7$6 	8g  
vector-ref	9$8 	:g  lexical	;: 	<: 	=#9;< 	>#7=" 	? 	@g  error	Af  unknown brainfuck instruction	Bg  	<bf-read>	Cg  vector-set!	D$C 	Eg  char->integer	F$E 	Gg  	read-char	H$G 	I#H 	J#FI 	K#D;<J 	Lg  
<bf-print>	Mg  
write-char	N$M 	Og  integer->char	P$O 	Q#P= 	R#NQ 	Sg  <bf-increment>	Tg  +	U$T 	Vg  	<bf-move>	Wg  set!C 5 h     ]4	
5 4 >  "  G   u0R "#&!'(      h8      ]4 	 4
 5 5D             g  exp
		2 g  env		2 g  opts			2  g  filenamef  &language/brainfuck/compile-tree-il.scm
	[
		]			^		!	a		*	^		,	]		2	\	 		2	  g  nameg  compile-tree-il CR*+,-./12345>(#:?@ABKLRSD;<U=!VW   h(    ]A" (  (  C(  C45C" " "  "  $  &  f45  	
45          "G66$  0&  (  ""<"8"4$  0&  (  """"$  b&  L$  A(  -   "b""""$  ^&  H$  =(  )   ""#""" "      g  instructions
	( g  in	 g  out		 g  v		. g  vx		M  g  vy		M  g  iterate		^  g  x	   g  vx	  g  vy	  g  vx	C g  vy	C g  vx	T g  vy	T g  vx	m g  vy	m g  x	 g  vx	 g  vy	 g  vx	 g  vy	 g  x	  g  filenamef  &language/brainfuck/compile-tree-il.scm
	h
		i			l			o			p			q			o			q		"	r		#	r		*	r		.	u		.	u		Z 		^ 			b 		y 	+  	  	 	k	
 	k	 	k	  	  	5  	  	  	5  	 	u	 	k	
  	 	k	 	k		u	.	k	
0 	3	k	;	k	?	u	y 	 			k	
	k		k		u		z		z		 	k	
	k		k		u		i	 	i	"(	i	 7	(  g  nameg  compile-body C(RC   y       g  m
		,  g  filenamef  &language/brainfuck/compile-tree-il.scm		
	2	-
l	[
	h
 	
   C6                                      ccache/language/brainfuck/compile-scheme.go                                                         0000644                 00000004732 15154557173 0014745 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0	      ] > 4        h      ] g  guile	 	g  define-module*	 	 	g  language	g  	brainfuck	g  compile-scheme		 	
g  filenameS	f  %language/brainfuck/compile-scheme.scm	g  exportsS	 	g  set-current-module	 	 	g  	tape-size	g  let	g  pointer	
 	g  tape	g  make-vector	
 	g  append	 	 	g  compile-body	g  
write-char	
 	 	g  reverse	 g  compile-instruction	!g  	<bf-move>	"g  set!	#g  +	$g  <bf-increment>	%g  vector-set!	&g  
vector-ref	'& 	(g  
<bf-print>	)g  integer->char	*)' 	+* 	,g  	<bf-read>	-g  char->integer	.g  	read-char	/. 	0-/ 	1%0 	2g  	<bf-loop>	3g  iterate	4g  if	5g  not	6g  =	76'
 	857 	9g  begin	:3 	;: 	<g  error	=f  unknown brainfuck instruction C 5    h(     ]4	
5 4 >  "  G   u0R 
   h0      ]  44 5	5D          g  exp
		- g  env		- g  opts			-  g  filenamef  %language/brainfuck/compile-scheme.scm
	5
		7			9				9		!	9			#	7		-	6	 		-	  g  nameg  compile-scheme CR       h8   -  ]"  &(  645" " %      g  instructions
		7 g  cur		, g  result			, g  compiled			,  g  filenamef  %language/brainfuck/compile-scheme.scm
	D
		E			G			H			I			I	+		I			I			J		$	J		,	J		,	E		/	F		7	E	 		7  g  nameg  compile-body CR!"#$%'(+,123489;<=      h   s  ] $     C$     C	$  
C$  C$  "44 55  C6    k      g  ins
	  g  key	  g  dir			' g  inc		4	I  g  filenamef  %language/brainfuck/compile-scheme.scm
	P
		Q			Q			V			V			W		0	Q		3	\		4	\		8	]		R	Q		T	c		^	Q		`	i		j	Q		l	t		y	w		~	w	 	w	 	t	 	z	 	z	2 	z	
 	   g  nameg  compile-instruction C RC       g  m
		(  g  filenamef  %language/brainfuck/compile-scheme.scm		
	.	$
Z	5
	D
&	P
 	(
   C6                                       ccache/language/value/spec.go                                                                       0000644                 00000001432 15154557173 0012147 0                                                                                                    ustar 00                                                                                                                                                                                                                                                       GOOF----LE-8-2.0      ]   4      h      ] g  guile	 	g  define-module*	 	 	g  language	g  value	g  spec		 	
g  filenameS	f  language/value/spec.scm	g  importsS	g  system	g  base	 	 	 	g  exportsS	 	g  set-current-module	 	 	g  invalidate-compilation-cache!	g  make-language	g  nameS	g  titleS	f  Values	g  readerS	g  printerS	g  write	g  for-humans?SC 5      h`   p   ]4	
5 4 >  "  G   4i>   "  G  4ii5
RC  h       g  m
		,  g  filenamef  language/value/spec.scm		
	-	
	K			\	
 		^
   C6                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                       