Subject: getuid and getgid are indeed replaced with compile-time constants

From: wolf <[email-masked]>
Date: Fri, 13 Oct 2023 12:38:32 +0200

I encountered this few days back as well, somewhat unpleasant bug.  My
reproduction:

    scheme@(guile-user)> ,use (ice-9 ftw)
    scheme@(guile-user)> (mkdir "/tmp/xxxx")
    scheme@(guile-user)> (chmod "/tmp/xxxx" #o0700)
    scheme@(guile-user)> (ftw "/tmp/xxxx" (lambda (_ __ f) (pk f) #t))
    
    ;;; (directory-not-readable)
    $1 = #t
    scheme@(guile-user)> (system "ls -al /tmp/xxxx")
    total 0
    drwx------ 1 wolf wolf   0 Oct 11 22:54 .
    drwxrwxrwt 1 root root 888 Oct 11 22:54 ..
    $2 = 0

While this is my first excursion into the ,xx world, I believe the hypothesis
that it compiles in the uid and gid used during the guile build is correct:

  55    (make-immediate 2 3990)         ;; 997                at ice-9/ftw.scm:319:46
  56    (make-long-immediate 1 120002)  ;; 30000              at ice-9/ftw.scm:320:46

On my system, 997 is guixbuilder03 user, and 30000 is guixbuild group.  The
analysis of *why* it compiles like this is sadly way over my head.

Full disassembly of ftw.go:

Disassembly of <unnamed function> at #xe8:

   0    (instrument-entry 16812)                              at ice-9/ftw.scm:556:0
   2    (assert-nargs-ee/locals 1 15)   ;; 16 slots (0 args)
   3    (make-non-immediate 15 16347)   ;; (ice-9 ftw)        at ice-9/ftw.scm:192:0
   5    (static-ref 14 16359)           ;; #:filename         at ice-9/boot-9.scm:3924:24
   7    (make-non-immediate 13 16359)   ;; "ice-9/ftw.scm"    at ice-9/ftw.scm:192:0
   9    (static-ref 12 16375)           ;; #:imports          at ice-9/boot-9.scm:3847:43
  11    (make-non-immediate 11 16459)   ;; (((ice-9 match)) ((ice-9 vlist)) ((srfi srfi-1))) at ice-9/ftw.scm:192:0
  13    (static-ref 10 16471)           ;; #:exports          at ice-9/boot-9.scm:3848:43
  15    (make-non-immediate 9 16527)    ;; (ftw nftw file-system-fold file-system-tree scandir) at ice-9/ftw.scm:192:0
  17    (static-ref 8 16539)            ;; #:autoloads        at ice-9/boot-9.scm:3852:43
  19    (make-non-immediate 7 16575)    ;; ((ice-9 i18n) (string-locale<?)) at ice-9/ftw.scm:192:0
  21    (static-ref 6 16587)            ;; #:declarative?     at ice-9/boot-9.scm:3853:35
  23    (make-immediate 5 1028)         ;; #t                 at ice-9/ftw.scm:192:0
  24    (static-ref 4 16586)            ;; #f                 at ice-9/boot-9.scm:3923:23
  26    (immediate-tag=? 4 7 0)         ;; heap-object?
  28    (je 7)                          ;; -> L1
  29    (call-scm<-scmn-scmn 4 16593 16597 113);; lookup-bound-private
  33    (static-set! 4 16577)           ;; #f
L1:
  35    (scm-ref/immediate 4 4 1)       
  36    (mov 0 4)                       
  37    (mov 4 8)                       
  38    (mov 8 12)                      
  39    (mov 12 0)                      
  40    (mov 3 7)                       
  41    (mov 7 11)                      
  42    (mov 11 15)                     
  43    (mov 2 6)                       
  44    (mov 6 10)                      
  45    (mov 10 14)                     
  46    (mov 1 5)                       
  47    (mov 5 9)                       
  48    (mov 9 13)                      
  49    (handle-interrupts)             
  50    (call 3 12)                     
  52    (receive 0 3 16)                
  54    (static-ref 14 16580)           ;; #f                 at ice-9/boot-9.scm:3925:16
  56    (immediate-tag=? 14 7 0)        ;; heap-object?
  58    (je 7)                          ;; -> L2
  59    (call-scm<-scmn-scmn 14 16563 16577 113);; lookup-bound-private
  63    (static-set! 14 16571)          ;; #f
L2:
  65    (scm-ref/immediate 11 14 1)     
  66    (mov 10 15)                     
  67    (handle-interrupts)             
  68    (call 4 2)                      
  70    (reset-frame 16)                ;; 16 slots
  71    (static-ref 14 16581)           ;; getuid-or-false
  73    (call-scm<-scm-scm 13 15 14 41) ;; define!
  75    (static-ref 12 16587)           ;; macro
  77    (static-ref 11 16587)           ;; #f
  79    (immediate-tag=? 11 7 0)        ;; heap-object?
  81    (je 7)                          ;; -> L3
  82    (call-scm<-scmn-scmn 11 16540 16584 113);; lookup-bound-private
  86    (static-set! 11 16578)          ;; #f
L3:
  88    (scm-ref/immediate 11 11 1)     
  89    (make-non-immediate 4 16585)    ;; #<procedure 7fae26403570 at ice-9/ftw.scm:202:0 (y)>
  91    (mov 7 11)                      
  92    (mov 6 14)                      
  93    (mov 5 12)                      
  94    (handle-interrupts)             
  95    (call 8 4)                      
  97    (receive 1 8 16)                
  99    (scm-set!/immediate 13 1 14)    
 100    (static-ref 14 16586)           ;; getgid-or-false
 102    (call-scm<-scm-scm 13 15 14 41) ;; define!
 104    (make-non-immediate 4 16584)    ;; #<procedure 7fae264035a8 at ice-9/ftw.scm:207:0 (y)>
 106    (mov 7 11)                      
 107    (mov 6 14)                      
 108    (mov 5 12)                      
 109    (handle-interrupts)             
 110    (call 8 4)                      
 112    (receive 1 8 16)                
 114    (scm-set!/immediate 13 1 14)    
 115    (static-ref 14 16585)           ;; directory-files    at ice-9/ftw.scm:212:0
 117    (call-scm<-scm-scm 14 15 14 41) ;; define!
 119    (call-scm<-thread 13 62)        ;; current-module     at ice-9/ftw.scm:556:0
 121    (static-set! 13 16581)          ;; #f
 123    (make-non-immediate 13 16581)   ;; #<procedure directory-files (dir)>
 125    (scm-set!/immediate 14 1 13)                          at ice-9/ftw.scm:212:0
 126    (static-ref 14 16590)           ;; pathify            at ice-9/ftw.scm:226:0
 128    (call-scm<-scm-scm 14 15 14 41) ;; define!
 130    (make-non-immediate 13 16588)   ;; #<procedure pathify nodes>
 132    (scm-set!/immediate 14 1 13)    
 133    (static-ref 14 16597)           ;; visited?-proc      at ice-9/ftw.scm:250:0
 135    (call-scm<-scm-scm 14 15 14 41) ;; define!
 137    (make-non-immediate 13 16595)   ;; #<procedure visited?-proc (size)>
 139    (scm-set!/immediate 14 1 13)    
 140    (static-ref 14 16604)           ;; stat-dir-readable?-proc at ice-9/ftw.scm:268:0
 142    (call-scm<-scm-scm 14 15 14 41) ;; define!
 144    (make-non-immediate 13 16602)   ;; #<procedure stat-dir-readable?-proc (uid gid)>
 146    (scm-set!/immediate 14 1 13)    
 147    (static-ref 14 16611)           ;; stat&flag-proc     at ice-9/ftw.scm:280:0
 149    (call-scm<-scm-scm 14 15 14 41) ;; define!
 151    (make-non-immediate 13 16609)   ;; #<procedure stat&flag-proc (dir-readable? . control-flags)>
 153    (scm-set!/immediate 14 1 13)    
 154    (static-ref 14 16618)           ;; clean              at ice-9/ftw.scm:309:0
 156    (call-scm<-scm-scm 14 15 14 41) ;; define!
 158    (make-non-immediate 13 16616)   ;; #<procedure clean (name)>
 160    (scm-set!/immediate 14 1 13)    
 161    (static-ref 14 16183)           ;; ftw                at ice-9/ftw.scm:315:0
 163    (call-scm<-scm-scm 14 15 14 41) ;; define!
 165    (make-non-immediate 13 16613)   ;; #<procedure ftw (filename proc . options)>
 167    (scm-set!/immediate 14 1 13)    
 168    (static-ref 14 16326)           ;; nftw               at ice-9/ftw.scm:338:0
 170    (call-scm<-scm-scm 14 15 14 41) ;; define!
 172    (make-non-immediate 13 16610)   ;; #<procedure nftw (filename proc . control-flags)>
 174    (scm-set!/immediate 14 1 13)    
 175    (static-ref 14 16619)           ;; errno-if-exception
 177    (call-scm<-scm-scm 13 15 14 41) ;; define!
 179    (make-non-immediate 6 16617)    ;; #<procedure 7fae26403758 at ice-9/ftw.scm:406:0 (x)>
 181    (mov 9 11)                      
 182    (mov 8 14)                      
 183    (mov 7 12)                      
 184    (handle-interrupts)             
 185    (call 6 4)                      
 187    (receive 1 6 16)                
 189    (scm-set!/immediate 13 1 14)    
 190    (static-ref 14 16314)           ;; file-system-fold   at ice-9/ftw.scm:413:0
 192    (call-scm<-scm-scm 14 15 14 41) ;; define!
 194    (make-non-immediate 13 16606)   ;; #<procedure file-system-fold (enter? leaf down up skip error init file-name #…>
 196    (scm-set!/immediate 14 1 13)    
 197    (static-ref 14 16317)           ;; file-system-tree   at ice-9/ftw.scm:517:0
 199    (call-scm<-scm-scm 14 15 14 41) ;; define!
 201    (make-non-immediate 13 16603)   ;; #<procedure file-system-tree (file-name #:optional enter? stat)>
 203    (scm-set!/immediate 14 1 13)    
 204    (static-ref 14 16320)           ;; scandir            at ice-9/ftw.scm:556:0
 206    (call-scm<-scm-scm 15 15 14 41) ;; define!
 208    (make-non-immediate 14 16600)   ;; #<procedure scandir (name #:optional select? entry<?)>
 210    (scm-set!/immediate 15 1 14)    
 211    (make-immediate 15 2052)        ;; #<unspecified>
 212    (reset-frame 1)                 ;; 1 slot
 213    (handle-interrupts)             
 214    (return-values)                 

Disassembly of <unnamed function> at #x444:

   0    (instrument-entry 16655)                              at ice-9/ftw.scm:202:0
   2    (assert-nargs-ee/locals 2 6)    ;; 8 slots (1 arg)
   3    (make-non-immediate 7 16620)    ;; (_ . any)
   5    (static-ref 5 16622)            ;; #f
   7    (immediate-tag=? 5 7 0)         ;; heap-object?
   9    (je 7)                          ;; -> L1
  10    (call-scm<-scmn-scmn 5 16397 16619 113);; lookup-bound-private
  14    (static-set! 5 16613)           ;; #f
L1:
  16    (scm-ref/immediate 2 5 1)       
  17    (mov 1 6)                       
  18    (mov 0 7)                       
  19    (handle-interrupts)             
  20    (call 5 3)                      
  22    (receive 0 5 8)                 
  24    (immediate-tag=? 7 3839 4)      ;; false?
  26    (je 18)                         ;; -> L2
  27    (allocate-words/immediate 5 3)  
  28    (load-u64 4 0 65605)            
  31    (word-set!/immediate 5 0 4)     
  32    (load-label 4 34)               ;; anonymous procedure at #x7fae263f354c
  34    (word-set!/immediate 5 1 4)     
  35    (scm-set!/immediate 5 2 6)      
  36    (builtin-ref 6 0)               ;; apply
  37    (mov 4 6)                       
  38    (mov 6 5)                       
  39    (mov 5 7)                       
  40    (mov 7 4)                       
  41    (reset-frame 3)                 ;; 3 slots
  42    (handle-interrupts)             
  43    (tail-call)                     
L2:
  44    (make-immediate 7 4)            ;; #f
  45    (make-non-immediate 5 16592)    ;; "source expression failed to match any pattern"
  47    (static-ref 4 16598)            ;; #f
  49    (immediate-tag=? 4 7 0)         ;; heap-object?
  51    (je 7)                          ;; -> L3
  52    (call-scm<-scmn-scmn 4 16355 16595 113);; lookup-bound-private
  56    (static-set! 4 16589)           ;; #f
L3:
  58    (scm-ref/immediate 4 4 1)       
  59    (mov 3 4)                       
  60    (mov 4 6)                       
  61    (mov 6 7)                       
  62    (mov 7 3)                       
  63    (reset-frame 4)                 ;; 4 slots
  64    (handle-interrupts)             
  65    (tail-call)                     

Disassembly of <unnamed function> at #x54c:

   0    (instrument-entry 16603)                              at ice-9/ftw.scm:202:0
   2    (assert-nargs-ee/locals 2 5)    ;; 7 slots (1 arg)
   3    (static-ref 2 16592)            ;; #f                 at ice-9/boot-9.scm:755:26
   5    (mov 1 5)                                             at ice-9/ftw.scm:202:0
   6    (handle-interrupts)             
   7    (call-label 4 2 24)             ;; syntax->datum@@guile at #x7fae263f35c8
  10    (receive 6 4 7)                 
  12    (builtin-ref 2 0)               ;; apply
  13    (make-non-immediate 1 16584)    ;; #<procedure 7fae264038a0 at ice-9/ftw.scm:202:0 ()>
  15    (handle-interrupts)             
  16    (call 4 3)                      
  18    (receive 1 4 7)                 
  20    (static-ref 4 16581)            ;; #f                 at ice-9/boot-9.scm:756:19
  22    (scm-ref/immediate 6 6 2)       
  23    (mov 3 4)                                             at ice-9/ftw.scm:202:0
  24    (mov 4 5)                       
  25    (mov 5 6)                       
  26    (mov 6 3)                       
  27    (reset-frame 3)                 ;; 3 slots
  28    (handle-interrupts)             
  29    (tail-call-label 65)            ;; datum->syntax@@guile at #x7fae263f36c4

Disassembly of syntax->datum@@guile at #x5c8:

   0    (instrument-entry 16586)                              at ice-9/ftw.scm:202:0
   2    (immediate-tag=? 1 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 1 16305 16573 113);; lookup-bound-private
   9    (static-set! 1 16555)           ;; #f
L1:
  11    (scm-ref/immediate 1 1 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of <unnamed function> at #x600:

   0    (instrument-entry 16592)                              at ice-9/ftw.scm:202:0
   2    (assert-nargs-ee/locals 1 4)    ;; 5 slots (0 args)
   3    (static-ref 0 16583)            ;; getuid             at ice-9/ftw.scm:203:16
   5    (static-ref 1 16583)            ;; #f                 at ice-9/ftw.scm:203:7
   7    (handle-interrupts)                                   at ice-9/ftw.scm:203:6
   8    (call-label 3 2 27)             ;; defined?@guile at #x7fae263f368c
  11    (receive 0 3 5)                 
  13    (immediate-tag=? 4 3839 4)      ;; false?             at ice-9/ftw.scm:203:2
  15    (je 16)                         ;; -> L2
  16    (static-ref 4 16574)            ;; #f                 at ice-9/ftw.scm:204:7
  18    (immediate-tag=? 4 7 0)         ;; heap-object?
  20    (je 7)                          ;; -> L1
  21    (call-scm<-scmn-scmn 4 16275 16557 112);; lookup-bound-public
  25    (static-set! 4 16565)           ;; #f
L1:
  27    (scm-ref/immediate 4 4 1)       
  28    (reset-frame 1)                 ;; 1 slot
  29    (handle-interrupts)             
  30    (tail-call)                     
L2:
  31    (make-immediate 4 4)            ;; #f                 at ice-9/ftw.scm:205:6
  32    (reset-frame 1)                 ;; 1 slot
  33    (handle-interrupts)             
  34    (return-values)                 

Disassembly of defined?@guile at #x68c:

   0    (instrument-entry 16571)                              at ice-9/ftw.scm:205:6
   2    (immediate-tag=? 1 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 1 16256 16558 112);; lookup-bound-public
   9    (static-set! 1 16544)           ;; #f
L1:
  11    (scm-ref/immediate 1 1 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of datum->syntax@@guile at #x6c4:

   0    (instrument-entry 16571)                              at ice-9/ftw.scm:205:6
   2    (immediate-tag=? 2 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 2 16242 16558 113);; lookup-bound-private
   9    (static-set! 2 16498)           ;; #f
L1:
  11    (scm-ref/immediate 2 2 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of <unnamed function> at #x6fc:

   0    (instrument-entry 16563)                              at ice-9/ftw.scm:207:0
   2    (assert-nargs-ee/locals 2 6)    ;; 8 slots (1 arg)
   3    (make-non-immediate 7 16446)    ;; (_ . any)
   5    (static-ref 5 16448)            ;; #f
   7    (immediate-tag=? 5 7 0)         ;; heap-object?
   9    (je 7)                          ;; -> L1
  10    (call-scm<-scmn-scmn 5 16223 16445 113);; lookup-bound-private
  14    (static-set! 5 16439)           ;; #f
L1:
  16    (scm-ref/immediate 2 5 1)       
  17    (mov 1 6)                       
  18    (mov 0 7)                       
  19    (handle-interrupts)             
  20    (call 5 3)                      
  22    (receive 0 5 8)                 
  24    (immediate-tag=? 7 3839 4)      ;; false?
  26    (je 18)                         ;; -> L2
  27    (allocate-words/immediate 5 3)  
  28    (load-u64 4 0 65605)            
  31    (word-set!/immediate 5 0 4)     
  32    (load-label 4 34)               ;; anonymous procedure at #x7fae263f3804
  34    (word-set!/immediate 5 1 4)     
  35    (scm-set!/immediate 5 2 6)      
  36    (builtin-ref 6 0)               ;; apply
  37    (mov 4 6)                       
  38    (mov 6 5)                       
  39    (mov 5 7)                       
  40    (mov 7 4)                       
  41    (reset-frame 3)                 ;; 3 slots
  42    (handle-interrupts)             
  43    (tail-call)                     
L2:
  44    (make-immediate 7 4)            ;; #f
  45    (make-non-immediate 5 16418)    ;; "source expression failed to match any pattern"
  47    (static-ref 4 16424)            ;; #f
  49    (immediate-tag=? 4 7 0)         ;; heap-object?
  51    (je 7)                          ;; -> L3
  52    (call-scm<-scmn-scmn 4 16181 16421 113);; lookup-bound-private
  56    (static-set! 4 16415)           ;; #f
L3:
  58    (scm-ref/immediate 4 4 1)       
  59    (mov 3 4)                       
  60    (mov 4 6)                       
  61    (mov 6 7)                       
  62    (mov 7 3)                       
  63    (reset-frame 4)                 ;; 4 slots
  64    (handle-interrupts)             
  65    (tail-call)                     

Disassembly of <unnamed function> at #x804:

   0    (instrument-entry 16507)                              at ice-9/ftw.scm:207:0
   2    (assert-nargs-ee/locals 2 5)    ;; 7 slots (1 arg)
   3    (static-ref 2 16418)            ;; #f                 at ice-9/boot-9.scm:755:26
   5    (mov 1 5)                                             at ice-9/ftw.scm:207:0
   6    (handle-interrupts)             
   7    (call-label 4 2 -150)           ;; syntax->datum@@guile at #x7fae263f35c8
  10    (receive 6 4 7)                 
  12    (builtin-ref 2 0)               ;; apply
  13    (make-non-immediate 1 16490)    ;; #<procedure 7fae264039e0 at ice-9/ftw.scm:207:0 ()>
  15    (handle-interrupts)             
  16    (call 4 3)                      
  18    (receive 1 4 7)                 
  20    (static-ref 4 16407)            ;; #f                 at ice-9/boot-9.scm:756:19
  22    (scm-ref/immediate 6 6 2)       
  23    (mov 3 4)                                             at ice-9/ftw.scm:207:0
  24    (mov 4 5)                       
  25    (mov 5 6)                       
  26    (mov 6 3)                       
  27    (reset-frame 3)                 ;; 3 slots
  28    (handle-interrupts)             
  29    (tail-call-label -109)          ;; datum->syntax@@guile at #x7fae263f36c4

Disassembly of <unnamed function> at #x880:

   0    (instrument-entry 16494)                              at ice-9/ftw.scm:207:0
   2    (assert-nargs-ee/locals 1 4)    ;; 5 slots (0 args)
   3    (static-ref 0 16487)            ;; getgid             at ice-9/ftw.scm:208:16
   5    (static-ref 1 16423)            ;; #f                 at ice-9/ftw.scm:208:7
   7    (handle-interrupts)                                   at ice-9/ftw.scm:208:6
   8    (call-label 3 2 -133)           ;; defined?@guile at #x7fae263f368c
  11    (receive 0 3 5)                 
  13    (immediate-tag=? 4 3839 4)      ;; false?             at ice-9/ftw.scm:208:2
  15    (je 16)                         ;; -> L2
  16    (static-ref 4 16476)            ;; #f                 at ice-9/ftw.scm:209:7
  18    (immediate-tag=? 4 7 0)         ;; heap-object?
  20    (je 7)                          ;; -> L1
  21    (call-scm<-scmn-scmn 4 16115 16461 112);; lookup-bound-public
  25    (static-set! 4 16467)           ;; #f
L1:
  27    (scm-ref/immediate 4 4 1)       
  28    (reset-frame 1)                 ;; 1 slot
  29    (handle-interrupts)             
  30    (tail-call)                     
L2:
  31    (make-immediate 4 4)            ;; #f                 at ice-9/ftw.scm:210:6
  32    (reset-frame 1)                 ;; 1 slot
  33    (handle-interrupts)             
  34    (return-values)                 

Disassembly of directory-files at #x90c:

   0    (instrument-entry 16465)                              at ice-9/ftw.scm:212:0
   2    (assert-nargs-ee/locals 2 0)    ;; 2 slots (1 arg)
   3    (mov 1 0)                       
   4    (reset-frame 1)                 ;; 1 slot
   5    (handle-interrupts)             
   6    (tail-call-label 2)             ;; directory-files at #x7fae263f392c

Disassembly of directory-files at #x92c:

   0    (instrument-entry 16487)                              at ice-9/ftw.scm:212:0
   2    (alloc-frame 12)                ;; 12 slots
   3    (static-ref 8 16460)            ;; #f                 at ice-9/ftw.scm:213:21
   5    (mov 7 11)                                            at ice-9/ftw.scm:213:20
   6    (handle-interrupts)             
   7    (call-label 3 2 128)            ;; opendir@guile at #x7fae263f3b48
  10    (receive 0 3 12)                
  12    (static-ref 7 16453)            ;; #f                 at ice-9/ftw.scm:214:21
  14    (mov 6 11)                                            at ice-9/ftw.scm:214:20
  15    (handle-interrupts)             
  16    (call-label 4 2 133)            ;; readdir@guile at #x7fae263f3b80
  19    (receive 1 4 12)                
  21    (make-immediate 9 772)          ;; ()                 at ice-9/ftw.scm:215:20
  22    (eq-immediate? 10 2564)         ;; #<eof>             at ice-9/ftw.scm:216:10
  23    (je 99)                         ;; -> L7
  24    (static-ref 5 16441)            ;; #f                 at ice-9/ftw.scm:220:17
  26    (mov 4 11)                                            at ice-9/ftw.scm:220:16
  27    (handle-interrupts)             
  28    (call-label 6 2 121)            ;; readdir@guile at #x7fae263f3b80
  31    (receive 3 6 12)                
  33    (make-non-immediate 7 16434)    ;; "."                at ice-9/ftw.scm:221:34
  35    (static-ref 3 16440)            ;; #f                 at ice-9/ftw.scm:221:25
  37    (mov 2 7)                                             at ice-9/ftw.scm:221:24
  38    (mov 1 10)                      
  39    (handle-interrupts)             
  40    (call-label 8 3 123)            ;; string=?@guile at #x7fae263f3bb8
  43    (receive 5 8 12)                
  45    (immediate-tag=? 6 3839 4)      ;; false?             at ice-9/ftw.scm:221:16
  47    (jne 19)                        ;; -> L1
  48    (make-non-immediate 2 16429)    ;; ".."               at ice-9/ftw.scm:222:34
  50    (static-ref 3 16425)            ;; #f                 at ice-9/ftw.scm:222:25
  52    (mov 1 10)                                            at ice-9/ftw.scm:222:24
  53    (handle-interrupts)             
  54    (call-label 8 3 109)            ;; string=?@guile at #x7fae263f3bb8
  57    (receive 5 8 12)                
  59    (immediate-tag=? 6 3839 4)      ;; false?             at ice-9/ftw.scm:221:16
  61    (jne 5)                         ;; -> L1
  62    (allocate-words/immediate 6 2)                        at ice-9/ftw.scm:224:20
  63    (scm-set!/immediate 6 0 10)     
  64    (scm-set!/immediate 6 1 9)      
  65    (j 2)                           ;; -> L2
L1:
  66    (mov 6 9)                       
L2:
  67    (make-non-immediate 10 16410)   ;; ".."               at ice-9/ftw.scm:222:34
  69    (eq-immediate? 8 2564)          ;; #<eof>             at ice-9/ftw.scm:216:10
  70    (je 49)                         ;; -> L6
L3:
  71    (instrument-loop 16416)         
  73    (handle-interrupts)             
  74    (static-ref 2 16391)            ;; #f                 at ice-9/ftw.scm:220:17
  76    (mov 1 11)                                            at ice-9/ftw.scm:220:16
  77    (handle-interrupts)             
  78    (call-label 9 2 71)             ;; readdir@guile at #x7fae263f3b80
  81    (receive 2 9 12)                
  83    (static-ref 2 16392)            ;; #f                 at ice-9/ftw.scm:221:25
  85    (mov 1 7)                                             at ice-9/ftw.scm:221:24
  86    (mov 0 8)                       
  87    (handle-interrupts)             
  88    (call-label 9 3 75)             ;; string=?@guile at #x7fae263f3bb8
  91    (receive 6 9 12)                
  93    (immediate-tag=? 5 3839 4)      ;; false?             at ice-9/ftw.scm:221:16
  95    (jne 18)                        ;; -> L4
  96    (static-ref 2 16379)            ;; #f                 at ice-9/ftw.scm:222:25
  98    (mov 1 10)                                            at ice-9/ftw.scm:222:24
  99    (mov 0 8)                       
 100    (handle-interrupts)             
 101    (call-label 9 3 62)             ;; string=?@guile at #x7fae263f3bb8
 104    (receive 6 9 12)                
 106    (immediate-tag=? 5 3839 4)      ;; false?             at ice-9/ftw.scm:221:16
 108    (jne 5)                         ;; -> L4
 109    (allocate-words/immediate 5 2)                        at ice-9/ftw.scm:224:20
 110    (scm-set!/immediate 5 0 8)      
 111    (scm-set!/immediate 5 1 6)      
 112    (j 2)                           ;; -> L5
L4:
 113    (mov 5 6)                       
L5:
 114    (eq-immediate? 9 2564)          ;; #<eof>             at ice-9/ftw.scm:216:10
 115    (je 8)                          ;; -> L8
 116    (mov 8 9)                                             at ice-9/ftw.scm:220:10
 117    (mov 6 5)                       
 118    (j -47)                         ;; -> L3
L6:
 119    (mov 9 8)                                             at ice-9/ftw.scm:216:10
 120    (mov 5 6)                       
 121    (j 2)                           ;; -> L8
L7:
 122    (mov 5 9)                       
L8:
 123    (static-ref 1 16362)            ;; #f                 at ice-9/ftw.scm:218:13
 125    (mov 0 11)                                            at ice-9/ftw.scm:218:12
 126    (handle-interrupts)             
 127    (call-label 10 2 50)            ;; closedir@guile at #x7fae263f3bf0
 130    (reset-frame 12)                ;; 12 slots
 131    (mov 11 5)                      
 132    (reset-frame 1)                 ;; 1 slot
 133    (handle-interrupts)             
 134    (return-values)                 

Disassembly of opendir@guile at #xb48:

   0    (instrument-entry 16366)                              at ice-9/ftw.scm:218:12
   2    (immediate-tag=? 1 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 1 15953 16353 112);; lookup-bound-public
   9    (static-set! 1 16319)           ;; #f
L1:
  11    (scm-ref/immediate 1 1 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of readdir@guile at #xb80:

   0    (instrument-entry 16366)                              at ice-9/ftw.scm:218:12
   2    (immediate-tag=? 1 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 1 15939 16353 112);; lookup-bound-public
   9    (static-set! 1 16307)           ;; #f
L1:
  11    (scm-ref/immediate 1 1 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of string=?@guile at #xbb8:

   0    (instrument-entry 16366)                              at ice-9/ftw.scm:218:12
   2    (immediate-tag=? 2 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 2 15925 16353 112);; lookup-bound-public
   9    (static-set! 2 16303)           ;; #f
L1:
  11    (scm-ref/immediate 2 2 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of closedir@guile at #xbf0:

   0    (instrument-entry 16366)                              at ice-9/ftw.scm:218:12
   2    (immediate-tag=? 1 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 1 15911 16353 112);; lookup-bound-public
   9    (static-set! 1 16299)           ;; #f
L1:
  11    (scm-ref/immediate 1 1 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of pathify at #xc28:

   0    (instrument-entry 16362)                              at ice-9/ftw.scm:226:0
   2    (assert-nargs-ge 1)             
   3    (bind-rest 1)                   ;; 2 slots
   4    (alloc-frame 4)                 ;; 4 slots
   5    (builtin-ref 3 0)               ;; apply
   6    (make-non-immediate 1 16352)    ;; #<procedure pathify nodes>
   8    (mov 0 1)                       
   9    (mov 1 2)                       
  10    (mov 2 0)                       
  11    (reset-frame 3)                 ;; 3 slots
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of pathify at #xc60:

   0    (instrument-entry 16432)                              at ice-9/ftw.scm:226:0
   2    (assert-nargs-ge 1)             
   3    (bind-rest 1)                   ;; 2 slots
   4    (alloc-frame 12)                ;; 12 slots
   5    (make-non-immediate 11 16349)   ;; ""                 at ice-9/ftw.scm:228:21
   7    (immediate-tag=? 10 3583 260)   ;; null?              at ice-9/ftw.scm:229:8
   9    (je 51)                         ;; -> L4
  10    (immediate-tag=? 10 7 0)        ;; heap-object?       at ice-9/ftw.scm:232:14
  12    (jne 46)                        ;; -> L3
  13    (heap-tag=? 10 1 0)             ;; pair?
  15    (jne 43)                        ;; -> L3
  16    (scm-ref/immediate 9 10 1)      
  17    (make-non-immediate 8 16345)    ;; "/"                at ice-9/ftw.scm:232:48
  19    (scm-ref/immediate 1 10 0)                            at ice-9/ftw.scm:232:52
  20    (static-ref 4 16350)            ;; #f                 at ice-9/ftw.scm:232:27
  22    (mov 3 11)                                            at ice-9/ftw.scm:232:26
  23    (mov 2 8)                       
  24    (handle-interrupts)             
  25    (call-label 7 4 76)             ;; string-append@guile at #x7fae263f3df4
  28    (receive 1 7 12)                
L1:
  30    (instrument-loop 16402)         
  32    (handle-interrupts)             
  33    (immediate-tag=? 9 3583 260)    ;; null?              at ice-9/ftw.scm:229:8
  35    (je 26)                         ;; -> L5
  36    (immediate-tag=? 9 7 0)         ;; heap-object?       at ice-9/ftw.scm:232:14
  38    (jne 18)                        ;; -> L2
  39    (heap-tag=? 9 1 0)              ;; pair?
  41    (jne 15)                        ;; -> L2
  42    (scm-ref/immediate 7 9 1)       
  43    (scm-ref/immediate 0 9 0)                             at ice-9/ftw.scm:232:52
  44    (static-ref 3 16326)            ;; #f                 at ice-9/ftw.scm:232:27
  46    (mov 2 10)                                            at ice-9/ftw.scm:232:26
  47    (mov 1 8)                       
  48    (handle-interrupts)             
  49    (call-label 8 4 52)             ;; string-append@guile at #x7fae263f3df4
  52    (receive 1 8 12)                
  54    (mov 9 7)                                             at ice-9/ftw.scm:232:8
  55    (j -25)                         ;; -> L1
L2:
  56    (throw/value+data 9 16342)      ;; #(wrong-type-arg "cdr" "Wrong type argument in position 1 (expecting pair):…") at ice-9/ftw.scm:232:14
L3:
  58    (throw/value+data 10 16340)     ;; #(wrong-type-arg "cdr" "Wrong type argument in position 1 (expecting pair):…")
L4:
  60    (mov 10 11)                     
L5:
  61    (static-ref 6 16209)            ;; #f                 at ice-9/ftw.scm:230:18
  63    (mov 5 11)                                            at ice-9/ftw.scm:230:17
  64    (mov 4 10)                      
  65    (handle-interrupts)             
  66    (call-label 5 3 -108)           ;; string=?@guile at #x7fae263f3bb8
  69    (receive 2 5 12)                
  71    (immediate-tag=? 9 3839 4)      ;; false?             at ice-9/ftw.scm:230:12
  73    (jne 2)                         ;; -> L6
  74    (make-immediate 11 4)           ;; #f                 at ice-9/ftw.scm:230:38
L6:
  75    (immediate-tag=? 11 3839 4)     ;; false?             at ice-9/ftw.scm:230:8
  77    (jne 21)                        ;; -> L8
  78    (make-immediate 11 6)           ;; 1                  at ice-9/ftw.scm:231:30
  79    (immediate-tag=? 10 7 0)        ;; heap-object?       at ice-9/ftw.scm:231:32
  81    (jne 15)                        ;; -> L7
  82    (heap-tag=? 10 127 21)          ;; string?
  84    (jne 12)                        ;; -> L7
  85    (word-ref/immediate 9 10 3)     
  86    (tag-fixnum 8 9)                
  87    (static-ref 9 16319)            ;; #f                 at ice-9/ftw.scm:231:13
  89    (mov 7 9)                                             at ice-9/ftw.scm:231:12
  90    (mov 9 11)                      
  91    (mov 11 7)                      
  92    (reset-frame 4)                 ;; 4 slots
  93    (handle-interrupts)             
  94    (tail-call-label 21)            ;; substring@guile at #x7fae263f3e2c
L7:
  96    (throw/value+data 10 16328)     ;; #(wrong-type-arg "string-length" "Wrong type argument in position 1 (expect…") at ice-9/ftw.scm:231:32
L8:
  98    (reset-frame 1)                 ;; 1 slot
  99    (handle-interrupts)             
 100    (return-values)                 

Disassembly of string-append@guile at #xdf4:

   0    (instrument-entry 16345)                              at ice-9/ftw.scm:231:32
   2    (immediate-tag=? 3 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 3 15782 16332 112);; lookup-bound-public
   9    (static-set! 3 16260)           ;; #f
L1:
  11    (scm-ref/immediate 3 3 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of substring@guile at #xe2c:

   0    (instrument-entry 16345)                              at ice-9/ftw.scm:231:32
   2    (immediate-tag=? 3 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 3 15768 16332 112);; lookup-bound-public
   9    (static-set! 3 16282)           ;; #f
L1:
  11    (scm-ref/immediate 3 3 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of visited?-proc at #xe64:

   0    (instrument-entry 16337)                              at ice-9/ftw.scm:250:0
   2    (assert-nargs-ee/locals 2 0)    ;; 2 slots (1 arg)
   3    (mov 1 0)                       
   4    (reset-frame 1)                 ;; 1 slot
   5    (handle-interrupts)             
   6    (tail-call-label 2)             ;; visited?-proc at #x7fae263f3e84

Disassembly of visited?-proc at #xe84:

   0    (instrument-entry 16337)                              at ice-9/ftw.scm:250:0
   2    (alloc-frame 6)                 ;; 6 slots
   3    (make-immediate 0 30)           ;; 7                  at ice-9/ftw.scm:251:35
   4    (static-ref 1 16331)            ;; #f                 at ice-9/ftw.scm:251:19
   6    (handle-interrupts)                                   at ice-9/ftw.scm:251:18
   7    (call-label 4 2 19)             ;; make-hash-table@guile at #x7fae263f3eec
  10    (receive 1 4 6)                 
  12    (allocate-words/immediate 3 4)                        at ice-9/ftw.scm:252:4
  13    (load-u64 2 0 131141)           
  16    (word-set!/immediate 3 0 2)     
  17    (load-label 2 23)               ;; anonymous procedure at #x7fae263f3f24
  19    (word-set!/immediate 3 1 2)     
  20    (scm-set!/immediate 3 2 5)      
  21    (scm-set!/immediate 3 3 4)      
  22    (mov 5 3)                       
  23    (reset-frame 1)                 ;; 1 slot
  24    (handle-interrupts)             
  25    (return-values)                 

Disassembly of make-hash-table@guile at #xeec:

   0    (instrument-entry 16325)                              at ice-9/ftw.scm:252:4
   2    (immediate-tag=? 1 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 1 15720 16312 112);; lookup-bound-public
   9    (static-set! 1 16300)           ;; #f
L1:
  11    (scm-ref/immediate 1 1 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of <unnamed function> at #xf24:

   0    (instrument-entry 16327)                              at ice-9/ftw.scm:252:4
   2    (assert-nargs-ee/locals 3 9)    ;; 12 slots (2 args)
   3    (immediate-tag=? 10 3839 4)     ;; false?             at ice-9/ftw.scm:253:6
   5    (je 113)                        ;; -> L5
   6    (static-ref 5 16311)            ;; #f                 at ice-9/ftw.scm:254:49
   8    (mov 4 10)                                            at ice-9/ftw.scm:254:48
   9    (handle-interrupts)             
  10    (call-label 6 2 112)            ;; stat:dev@guile at #x7fae263f410c
  13    (receive 8 6 12)                
  15    (static-ref 5 16304)            ;; #f                 at ice-9/ftw.scm:254:29
  17    (scm-ref/immediate 4 11 3)      
  18    (handle-interrupts)                                   at ice-9/ftw.scm:254:28
  19    (call-label 6 3 117)            ;; hashv-ref@guile at #x7fae263f4144
  22    (receive 3 6 12)                
  24    (allocate-words/immediate 7 2)  
  25    (load-u64 6 0 7)                
  28    (word-set!/immediate 7 0 6)     
  29    (scm-set!/immediate 7 1 8)      
  30    (static-ref 3 16291)            ;; #f                 at ice-9/ftw.scm:255:29
  32    (mov 2 10)                                            at ice-9/ftw.scm:255:28
  33    (handle-interrupts)             
  34    (call-label 8 2 116)            ;; stat:ino@guile at #x7fae263f417c
  37    (receive 3 8 12)                
  39    (make-immediate 6 2)            ;; 0                  at ice-9/ftw.scm:256:35
  40    (=? 6 8)                                              at ice-9/ftw.scm:256:32
  41    (jne 11)                        ;; -> L1
  42    (static-ref 3 16281)            ;; #f                 at ice-9/ftw.scm:257:33
  44    (mov 2 9)                                             at ice-9/ftw.scm:257:32
  45    (handle-interrupts)             
  46    (call-label 8 2 118)            ;; string-hash@guile at #x7fae263f41b4
  49    (receive 2 8 12)                
  51    (j 2)                           ;; -> L2
L1:
  52    (mov 9 8)                       
L2:
  53    (scm-ref/immediate 8 7 1)       
  54    (immediate-tag=? 8 3839 4)      ;; false?             at ice-9/ftw.scm:259:13
  56    (jne 32)                        ;; -> L3
  57    (static-ref 3 16238)            ;; #f                 at ice-9/ftw.scm:261:35
  59    (scm-ref/immediate 2 11 2)      
  60    (handle-interrupts)                                   at ice-9/ftw.scm:261:34
  61    (call-label 8 2 -75)            ;; make-hash-table@guile at #x7fae263f3eec
  64    (receive 3 8 12)                
  66    (scm-set!/immediate 7 1 8)                            at ice-9/ftw.scm:261:19
  67    (static-ref 3 16250)            ;; #f                 at ice-9/ftw.scm:262:41
  69    (mov 2 10)                                            at ice-9/ftw.scm:262:40
  70    (handle-interrupts)             
  71    (call-label 8 2 51)             ;; stat:dev@guile at #x7fae263f410c
  74    (receive 1 8 12)                
  76    (scm-ref/immediate 8 7 1)       
  77    (static-ref 6 16248)            ;; #f                 at ice-9/ftw.scm:262:20
  79    (scm-ref/immediate 2 11 3)      
  80    (mov 3 6)                                             at ice-9/ftw.scm:262:19
  81    (mov 1 10)                      
  82    (mov 0 8)                       
  83    (handle-interrupts)             
  84    (call-label 8 4 94)             ;; hashv-set!@guile at #x7fae263f41ec
  87    (reset-frame 12)                ;; 12 slots
L3:
  88    (scm-ref/immediate 2 7 1)       
  89    (static-ref 3 16230)            ;; #f                 at ice-9/ftw.scm:263:18
  91    (mov 1 9)                                             at ice-9/ftw.scm:263:17
  92    (handle-interrupts)             
  93    (call-label 8 3 43)             ;; hashv-ref@guile at #x7fae263f4144
  96    (receive 0 8 12)                
  98    (immediate-tag=? 11 3839 4)     ;; false?             at ice-9/ftw.scm:263:13
 100    (jne 15)                        ;; -> L4
 101    (scm-ref/immediate 7 7 1)       
 102    (make-immediate 5 1028)         ;; #t                 at ice-9/ftw.scm:265:44
 103    (static-ref 8 16222)            ;; #f                 at ice-9/ftw.scm:265:20
 105    (mov 6 9)                                             at ice-9/ftw.scm:265:19
 106    (handle-interrupts)             
 107    (call-label 3 4 71)             ;; hashv-set!@guile at #x7fae263f41ec
 110    (reset-frame 12)                ;; 12 slots
 111    (make-immediate 11 4)           ;; #f                 at ice-9/ftw.scm:266:19
 112    (reset-frame 1)                 ;; 1 slot
 113    (handle-interrupts)             
 114    (return-values)                 
L4:
 115    (reset-frame 1)                 ;; 1 slot
 116    (handle-interrupts)             
 117    (return-values)                 
L5:
 118    (make-immediate 11 4)           ;; #f                 at ice-9/boot-9.scm:408:31
 119    (reset-frame 1)                 ;; 1 slot
 120    (handle-interrupts)             
 121    (return-values)                 

Disassembly of stat:dev@guile at #x110c:

   0    (instrument-entry 16219)                              at ice-9/boot-9.scm:408:31
   2    (immediate-tag=? 1 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 1 15584 16206 112);; lookup-bound-public
   9    (static-set! 1 16186)           ;; #f
L1:
  11    (scm-ref/immediate 1 1 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of hashv-ref@guile at #x1144:

   0    (instrument-entry 16219)                              at ice-9/boot-9.scm:408:31
   2    (immediate-tag=? 2 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 2 15570 16206 112);; lookup-bound-public
   9    (static-set! 2 16174)           ;; #f
L1:
  11    (scm-ref/immediate 2 2 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of stat:ino@guile at #x117c:

   0    (instrument-entry 16219)                              at ice-9/boot-9.scm:408:31
   2    (immediate-tag=? 1 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 1 15556 16206 112);; lookup-bound-public
   9    (static-set! 1 16162)           ;; #f
L1:
  11    (scm-ref/immediate 1 1 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of string-hash@guile at #x11b4:

   0    (instrument-entry 16219)                              at ice-9/boot-9.scm:408:31
   2    (immediate-tag=? 1 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 1 15542 16206 112);; lookup-bound-public
   9    (static-set! 1 16150)           ;; #f
L1:
  11    (scm-ref/immediate 1 1 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of hashv-set!@guile at #x11ec:

   0    (instrument-entry 16219)                              at ice-9/boot-9.scm:408:31
   2    (immediate-tag=? 3 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 3 15528 16206 112);; lookup-bound-public
   9    (static-set! 3 16138)           ;; #f
L1:
  11    (scm-ref/immediate 3 3 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of stat-dir-readable?-proc at #x1224:

   0    (instrument-entry 16211)                              at ice-9/ftw.scm:268:0
   2    (assert-nargs-ee/locals 3 0)    ;; 3 slots (2 args)
   3    (mov 2 1)                       
   4    (mov 1 0)                       
   5    (reset-frame 2)                 ;; 2 slots
   6    (handle-interrupts)             
   7    (tail-call-label 2)             ;; stat-dir-readable?-proc at #x7fae263f4248

Disassembly of stat-dir-readable?-proc at #x1248:

   0    (instrument-entry 16208)                              at ice-9/ftw.scm:268:0
   2    (alloc-frame 4)                 ;; 4 slots
   3    (allocate-words/immediate 1 4)                        at ice-9/ftw.scm:269:2
   4    (load-u64 0 0 131141)           
   7    (word-set!/immediate 1 0 0)     
   8    (load-label 0 9)                ;; anonymous procedure at #x7fae263f428c
  10    (word-set!/immediate 1 1 0)     
  11    (scm-set!/immediate 1 2 3)      
  12    (scm-set!/immediate 1 3 2)      
  13    (mov 3 1)                       
  14    (reset-frame 1)                 ;; 1 slot
  15    (handle-interrupts)             
  16    (return-values)                 

Disassembly of <unnamed function> at #x128c:

   0    (instrument-entry 16237)                              at ice-9/ftw.scm:269:2
   2    (assert-nargs-ee/locals 2 7)    ;; 9 slots (1 arg)
   3    (static-ref 6 16194)            ;; #f                 at ice-9/ftw.scm:270:19
   5    (immediate-tag=? 6 7 0)         ;; heap-object?
   7    (je 7)                          ;; -> L1
   8    (call-scm<-scmn-scmn 6 15485 16191 112);; lookup-bound-public
  12    (static-set! 6 16185)           ;; #f
L1:
  14    (scm-ref/immediate 3 6 1)       
  15    (mov 2 7)                       
  16    (handle-interrupts)             
  17    (call 5 2)                      
  19    (receive 2 5 9)                 
  21    (scm-ref/immediate 5 8 2)       
  22    (eq-immediate? 5 2)             ;; 0                  at ice-9/ftw.scm:273:10
  23    (je 145)                        ;; -> L17
  24    (static-ref 5 16183)            ;; #f                 at ice-9/ftw.scm:274:28
  26    (immediate-tag=? 5 7 0)         ;; heap-object?
  28    (je 7)                          ;; -> L2
  29    (call-scm<-scmn-scmn 5 15464 16180 112);; lookup-bound-public
  33    (static-set! 5 16174)           ;; #f
L2:
  35    (scm-ref/immediate 2 5 1)       
  36    (mov 1 7)                       
  37    (handle-interrupts)             
  38    (call 6 2)                      
  40    (receive 3 6 9)                 
  42    (scm-ref/immediate 4 8 2)       
  43    (eq? 4 5)                                             at ice-9/ftw.scm:274:15
  44    (je 29)                         ;; -> L4
  45    (immediate-tag=? 4 7 0)         ;; heap-object?
  47    (jne 35)                        ;; -> L6
  48    (immediate-tag=? 5 7 0)         ;; heap-object?
  50    (jne 32)                        ;; -> L6
  51    (static-ref 3 16166)            ;; #f
  53    (immediate-tag=? 3 7 0)         ;; heap-object?
  55    (je 7)                          ;; -> L3
  56    (call-scm<-scmn-scmn 3 15437 16163 113);; lookup-bound-private
  60    (static-set! 3 16157)           ;; #f
L3:
  62    (scm-ref/immediate 2 3 1)       
  63    (mov 1 4)                       
  64    (mov 0 5)                       
  65    (handle-interrupts)             
  66    (call 6 3)                      
  68    (receive 3 6 9)                 
  70    (immediate-tag=? 5 3839 4)      ;; false?             at ice-9/ftw.scm:274:10
  72    (je 10)                         ;; -> L6
L4:
  73    (make-immediate 5 1026)         ;; 256                at ice-9/ftw.scm:275:31
  74    (call-scm<-scm-scm 5 5 6 9)     ;; logand             at ice-9/ftw.scm:272:29
  76    (eq-immediate? 5 2)             ;; 0
  77    (jne 3)                         ;; -> L5
  78    (make-immediate 5 4)            ;; #f
  79    (j 4)                           ;; -> L7
L5:
  80    (make-immediate 5 1028)         ;; #t
  81    (j 2)                           ;; -> L7
L6:
  82    (make-immediate 5 4)            ;; #f                 at ice-9/boot-9.scm:408:31
L7:
  83    (immediate-tag=? 5 3839 4)      ;; false?             at ice-9/ftw.scm:273:6
  85    (jne 79)                        ;; -> L16
  86    (static-ref 5 16141)            ;; #f                 at ice-9/ftw.scm:276:28
  88    (immediate-tag=? 5 7 0)         ;; heap-object?
  90    (je 7)                          ;; -> L8
  91    (call-scm<-scmn-scmn 5 15402 16138 112);; lookup-bound-public
  95    (static-set! 5 16132)           ;; #f
L8:
  97    (scm-ref/immediate 2 5 1)       
  98    (mov 1 7)                       
  99    (handle-interrupts)             
 100    (call 6 2)                      
 102    (receive 1 6 9)                 
 104    (scm-ref/immediate 8 8 3)       
 105    (eq? 8 7)                                             at ice-9/ftw.scm:276:15
 106    (je 29)                         ;; -> L10
 107    (immediate-tag=? 8 7 0)         ;; heap-object?
 109    (jne 35)                        ;; -> L12
 110    (immediate-tag=? 7 7 0)         ;; heap-object?
 112    (jne 32)                        ;; -> L12
 113    (static-ref 5 16104)            ;; #f
 115    (immediate-tag=? 5 7 0)         ;; heap-object?
 117    (je 7)                          ;; -> L9
 118    (call-scm<-scmn-scmn 5 15375 16101 113);; lookup-bound-private
 122    (static-set! 5 16095)           ;; #f
L9:
 124    (scm-ref/immediate 2 5 1)       
 125    (mov 1 8)                       
 126    (mov 0 7)                       
 127    (handle-interrupts)             
 128    (call 6 3)                      
 130    (receive 0 6 9)                 
 132    (immediate-tag=? 8 3839 4)      ;; false?             at ice-9/ftw.scm:276:10
 134    (je 10)                         ;; -> L12
L10:
 135    (make-immediate 8 130)          ;; 32                 at ice-9/ftw.scm:277:31
 136    (call-scm<-scm-scm 8 8 6 9)     ;; logand             at ice-9/ftw.scm:272:29
 138    (eq-immediate? 8 2)             ;; 0
 139    (jne 3)                         ;; -> L11
 140    (make-immediate 8 4)            ;; #f
 141    (j 4)                           ;; -> L13
L11:
 142    (make-immediate 8 1028)         ;; #t
 143    (j 2)                           ;; -> L13
L12:
 144    (make-immediate 8 4)            ;; #f                 at ice-9/boot-9.scm:408:31
L13:
 145    (immediate-tag=? 8 3839 4)      ;; false?             at ice-9/ftw.scm:273:6
 147    (jne 14)                        ;; -> L15
 148    (make-immediate 8 18)           ;; 4                  at ice-9/ftw.scm:278:26
 149    (call-scm<-scm-scm 8 8 6 9)     ;; logand             at ice-9/ftw.scm:272:29
 151    (eq-immediate? 8 2)             ;; 0
 152    (jne 5)                         ;; -> L14
 153    (make-immediate 8 4)            ;; #f
 154    (reset-frame 1)                 ;; 1 slot
 155    (handle-interrupts)             
 156    (return-values)                 
L14:
 157    (make-immediate 8 1028)         ;; #t
 158    (reset-frame 1)                 ;; 1 slot
 159    (handle-interrupts)             
 160    (return-values)                 
L15:
 161    (reset-frame 1)                 ;; 1 slot
 162    (handle-interrupts)             
 163    (return-values)                 
L16:
 164    (mov 8 5)                       
 165    (reset-frame 1)                 ;; 1 slot
 166    (handle-interrupts)             
 167    (return-values)                 
L17:
 168    (make-immediate 8 1028)         ;; #t                 at ice-9/ftw.scm:273:10
 169    (reset-frame 1)                 ;; 1 slot
 170    (handle-interrupts)             
 171    (return-values)                 

Disassembly of stat&flag-proc at #x153c:

   0    (instrument-entry 16151)                              at ice-9/ftw.scm:280:0
   2    (assert-nargs-ge 2)             
   3    (bind-rest 2)                   ;; 3 slots
   4    (alloc-frame 11)                ;; 11 slots
   5    (static-ref 10 16074)           ;; depth              at ice-9/ftw.scm:281:35
   7    (static-ref 7 16074)            ;; #f                 at ice-9/ftw.scm:281:29
   9    (immediate-tag=? 7 7 0)         ;; heap-object?
  11    (je 7)                          ;; -> L1
  12    (call-scm<-scmn-scmn 7 15309 16071 113);; lookup-bound-private
  16    (static-set! 7 16065)           ;; #f
L1:
  18    (scm-ref/immediate 7 7 1)       
  19    (mov 3 7)                       
  20    (mov 2 10)                      
  21    (mov 1 8)                       
  22    (handle-interrupts)             
  23    (call 7 3)                      
  25    (receive 0 7 11)                
  27    (immediate-tag=? 10 3839 4)     ;; false?             at ice-9/ftw.scm:281:25
  29    (je 4)                          ;; -> L2
  30    (static-ref 10 16069)           ;; directory-processed at ice-9/ftw.scm:282:29
  32    (j 3)                           ;; -> L3
L2:
  33    (static-ref 10 16076)           ;; directory          at ice-9/ftw.scm:283:29
L3:
  35    (static-ref 2 16084)            ;; nftw-style         at ice-9/ftw.scm:284:39
  37    (mov 3 7)                                             at ice-9/ftw.scm:284:33
  38    (mov 1 8)                       
  39    (handle-interrupts)             
  40    (call 7 3)                      
  42    (receive 4 7 11)                
  44    (immediate-tag=? 6 3839 4)      ;; false?             at ice-9/ftw.scm:284:29
  46    (je 4)                          ;; -> L4
  47    (static-ref 6 16082)            ;; stale-symlink      at ice-9/ftw.scm:285:33
  49    (j 3)                           ;; -> L5
L4:
  50    (static-ref 6 16089)            ;; symlink            at ice-9/ftw.scm:286:33
L5:
  52    (static-ref 1 16097)            ;; physical           at ice-9/ftw.scm:287:26
  54    (mov 2 7)                                             at ice-9/ftw.scm:287:20
  55    (mov 0 8)                       
  56    (handle-interrupts)             
  57    (call 8 3)                      
  59    (receive 2 8 11)                
  61    (allocate-words/immediate 7 6)                        at ice-9/ftw.scm:295:4
  62    (load-u64 5 0 262213)           
  65    (word-set!/immediate 7 0 5)     
  66    (load-label 5 11)               ;; anonymous procedure at #x7fae263f4670
  68    (word-set!/immediate 7 1 5)     
  69    (scm-set!/immediate 7 2 9)      
  70    (scm-set!/immediate 7 3 10)     
  71    (scm-set!/immediate 7 4 6)      
  72    (scm-set!/immediate 7 5 8)      
  73    (mov 10 7)                      
  74    (reset-frame 1)                 ;; 1 slot
  75    (handle-interrupts)             
  76    (return-values)                 

Disassembly of <unnamed function> at #x1670:

   0    (instrument-entry 16122)                              at ice-9/ftw.scm:295:4
   2    (assert-nargs-ee/locals 2 10)   ;; 12 slots (1 arg)
   3    (make-immediate 9 1028)         ;; #t                 at ice-9/boot-9.scm:2137:12
   4    (allocate-words/immediate 8 3)                        at ice-9/ftw.scm:296:15
   5    (load-u64 7 0 65605)            
   8    (word-set!/immediate 8 0 7)     
   9    (load-label 6 144)              ;; anonymous procedure at #x7fae263f48d4
  11    (word-set!/immediate 8 1 6)     
  12    (scm-set!/immediate 8 2 10)     
  13    (static-ref 3 16067)            ;; #f                 at ice-9/boot-9.scm:2137:6
  15    (make-non-immediate 0 16067)    ;; #<procedure 7fae264041b8 at ice-9/ftw.scm:296:15 args>
  17    (mov 2 9)                                             at ice-9/ftw.scm:296:15
  18    (mov 1 8)                       
  19    (handle-interrupts)             
  20    (call-label 8 4 169)            ;; catch@@guile at #x7fae263f4964
  23    (receive 3 8 12)                
  25    (immediate-tag=? 8 3839 4)      ;; false?             at ice-9/ftw.scm:297:8
  27    (je 120)                        ;; -> L10
  28    (static-ref 3 16058)            ;; #f                 at ice-9/ftw.scm:299:30
  30    (mov 2 8)                                             at ice-9/ftw.scm:299:29
  31    (handle-interrupts)             
  32    (call-label 8 2 171)            ;; stat:type@guile at #x7fae263f499c
  35    (receive 5 8 12)                
  37    (static-ref 5 16025)            ;; symlink            at ice-9/ftw.scm:299:15
  39    (eq? 6 5)                       
  40    (jne 73)                        ;; -> L6
  41    (allocate-words/immediate 6 3)                        at ice-9/ftw.scm:300:31
  42    (word-set!/immediate 6 0 7)     
  43    (load-label 7 174)              ;; anonymous procedure at #x7fae263f49d4
  45    (word-set!/immediate 6 1 7)     
  46    (scm-set!/immediate 6 2 10)     
  47    (static-ref 4 16033)            ;; #f                 at ice-9/boot-9.scm:2137:6
  49    (make-non-immediate 1 16039)    ;; #<procedure 7fae264041d0 at ice-9/ftw.scm:300:31 args>
  51    (mov 3 9)                                             at ice-9/ftw.scm:300:31
  52    (mov 2 6)                       
  53    (handle-interrupts)             
  54    (call-label 7 4 135)            ;; catch@@guile at #x7fae263f4964
  57    (receive 1 7 12)                
  59    (immediate-tag=? 10 3839 4)     ;; false?             at ice-9/ftw.scm:301:17
  61    (je 47)                         ;; -> L5
  62    (scm-ref/immediate 9 11 5)      
  63    (immediate-tag=? 9 3839 4)      ;; false?             at ice-9/ftw.scm:303:24
  65    (jne 37)                        ;; -> L4
  66    (static-ref 6 16020)            ;; #f                 at ice-9/ftw.scm:289:35
  68    (mov 5 10)                                            at ice-9/ftw.scm:289:34
  69    (handle-interrupts)             
  70    (call-label 5 2 133)            ;; stat:type@guile at #x7fae263f499c
  73    (receive 2 5 12)                
  75    (static-ref 8 15957)            ;; directory          at ice-9/ftw.scm:290:28
  77    (eq? 9 8)                       
  78    (jne 16)                        ;; -> L2
  79    (scm-ref/immediate 6 11 2)      
  80    (mov 5 10)                                            at ice-9/ftw.scm:291:32
  81    (handle-interrupts)             
  82    (call 5 2)                      
  84    (receive 2 5 12)                
  86    (immediate-tag=? 9 3839 4)      ;; false?             at ice-9/ftw.scm:291:28
  88    (je 3)                          ;; -> L1
  89    (scm-ref/immediate 11 11 3)     
  90    (j 6)                           ;; -> L3
L1:
  91    (static-ref 11 16009)           ;; directory-not-readable at ice-9/ftw.scm:293:32
  93    (j 3)                           ;; -> L3
L2:
  94    (static-ref 11 16016)           ;; regular            at ice-9/ftw.scm:294:28
L3:
  96    (mov 9 10)                                            at ice-9/ftw.scm:306:24
  97    (mov 10 11)                     
  98    (mov 11 9)                      
  99    (reset-frame 2)                 ;; 2 slots
 100    (handle-interrupts)             
 101    (return-values)                 
L4:
 102    (static-ref 10 15960)           ;; symlink            at ice-9/ftw.scm:304:34
 104    (mov 11 8)                                            at ice-9/ftw.scm:304:24
 105    (reset-frame 2)                 ;; 2 slots
 106    (handle-interrupts)             
 107    (return-values)                 
L5:
 108    (scm-ref/immediate 10 11 4)     
 109    (mov 11 8)                                            at ice-9/ftw.scm:302:24
 110    (reset-frame 2)                 ;; 2 slots
 111    (handle-interrupts)             
 112    (return-values)                 
L6:
 113    (static-ref 4 15973)            ;; #f                 at ice-9/ftw.scm:289:35
 115    (mov 3 8)                                             at ice-9/ftw.scm:289:34
 116    (handle-interrupts)             
 117    (call-label 7 2 86)             ;; stat:type@guile at #x7fae263f499c
 120    (receive 1 7 12)                
 122    (static-ref 9 15910)            ;; directory          at ice-9/ftw.scm:290:28
 124    (eq? 10 9)                      
 125    (jne 16)                        ;; -> L8
 126    (scm-ref/immediate 4 11 2)      
 127    (mov 3 8)                                             at ice-9/ftw.scm:291:32
 128    (handle-interrupts)             
 129    (call 7 2)                      
 131    (receive 1 7 12)                
 133    (immediate-tag=? 10 3839 4)     ;; false?             at ice-9/ftw.scm:291:28
 135    (je 3)                          ;; -> L7
 136    (scm-ref/immediate 10 11 3)     
 137    (j 6)                           ;; -> L9
L7:
 138    (static-ref 10 15962)           ;; directory-not-readable at ice-9/ftw.scm:293:32
 140    (j 3)                           ;; -> L9
L8:
 141    (static-ref 10 15969)           ;; regular            at ice-9/ftw.scm:294:28
L9:
 143    (mov 11 8)                                            at ice-9/ftw.scm:307:20
 144    (reset-frame 2)                 ;; 2 slots
 145    (handle-interrupts)             
 146    (return-values)                 
L10:
 147    (static-ref 10 15973)           ;; invalid-stat       at ice-9/ftw.scm:298:25
 149    (mov 11 8)                                            at ice-9/ftw.scm:298:15
 150    (reset-frame 2)                 ;; 2 slots
 151    (handle-interrupts)             
 152    (return-values)                 

Disassembly of <unnamed function> at #x18d4:

   0    (instrument-entry 15977)                              at ice-9/ftw.scm:296:15
   2    (assert-nargs-ee/locals 1 2)    ;; 3 slots (0 args)
   3    (static-ref 1 15972)            ;; #f                 at ice-9/ftw.scm:296:36
   5    (scm-ref/immediate 2 2 2)       
   6    (mov 0 1)                                             at ice-9/ftw.scm:296:35
   7    (mov 1 2)                       
   8    (mov 2 0)                       
   9    (reset-frame 2)                 ;; 2 slots
  10    (handle-interrupts)             
  11    (tail-call-label 2)             ;; lstat@guile at #x7fae263f4908

Disassembly of lstat@guile at #x1908:

   0    (instrument-entry 15978)                              at ice-9/ftw.scm:296:35
   2    (immediate-tag=? 1 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 1 15073 15965 112);; lookup-bound-public
   9    (static-set! 1 15953)           ;; #f
L1:
  11    (scm-ref/immediate 1 1 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of <unnamed function> at #x1940:

   0    (instrument-entry 15970)                              at ice-9/ftw.scm:296:15
   2    (assert-nargs-ge 1)             
   3    (bind-rest 1)                   ;; 2 slots
   4    (alloc-frame 2)                 ;; 2 slots
   5    (make-immediate 1 4)            ;; #f                 at ice-9/boot-9.scm:2139:20
   6    (reset-frame 1)                 ;; 1 slot
   7    (handle-interrupts)             
   8    (return-values)                 

Disassembly of catch@@guile at #x1964:

   0    (instrument-entry 15975)                              at ice-9/boot-9.scm:2139:20
   2    (immediate-tag=? 3 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 3 15050 15962 113);; lookup-bound-private
   9    (static-set! 3 15882)           ;; #f
L1:
  11    (scm-ref/immediate 3 3 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of stat:type@guile at #x199c:

   0    (instrument-entry 15975)                              at ice-9/boot-9.scm:2139:20
   2    (immediate-tag=? 1 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 1 15036 15962 112);; lookup-bound-public
   9    (static-set! 1 15874)           ;; #f
L1:
  11    (scm-ref/immediate 1 1 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of <unnamed function> at #x19d4:

   0    (instrument-entry 15977)                              at ice-9/ftw.scm:300:31
   2    (assert-nargs-ee/locals 1 2)    ;; 3 slots (0 args)
   3    (static-ref 1 15964)            ;; #f                 at ice-9/ftw.scm:300:52
   5    (immediate-tag=? 1 7 0)         ;; heap-object?
   7    (je 7)                          ;; -> L1
   8    (call-scm<-scmn-scmn 1 15019 15961 112);; lookup-bound-public
  12    (static-set! 1 15955)           ;; #f
L1:
  14    (scm-ref/immediate 1 1 1)       
  15    (scm-ref/immediate 2 2 2)       
  16    (mov 0 1)                       
  17    (mov 1 2)                       
  18    (mov 2 0)                       
  19    (reset-frame 2)                 ;; 2 slots
  20    (handle-interrupts)             
  21    (tail-call)                     

Disassembly of <unnamed function> at #x1a2c:

   0    (instrument-entry 15961)                              at ice-9/ftw.scm:300:31
   2    (assert-nargs-ge 1)             
   3    (bind-rest 1)                   ;; 2 slots
   4    (alloc-frame 2)                 ;; 2 slots
   5    (make-immediate 1 4)            ;; #f                 at ice-9/boot-9.scm:2139:20
   6    (reset-frame 1)                 ;; 1 slot
   7    (handle-interrupts)             
   8    (return-values)                 

Disassembly of clean at #x1a50:

   0    (instrument-entry 15996)                              at ice-9/ftw.scm:309:0
   2    (assert-nargs-ee/locals 2 9)    ;; 11 slots (1 arg)
   3    (immediate-tag=? 9 7 0)         ;; heap-object?       at ice-9/ftw.scm:310:16
   5    (jne 59)                        ;; -> L6
   6    (heap-tag=? 9 127 21)           ;; string?
   8    (jne 56)                        ;; -> L6
   9    (word-ref/immediate 10 9 3)     
  10    (mov 8 10)                      
  11    (usub/immediate 8 8 1)                                at ice-9/ftw.scm:310:13
  12    (tag-fixnum 7 8)                
  13    (make-immediate 6 2)            ;; 0                  at ice-9/ftw.scm:311:13
  14    (imm-s64<? 8 0)                 
  15    (jnl 45)                        ;; -> L5
  16    (make-immediate 5 12044)        ;; #\/                at ice-9/ftw.scm:311:37
  17    (u64<? 8 10)                                          at ice-9/ftw.scm:311:41
  18    (jnl 40)                        ;; -> L4
  19    (word-ref/immediate 10 9 2)     
  20    (uadd 10 10 8)                  
  21    (scm-ref/immediate 8 9 1)       
  22    (tail-pointer-ref/immediate 4 8 2)
  23    (word-ref/immediate 3 8 0)      
  24    (load-u64 2 0 1024)             
  27    (ulogand 3 3 2)                 
  28    (s64-imm=? 3 0)                 
  29    (je 4)                          ;; -> L1
  30    (ulsh/immediate 10 10 2)        
  31    (u32-ref 10 4 10)               
  32    (j 2)                           ;; -> L2
L1:
  33    (u8-ref 10 4 10)                
L2:
  34    (tag-char 0 10)                 
  35    (static-ref 2 15923)            ;; #f                 at ice-9/ftw.scm:311:30
  37    (mov 1 5)                                             at ice-9/ftw.scm:311:29
  38    (handle-interrupts)             
  39    (call-label 8 3 27)             ;; char=?@guile at #x7fae263f4b58
  42    (receive 0 8 11)                
  44    (immediate-tag=? 10 3839 4)     ;; false?             at ice-9/ftw.scm:311:8
  46    (je 8)                          ;; -> L3
  47    (static-ref 10 15467)           ;; #f                 at ice-9/ftw.scm:312:7
  49    (mov 8 6)                                             at ice-9/ftw.scm:312:6
  50    (reset-frame 4)                 ;; 4 slots
  51    (handle-interrupts)             
  52    (tail-call-label -829)          ;; substring@guile at #x7fae263f3e2c
L3:
  54    (mov 10 9)                      
  55    (reset-frame 1)                 ;; 1 slot
  56    (handle-interrupts)             
  57    (return-values)                 
L4:
  58    (throw/value+data 7 15930)      ;; #(out-of-range string-ref "Argument 2 out of range: ~S") at ice-9/ftw.scm:311:41
L5:
  60    (mov 10 9)                      
  61    (reset-frame 1)                 ;; 1 slot
  62    (handle-interrupts)             
  63    (return-values)                 
L6:
  64    (throw/value+data 9 15468)      ;; #(wrong-type-arg "string-length" "Wrong type argument in position 1 (expect…") at ice-9/ftw.scm:310:16

Disassembly of char=?@guile at #x1b58:

   0    (instrument-entry 15944)                              at ice-9/ftw.scm:310:16
   2    (immediate-tag=? 2 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 2 14925 15931 112);; lookup-bound-public
   9    (static-set! 2 15883)           ;; #f
L1:
  11    (scm-ref/immediate 2 2 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of ftw at #x1b90:

   0    (instrument-entry 15978)                              at ice-9/ftw.scm:315:0
   2    (assert-nargs-ge 3)             
   3    (bind-rest 3)                   ;; 4 slots
   4    (alloc-frame 9)                 ;; 9 slots
   5    (static-ref 8 15939)            ;; hash-size          at ice-9/ftw.scm:316:47
   7    (static-ref 4 15669)            ;; #f                 at ice-9/ftw.scm:316:41
   9    (immediate-tag=? 4 7 0)         ;; heap-object?
  11    (je 7)                          ;; -> L1
  12    (call-scm<-scmn-scmn 4 14904 15666 113);; lookup-bound-private
  16    (static-set! 4 15660)           ;; #f
L1:
  18    (scm-ref/immediate 2 4 1)       
  19    (mov 1 8)                       
  20    (mov 0 5)                       
  21    (handle-interrupts)             
  22    (call 6 3)                      
  24    (receive 0 6 9)                 
  26    (immediate-tag=? 8 3839 4)      ;; false?             at ice-9/ftw.scm:316:34
  28    (je 20)                         ;; -> L4
  29    (immediate-tag=? 8 7 0)         ;; heap-object?
  31    (jne 15)                        ;; -> L3
  32    (heap-tag=? 8 1 0)              ;; pair?
  34    (jne 12)                        ;; -> L3
  35    (scm-ref/immediate 8 8 1)       
  36    (immediate-tag=? 8 7 0)         ;; heap-object?
  38    (jne 6)                         ;; -> L2
  39    (heap-tag=? 8 1 0)              ;; pair?
  41    (jne 3)                         ;; -> L2
  42    (scm-ref/immediate 2 8 0)       
  43    (j 6)                           ;; -> L5
L2:
  44    (throw/value+data 8 15910)      ;; #(wrong-type-arg "car" "Wrong type argument in position 1 (expecting pair):…")
L3:
  46    (throw/value+data 8 15380)      ;; #(wrong-type-arg "cdr" "Wrong type argument in position 1 (expecting pair):…")
L4:
  48    (make-immediate 2 846)          ;; 211                at ice-9/ftw.scm:317:46
L5:
  49    (handle-interrupts)                                   at ice-9/ftw.scm:316:19
  50    (call-label 6 1 -885)           ;; visited?-proc at #x7fae263f3e84
  53    (reset-frame 9)                 ;; 9 slots
  54    (mov 8 2)                       
  55    (make-immediate 2 3990)         ;; 997                at ice-9/ftw.scm:319:46
  56    (make-long-immediate 1 120002)  ;; 30000              at ice-9/ftw.scm:320:46
  58    (handle-interrupts)                                   at ice-9/ftw.scm:319:21
  59    (call-label 6 2 -653)           ;; stat-dir-readable?-proc at #x7fae263f4248
  62    (reset-frame 9)                 ;; 9 slots
  63    (mov 1 2)                       
  64    (make-immediate 2 4)            ;; #f
  65    (handle-interrupts)                                   at ice-9/ftw.scm:318:20
  66    (call-label 6 2 -471)           ;; stat&flag-proc at #x7fae263f453c
  69    (reset-frame 9)                 ;; 9 slots
  70    (mov 5 2)                       
  71    (allocate-words/immediate 4 4)                        at ice-9/ftw.scm:321:4
  72    (load-u64 3 0 781)              
  75    (word-set!/immediate 4 0 3)     
  76    (scm-set!/immediate 4 1 6)      
  77    (scm-set!/immediate 4 2 8)      
  78    (scm-set!/immediate 4 3 5)      
  79    (static-ref 8 15891)            ;; ftw-early-exit     at ice-9/ftw.scm:334:13
  81    (allocate-words/immediate 6 4)                        at ice-9/ftw.scm:335:13
  82    (load-u64 5 0 131141)           
  85    (word-set!/immediate 6 0 5)     
  86    (load-label 5 16)               ;; anonymous procedure at #x7fae263f4d28
  88    (word-set!/immediate 6 1 5)     
  89    (scm-set!/immediate 6 2 7)      
  90    (scm-set!/immediate 6 3 4)      
  91    (static-ref 7 15881)            ;; #f                 at ice-9/ftw.scm:334:7
  93    (make-non-immediate 5 15881)    ;; #<procedure 7fae26404528 at ice-9/ftw.scm:336:13 (key val)>
  95    (mov 4 7)                                             at ice-9/ftw.scm:334:6
  96    (mov 7 8)                       
  97    (mov 8 4)                       
  98    (reset-frame 4)                 ;; 4 slots
  99    (handle-interrupts)             
 100    (tail-call-label 189)           ;; catch@guile at #x7fae263f5014

Disassembly of <unnamed function> at #x1d28:

   0    (instrument-entry 15882)                              at ice-9/ftw.scm:335:13
   2    (assert-nargs-ee/locals 1 11)   ;; 12 slots (0 args)
   3    (scm-ref/immediate 10 11 2)     
   4    (immediate-tag=? 10 7 0)        ;; heap-object?       at ice-9/ftw.scm:310:16
   6    (jne 65)                        ;; -> L6
   7    (heap-tag=? 10 127 21)          ;; string?
   9    (jne 62)                        ;; -> L6
  10    (word-ref/immediate 9 10 3)     
  11    (mov 8 9)                       
  12    (usub/immediate 8 8 1)                                at ice-9/ftw.scm:310:13
  13    (tag-fixnum 7 8)                
  14    (make-immediate 6 2)            ;; 0                  at ice-9/ftw.scm:311:13
  15    (imm-s64<? 8 0)                 
  16    (jnl 50)                        ;; -> L5
  17    (make-immediate 5 12044)        ;; #\/                at ice-9/ftw.scm:311:37
  18    (u64<? 8 9)                                           at ice-9/ftw.scm:311:41
  19    (jnl 45)                        ;; -> L4
  20    (word-ref/immediate 9 10 2)     
  21    (uadd 9 9 8)                    
  22    (scm-ref/immediate 10 10 1)     
  23    (tail-pointer-ref/immediate 8 10 2)
  24    (word-ref/immediate 4 10 0)     
  25    (load-u64 3 0 1024)             
  28    (ulogand 4 4 3)                 
  29    (s64-imm=? 4 0)                 
  30    (je 4)                          ;; -> L1
  31    (ulsh/immediate 9 9 2)          
  32    (u32-ref 10 8 9)                
  33    (j 2)                           ;; -> L2
L1:
  34    (u8-ref 10 8 9)                 
L2:
  35    (tag-char 0 10)                 
  36    (static-ref 2 15740)            ;; #f                 at ice-9/ftw.scm:311:30
  38    (mov 1 5)                                             at ice-9/ftw.scm:311:29
  39    (handle-interrupts)             
  40    (call-label 9 3 -156)           ;; char=?@guile at #x7fae263f4b58
  43    (receive 1 9 12)                
  45    (immediate-tag=? 10 3839 4)     ;; false?             at ice-9/ftw.scm:311:8
  47    (je 15)                         ;; -> L3
  48    (static-ref 10 15284)           ;; #f                 at ice-9/ftw.scm:312:7
  50    (scm-ref/immediate 9 11 2)      
  51    (mov 4 7)                                             at ice-9/ftw.scm:312:6
  52    (mov 7 10)                      
  53    (mov 5 6)                       
  54    (mov 6 9)                       
  55    (handle-interrupts)             
  56    (call-label 4 4 -1015)          ;; substring@guile at #x7fae263f3e2c
  59    (receive 1 4 12)                
  61    (j 5)                           ;; -> L5
L3:
  62    (scm-ref/immediate 10 11 2)     
  63    (j 3)                           ;; -> L5
L4:
  64    (throw/value+data 7 15742)      ;; #(out-of-range string-ref "Argument 2 out of range: ~S") at ice-9/ftw.scm:311:41
L5:
  66    (scm-ref/immediate 11 11 3)     
  67    (reset-frame 2)                 ;; 2 slots            at ice-9/ftw.scm:335:24
  68    (handle-interrupts)             
  69    (tail-call-label 4)             ;; go at #x7fae263f4e4c
L6:
  71    (throw/value+data 10 15279)     ;; #(wrong-type-arg "string-length" "Wrong type argument in position 1 (expect…") at ice-9/ftw.scm:310:16

Disassembly of go at #x1e4c:

   0    (instrument-entry 15827)                              at ice-9/ftw.scm:321:17
   2    (alloc-frame 14)                ;; 14 slots
   3    (scm-ref/immediate 8 13 3)      
   4    (mov 7 12)                                            at ice-9/ftw.scm:322:48
   5    (handle-interrupts)             
   6    (call 5 2)                      
   8    (receive-values 5 #f 2)         
  10    (reset-frame 14)                ;; 14 slots
  11    (mov 11 8)                      
  12    (scm-ref/immediate 3 13 2)      
  13    (mov 2 11)                                            at ice-9/ftw.scm:324:27
  14    (mov 1 12)                      
  15    (handle-interrupts)             
  16    (call 10 3)                     
  18    (receive 3 10 14)               
  20    (immediate-tag=? 10 3839 4)     ;; false?             at ice-9/ftw.scm:324:23
  22    (jne 64)                        ;; -> L4
  23    (scm-ref/immediate 3 13 1)      
  24    (mov 2 12)                                            at ice-9/ftw.scm:325:38
  25    (mov 1 11)                      
  26    (mov 0 7)                       
  27    (handle-interrupts)             
  28    (call 10 4)                     
  30    (receive 2 10 14)               
  32    (eq-immediate? 11 1028)         ;; #t                 at ice-9/ftw.scm:326:33
  33    (jne 46)                        ;; -> L3
  34    (static-ref 11 15495)           ;; directory          at ice-9/ftw.scm:328:34
  36    (eq? 7 11)                      
  37    (jne 38)                        ;; -> L2
  38    (static-ref 11 15777)           ;; #f                 at ice-9/ftw.scm:329:35
  40    (immediate-tag=? 11 7 0)        ;; heap-object?
  42    (je 9)                          ;; -> L1
  43    (static-ref 11 14778)           ;; #f
  45    (static-ref 10 15780)           ;; for-each
  47    (call-scm<-scm-scm 11 11 10 111);; lookup-bound
  49    (static-set! 11 15766)          ;; #f
L1:
  51    (scm-ref/immediate 11 11 1)     
  52    (allocate-words/immediate 10 4)                       at ice-9/ftw.scm:330:35
  53    (load-u64 9 0 131141)           
  56    (word-set!/immediate 10 0 9)    
  57    (load-label 9 33)               ;; anonymous procedure at #x7fae263f4fb4
  59    (word-set!/immediate 10 1 9)    
  60    (scm-set!/immediate 10 2 13)    
  61    (scm-set!/immediate 10 3 12)    
  62    (mov 6 12)                                            at ice-9/ftw.scm:332:35
  63    (handle-interrupts)             
  64    (call-label 7 1 -1416)          ;; directory-files at #x7fae263f392c
  67    (reset-frame 14)                ;; 14 slots
  68    (mov 8 6)                       
  69    (mov 9 10)                                            at ice-9/ftw.scm:329:34
  70    (mov 10 11)                     
  71    (handle-interrupts)             
  72    (call 3 3)                      
  74    (reset-frame 14)                ;; 14 slots
L2:
  75    (make-immediate 13 1028)        ;; #t                 at ice-9/ftw.scm:333:29
  76    (reset-frame 1)                 ;; 1 slot
  77    (handle-interrupts)             
  78    (return-values)                 
L3:
  79    (static-ref 13 15716)           ;; ftw-early-exit     at ice-9/ftw.scm:327:40
  81    (make-immediate 12 772)         ;; ()                 at ice-9/ftw.scm:327:33
  82    (allocate-words/immediate 10 2) 
  83    (scm-set!/immediate 10 0 11)    
  84    (scm-set!/immediate 10 1 12)    
  85    (throw 13 10)                   
L4:
  86    (mov 13 10)                     
  87    (reset-frame 1)                 ;; 1 slot
  88    (handle-interrupts)             
  89    (return-values)                 

Disassembly of <unnamed function> at #x1fb4:

   0    (instrument-entry 15743)                              at ice-9/ftw.scm:330:35
   2    (assert-nargs-ee/locals 2 5)    ;; 7 slots (1 arg)
   3    (make-immediate 2 4)            ;; #f
   4    (scm-ref/immediate 1 6 3)       
   5    (mov 0 5)                                             at ice-9/ftw.scm:331:41
   6    (handle-interrupts)             
   7    (call-label 4 3 -1244)          ;; pathify at #x7fae263f3c60
  10    (receive 1 4 7)                 
  12    (scm-ref/immediate 6 6 2)       
  13    (reset-frame 2)                 ;; 2 slots            at ice-9/ftw.scm:331:37
  14    (handle-interrupts)             
  15    (tail-call-label -105)          ;; go at #x7fae263f4e4c

Disassembly of <unnamed function> at #x1ff8:

   0    (instrument-entry 15732)                              at ice-9/ftw.scm:336:13
   2    (assert-nargs-ee/locals 3 0)    ;; 3 slots (2 args)
   3    (mov 2 0)                       
   4    (reset-frame 1)                 ;; 1 slot
   5    (handle-interrupts)             
   6    (return-values)                 

Disassembly of catch@guile at #x2014:

   0    (instrument-entry 15731)                              at ice-9/ftw.scm:336:13
   2    (immediate-tag=? 3 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 3 14622 15534 112);; lookup-bound-public
   9    (static-set! 3 15674)           ;; #f
L1:
  11    (scm-ref/immediate 3 3 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of nftw at #x204c:

   0    (instrument-entry 15807)                              at ice-9/ftw.scm:338:0
   2    (assert-nargs-ge 3)             
   3    (bind-rest 3)                   ;; 4 slots
   4    (alloc-frame 18)                ;; 18 slots
   5    (static-ref 17 15718)           ;; #f                 at ice-9/ftw.scm:339:14
   7    (immediate-tag=? 17 7 0)        ;; heap-object?
   9    (je 7)                          ;; -> L1
  10    (call-scm<-scmn-scmn 17 14603 15715 112);; lookup-bound-public
  14    (static-set! 17 15709)          ;; #f
L1:
  16    (scm-ref/immediate 10 17 1)     
  17    (handle-interrupts)             
  18    (call 7 1)                      
  20    (receive 0 7 18)                
  22    (make-immediate 13 1028)        ;; #t                 at ice-9/boot-9.scm:2137:12
  23    (allocate-words/immediate 12 3)                       at ice-9/ftw.scm:340:24
  24    (load-u64 11 0 65605)           
  27    (word-set!/immediate 12 0 11)   
  28    (load-label 10 254)             ;; anonymous procedure at #x7fae263f54b4
  30    (word-set!/immediate 12 1 10)   
  31    (scm-set!/immediate 12 2 16)    
  32    (static-ref 7 15417)            ;; #f                 at ice-9/boot-9.scm:2137:6
  34    (make-non-immediate 4 15699)    ;; #<procedure 7fae26404620 at ice-9/ftw.scm:340:24 args>
  36    (mov 6 13)                                            at ice-9/ftw.scm:340:24
  37    (mov 5 12)                      
  38    (handle-interrupts)             
  39    (call-label 10 4 -481)          ;; catch@@guile at #x7fae263f4964
  42    (receive 4 10 18)               
  44    (immediate-tag=? 13 3839 4)     ;; false?             at ice-9/ftw.scm:341:17
  46    (je 11)                         ;; -> L2
  47    (static-ref 7 15172)            ;; #f                 at ice-9/ftw.scm:341:24
  49    (mov 6 13)                                            at ice-9/ftw.scm:341:23
  50    (handle-interrupts)             
  51    (call-label 10 2 -1027)         ;; stat:dev@guile at #x7fae263f410c
  54    (receive 4 10 18)               
  56    (j 2)                           ;; -> L3
L2:
  57    (make-immediate 13 65534)       ;; -1                 at ice-9/ftw.scm:341:36
L3:
  58    (static-ref 12 15687)           ;; mount              at ice-9/ftw.scm:342:30
  60    (static-ref 10 15313)           ;; #f                 at ice-9/ftw.scm:342:24
  62    (immediate-tag=? 10 7 0)        ;; heap-object?
  64    (je 7)                          ;; -> L4
  65    (call-scm<-scmn-scmn 10 14548 15310 113);; lookup-bound-private
  69    (static-set! 10 15304)          ;; #f
L4:
  71    (scm-ref/immediate 10 10 1)     
  72    (mov 6 10)                      
  73    (mov 5 12)                      
  74    (mov 4 14)                      
  75    (handle-interrupts)             
  76    (call 11 3)                     
  78    (receive 5 11 18)               
  80    (immediate-tag=? 12 3839 4)     ;; false?             at ice-9/ftw.scm:342:20
  82    (je 8)                          ;; -> L5
  83    (allocate-words/immediate 12 3)                       at ice-9/ftw.scm:343:24
  84    (word-set!/immediate 12 0 11)   
  85    (load-label 9 219)              ;; anonymous procedure at #x7fae263f550c
  87    (word-set!/immediate 12 1 9)    
  88    (scm-set!/immediate 12 2 13)    
  89    (j 3)                           ;; -> L6
L5:
  90    (make-non-immediate 12 15657)   ;; #<procedure 7fae26404658 at ice-9/ftw.scm:344:24 (s)> at ice-9/ftw.scm:344:24
L6:
  92    (static-ref 13 15667)           ;; chdir              at ice-9/ftw.scm:346:29
  94    (mov 6 10)                                            at ice-9/ftw.scm:346:23
  95    (mov 5 13)                      
  96    (mov 4 14)                      
  97    (handle-interrupts)             
  98    (call 11 3)                     
 100    (receive 8 11 18)               
 102    (immediate-tag=? 9 3839 4)      ;; false?             at ice-9/ftw.scm:346:19
 104    (je 32)                         ;; -> L9
 105    (static-ref 9 15656)            ;; #f                 at ice-9/ftw.scm:347:28
 107    (immediate-tag=? 9 7 0)         ;; heap-object?
 109    (je 7)                          ;; -> L7
 110    (call-scm<-scmn-scmn 9 14503 15653 112);; lookup-bound-public
 114    (static-set! 9 15647)           ;; #f
L7:
 116    (scm-ref/immediate 6 9 1)       
 117    (mov 5 16)                      
 118    (handle-interrupts)             
 119    (call 11 2)                     
 121    (receive 8 11 18)               
 123    (immediate-tag=? 9 3839 4)      ;; false?             at ice-9/ftw.scm:347:23
 125    (jne 8)                         ;; -> L8
 126    (allocate-words/immediate 9 3)                        at ice-9/ftw.scm:351:27
 127    (word-set!/immediate 9 0 11)    
 128    (load-label 8 206)              ;; anonymous procedure at #x7fae263f5584
 130    (word-set!/immediate 9 1 8)     
 131    (scm-set!/immediate 9 2 17)     
 132    (j 6)                           ;; -> L10
L8:
 133    (make-non-immediate 9 15638)    ;; #<procedure 7fae264046b8 at ice-9/ftw.scm:348:27 (fullname base)> at ice-9/ftw.scm:348:27
 135    (j 3)                           ;; -> L10
L9:
 136    (make-non-immediate 9 15639)    ;; #<procedure 7fae264046c8 at ice-9/ftw.scm:354:23 (fullname base)> at ice-9/ftw.scm:354:23
L10:
 138    (mov 5 10)                                            at ice-9/ftw.scm:355:28
 139    (mov 4 13)                      
 140    (mov 3 14)                      
 141    (handle-interrupts)             
 142    (call 12 3)                     
 144    (receive 4 12 18)               
 146    (immediate-tag=? 13 3839 4)     ;; false?             at ice-9/ftw.scm:355:24
 148    (je 8)                          ;; -> L11
 149    (allocate-words/immediate 13 3)                       at ice-9/ftw.scm:356:28
 150    (word-set!/immediate 13 0 11)   
 151    (load-label 11 267)             ;; anonymous procedure at #x7fae263f56d4
 153    (word-set!/immediate 13 1 11)   
 154    (scm-set!/immediate 13 2 17)    
 155    (j 3)                           ;; -> L12
L11:
 156    (make-non-immediate 13 15623)   ;; #<procedure 7fae264046d8 at ice-9/ftw.scm:357:28 ()> at ice-9/ftw.scm:357:28
L12:
 158    (static-ref 4 15213)            ;; depth              at ice-9/ftw.scm:358:29
 160    (mov 5 10)                                            at ice-9/ftw.scm:358:23
 161    (mov 3 14)                      
 162    (handle-interrupts)             
 163    (call 12 3)                     
 165    (receive 6 12 18)               
 167    (static-ref 4 15474)            ;; hash-size          at ice-9/ftw.scm:360:33
 169    (mov 5 10)                                            at ice-9/ftw.scm:360:27
 170    (mov 3 14)                      
 171    (handle-interrupts)             
 172    (call 12 3)                     
 174    (receive 7 12 18)               
 176    (immediate-tag=? 10 3839 4)     ;; false?             at ice-9/ftw.scm:360:20
 178    (je 20)                         ;; -> L15
 179    (immediate-tag=? 10 7 0)        ;; heap-object?
 181    (jne 15)                        ;; -> L14
 182    (heap-tag=? 10 1 0)             ;; pair?
 184    (jne 12)                        ;; -> L14
 185    (scm-ref/immediate 10 10 1)     
 186    (immediate-tag=? 10 7 0)        ;; heap-object?
 188    (jne 6)                         ;; -> L13
 189    (heap-tag=? 10 1 0)             ;; pair?
 191    (jne 3)                         ;; -> L13
 192    (scm-ref/immediate 5 10 0)      
 193    (j 6)                           ;; -> L16
L13:
 194    (throw/value+data 10 15457)     ;; #(wrong-type-arg "car" "Wrong type argument in position 1 (expecting pair):…")
L14:
 196    (throw/value+data 10 14927)     ;; #(wrong-type-arg "cdr" "Wrong type argument in position 1 (expecting pair):…")
L15:
 198    (make-immediate 5 846)          ;; 211                at ice-9/ftw.scm:361:32
L16:
 199    (handle-interrupts)                                   at ice-9/ftw.scm:359:19
 200    (call-label 12 1 -1338)         ;; visited?-proc at #x7fae263f3e84
 203    (reset-frame 18)                ;; 18 slots
 204    (mov 10 5)                      
 205    (immediate-tag=? 11 3839 4)     ;; false?             at ice-9/ftw.scm:362:20
 207    (je 4)                          ;; -> L17
 208    (make-non-immediate 8 15575)    ;; #<procedure 7fae264046e8 at ice-9/ftw.scm:363:24 (flag)> at ice-9/ftw.scm:363:24
 210    (j 3)                           ;; -> L18
L17:
 211    (make-non-immediate 8 15576)    ;; #<procedure 7fae264046f8 at ice-9/ftw.scm:364:24 (flag)> at ice-9/ftw.scm:364:24
L18:
 213    (make-immediate 4 3990)         ;; 997                at ice-9/ftw.scm:366:52
 214    (make-long-immediate 3 120002)  ;; 30000              at ice-9/ftw.scm:367:52
 216    (handle-interrupts)                                   at ice-9/ftw.scm:366:27
 217    (call-label 13 2 -1114)         ;; stat-dir-readable?-proc at #x7fae263f4248
 220    (reset-frame 18)                ;; 18 slots
 221    (mov 2 4)                       
 222    (static-ref 1 15189)            ;; nftw-style         at ice-9/ftw.scm:368:33
 224    (builtin-ref 4 0)               ;; apply              at ice-9/ftw.scm:365:20
 225    (make-non-immediate 3 14526)    ;; #<procedure stat&flag-proc (dir-readable? . control-flags)>
 227    (mov 0 14)                      
 228    (handle-interrupts)             
 229    (call 13 5)                     
 231    (receive 3 13 18)               
 233    (allocate-words/immediate 7 9)                        at ice-9/ftw.scm:369:4
 234    (load-u64 6 0 2061)             
 237    (word-set!/immediate 7 0 6)     
 238    (scm-set!/immediate 7 1 15)     
 239    (scm-set!/immediate 7 2 12)     
 240    (scm-set!/immediate 7 3 9)      
 241    (scm-set!/immediate 7 4 13)     
 242    (scm-set!/immediate 7 5 8)      
 243    (scm-set!/immediate 7 6 11)     
 244    (scm-set!/immediate 7 7 10)     
 245    (scm-set!/immediate 7 8 14)     
 246    (static-ref 15 15553)           ;; nftw-early-exit    at ice-9/ftw.scm:395:24
 248    (allocate-words/immediate 14 4)                       at ice-9/ftw.scm:396:24
 249    (load-u64 13 0 131141)          
 252    (word-set!/immediate 14 0 13)   
 253    (load-label 13 214)             ;; anonymous procedure at #x7fae263f5798
 255    (word-set!/immediate 14 1 13)   
 256    (scm-set!/immediate 14 2 16)    
 257    (scm-set!/immediate 14 3 7)     
 258    (static-ref 13 15411)           ;; #f                 at ice-9/ftw.scm:395:18
 260    (make-non-immediate 10 15541)   ;; #<procedure 7fae26404730 at ice-9/ftw.scm:397:24 (key val)>
 262    (mov 12 15)                                           at ice-9/ftw.scm:395:17
 263    (mov 11 14)                     
 264    (handle-interrupts)             
 265    (call-label 4 4 -279)           ;; catch@guile at #x7fae263f5014
 268    (receive 1 4 18)                
 270    (static-ref 12 15535)           ;; #f                 at ice-9/ftw.scm:398:9
 272    (mov 11 17)                                           at ice-9/ftw.scm:398:8
 273    (handle-interrupts)             
 274    (call-label 5 2 90)             ;; chdir@guile at #x7fae263f55fc
 277    (reset-frame 18)                ;; 18 slots
 278    (mov 17 16)                     
 279    (reset-frame 1)                 ;; 1 slot
 280    (handle-interrupts)             
 281    (return-values)                 

Disassembly of <unnamed function> at #x24b4:

   0    (instrument-entry 15531)                              at ice-9/ftw.scm:340:24
   2    (assert-nargs-ee/locals 1 2)    ;; 3 slots (0 args)
   3    (static-ref 1 15212)            ;; #f                 at ice-9/ftw.scm:340:45
   5    (scm-ref/immediate 2 2 2)       
   6    (mov 0 1)                                             at ice-9/ftw.scm:340:44
   7    (mov 1 2)                       
   8    (mov 2 0)                       
   9    (reset-frame 2)                 ;; 2 slots
  10    (handle-interrupts)             
  11    (tail-call-label -758)          ;; lstat@guile at #x7fae263f4908

Disassembly of <unnamed function> at #x24e8:

   0    (instrument-entry 15524)                              at ice-9/ftw.scm:340:24
   2    (assert-nargs-ge 1)             
   3    (bind-rest 1)                   ;; 2 slots
   4    (alloc-frame 2)                 ;; 2 slots
   5    (make-immediate 1 4)            ;; #f                 at ice-9/boot-9.scm:2139:20
   6    (reset-frame 1)                 ;; 1 slot
   7    (handle-interrupts)             
   8    (return-values)                 

Disassembly of <unnamed function> at #x250c:

   0    (instrument-entry 15521)                              at ice-9/ftw.scm:343:24
   2    (assert-nargs-ee/locals 2 4)    ;; 6 slots (1 arg)
   3    (static-ref 1 14912)            ;; #f                 at ice-9/ftw.scm:343:40
   5    (mov 0 4)                                             at ice-9/ftw.scm:343:39
   6    (handle-interrupts)             
   7    (call-label 4 2 -1287)          ;; stat:dev@guile at #x7fae263f410c
  10    (receive 1 4 6)                 
  12    (scm-ref/immediate 5 5 2)       
  13    (=? 4 5)                                              at ice-9/ftw.scm:343:36
  14    (jne 5)                         ;; -> L1
  15    (make-immediate 5 1028)         ;; #t
  16    (reset-frame 1)                 ;; 1 slot
  17    (handle-interrupts)             
  18    (return-values)                 
L1:
  19    (make-immediate 5 4)            ;; #f
  20    (reset-frame 1)                 ;; 1 slot
  21    (handle-interrupts)             
  22    (return-values)                 

Disassembly of <unnamed function> at #x2568:

   0    (instrument-entry 15504)                              at ice-9/ftw.scm:344:24
   2    (assert-nargs-ee/locals 2 0)    ;; 2 slots (1 arg)
   3    (make-immediate 1 1028)         ;; #t                 at ice-9/ftw.scm:344:36
   4    (reset-frame 1)                 ;; 1 slot
   5    (handle-interrupts)             
   6    (return-values)                 

Disassembly of <unnamed function> at #x2584:

   0    (instrument-entry 15503)                              at ice-9/ftw.scm:351:27
   2    (assert-nargs-ee/locals 3 5)    ;; 8 slots (2 args)
   3    (make-immediate 1 2)            ;; 0                  at ice-9/ftw.scm:345:55
   4    (static-ref 3 14793)            ;; #f                 at ice-9/ftw.scm:345:40
   6    (mov 2 6)                                             at ice-9/ftw.scm:345:39
   7    (mov 0 5)                       
   8    (handle-interrupts)             
   9    (call-label 4 4 -1503)          ;; substring@guile at #x7fae263f3e2c
  12    (receive 1 4 8)                 
  14    (make-immediate 5 4)            ;; #f
  15    (scm-ref/immediate 3 7 2)       
  16    (mov 4 5)                                             at ice-9/ftw.scm:353:30
  17    (mov 2 6)                       
  18    (handle-interrupts)             
  19    (call-label 3 3 -1628)          ;; pathify at #x7fae263f3c60
  22    (receive 1 3 8)                 
  24    (static-ref 7 15447)            ;; #f                 at ice-9/ftw.scm:352:30
  26    (reset-frame 2)                 ;; 2 slots            at ice-9/ftw.scm:352:29
  27    (handle-interrupts)             
  28    (tail-call-label 2)             ;; chdir@guile at #x7fae263f55fc

Disassembly of chdir@guile at #x25fc:

   0    (instrument-entry 15479)                              at ice-9/ftw.scm:352:29
   2    (immediate-tag=? 1 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 1 14244 15382 112);; lookup-bound-public
   9    (static-set! 1 15432)           ;; #f
L1:
  11    (scm-ref/immediate 1 1 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of <unnamed function> at #x2634:

   0    (instrument-entry 15471)                              at ice-9/ftw.scm:348:27
   2    (assert-nargs-ee/locals 3 4)    ;; 7 slots (2 args)
   3    (make-immediate 6 2)            ;; 0                  at ice-9/ftw.scm:349:36
   4    (=? 6 4)                                              at ice-9/ftw.scm:349:33
   5    (jne 3)                         ;; -> L1
   6    (make-immediate 3 1028)         ;; #t
   7    (j 2)                           ;; -> L2
L1:
   8    (make-immediate 3 4)            ;; #f
L2:
   9    (immediate-tag=? 3 3839 4)      ;; false?             at ice-9/ftw.scm:349:29
  11    (jne 18)                        ;; -> L3
  12    (static-ref 3 14741)            ;; #f                 at ice-9/ftw.scm:345:40
  14    (mov 2 5)                                             at ice-9/ftw.scm:345:39
  15    (mov 1 6)                       
  16    (mov 0 4)                       
  17    (handle-interrupts)             
  18    (call-label 3 4 -1556)          ;; substring@guile at #x7fae263f3e2c
  21    (receive 1 3 7)                 
  23    (static-ref 6 15404)            ;; #f                 at ice-9/ftw.scm:350:34
  25    (reset-frame 2)                 ;; 2 slots            at ice-9/ftw.scm:350:33
  26    (handle-interrupts)             
  27    (tail-call-label -41)           ;; chdir@guile at #x7fae263f55fc
L3:
  29    (mov 6 3)                       
  30    (reset-frame 1)                 ;; 1 slot
  31    (handle-interrupts)             
  32    (return-values)                 

Disassembly of <unnamed function> at #x26b8:

   0    (instrument-entry 15444)                              at ice-9/ftw.scm:354:23
   2    (assert-nargs-ee/locals 3 0)    ;; 3 slots (2 args)
   3    (make-immediate 2 1028)         ;; #t                 at ice-9/ftw.scm:354:47
   4    (reset-frame 1)                 ;; 1 slot
   5    (handle-interrupts)             
   6    (return-values)                 

Disassembly of <unnamed function> at #x26d4:

   0    (instrument-entry 15443)                              at ice-9/ftw.scm:356:28
   2    (assert-nargs-ee/locals 1 2)    ;; 3 slots (0 args)
   3    (static-ref 1 15384)            ;; #f                 at ice-9/ftw.scm:356:40
   5    (scm-ref/immediate 2 2 2)       
   6    (mov 0 1)                                             at ice-9/ftw.scm:356:39
   7    (mov 1 2)                       
   8    (mov 2 0)                       
   9    (reset-frame 2)                 ;; 2 slots
  10    (handle-interrupts)             
  11    (tail-call-label -65)           ;; chdir@guile at #x7fae263f55fc

Disassembly of <unnamed function> at #x2708:

   0    (instrument-entry 15436)                              at ice-9/ftw.scm:357:28
   2    (assert-nargs-ee/locals 1 0)    ;; 1 slot (0 args)
   3    (make-immediate 0 1028)         ;; #t                 at ice-9/ftw.scm:357:39
   4    (handle-interrupts)             
   5    (return-values)                 

Disassembly of <unnamed function> at #x2720:

   0    (instrument-entry 15436)                              at ice-9/ftw.scm:363:24
   2    (assert-nargs-ee/locals 2 0)    ;; 2 slots (1 arg)
   3    (static-ref 1 14951)            ;; directory-processed at ice-9/ftw.scm:363:39
   5    (eq? 0 1)                       
   6    (jne 5)                         ;; -> L1
   7    (make-immediate 1 1028)         ;; #t
   8    (reset-frame 1)                 ;; 1 slot
   9    (handle-interrupts)             
  10    (return-values)                 
L1:
  11    (make-immediate 1 4)            ;; #f
  12    (reset-frame 1)                 ;; 1 slot
  13    (handle-interrupts)             
  14    (return-values)                 

Disassembly of <unnamed function> at #x275c:

   0    (instrument-entry 15427)                              at ice-9/ftw.scm:364:24
   2    (assert-nargs-ee/locals 2 0)    ;; 2 slots (1 arg)
   3    (static-ref 1 14946)            ;; directory          at ice-9/ftw.scm:364:39
   5    (eq? 0 1)                       
   6    (jne 5)                         ;; -> L1
   7    (make-immediate 1 1028)         ;; #t
   8    (reset-frame 1)                 ;; 1 slot
   9    (handle-interrupts)             
  10    (return-values)                 
L1:
  11    (make-immediate 1 4)            ;; #f
  12    (reset-frame 1)                 ;; 1 slot
  13    (handle-interrupts)             
  14    (return-values)                 

Disassembly of <unnamed function> at #x2798:

   0    (instrument-entry 15418)                              at ice-9/ftw.scm:396:24
   2    (assert-nargs-ee/locals 1 12)   ;; 13 slots (0 args)
   3    (scm-ref/immediate 11 12 2)     
   4    (immediate-tag=? 11 7 0)        ;; heap-object?       at ice-9/ftw.scm:310:16
   6    (jne 65)                        ;; -> L6
   7    (heap-tag=? 11 127 21)          ;; string?
   9    (jne 62)                        ;; -> L6
  10    (word-ref/immediate 10 11 3)    
  11    (mov 9 10)                      
  12    (usub/immediate 9 9 1)                                at ice-9/ftw.scm:310:13
  13    (tag-fixnum 8 9)                
  14    (make-immediate 7 2)            ;; 0                  at ice-9/ftw.scm:311:13
  15    (imm-s64<? 9 0)                 
  16    (jnl 48)                        ;; -> L5
  17    (make-immediate 6 12044)        ;; #\/                at ice-9/ftw.scm:311:37
  18    (u64<? 9 10)                                          at ice-9/ftw.scm:311:41
  19    (jnl 43)                        ;; -> L4
  20    (word-ref/immediate 10 11 2)    
  21    (uadd 10 10 9)                  
  22    (scm-ref/immediate 11 11 1)     
  23    (tail-pointer-ref/immediate 9 11 2)
  24    (word-ref/immediate 5 11 0)     
  25    (load-u64 4 0 1024)             
  28    (ulogand 5 5 4)                 
  29    (s64-imm=? 5 0)                 
  30    (je 4)                          ;; -> L1
  31    (ulsh/immediate 10 10 2)        
  32    (u32-ref 11 9 10)               
  33    (j 2)                           ;; -> L2
L1:
  34    (u8-ref 11 9 10)                
L2:
  35    (tag-char 1 11)                 
  36    (static-ref 3 15072)            ;; #f                 at ice-9/ftw.scm:311:30
  38    (mov 2 6)                                             at ice-9/ftw.scm:311:29
  39    (handle-interrupts)             
  40    (call-label 9 3 -824)           ;; char=?@guile at #x7fae263f4b58
  43    (receive 1 9 13)                
  45    (immediate-tag=? 11 3839 4)     ;; false?             at ice-9/ftw.scm:311:8
  47    (je 13)                         ;; -> L3
  48    (static-ref 3 14616)            ;; #f                 at ice-9/ftw.scm:312:7
  50    (scm-ref/immediate 2 12 2)      
  51    (mov 1 7)                                             at ice-9/ftw.scm:312:6
  52    (mov 0 8)                       
  53    (handle-interrupts)             
  54    (call-label 9 4 -1681)          ;; substring@guile at #x7fae263f3e2c
  57    (receive 1 9 13)                
  59    (j 5)                           ;; -> L5
L3:
  60    (scm-ref/immediate 11 12 2)     
  61    (j 3)                           ;; -> L5
L4:
  62    (throw/value+data 8 15076)      ;; #(out-of-range string-ref "Argument 2 out of range: ~S") at ice-9/ftw.scm:311:41
L5:
  64    (scm-ref/immediate 12 12 3)     
  65    (mov 10 7)                                            at ice-9/ftw.scm:396:35
  66    (mov 9 7)                       
  67    (reset-frame 4)                 ;; 4 slots
  68    (handle-interrupts)             
  69    (tail-call-label 4)             ;; go at #x7fae263f58bc
L6:
  71    (throw/value+data 11 14611)     ;; #(wrong-type-arg "string-length" "Wrong type argument in position 1 (expect…") at ice-9/ftw.scm:310:16

Disassembly of go at #x28bc:

   0    (instrument-entry 15351)                              at ice-9/ftw.scm:369:17
   2    (alloc-frame 18)                ;; 18 slots
   3    (scm-ref/immediate 10 17 8)     
   4    (mov 9 16)                                            at ice-9/ftw.scm:370:48
   5    (handle-interrupts)             
   6    (call 7 2)                      
   8    (receive-values 7 #f 2)         
  10    (reset-frame 18)                ;; 18 slots
  11    (mov 13 10)                     
  12    (scm-ref/immediate 5 17 7)      
  13    (mov 4 13)                                            at ice-9/ftw.scm:389:29
  14    (mov 3 16)                      
  15    (handle-interrupts)             
  16    (call 12 3)                     
  18    (receive 5 12 18)               
  20    (immediate-tag=? 12 3839 4)     ;; false?             at ice-9/ftw.scm:389:25
  22    (jne 175)                       ;; -> L6
  23    (scm-ref/immediate 5 17 2)      
  24    (mov 4 13)                                            at ice-9/ftw.scm:390:34
  25    (handle-interrupts)             
  26    (call 12 2)                     
  28    (receive 5 12 18)               
  30    (immediate-tag=? 12 3839 4)     ;; false?             at ice-9/ftw.scm:390:29
  32    (je 165)                        ;; -> L6
  33    (scm-ref/immediate 12 17 6)     
  34    (immediate-tag=? 12 3839 4)     ;; false?             at ice-9/ftw.scm:391:29
  36    (je 82)                         ;; -> L3
  37    (scm-ref/immediate 5 17 5)      
  38    (mov 4 9)                                             at ice-9/ftw.scm:381:45
  39    (handle-interrupts)             
  40    (call 12 2)                     
  42    (receive 5 12 18)               
  44    (immediate-tag=? 12 3839 4)     ;; false?             at ice-9/ftw.scm:381:40
  46    (je 39)                         ;; -> L2
  47    (static-ref 12 15100)           ;; #f                 at ice-9/ftw.scm:382:46
  49    (immediate-tag=? 12 7 0)        ;; heap-object?
  51    (je 9)                          ;; -> L1
  52    (static-ref 12 14101)           ;; #f
  54    (static-ref 11 15103)           ;; for-each
  56    (call-scm<-scm-scm 12 12 11 111);; lookup-bound
  58    (static-set! 12 15089)          ;; #f
L1:
  60    (scm-ref/immediate 12 12 1)     
  61    (allocate-words/immediate 11 5)                       at ice-9/ftw.scm:383:46
  62    (load-u64 10 0 196677)          
  65    (word-set!/immediate 11 0 10)   
  66    (load-label 10 135)             ;; anonymous procedure at #x7fae263f5be0
  68    (word-set!/immediate 11 1 10)   
  69    (scm-set!/immediate 11 2 17)    
  70    (scm-set!/immediate 11 3 16)    
  71    (scm-set!/immediate 11 4 14)    
  72    (mov 5 16)                                            at ice-9/ftw.scm:388:46
  73    (handle-interrupts)             
  74    (call-label 12 1 -2094)         ;; directory-files at #x7fae263f392c
  77    (reset-frame 18)                ;; 18 slots
  78    (mov 3 5)                       
  79    (mov 5 12)                                            at ice-9/ftw.scm:382:45
  80    (mov 4 11)                      
  81    (handle-interrupts)             
  82    (call 12 3)                     
  84    (reset-frame 18)                ;; 18 slots
L2:
  85    (scm-ref/immediate 5 17 3)      
  86    (mov 4 16)                                            at ice-9/ftw.scm:373:40
  87    (mov 3 15)                      
  88    (handle-interrupts)             
  89    (call 12 3)                     
  91    (reset-frame 18)                ;; 18 slots
  92    (scm-ref/immediate 12 17 1)     
  93    (mov 11 13)                                           at ice-9/ftw.scm:375:51
  94    (mov 13 12)                     
  95    (mov 12 16)                     
  96    (mov 10 9)                      
  97    (mov 9 15)                      
  98    (mov 8 14)                      
  99    (handle-interrupts)             
 100    (call 4 6)                      
 102    (receive 1 4 18)                
 104    (scm-ref/immediate 12 17 4)     
 105    (handle-interrupts)                                   at ice-9/ftw.scm:377:42
 106    (call 5 1)                      
 108    (reset-frame 18)                ;; 18 slots
 109    (eq-immediate? 16 1028)         ;; #t                 at ice-9/ftw.scm:378:46
 110    (je 87)                         ;; -> L6
 111    (static-ref 17 15148)           ;; nftw-early-exit    at ice-9/ftw.scm:379:53
 113    (make-immediate 15 772)         ;; ()                 at ice-9/ftw.scm:379:46
 114    (allocate-words/immediate 14 2) 
 115    (scm-set!/immediate 14 0 16)    
 116    (scm-set!/immediate 14 1 15)    
 117    (throw 17 14)                   
L3:
 118    (scm-ref/immediate 5 17 3)      
 119    (mov 4 16)                                            at ice-9/ftw.scm:373:40
 120    (mov 3 15)                      
 121    (handle-interrupts)             
 122    (call 12 3)                     
 124    (reset-frame 18)                ;; 18 slots
 125    (scm-ref/immediate 5 17 1)      
 126    (mov 4 16)                                            at ice-9/ftw.scm:375:51
 127    (mov 3 13)                      
 128    (mov 2 9)                       
 129    (mov 1 15)                      
 130    (mov 0 14)                      
 131    (handle-interrupts)             
 132    (call 12 6)                     
 134    (receive 2 12 18)               
 136    (scm-ref/immediate 5 17 4)      
 137    (handle-interrupts)                                   at ice-9/ftw.scm:377:42
 138    (call 12 1)                     
 140    (reset-frame 18)                ;; 18 slots
 141    (eq-immediate? 15 1028)         ;; #t                 at ice-9/ftw.scm:378:46
 142    (jne 48)                        ;; -> L5
 143    (scm-ref/immediate 10 17 5)     
 144    (handle-interrupts)                                   at ice-9/ftw.scm:381:45
 145    (call 7 2)                      
 147    (receive 2 7 18)                
 149    (immediate-tag=? 15 3839 4)     ;; false?             at ice-9/ftw.scm:381:40
 151    (je 46)                         ;; -> L6
 152    (static-ref 15 14995)           ;; #f                 at ice-9/ftw.scm:382:46
 154    (immediate-tag=? 15 7 0)        ;; heap-object?
 156    (je 9)                          ;; -> L4
 157    (static-ref 15 13996)           ;; #f
 159    (static-ref 13 14998)           ;; for-each
 161    (call-scm<-scm-scm 15 15 13 111);; lookup-bound
 163    (static-set! 15 14984)          ;; #f
L4:
 165    (scm-ref/immediate 15 15 1)     
 166    (allocate-words/immediate 13 5)                       at ice-9/ftw.scm:383:46
 167    (load-u64 12 0 196677)          
 170    (word-set!/immediate 13 0 12)   
 171    (load-label 12 62)              ;; anonymous procedure at #x7fae263f5c60
 173    (word-set!/immediate 13 1 12)   
 174    (scm-set!/immediate 13 2 17)    
 175    (scm-set!/immediate 13 3 16)    
 176    (scm-set!/immediate 13 4 14)    
 177    (mov 9 16)                                            at ice-9/ftw.scm:388:46
 178    (handle-interrupts)             
 179    (call-label 8 1 -2199)          ;; directory-files at #x7fae263f392c
 182    (reset-frame 18)                ;; 18 slots
 183    (mov 12 9)                      
 184    (mov 14 15)                                           at ice-9/ftw.scm:382:45
 185    (handle-interrupts)             
 186    (call 3 3)                      
 188    (reset-frame 18)                ;; 18 slots
 189    (j 8)                           ;; -> L6
L5:
 190    (static-ref 17 15069)           ;; nftw-early-exit    at ice-9/ftw.scm:379:53
 192    (make-immediate 16 772)         ;; ()                 at ice-9/ftw.scm:379:46
 193    (allocate-words/immediate 14 2) 
 194    (scm-set!/immediate 14 0 15)    
 195    (scm-set!/immediate 14 1 16)    
 196    (throw 17 14)                   
L6:
 197    (make-immediate 17 1028)        ;; #t                 at ice-9/ftw.scm:394:19
 198    (reset-frame 1)                 ;; 1 slot
 199    (handle-interrupts)             
 200    (return-values)                 

Disassembly of <unnamed function> at #x2be0:

   0    (instrument-entry 15156)                              at ice-9/ftw.scm:383:46
   2    (assert-nargs-ee/locals 2 5)    ;; 7 slots (1 arg)
   3    (make-immediate 2 4)            ;; #f
   4    (scm-ref/immediate 1 6 3)       
   5    (mov 0 5)                                             at ice-9/ftw.scm:384:52
   6    (handle-interrupts)             
   7    (call-label 4 3 -2023)          ;; pathify at #x7fae263f3c60
  10    (receive 1 4 7)                 
  12    (scm-ref/immediate 4 6 3)       
  13    (immediate-tag=? 4 7 0)         ;; heap-object?       at ice-9/ftw.scm:385:56
  15    (jne 15)                        ;; -> L1
  16    (heap-tag=? 4 127 21)           ;; string?
  18    (jne 12)                        ;; -> L1
  19    (word-ref/immediate 4 4 3)      
  20    (uadd/immediate 4 4 1)                                at ice-9/ftw.scm:385:52
  21    (tag-fixnum 4 4)                
  22    (scm-ref/immediate 3 6 4)       
  23    (call-scm<-scm-uimm 3 3 1 1)    ;; add/immediate      at ice-9/ftw.scm:387:52
  25    (scm-ref/immediate 6 6 2)       
  26    (reset-frame 4)                 ;; 4 slots            at ice-9/ftw.scm:384:48
  27    (handle-interrupts)             
  28    (tail-call-label -229)          ;; go at #x7fae263f58bc
L1:
  30    (throw/value+data 4 14378)      ;; #(wrong-type-arg "string-length" "Wrong type argument in position 1 (expect…") at ice-9/ftw.scm:385:56

Disassembly of <unnamed function> at #x2c60:

   0    (instrument-entry 15130)                              at ice-9/ftw.scm:383:46
   2    (assert-nargs-ee/locals 2 5)    ;; 7 slots (1 arg)
   3    (make-immediate 2 4)            ;; #f
   4    (scm-ref/immediate 1 6 3)       
   5    (mov 0 5)                                             at ice-9/ftw.scm:384:52
   6    (handle-interrupts)             
   7    (call-label 4 3 -2055)          ;; pathify at #x7fae263f3c60
  10    (receive 1 4 7)                 
  12    (scm-ref/immediate 4 6 3)       
  13    (immediate-tag=? 4 7 0)         ;; heap-object?       at ice-9/ftw.scm:385:56
  15    (jne 15)                        ;; -> L1
  16    (heap-tag=? 4 127 21)           ;; string?
  18    (jne 12)                        ;; -> L1
  19    (word-ref/immediate 4 4 3)      
  20    (uadd/immediate 4 4 1)                                at ice-9/ftw.scm:385:52
  21    (tag-fixnum 4 4)                
  22    (scm-ref/immediate 3 6 4)       
  23    (call-scm<-scm-uimm 3 3 1 1)    ;; add/immediate      at ice-9/ftw.scm:387:52
  25    (scm-ref/immediate 6 6 2)       
  26    (reset-frame 4)                 ;; 4 slots            at ice-9/ftw.scm:384:48
  27    (handle-interrupts)             
  28    (tail-call-label -261)          ;; go at #x7fae263f58bc
L1:
  30    (throw/value+data 4 14346)      ;; #(wrong-type-arg "string-length" "Wrong type argument in position 1 (expect…") at ice-9/ftw.scm:385:56

Disassembly of <unnamed function> at #x2ce0:

   0    (instrument-entry 15104)                              at ice-9/ftw.scm:397:24
   2    (assert-nargs-ee/locals 3 0)    ;; 3 slots (2 args)
   3    (mov 2 0)                       
   4    (reset-frame 1)                 ;; 1 slot
   5    (handle-interrupts)             
   6    (return-values)                 

Disassembly of <unnamed function> at #x2cfc:

   0    (instrument-entry 15115)                              at ice-9/ftw.scm:406:0
   2    (assert-nargs-ee/locals 2 6)    ;; 8 slots (1 arg)
   3    (make-non-immediate 7 15104)    ;; (any any)
   5    (static-ref 5 14016)            ;; #f
   7    (immediate-tag=? 5 7 0)         ;; heap-object?
   9    (je 7)                          ;; -> L1
  10    (call-scm<-scmn-scmn 5 13791 14013 113);; lookup-bound-private
  14    (static-set! 5 14007)           ;; #f
L1:
  16    (scm-ref/immediate 2 5 1)       
  17    (mov 1 6)                       
  18    (mov 0 7)                       
  19    (handle-interrupts)             
  20    (call 5 3)                      
  22    (receive 0 5 8)                 
  24    (immediate-tag=? 7 3839 4)      ;; false?
  26    (jne 23)                        ;; -> L3
  27    (make-immediate 7 4)            ;; #f
  28    (make-non-immediate 5 14003)    ;; "source expression failed to match any pattern"
  30    (static-ref 4 14009)            ;; #f
  32    (immediate-tag=? 4 7 0)         ;; heap-object?
  34    (je 7)                          ;; -> L2
  35    (call-scm<-scmn-scmn 4 13766 14006 113);; lookup-bound-private
  39    (static-set! 4 14000)           ;; #f
L2:
  41    (scm-ref/immediate 4 4 1)       
  42    (mov 3 4)                       
  43    (mov 4 6)                       
  44    (mov 6 7)                       
  45    (mov 7 3)                       
  46    (reset-frame 4)                 ;; 4 slots
  47    (handle-interrupts)             
  48    (tail-call)                     
L3:
  49    (builtin-ref 6 0)               ;; apply
  50    (make-non-immediate 5 15061)    ;; #<procedure 7fae26404918 at ice-9/ftw.scm:406:0 (dummy expr)>
  52    (mov 4 6)                       
  53    (mov 6 5)                       
  54    (mov 5 7)                       
  55    (mov 7 4)                       
  56    (reset-frame 3)                 ;; 3 slots
  57    (handle-interrupts)             
  58    (tail-call)                     

Disassembly of <unnamed function> at #x2de8:

   0    (instrument-entry 15472)                              at ice-9/ftw.scm:406:0
   2    (assert-nargs-ee/locals 3 3)    ;; 6 slots (2 args)
   3    (make-non-immediate 5 15295)    ;; #<syntax:ftw.scm:407:3 catch>
   5    (make-non-immediate 4 15355)    ;; (#<syntax quote> #<syntax:ftw.scm:407:10 system-error>)
   7    (make-non-immediate 2 15375)    ;; #<syntax:ftw.scm:408:5 lambda>
   9    (make-immediate 1 772)          ;; ()
  10    (allocate-words/immediate 0 2)  
  11    (scm-set!/immediate 0 0 3)      
  12    (scm-set!/immediate 0 1 1)      
  13    (allocate-words/immediate 3 2)  
  14    (scm-set!/immediate 3 0 1)      
  15    (scm-set!/immediate 3 1 0)      
  16    (allocate-words/immediate 1 2)  
  17    (scm-set!/immediate 1 0 2)      
  18    (scm-set!/immediate 1 1 3)      
  19    (make-non-immediate 3 15449)    ;; ((#<syntax:ftw.scm:408:5 lambda> #<syntax:ftw.scm:410:12 args> (#<synta…> …)))
  21    (allocate-words/immediate 2 2)  
  22    (scm-set!/immediate 2 0 1)      
  23    (scm-set!/immediate 2 1 3)      
  24    (allocate-words/immediate 3 2)  
  25    (scm-set!/immediate 3 0 4)      
  26    (scm-set!/immediate 3 1 2)      
  27    (allocate-words/immediate 4 2)  
  28    (scm-set!/immediate 4 0 5)      
  29    (scm-set!/immediate 4 1 3)      
  30    (mov 5 4)                       
  31    (reset-frame 1)                 ;; 1 slot
  32    (handle-interrupts)             
  33    (return-values)                 

Disassembly of file-system-fold at #x2e70:

   0    (instrument-entry 15460)                              at ice-9/ftw.scm:413:0
   2    (assert-nargs-ge 9)             
   3    (assert-nargs-le 10)            
   4    (bind-optionals 10)             ;; 9 argss
   5    (alloc-frame 16)                ;; 16 slots
   6    (immediate-tag=? 6 4095 2308)   ;; undefined?         at ice-9/ftw.scm:414:44
   8    (jne 13)                        ;; -> L2
   9    (static-ref 15 15435)           ;; #f
  11    (immediate-tag=? 15 7 0)        ;; heap-object?
  13    (je 7)                          ;; -> L1
  14    (call-scm<-scmn-scmn 15 13694 14586 112);; lookup-bound-public
  18    (static-set! 15 15426)          ;; #f
L1:
  20    (scm-ref/immediate 6 15 1)      
L2:
  21    (allocate-words/immediate 15 8)                       at ice-9/ftw.scm:445:2
  22    (load-u64 5 0 1805)             
  25    (word-set!/immediate 15 0 5)    
  26    (scm-set!/immediate 15 1 14)    
  27    (scm-set!/immediate 15 2 13)    
  28    (scm-set!/immediate 15 3 12)    
  29    (scm-set!/immediate 15 4 11)    
  30    (scm-set!/immediate 15 5 10)    
  31    (scm-set!/immediate 15 6 9)     
  32    (scm-set!/immediate 15 7 6)     
  33    (make-non-immediate 14 14141)   ;; ""                 at ice-9/ftw.scm:446:23
  35    (static-ref 13 15267)           ;; system-error       at ice-9/ftw.scm:447:23
  37    (allocate-words/immediate 12 4) 
  38    (load-u64 11 0 131141)          
  41    (word-set!/immediate 12 0 11)   
  42    (load-label 11 37)              ;; anonymous procedure at #x7fae263f5fac
  44    (word-set!/immediate 12 1 11)   
  45    (scm-set!/immediate 12 2 7)     
  46    (scm-set!/immediate 12 3 6)     
  47    (static-ref 3 14717)            ;; #f                 at ice-9/ftw.scm:407:3
  49    (make-non-immediate 0 15397)    ;; #<procedure 7fae26404fc8 at ice-9/ftw.scm:447:23 args>
  51    (mov 2 13)                                            at ice-9/ftw.scm:447:23
  52    (mov 1 12)                      
  53    (handle-interrupts)             
  54    (call-label 12 4 -973)          ;; catch@guile at #x7fae263f5014
  57    (receive 2 12 16)               
  59    (static-ref 12 15391)           ;; #f                 at ice-9/ftw.scm:449:23
  61    (immediate-tag=? 12 7 0)        ;; heap-object?
  63    (je 7)                          ;; -> L3
  64    (call-scm<-scmn-scmn 12 13444 15388 112);; lookup-bound-public
  68    (static-set! 12 15382)          ;; #f
L3:
  70    (scm-ref/immediate 10 12 1)     
  71    (mov 12 13)                                           at ice-9/ftw.scm:445:2
  72    (mov 13 14)                     
  73    (mov 14 7)                      
  74    (mov 11 8)                      
  75    (reset-frame 6)                 ;; 6 slots
  76    (handle-interrupts)             
  77    (tail-call-label 37)            ;; loop at #x7fae263f6038

Disassembly of <unnamed function> at #x2fac:

   0    (instrument-entry 15387)                              at ice-9/ftw.scm:447:23
   2    (assert-nargs-ee/locals 1 2)    ;; 3 slots (0 args)
   3    (scm-ref/immediate 1 2 3)       
   4    (scm-ref/immediate 2 2 2)       
   5    (mov 0 1)                                             at ice-9/ftw.scm:447:43
   6    (mov 1 2)                       
   7    (mov 2 0)                       
   8    (reset-frame 2)                 ;; 2 slots
   9    (handle-interrupts)             
  10    (tail-call)                     

Disassembly of <unnamed function> at #x2fd8:

   0    (instrument-entry 15384)                              at ice-9/ftw.scm:447:23
   2    (assert-nargs-ge 1)             
   3    (bind-rest 1)                   ;; 2 slots
   4    (alloc-frame 2)                 ;; 2 slots
   5    (static-ref 1 15377)            ;; #f                 at ice-9/ftw.scm:411:7
   7    (handle-interrupts)                                   at ice-9/ftw.scm:447:23
   8    (tail-call-label 2)             ;; system-error-errno@guile at #x7fae263f6000

Disassembly of system-error-errno@guile at #x3000:

   0    (instrument-entry 15380)                              at ice-9/ftw.scm:447:23
   2    (immediate-tag=? 1 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 1 13603 15281 112);; lookup-bound-public
   9    (static-set! 1 15363)           ;; #f
L1:
  11    (scm-ref/immediate 1 1 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of loop at #x3038:

   0    (instrument-entry 15422)                              at ice-9/ftw.scm:445:2
   2    (alloc-frame 25)                ;; 25 slots
   3    (make-non-immediate 13 14057)   ;; ""                 at ice-9/ftw.scm:452:25
   5    (static-ref 15 13971)           ;; #f                 at ice-9/ftw.scm:452:11
   7    (mov 14 22)                                           at ice-9/ftw.scm:452:10
   8    (handle-interrupts)             
   9    (call-label 9 3 -2345)          ;; string=?@guile at #x7fae263f3bb8
  12    (receive 6 9 25)                
  14    (immediate-tag=? 18 3839 4)     ;; false?             at ice-9/ftw.scm:452:6
  16    (jne 13)                        ;; -> L1
  17    (make-non-immediate 13 14051)   ;; "/"                at ice-9/ftw.scm:454:30
  19    (static-ref 15 14057)           ;; #f                 at ice-9/ftw.scm:454:11
  21    (mov 14 22)                                           at ice-9/ftw.scm:454:10
  22    (mov 12 23)                     
  23    (handle-interrupts)             
  24    (call-label 9 4 -2217)          ;; string-append@guile at #x7fae263f3df4
  27    (receive 1 9 25)                
L1:
  29    (static-ref 22 15343)           ;; #f                 at ice-9/ftw.scm:457:6
  31    (immediate-tag=? 22 7 0)        ;; heap-object?
  33    (je 7)                          ;; -> L2
  34    (call-scm<-scmn-scmn 22 13560 15340 113);; lookup-bound-private
  38    (static-set! 22 15334)          ;; #f
L2:
  40    (scm-ref/immediate 22 22 1)     
  41    (mov 15 22)                     
  42    (mov 14 21)                     
  43    (handle-interrupts)             
  44    (call 9 2)                      
  46    (receive 6 9 25)                
  48    (immediate-tag=? 18 3839 4)     ;; false?             at ice-9/ftw.scm:456:4
  50    (jne 537)                       ;; -> L23
  51    (static-ref 15 14149)           ;; #f                 at ice-9/ftw.scm:439:24
  53    (mov 14 21)                                           at ice-9/ftw.scm:439:23
  54    (handle-interrupts)             
  55    (call-label 9 2 -2050)          ;; stat:dev@guile at #x7fae263f410c
  58    (receive 6 9 25)                
  60    (make-immediate 17 2)           ;; 0                  at ice-9/ftw.scm:440:30
  61    (static-ref 13 14143)           ;; #f                 at ice-9/ftw.scm:440:33
  63    (mov 12 21)                                           at ice-9/ftw.scm:440:32
  64    (handle-interrupts)             
  65    (call-label 11 2 -2032)         ;; stat:ino@guile at #x7fae263f417c
  68    (receive 8 11 25)               
  70    (=? 17 16)                                            at ice-9/ftw.scm:440:27
  71    (jne 11)                        ;; -> L3
  72    (static-ref 13 14134)           ;; #f                 at ice-9/ftw.scm:441:28
  74    (mov 12 23)                                           at ice-9/ftw.scm:441:27
  75    (handle-interrupts)             
  76    (call-label 11 2 -2029)         ;; string-hash@guile at #x7fae263f41b4
  79    (receive 8 11 25)               
  81    (j 10)                          ;; -> L4
L3:
  82    (static-ref 13 14122)           ;; #f                 at ice-9/ftw.scm:442:28
  84    (mov 12 21)                                           at ice-9/ftw.scm:442:27
  85    (handle-interrupts)             
  86    (call-label 11 2 -2053)         ;; stat:ino@guile at #x7fae263f417c
  89    (receive 8 11 25)               
L4:
  91    (allocate-words/immediate 15 2)                       at ice-9/ftw.scm:439:17
  92    (scm-set!/immediate 15 0 18)    
  93    (scm-set!/immediate 15 1 16)    
  94    (static-ref 18 15288)           ;; #f                 at ice-9/ftw.scm:439:5
  96    (immediate-tag=? 18 7 0)        ;; heap-object?
  98    (je 7)                          ;; -> L5
  99    (call-scm<-scmn-scmn 18 13295 15285 112);; lookup-bound-public
 103    (static-set! 18 15279)          ;; #f
L5:
 105    (scm-ref/immediate 13 18 1)     
 106    (mov 12 15)                     
 107    (mov 11 19)                     
 108    (handle-interrupts)             
 109    (call 11 3)                     
 111    (receive 6 11 25)               
 113    (immediate-tag=? 18 3839 4)     ;; false?             at ice-9/ftw.scm:456:4
 115    (jne 467)                       ;; -> L22
 116    (static-ref 13 14320)           ;; #f                 at ice-9/ftw.scm:462:23
 118    (mov 12 21)                                           at ice-9/ftw.scm:462:22
 119    (handle-interrupts)             
 120    (call-label 11 2 -1567)         ;; stat:type@guile at #x7fae263f499c
 123    (receive 6 11 25)               
 125    (static-ref 16 14257)           ;; directory          at ice-9/ftw.scm:462:6
 127    (eq? 18 16)                     
 128    (jne 448)                       ;; -> L21
 129    (scm-ref/immediate 13 24 1)     
 130    (mov 12 23)                                           at ice-9/ftw.scm:463:10
 131    (mov 11 21)                     
 132    (mov 10 20)                     
 133    (handle-interrupts)             
 134    (call 11 4)                     
 136    (receive 6 11 25)               
 138    (immediate-tag=? 18 3839 4)     ;; false?             at ice-9/ftw.scm:463:6
 140    (je 371)                        ;; -> L18
 141    (static-ref 18 15047)           ;; system-error       at ice-9/ftw.scm:464:25
 143    (allocate-words/immediate 16 3) 
 144    (load-u64 15 0 65605)           
 147    (word-set!/immediate 16 0 15)   
 148    (load-label 15 444)             ;; anonymous procedure at #x7fae263f6978
 150    (word-set!/immediate 16 1 15)   
 151    (scm-set!/immediate 16 2 23)    
 152    (static-ref 13 14498)           ;; #f                 at ice-9/ftw.scm:407:3
 154    (make-non-immediate 10 15238)   ;; #<procedure 7fae264050b8 at ice-9/ftw.scm:464:25 args>
 156    (mov 12 18)                                           at ice-9/ftw.scm:464:25
 157    (mov 11 16)                     
 158    (handle-interrupts)             
 159    (call-label 11 4 -1192)         ;; catch@guile at #x7fae263f5014
 162    (receive 8 11 25)               
 164    (static-ref 12 14036)           ;; #f                 at ice-9/ftw.scm:432:23
 166    (mov 11 21)                                           at ice-9/ftw.scm:432:22
 167    (handle-interrupts)             
 168    (call-label 12 2 -2163)         ;; stat:dev@guile at #x7fae263f410c
 171    (receive 9 12 25)               
 173    (static-ref 11 14031)           ;; #f                 at ice-9/ftw.scm:433:32
 175    (mov 10 21)                                           at ice-9/ftw.scm:433:31
 176    (handle-interrupts)             
 177    (call-label 13 2 -2144)         ;; stat:ino@guile at #x7fae263f417c
 180    (receive 10 13 25)              
 182    (=? 17 14)                                            at ice-9/ftw.scm:433:26
 183    (jne 11)                        ;; -> L6
 184    (static-ref 11 14022)           ;; #f                 at ice-9/ftw.scm:434:27
 186    (mov 10 23)                                           at ice-9/ftw.scm:434:26
 187    (handle-interrupts)             
 188    (call-label 13 2 -2141)         ;; string-hash@guile at #x7fae263f41b4
 191    (receive 7 13 25)               
 193    (j 10)                          ;; -> L7
L6:
 194    (static-ref 11 14010)           ;; #f                 at ice-9/ftw.scm:435:27
 196    (mov 10 21)                                           at ice-9/ftw.scm:435:26
 197    (handle-interrupts)             
 198    (call-label 13 2 -2165)         ;; stat:ino@guile at #x7fae263f417c
 201    (receive 7 13 25)               
L7:
 203    (allocate-words/immediate 14 2)                       at ice-9/ftw.scm:432:16
 204    (scm-set!/immediate 14 0 15)    
 205    (scm-set!/immediate 14 1 17)    
 206    (make-immediate 10 1028)        ;; #t                 at ice-9/ftw.scm:436:16
 207    (static-ref 12 15189)           ;; #f                 at ice-9/ftw.scm:432:5
 209    (mov 11 14)                                           at ice-9/ftw.scm:432:4
 210    (mov 9 19)                      
 211    (handle-interrupts)             
 212    (call-label 12 4 403)           ;; vhash-cons@ice-9/vlist at #x7fae263f69d4
 215    (receive 5 12 25)               
 217    (static-ref 17 15181)           ;; #f                 at ice-9/ftw.scm:467:15
 219    (immediate-tag=? 17 7 0)        ;; heap-object?
 221    (je 7)                          ;; -> L8
 222    (call-scm<-scmn-scmn 17 13372 15178 112);; lookup-bound-public
 226    (static-set! 17 15172)          ;; #f
L8:
 228    (scm-ref/immediate 12 17 1)     
 229    (mov 11 16)                     
 230    (handle-interrupts)             
 231    (call 12 2)                     
 233    (receive 7 12 25)               
 235    (immediate-tag=? 17 3839 4)     ;; false?             at ice-9/ftw.scm:466:12
 237    (je 260)                        ;; -> L17
 238    (static-ref 12 13728)           ;; #f                 at ice-9/ftw.scm:468:35
 240    (mov 11 16)                                           at ice-9/ftw.scm:468:34
 241    (handle-interrupts)             
 242    (call-label 12 2 -2592)         ;; readdir@guile at #x7fae263f3b80
 245    (receive 7 12 25)               
 247    (scm-ref/immediate 12 24 3)     
 248    (mov 11 23)                                           at ice-9/ftw.scm:469:34
 249    (mov 10 21)                     
 250    (mov 9 20)                      
 251    (handle-interrupts)             
 252    (call 12 4)                     
 254    (receive 4 12 25)               
 256    (make-immediate 15 772)         ;; ()                 at ice-9/ftw.scm:470:34
 257    (make-non-immediate 14 13711)   ;; "."                at ice-9/ftw.scm:488:43
 259    (make-non-immediate 13 13719)   ;; ".."               at ice-9/ftw.scm:489:43
 261    (make-non-immediate 12 13807)   ;; "/"                at ice-9/ftw.scm:494:62
 263    (load-u64 11 0 131141)                                at ice-9/ftw.scm:495:37
 266    (load-label 10 363)             ;; anonymous procedure at #x7fae263f6a0c
 268    (make-non-immediate 9 15140)    ;; #<procedure 7fae264050f8 at ice-9/ftw.scm:495:37 args>
 270    (make-immediate 8 4)            ;; #f                 at ice-9/ftw.scm:498:48
 271    (eq-immediate? 17 2564)         ;; #<eof>             at ice-9/ftw.scm:471:23
 272    (je 162)                        ;; -> L13
L9:
 273    (instrument-loop 15149)         
 275    (handle-interrupts)             
 276    (static-ref 4 13700)            ;; #f                 at ice-9/ftw.scm:488:28
 278    (mov 3 17)                                            at ice-9/ftw.scm:488:27
 279    (mov 2 14)                      
 280    (handle-interrupts)             
 281    (call-label 20 3 -2617)         ;; string=?@guile at #x7fae263f3bb8
 284    (receive 17 20 25)              
 286    (immediate-tag=? 7 3839 4)      ;; false?             at ice-9/ftw.scm:471:16
 288    (jne 132)                       ;; -> L12
 289    (static-ref 4 13687)            ;; #f                 at ice-9/ftw.scm:489:28
 291    (mov 3 17)                                            at ice-9/ftw.scm:489:27
 292    (mov 2 13)                      
 293    (handle-interrupts)             
 294    (call-label 20 3 -2630)         ;; string=?@guile at #x7fae263f3bb8
 297    (receive 17 20 25)              
 299    (immediate-tag=? 7 3839 4)      ;; false?             at ice-9/ftw.scm:471:16
 301    (jne 119)                       ;; -> L12
 302    (static-ref 4 13774)            ;; #f                 at ice-9/ftw.scm:494:38
 304    (mov 3 23)                                            at ice-9/ftw.scm:494:37
 305    (mov 2 12)                      
 306    (mov 1 17)                      
 307    (handle-interrupts)             
 308    (call-label 20 4 -2501)         ;; string-append@guile at #x7fae263f3df4
 311    (receive 17 20 25)              
 313    (allocate-words/immediate 6 4)                        at ice-9/ftw.scm:495:37
 314    (word-set!/immediate 6 0 11)    
 315    (word-set!/immediate 6 1 10)    
 316    (scm-ref/immediate 5 24 7)      
 317    (scm-set!/immediate 6 2 5)      
 318    (scm-set!/immediate 6 3 7)      
 319    (static-ref 3 14331)            ;; #f                 at ice-9/ftw.scm:407:3
 321    (mov 2 18)                                            at ice-9/ftw.scm:495:37
 322    (mov 1 6)                       
 323    (mov 0 9)                       
 324    (handle-interrupts)             
 325    (call-label 21 4 -1358)         ;; catch@guile at #x7fae263f5014
 328    (receive 18 21 25)              
 330    (mov 2 22)                                            at ice-9/ftw.scm:496:29
 331    (mov 1 6)                       
 332    (handle-interrupts)             
 333    (call 22 2)                     
 335    (receive 19 22 25)              
 337    (immediate-tag=? 5 3839 4)      ;; false?             at ice-9/ftw.scm:496:25
 339    (jne 57)                        ;; -> L11
 340    (static-ref 2 14096)            ;; #f                 at ice-9/ftw.scm:500:39
 342    (mov 1 6)                                             at ice-9/ftw.scm:500:38
 343    (handle-interrupts)             
 344    (call-label 22 2 -1791)         ;; stat:type@guile at #x7fae263f499c
 347    (receive 19 22 25)              
 349    (static-ref 4 14033)            ;; directory          at ice-9/ftw.scm:500:33
 351    (eq? 5 4)                       
 352    (jne 21)                        ;; -> L10
 353    (static-ref 2 13613)            ;; #f                 at ice-9/ftw.scm:501:40
 355    (mov 1 16)                                            at ice-9/ftw.scm:501:39
 356    (handle-interrupts)             
 357    (call-label 22 2 -2707)         ;; readdir@guile at #x7fae263f3b80
 360    (receive 17 22 25)              
 362    (allocate-words/immediate 5 2)                        at ice-9/ftw.scm:503:39
 363    (scm-set!/immediate 5 0 17)     
 364    (scm-set!/immediate 5 1 6)      
 365    (allocate-words/immediate 17 2) 
 366    (scm-set!/immediate 17 0 5)     
 367    (scm-set!/immediate 17 1 15)    
 368    (eq-immediate? 7 2564)          ;; #<eof>             at ice-9/ftw.scm:471:23
 369    (je 67)                         ;; -> L14
 370    (mov 15 17)                                           at ice-9/ftw.scm:501:33
 371    (mov 17 7)                      
 372    (j -99)                         ;; -> L9
L10:
 373    (static-ref 2 13593)            ;; #f                 at ice-9/ftw.scm:504:40
 375    (mov 1 16)                                            at ice-9/ftw.scm:504:39
 376    (handle-interrupts)             
 377    (call-label 22 2 -2727)         ;; readdir@guile at #x7fae263f3b80
 380    (receive 7 22 25)               
 382    (scm-ref/immediate 4 24 2)      
 383    (mov 3 7)                                             at ice-9/ftw.scm:505:39
 384    (mov 2 6)                       
 385    (mov 1 20)                      
 386    (handle-interrupts)             
 387    (call 20 4)                     
 389    (receive 4 20 25)               
 391    (eq-immediate? 17 2564)         ;; #<eof>             at ice-9/ftw.scm:471:23
 392    (jne -119)                      ;; -> L9
 393    (mov 7 17)                                            at ice-9/ftw.scm:504:33
 394    (mov 17 15)                     
 395    (j 41)                          ;; -> L14
L11:
 396    (static-ref 2 13570)            ;; #f                 at ice-9/ftw.scm:497:36
 398    (mov 1 16)                                            at ice-9/ftw.scm:497:35
 399    (handle-interrupts)             
 400    (call-label 22 2 -2750)         ;; readdir@guile at #x7fae263f3b80
 403    (receive 7 22 25)               
 405    (scm-ref/immediate 4 24 6)      
 406    (mov 3 7)                                             at ice-9/ftw.scm:498:35
 407    (mov 2 8)                       
 408    (mov 1 6)                       
 409    (mov 0 20)                      
 410    (handle-interrupts)             
 411    (call 20 5)                     
 413    (receive 4 20 25)               
 415    (eq-immediate? 17 2564)         ;; #<eof>             at ice-9/ftw.scm:471:23
 416    (jne -143)                      ;; -> L9
 417    (mov 7 17)                                            at ice-9/ftw.scm:497:29
 418    (mov 17 15)                     
 419    (j 17)                          ;; -> L14
L12:
 420    (static-ref 4 13546)            ;; #f                 at ice-9/ftw.scm:490:30
 422    (mov 3 16)                                            at ice-9/ftw.scm:490:29
 423    (handle-interrupts)             
 424    (call-label 20 2 -2774)         ;; readdir@guile at #x7fae263f3b80
 427    (receive 7 20 25)               
 429    (eq-immediate? 17 2564)         ;; #<eof>             at ice-9/ftw.scm:471:23
 430    (jne -157)                      ;; -> L9
 431    (mov 7 17)                                            at ice-9/ftw.scm:490:23
 432    (mov 17 15)                     
 433    (j 3)                           ;; -> L14
L13:
 434    (mov 7 17)                                            at ice-9/ftw.scm:471:23
 435    (mov 17 15)                     
L14:
 436    (static-ref 7 13550)            ;; #f                 at ice-9/ftw.scm:473:26
 438    (mov 6 16)                                            at ice-9/ftw.scm:473:25
 439    (handle-interrupts)             
 440    (call-label 17 2 -2762)         ;; closedir@guile at #x7fae263f3bf0
 443    (reset-frame 25)                ;; 25 slots
 444    (allocate-words/immediate 22 4)                       at ice-9/ftw.scm:475:38
 445    (word-set!/immediate 22 0 11)   
 446    (load-label 18 204)             ;; anonymous procedure at #x7fae263f6a60
 448    (word-set!/immediate 22 1 18)   
 449    (scm-set!/immediate 22 2 24)    
 450    (scm-set!/immediate 22 3 23)    
 451    (allocate-words/immediate 18 2)                       at ice-9/ftw.scm:484:38
 452    (scm-set!/immediate 18 0 20)    
 453    (scm-set!/immediate 18 1 19)    
 454    (static-ref 20 14958)           ;; #f                 at ice-9/ftw.scm:475:33
 456    (immediate-tag=? 20 7 0)        ;; heap-object?
 458    (je 7)                          ;; -> L15
 459    (call-scm<-scmn-scmn 20 12967 14955 112);; lookup-bound-public
 463    (static-set! 20 14949)          ;; #f
L15:
 465    (scm-ref/immediate 20 20 1)     
 466    (mov 14 17)                     
 467    (mov 17 20)                     
 468    (mov 16 22)                     
 469    (mov 15 18)                     
 470    (handle-interrupts)             
 471    (call 7 4)                      
 473    (receive 2 7 25)                
 475    (immediate-tag=? 22 7 0)        ;; heap-object?       at ice-9/ftw.scm:486:58
 477    (jne 18)                        ;; -> L16
 478    (heap-tag=? 22 1 0)             ;; pair?
 480    (jne 15)                        ;; -> L16
 481    (scm-ref/immediate 20 22 0)     
 482    (scm-ref/immediate 18 24 4)     
 483    (mov 17 23)                                           at ice-9/ftw.scm:486:35
 484    (mov 16 21)                     
 485    (mov 15 20)                     
 486    (handle-interrupts)             
 487    (call 6 4)                      
 489    (receive 0 6 25)                
 491    (scm-ref/immediate 23 22 1)                           at ice-9/ftw.scm:487:35
 492    (reset-frame 2)                 ;; 2 slots            at ice-9/ftw.scm:486:27
 493    (handle-interrupts)             
 494    (return-values)                 
L16:
 495    (throw/value+data 22 14137)     ;; #(wrong-type-arg "car" "Wrong type argument in position 1 (expecting pair):…") at ice-9/ftw.scm:486:58
L17:
 497    (scm-ref/immediate 15 24 6)     
 498    (mov 14 23)                                           at ice-9/ftw.scm:509:22
 499    (mov 13 21)                     
 500    (mov 12 16)                     
 501    (mov 11 20)                     
 502    (handle-interrupts)             
 503    (call 9 5)                      
 505    (receive 0 9 25)                
 507    (mov 23 19)                                           at ice-9/ftw.scm:509:14
 508    (reset-frame 2)                 ;; 2 slots
 509    (handle-interrupts)             
 510    (return-values)                 
L18:
 511    (scm-ref/immediate 13 24 5)     
 512    (mov 12 23)                                           at ice-9/ftw.scm:511:18
 513    (mov 11 21)                     
 514    (mov 10 20)                     
 515    (handle-interrupts)             
 516    (call 11 4)                     
 518    (receive 0 11 25)               
 520    (static-ref 13 13680)           ;; #f                 at ice-9/ftw.scm:432:23
 522    (mov 12 21)                                           at ice-9/ftw.scm:432:22
 523    (handle-interrupts)             
 524    (call-label 11 2 -2519)         ;; stat:dev@guile at #x7fae263f410c
 527    (receive 2 11 25)               
 529    (static-ref 13 13675)           ;; #f                 at ice-9/ftw.scm:433:32
 531    (mov 12 21)                                           at ice-9/ftw.scm:433:31
 532    (handle-interrupts)             
 533    (call-label 11 2 -2500)         ;; stat:ino@guile at #x7fae263f417c
 536    (receive 4 11 25)               
 538    (=? 17 20)                                            at ice-9/ftw.scm:433:26
 539    (jne 11)                        ;; -> L19
 540    (static-ref 15 13666)           ;; #f                 at ice-9/ftw.scm:434:27
 542    (mov 14 23)                                           at ice-9/ftw.scm:434:26
 543    (handle-interrupts)             
 544    (call-label 9 2 -2497)          ;; string-hash@guile at #x7fae263f41b4
 547    (receive 1 9 25)                
 549    (j 10)                          ;; -> L20
L19:
 550    (static-ref 15 13654)           ;; #f                 at ice-9/ftw.scm:435:27
 552    (mov 14 21)                                           at ice-9/ftw.scm:435:26
 553    (handle-interrupts)             
 554    (call-label 9 2 -2521)          ;; stat:ino@guile at #x7fae263f417c
 557    (receive 1 9 25)                
L20:
 559    (allocate-words/immediate 21 2)                       at ice-9/ftw.scm:432:16
 560    (scm-set!/immediate 21 0 22)    
 561    (scm-set!/immediate 21 1 23)    
 562    (make-immediate 18 1028)        ;; #t                 at ice-9/ftw.scm:436:16
 563    (static-ref 20 14833)           ;; #f                 at ice-9/ftw.scm:432:5
 565    (mov 17 19)                                           at ice-9/ftw.scm:432:4
 566    (mov 19 21)                     
 567    (handle-interrupts)             
 568    (call-label 4 4 47)             ;; vhash-cons@ice-9/vlist at #x7fae263f69d4
 571    (receive 1 4 25)                
 573    (reset-frame 2)                 ;; 2 slots            at ice-9/ftw.scm:511:10
 574    (handle-interrupts)             
 575    (return-values)                 
L21:
 576    (scm-ref/immediate 24 24 2)     
 577    (mov 22 21)                                           at ice-9/ftw.scm:515:6
 578    (mov 21 20)                     
 579    (reset-frame 4)                 ;; 4 slots
 580    (handle-interrupts)             
 581    (tail-call)                     
L22:
 582    (mov 24 20)                                           at ice-9/ftw.scm:461:6
 583    (mov 23 19)                     
 584    (reset-frame 2)                 ;; 2 slots
 585    (handle-interrupts)             
 586    (return-values)                 
L23:
 587    (make-immediate 22 4)           ;; #f                 at ice-9/ftw.scm:459:23
 588    (scm-ref/immediate 24 24 6)     
 589    (reset-frame 5)                 ;; 5 slots            at ice-9/ftw.scm:459:6
 590    (handle-interrupts)             
 591    (tail-call)                     

Disassembly of <unnamed function> at #x3978:

   0    (instrument-entry 14836)                              at ice-9/ftw.scm:464:25
   2    (assert-nargs-ee/locals 1 2)    ;; 3 slots (0 args)
   3    (static-ref 1 13369)            ;; #f                 at ice-9/ftw.scm:464:46
   5    (scm-ref/immediate 2 2 2)       
   6    (mov 0 1)                                             at ice-9/ftw.scm:464:45
   7    (mov 1 2)                       
   8    (mov 2 0)                       
   9    (reset-frame 2)                 ;; 2 slots
  10    (handle-interrupts)             
  11    (tail-call-label -2967)         ;; opendir@guile at #x7fae263f3b48

Disassembly of <unnamed function> at #x39ac:

   0    (instrument-entry 14829)                              at ice-9/ftw.scm:464:25
   2    (assert-nargs-ge 1)             
   3    (bind-rest 1)                   ;; 2 slots
   4    (alloc-frame 2)                 ;; 2 slots
   5    (static-ref 1 14748)            ;; #f                 at ice-9/ftw.scm:411:7
   7    (handle-interrupts)                                   at ice-9/ftw.scm:464:25
   8    (tail-call-label -627)          ;; system-error-errno@guile at #x7fae263f6000

Disassembly of vhash-cons@ice-9/vlist at #x39d4:

   0    (instrument-entry 14833)                              at ice-9/ftw.scm:464:25
   2    (immediate-tag=? 3 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 3 12774 14820 112);; lookup-bound-public
   9    (static-set! 3 14772)           ;; #f
L1:
  11    (scm-ref/immediate 3 3 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of <unnamed function> at #x3a0c:

   0    (instrument-entry 14825)                              at ice-9/ftw.scm:495:37
   2    (assert-nargs-ee/locals 1 2)    ;; 3 slots (0 args)
   3    (scm-ref/immediate 1 2 2)       
   4    (scm-ref/immediate 2 2 3)       
   5    (mov 0 1)                                             at ice-9/ftw.scm:495:57
   6    (mov 1 2)                       
   7    (mov 2 0)                       
   8    (reset-frame 2)                 ;; 2 slots
   9    (handle-interrupts)             
  10    (tail-call)                     

Disassembly of <unnamed function> at #x3a38:

   0    (instrument-entry 14820)                              at ice-9/ftw.scm:495:37
   2    (assert-nargs-ge 1)             
   3    (bind-rest 1)                   ;; 2 slots
   4    (alloc-frame 2)                 ;; 2 slots
   5    (static-ref 1 14713)            ;; #f                 at ice-9/ftw.scm:411:7
   7    (handle-interrupts)                                   at ice-9/ftw.scm:495:37
   8    (tail-call-label -662)          ;; system-error-errno@guile at #x7fae263f6000

Disassembly of <unnamed function> at #x3a60:

   0    (instrument-entry 14826)                              at ice-9/ftw.scm:475:38
   2    (assert-nargs-ee/locals 3 2)    ;; 5 slots (2 args)
   3    (allocate-words/immediate 1 6)                        at ice-9/ftw.scm:477:44
   4    (load-u64 0 0 262213)           
   7    (word-set!/immediate 1 0 0)     
   8    (load-label 0 26)               ;; anonymous procedure at #x7fae263f6ae8
  10    (word-set!/immediate 1 1 0)     
  11    (scm-ref/immediate 0 4 2)       
  12    (scm-set!/immediate 1 2 0)      
  13    (scm-ref/immediate 4 4 3)       
  14    (scm-set!/immediate 1 3 4)      
  15    (scm-set!/immediate 1 4 3)      
  16    (scm-set!/immediate 1 5 2)      
  17    (static-ref 4 14799)            ;; #f                 at ice-9/ftw.scm:483:42
  19    (immediate-tag=? 4 7 0)         ;; heap-object?
  21    (je 7)                          ;; -> L1
  22    (call-scm<-scmn-scmn 4 12922 14796 113);; lookup-bound-private
  26    (static-set! 4 14790)           ;; #f
L1:
  28    (scm-ref/immediate 2 4 1)       
  29    (builtin-ref 4 3)               ;; call-with-values   at ice-9/ftw.scm:476:40
  30    (mov 3 1)                       
  31    (reset-frame 3)                 ;; 3 slots
  32    (handle-interrupts)             
  33    (tail-call)                     

Disassembly of <unnamed function> at #x3ae8:

   0    (instrument-entry 14798)                              at ice-9/ftw.scm:477:44
   2    (assert-nargs-ee/locals 1 6)    ;; 7 slots (0 args)
   3    (scm-ref/immediate 5 6 4)       
   4    (immediate-tag=? 5 7 0)         ;; heap-object?       at ice-9/ftw.scm:478:52
   6    (jne 29)                        ;; -> L2
   7    (heap-tag=? 5 1 0)              ;; pair?
   9    (jne 26)                        ;; -> L2
  10    (scm-ref/immediate 4 5 0)       
  11    (scm-ref/immediate 5 5 1)                             at ice-9/ftw.scm:480:52
  12    (scm-ref/immediate 3 6 5)       
  13    (immediate-tag=? 3 7 0)         ;; heap-object?       at ice-9/ftw.scm:481:52
  15    (jne 18)                        ;; -> L1
  16    (heap-tag=? 3 1 0)              ;; pair?
  18    (jne 15)                        ;; -> L1
  19    (scm-ref/immediate 2 3 0)       
  20    (scm-ref/immediate 3 3 1)                             at ice-9/ftw.scm:482:52
  21    (scm-ref/immediate 1 6 2)       
  22    (scm-ref/immediate 6 6 3)       
  23    (mov 0 1)                                             at ice-9/ftw.scm:478:46
  24    (mov 1 3)                       
  25    (mov 3 5)                       
  26    (mov 5 4)                       
  27    (mov 4 6)                       
  28    (mov 6 0)                       
  29    (reset-frame 6)                 ;; 6 slots
  30    (handle-interrupts)             
  31    (tail-call-label -715)          ;; loop at #x7fae263f6038
L1:
  33    (throw/value+data 3 13915)      ;; #(wrong-type-arg "car" "Wrong type argument in position 1 (expecting pair):…") at ice-9/ftw.scm:481:52
L2:
  35    (throw/value+data 5 13913)      ;; #(wrong-type-arg "car" "Wrong type argument in position 1 (expecting pair):…") at ice-9/ftw.scm:478:52

Disassembly of file-system-tree at #x3b7c:

   0    (instrument-entry 14801)                              at ice-9/ftw.scm:517:0
   2    (assert-nargs-ge 2)             
   3    (assert-nargs-le 4)             
   4    (bind-optionals 4)              ;; 3 argss
   5    (alloc-frame 19)                ;; 19 slots
   6    (immediate-tag=? 16 4095 2308)  ;; undefined?         at ice-9/ftw.scm:518:46
   8    (jne 3)                         ;; -> L1
   9    (make-non-immediate 16 14758)   ;; #<procedure 7fae26405238 at ice-9/ftw.scm:518:46 (n s)>
L1:
  11    (immediate-tag=? 15 4095 2308)  ;; undefined?         at ice-9/ftw.scm:519:44
  13    (jne 13)                        ;; -> L3
  14    (static-ref 18 14595)           ;; #f
  16    (immediate-tag=? 18 7 0)        ;; heap-object?
  18    (je 7)                          ;; -> L2
  19    (call-scm<-scmn-scmn 18 12854 13746 112);; lookup-bound-public
  23    (static-set! 18 14586)          ;; #f
L2:
  25    (scm-ref/immediate 15 18 1)     
L3:
  26    (allocate-words/immediate 18 3)                       at ice-9/ftw.scm:529:2
  27    (load-u64 14 0 65605)           
  30    (word-set!/immediate 18 0 14)   
  31    (load-label 13 106)             ;; enter?* at #x7fae263f6da0
  33    (word-set!/immediate 18 1 13)   
  34    (scm-set!/immediate 18 2 16)    
  35    (allocate-words/immediate 16 3)                       at ice-9/ftw.scm:546:2
  36    (word-set!/immediate 16 0 14)   
  37    (load-label 14 107)             ;; error at #x7fae263f6dbc
  39    (word-set!/immediate 16 1 14)   
  40    (scm-set!/immediate 16 2 17)    
  41    (make-non-immediate 14 2888)    ;; (())               at ice-9/ftw.scm:551:59
  43    (make-immediate 13 4)           ;; #f
  44    (make-non-immediate 7 14727)    ;; #<procedure leaf (name stat result)>
  46    (make-non-immediate 6 14729)    ;; #<procedure down (name stat result)>
  48    (make-non-immediate 5 14731)    ;; #<procedure up (name stat result)>
  50    (make-non-immediate 4 14721)    ;; #<procedure leaf (name stat result)>
  52    (mov 9 13)                                            at ice-9/ftw.scm:551:2
  53    (mov 8 18)                      
  54    (mov 3 16)                      
  55    (mov 2 14)                      
  56    (mov 1 17)                      
  57    (mov 0 15)                      
  58    (handle-interrupts)             
  59    (call-label 9 10 -894)          ;; file-system-fold at #x7fae263f5e70
  62    (receive 0 9 19)                
  64    (immediate-tag=? 18 7 0)        ;; heap-object?
  66    (jne 47)                        ;; -> L6
  67    (heap-tag=? 18 1 0)             ;; pair?
  69    (jne 44)                        ;; -> L6
  70    (scm-ref/immediate 17 18 1)     
  71    (immediate-tag=? 17 3583 260)   ;; null?
  73    (jne 40)                        ;; -> L6
  74    (scm-ref/immediate 17 18 0)     
  75    (immediate-tag=? 17 7 0)        ;; heap-object?
  77    (jne 12)                        ;; -> L4
  78    (heap-tag=? 17 1 0)             ;; pair?
  80    (jne 9)                         ;; -> L4
  81    (scm-ref/immediate 16 17 1)     
  82    (immediate-tag=? 16 3583 260)   ;; null?
  84    (jne 5)                         ;; -> L4
  85    (scm-ref/immediate 18 17 0)     
  86    (reset-frame 1)                 ;; 1 slot
  87    (handle-interrupts)             
  88    (return-values)                 
L4:
  89    (immediate-tag=? 17 3583 260)   ;; null?
  91    (jne 5)                         ;; -> L5
  92    (mov 18 13)                                           at ice-9/ftw.scm:554:14
  93    (reset-frame 1)                 ;; 1 slot
  94    (handle-interrupts)             
  95    (return-values)                 
L5:
  96    (static-ref 17 14695)           ;; match-error        at ice-9/ftw.scm:551:2
  98    (make-non-immediate 16 12539)   ;; "match"            at ice-9/match.upstream.scm:301:27
 100    (make-non-immediate 15 14693)   ;; "no matching pattern" at ice-9/match.upstream.scm:301:35
 102    (make-immediate 14 772)         ;; ()                 at ice-9/ftw.scm:551:2
 103    (allocate-words/immediate 13 2) 
 104    (scm-set!/immediate 13 0 18)    
 105    (scm-set!/immediate 13 1 14)    
 106    (allocate-words/immediate 18 2) 
 107    (scm-set!/immediate 18 0 15)    
 108    (scm-set!/immediate 18 1 13)    
 109    (allocate-words/immediate 15 2) 
 110    (scm-set!/immediate 15 0 16)    
 111    (scm-set!/immediate 15 1 18)    
 112    (throw 17 15)                   
L6:
 113    (static-ref 17 14678)           ;; match-error
 115    (make-non-immediate 16 12522)   ;; "match"            at ice-9/match.upstream.scm:301:27
 117    (make-non-immediate 15 14676)   ;; "no matching pattern" at ice-9/match.upstream.scm:301:35
 119    (make-immediate 14 772)         ;; ()                 at ice-9/ftw.scm:551:2
 120    (allocate-words/immediate 13 2) 
 121    (scm-set!/immediate 13 0 18)    
 122    (scm-set!/immediate 13 1 14)    
 123    (allocate-words/immediate 18 2) 
 124    (scm-set!/immediate 18 0 15)    
 125    (scm-set!/immediate 18 1 13)    
 126    (allocate-words/immediate 15 2) 
 127    (scm-set!/immediate 15 0 16)    
 128    (scm-set!/immediate 15 1 18)    
 129    (throw 17 15)                   

Disassembly of <unnamed function> at #x3d84:

   0    (instrument-entry 14677)                              at ice-9/ftw.scm:518:46
   2    (assert-nargs-ee/locals 3 0)    ;; 3 slots (2 args)
   3    (make-immediate 2 1028)         ;; #t                 at ice-9/ftw.scm:518:60
   4    (reset-frame 1)                 ;; 1 slot
   5    (handle-interrupts)             
   6    (return-values)                 

Disassembly of enter?* at #x3da0:

   0    (instrument-entry 14676)                              at ice-9/ftw.scm:529:2
   2    (assert-nargs-ee/locals 4 0)    ;; 4 slots (3 args)
   3    (scm-ref/immediate 3 3 2)       
   4    (reset-frame 3)                 ;; 3 slots            at ice-9/ftw.scm:530:4
   5    (handle-interrupts)             
   6    (tail-call)                     

Disassembly of error at #x3dbc:

   0    (instrument-entry 14675)                              at ice-9/ftw.scm:546:2
   2    (assert-nargs-ee/locals 5 6)    ;; 11 slots (4 args)
   3    (static-ref 7 13108)            ;; #f                 at ice-9/ftw.scm:547:9
   5    (scm-ref/immediate 0 10 2)      
   6    (mov 2 7)                                             at ice-9/ftw.scm:547:8
   7    (mov 1 9)                       
   8    (handle-interrupts)             
   9    (call-label 8 3 -3210)          ;; string=?@guile at #x7fae263f3bb8
  12    (receive 0 8 11)                
  14    (immediate-tag=? 10 3839 4)     ;; false?             at ice-9/ftw.scm:547:4
  16    (jne 7)                         ;; -> L1
  17    (make-immediate 10 4)           ;; #f
  18    (mov 7 6)                                             at ice-9/ftw.scm:549:8
  19    (reset-frame 4)                 ;; 4 slots
  20    (handle-interrupts)             
  21    (tail-call-label 6)             ;; leaf at #x7fae263f6e28
L1:
  23    (mov 10 6)                      
  24    (reset-frame 1)                 ;; 1 slot
  25    (handle-interrupts)             
  26    (return-values)                 

Disassembly of leaf at #x3e28:

   0    (instrument-entry 14666)                              at ice-9/ftw.scm:531:2
   2    (alloc-frame 11)                ;; 11 slots
   3    (immediate-tag=? 7 7 0)         ;; heap-object?       at ice-9/ftw.scm:532:4
   5    (jne 97)                        ;; -> L4
   6    (heap-tag=? 7 1 0)              ;; pair?
   8    (jne 94)                        ;; -> L4
   9    (scm-ref/immediate 10 7 0)      
  10    (scm-ref/immediate 6 7 1)       
  11    (static-ref 5 14643)            ;; #f
  13    (immediate-tag=? 5 7 0)         ;; heap-object?
  15    (je 7)                          ;; -> L1
  16    (call-scm<-scmn-scmn 5 12686 14640 113);; lookup-bound-private
  20    (static-set! 5 14634)           ;; #f
L1:
  22    (scm-ref/immediate 5 5 1)       
  23    (mov 1 5)                       
  24    (mov 0 10)                      
  25    (handle-interrupts)             
  26    (call 9 2)                      
  28    (receive 6 9 11)                
  30    (immediate-tag=? 4 3839 4)      ;; false?
  32    (je 53)                         ;; -> L3
  33    (mov 2 5)                       
  34    (mov 1 6)                       
  35    (handle-interrupts)             
  36    (call 8 2)                      
  38    (receive 5 8 11)                
  40    (immediate-tag=? 5 3839 4)      ;; false?
  42    (je 26)                         ;; -> L2
  43    (static-ref 2 14621)            ;; #f                 at ice-9/ftw.scm:534:26
  45    (mov 1 9)                                             at ice-9/ftw.scm:534:25
  46    (handle-interrupts)             
  47    (call-label 8 2 72)             ;; basename@guile at #x7fae263f7004
  50    (receive 1 8 11)                
  52    (make-immediate 7 772)          ;; ()                 at ice-9/ftw.scm:534:13
  53    (allocate-words/immediate 5 2)  
  54    (scm-set!/immediate 5 0 8)      
  55    (scm-set!/immediate 5 1 7)      
  56    (allocate-words/immediate 8 2)  
  57    (scm-set!/immediate 8 0 9)      
  58    (scm-set!/immediate 8 1 5)      
  59    (allocate-words/immediate 9 2)  
  60    (scm-set!/immediate 9 0 8)      
  61    (scm-set!/immediate 9 1 10)     
  62    (allocate-words/immediate 10 2)                       at ice-9/ftw.scm:534:7
  63    (scm-set!/immediate 10 0 9)     
  64    (scm-set!/immediate 10 1 6)     
  65    (reset-frame 1)                 ;; 1 slot
  66    (handle-interrupts)             
  67    (return-values)                 
L2:
  68    (static-ref 10 14552)           ;; match-error        at ice-9/ftw.scm:532:4
  70    (make-non-immediate 9 12396)    ;; "match"            at ice-9/match.upstream.scm:301:27
  72    (make-non-immediate 8 14550)    ;; "no matching pattern" at ice-9/match.upstream.scm:301:35
  74    (make-immediate 6 772)          ;; ()                 at ice-9/ftw.scm:532:4
  75    (allocate-words/immediate 5 2)  
  76    (scm-set!/immediate 5 0 7)      
  77    (scm-set!/immediate 5 1 6)      
  78    (allocate-words/immediate 7 2)  
  79    (scm-set!/immediate 7 0 8)      
  80    (scm-set!/immediate 7 1 5)      
  81    (allocate-words/immediate 8 2)  
  82    (scm-set!/immediate 8 0 9)      
  83    (scm-set!/immediate 8 1 7)      
  84    (throw 10 8)                    
L3:
  85    (static-ref 10 14535)           ;; match-error
  87    (make-non-immediate 9 12379)    ;; "match"            at ice-9/match.upstream.scm:301:27
  89    (make-non-immediate 8 14533)    ;; "no matching pattern" at ice-9/match.upstream.scm:301:35
  91    (make-immediate 6 772)          ;; ()                 at ice-9/ftw.scm:532:4
  92    (allocate-words/immediate 5 2)  
  93    (scm-set!/immediate 5 0 7)      
  94    (scm-set!/immediate 5 1 6)      
  95    (allocate-words/immediate 7 2)  
  96    (scm-set!/immediate 7 0 8)      
  97    (scm-set!/immediate 7 1 5)      
  98    (allocate-words/immediate 8 2)  
  99    (scm-set!/immediate 8 0 9)      
 100    (scm-set!/immediate 8 1 7)      
 101    (throw 10 8)                    
L4:
 102    (static-ref 10 14518)           ;; match-error
 104    (make-non-immediate 9 12362)    ;; "match"            at ice-9/match.upstream.scm:301:27
 106    (make-non-immediate 8 14516)    ;; "no matching pattern" at ice-9/match.upstream.scm:301:35
 108    (make-immediate 6 772)          ;; ()                 at ice-9/ftw.scm:532:4
 109    (allocate-words/immediate 5 2)  
 110    (scm-set!/immediate 5 0 7)      
 111    (scm-set!/immediate 5 1 6)      
 112    (allocate-words/immediate 7 2)  
 113    (scm-set!/immediate 7 0 8)      
 114    (scm-set!/immediate 7 1 5)      
 115    (allocate-words/immediate 8 2)  
 116    (scm-set!/immediate 8 0 9)      
 117    (scm-set!/immediate 8 1 7)      
 118    (throw 10 8)                    

Disassembly of basename@guile at #x4004:

   0    (instrument-entry 14561)                              at ice-9/ftw.scm:532:4
   2    (immediate-tag=? 1 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 1 12578 14548 112);; lookup-bound-public
   9    (static-set! 1 14536)           ;; #f
L1:
  11    (scm-ref/immediate 1 1 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of leaf at #x403c:

   0    (instrument-entry 14553)                              at ice-9/ftw.scm:531:2
   2    (assert-nargs-ee/locals 4 0)    ;; 4 slots (3 args)
   3    (handle-interrupts)             
   4    (tail-call-label -137)          ;; leaf at #x7fae263f6e28

Disassembly of down at #x4054:

   0    (instrument-entry 14553)                              at ice-9/ftw.scm:536:2
   2    (assert-nargs-ee/locals 4 0)    ;; 4 slots (3 args)
   3    (make-immediate 3 772)          ;; ()                 at ice-9/ftw.scm:537:10
   4    (allocate-words/immediate 2 2)                        at ice-9/ftw.scm:537:4
   5    (scm-set!/immediate 2 0 3)      
   6    (scm-set!/immediate 2 1 0)      
   7    (mov 3 2)                       
   8    (reset-frame 1)                 ;; 1 slot
   9    (handle-interrupts)             
  10    (return-values)                 

Disassembly of up at #x4080:

   0    (instrument-entry 14548)                              at ice-9/ftw.scm:538:2
   2    (assert-nargs-ee/locals 4 8)    ;; 12 slots (3 args)
   3    (immediate-tag=? 8 7 0)         ;; heap-object?       at ice-9/ftw.scm:539:4
   5    (jne 148)                       ;; -> L6
   6    (heap-tag=? 8 1 0)              ;; pair?
   8    (jne 145)                       ;; -> L6
   9    (scm-ref/immediate 11 8 0)      
  10    (scm-ref/immediate 7 8 1)       
  11    (static-ref 6 14493)            ;; #f
  13    (immediate-tag=? 6 7 0)         ;; heap-object?
  15    (je 7)                          ;; -> L1
  16    (call-scm<-scmn-scmn 6 12536 14490 113);; lookup-bound-private
  20    (static-set! 6 14484)           ;; #f
L1:
  22    (scm-ref/immediate 6 6 1)       
  23    (mov 2 6)                       
  24    (mov 1 11)                      
  25    (handle-interrupts)             
  26    (call 9 2)                      
  28    (receive 6 9 12)                
  30    (immediate-tag=? 5 3839 4)      ;; false?
  32    (je 104)                        ;; -> L5
  33    (immediate-tag=? 7 7 0)         ;; heap-object?
  35    (jne 84)                        ;; -> L4
  36    (heap-tag=? 7 1 0)              ;; pair?
  38    (jne 81)                        ;; -> L4
  39    (scm-ref/immediate 5 7 0)       
  40    (scm-ref/immediate 7 7 1)       
  41    (mov 1 6)                       
  42    (mov 0 5)                       
  43    (handle-interrupts)             
  44    (call 10 2)                     
  46    (receive 7 10 12)               
  48    (immediate-tag=? 4 3839 4)      ;; false?
  50    (je 52)                         ;; -> L3
  51    (mov 1 6)                       
  52    (mov 0 7)                       
  53    (handle-interrupts)             
  54    (call 10 2)                     
  56    (receive 5 10 12)               
  58    (immediate-tag=? 6 3839 4)      ;; false?
  60    (je 25)                         ;; -> L2
  61    (static-ref 1 14453)            ;; #f                 at ice-9/ftw.scm:541:26
  63    (mov 0 10)                                            at ice-9/ftw.scm:541:25
  64    (handle-interrupts)             
  65    (call-label 10 2 -96)           ;; basename@guile at #x7fae263f7004
  68    (receive 1 10 12)               
  70    (allocate-words/immediate 8 2)                        at ice-9/ftw.scm:541:41
  71    (scm-set!/immediate 8 0 9)      
  72    (scm-set!/immediate 8 1 11)     
  73    (allocate-words/immediate 11 2)                       at ice-9/ftw.scm:541:13
  74    (scm-set!/immediate 11 0 10)    
  75    (scm-set!/immediate 11 1 8)     
  76    (allocate-words/immediate 10 2) 
  77    (scm-set!/immediate 10 0 11)    
  78    (scm-set!/immediate 10 1 5)     
  79    (allocate-words/immediate 11 2)                       at ice-9/ftw.scm:541:7
  80    (scm-set!/immediate 11 0 10)    
  81    (scm-set!/immediate 11 1 7)     
  82    (reset-frame 1)                 ;; 1 slot
  83    (handle-interrupts)             
  84    (return-values)                 
L2:
  85    (static-ref 11 14385)           ;; match-error        at ice-9/ftw.scm:539:4
  87    (make-non-immediate 10 12229)   ;; "match"            at ice-9/match.upstream.scm:301:27
  89    (make-non-immediate 9 14383)    ;; "no matching pattern" at ice-9/match.upstream.scm:301:35
  91    (make-immediate 7 772)          ;; ()                 at ice-9/ftw.scm:539:4
  92    (allocate-words/immediate 6 2)  
  93    (scm-set!/immediate 6 0 8)      
  94    (scm-set!/immediate 6 1 7)      
  95    (allocate-words/immediate 8 2)  
  96    (scm-set!/immediate 8 0 9)      
  97    (scm-set!/immediate 8 1 6)      
  98    (allocate-words/immediate 9 2)  
  99    (scm-set!/immediate 9 0 10)     
 100    (scm-set!/immediate 9 1 8)      
 101    (throw 11 9)                    
L3:
 102    (static-ref 11 14368)           ;; match-error
 104    (make-non-immediate 10 12212)   ;; "match"            at ice-9/match.upstream.scm:301:27
 106    (make-non-immediate 9 14366)    ;; "no matching pattern" at ice-9/match.upstream.scm:301:35
 108    (make-immediate 7 772)          ;; ()                 at ice-9/ftw.scm:539:4
 109    (allocate-words/immediate 6 2)  
 110    (scm-set!/immediate 6 0 8)      
 111    (scm-set!/immediate 6 1 7)      
 112    (allocate-words/immediate 8 2)  
 113    (scm-set!/immediate 8 0 9)      
 114    (scm-set!/immediate 8 1 6)      
 115    (allocate-words/immediate 9 2)  
 116    (scm-set!/immediate 9 0 10)     
 117    (scm-set!/immediate 9 1 8)      
 118    (throw 11 9)                    
L4:
 119    (static-ref 11 14351)           ;; match-error
 121    (make-non-immediate 10 12195)   ;; "match"            at ice-9/match.upstream.scm:301:27
 123    (make-non-immediate 9 14349)    ;; "no matching pattern" at ice-9/match.upstream.scm:301:35
 125    (make-immediate 7 772)          ;; ()                 at ice-9/ftw.scm:539:4
 126    (allocate-words/immediate 6 2)  
 127    (scm-set!/immediate 6 0 8)      
 128    (scm-set!/immediate 6 1 7)      
 129    (allocate-words/immediate 8 2)  
 130    (scm-set!/immediate 8 0 9)      
 131    (scm-set!/immediate 8 1 6)      
 132    (allocate-words/immediate 9 2)  
 133    (scm-set!/immediate 9 0 10)     
 134    (scm-set!/immediate 9 1 8)      
 135    (throw 11 9)                    
L5:
 136    (static-ref 11 14334)           ;; match-error
 138    (make-non-immediate 10 12178)   ;; "match"            at ice-9/match.upstream.scm:301:27
 140    (make-non-immediate 9 14332)    ;; "no matching pattern" at ice-9/match.upstream.scm:301:35
 142    (make-immediate 7 772)          ;; ()                 at ice-9/ftw.scm:539:4
 143    (allocate-words/immediate 6 2)  
 144    (scm-set!/immediate 6 0 8)      
 145    (scm-set!/immediate 6 1 7)      
 146    (allocate-words/immediate 8 2)  
 147    (scm-set!/immediate 8 0 9)      
 148    (scm-set!/immediate 8 1 6)      
 149    (allocate-words/immediate 9 2)  
 150    (scm-set!/immediate 9 0 10)     
 151    (scm-set!/immediate 9 1 8)      
 152    (throw 11 9)                    
L6:
 153    (static-ref 11 14317)           ;; match-error
 155    (make-non-immediate 10 12161)   ;; "match"            at ice-9/match.upstream.scm:301:27
 157    (make-non-immediate 9 14315)    ;; "no matching pattern" at ice-9/match.upstream.scm:301:35
 159    (make-immediate 7 772)          ;; ()                 at ice-9/ftw.scm:539:4
 160    (allocate-words/immediate 6 2)  
 161    (scm-set!/immediate 6 0 8)      
 162    (scm-set!/immediate 6 1 7)      
 163    (allocate-words/immediate 8 2)  
 164    (scm-set!/immediate 8 0 9)      
 165    (scm-set!/immediate 8 1 6)      
 166    (allocate-words/immediate 9 2)  
 167    (scm-set!/immediate 9 0 10)     
 168    (scm-set!/immediate 9 1 8)      
 169    (throw 11 9)                    

Disassembly of scandir at #x4328:

   0    (instrument-entry 14398)                              at ice-9/ftw.scm:556:0
   2    (assert-nargs-ge 2)             
   3    (assert-nargs-le 4)             
   4    (bind-optionals 4)              ;; 3 argss
   5    (alloc-frame 11)                ;; 11 slots
   6    (immediate-tag=? 8 4095 2308)   ;; undefined?         at ice-9/ftw.scm:556:43
   8    (jne 11)                        ;; -> L1
   9    (make-immediate 2 1028)         ;; #t                 at ice-9/ftw.scm:556:50
  10    (static-ref 3 14374)            ;; #f                 at ice-9/ftw.scm:556:44
  12    (handle-interrupts)                                   at ice-9/ftw.scm:556:43
  13    (call-label 7 2 77)             ;; const@guile at #x7fae263f7490
  16    (receive 0 7 11)                
  18    (j 2)                           ;; -> L2
L1:
  19    (mov 10 8)                      
L2:
  20    (immediate-tag=? 7 4095 2308)   ;; undefined?         at ice-9/ftw.scm:557:43
  22    (jne 13)                        ;; -> L4
  23    (static-ref 8 14363)            ;; #f
  25    (immediate-tag=? 8 7 0)         ;; heap-object?
  27    (je 7)                          ;; -> L3
  28    (call-scm<-scmn-scmn 8 12304 12308 112);; lookup-bound-public
  32    (static-set! 8 14354)           ;; #f
L3:
  34    (scm-ref/immediate 7 8 1)       
L4:
  35    (static-ref 8 13941)            ;; system-error       at ice-9/ftw.scm:569:11
  37    (allocate-words/immediate 6 3)                        at ice-9/ftw.scm:570:6
  38    (load-u64 5 0 65605)            
  41    (word-set!/immediate 6 0 5)     
  42    (load-label 5 62)               ;; anonymous procedure at #x7fae263f74c8
  44    (word-set!/immediate 6 1 5)     
  45    (scm-set!/immediate 6 2 9)      
  46    (make-immediate 1 4)            ;; #f                 at ice-9/ftw.scm:572:13
  47    (static-ref 2 14337)            ;; #f                 at ice-9/ftw.scm:572:7
  49    (handle-interrupts)                                   at ice-9/ftw.scm:572:6
  50    (call-label 8 2 40)             ;; const@guile at #x7fae263f7490
  53    (receive 10 8 11)               
  55    (static-ref 3 13383)            ;; #f                 at ice-9/ftw.scm:569:5
  57    (mov 2 8)                                             at ice-9/ftw.scm:569:4
  58    (mov 1 6)                       
  59    (handle-interrupts)             
  60    (call-label 7 4 -2305)          ;; catch@guile at #x7fae263f5014
  63    (receive 1 7 11)                
  65    (allocate-words/immediate 8 4)                        at ice-9/ftw.scm:575:9
  66    (load-u64 6 0 131141)           
  69    (word-set!/immediate 8 0 6)     
  70    (load-label 6 47)               ;; anonymous procedure at #x7fae263f74fc
  72    (word-set!/immediate 8 1 6)     
  73    (scm-set!/immediate 8 2 10)     
  74    (scm-set!/immediate 8 3 7)      
  75    (static-ref 10 14313)           ;; #f                 at ice-9/ftw.scm:574:3
  77    (immediate-tag=? 10 7 0)        ;; heap-object?
  79    (je 7)                          ;; -> L5
  80    (call-scm<-scmn-scmn 10 12302 14310 112);; lookup-bound-public
  84    (static-set! 10 14304)          ;; #f
L5:
  86    (scm-ref/immediate 10 10 1)     
  87    (reset-frame 3)                 ;; 3 slots
  88    (handle-interrupts)             
  89    (tail-call)                     

Disassembly of const@guile at #x4490:

   0    (instrument-entry 14322)                              at ice-9/ftw.scm:574:3
   2    (immediate-tag=? 1 7 0)         ;; heap-object?
   4    (je 7)                          ;; -> L1
   5    (call-scm<-scmn-scmn 1 12287 14309 112);; lookup-bound-public
   9    (static-set! 1 14285)           ;; #f
L1:
  11    (scm-ref/immediate 1 1 1)       
  12    (handle-interrupts)             
  13    (tail-call)                     

Disassembly of <unnamed function> at #x44c8:

   0    (instrument-entry 14314)                              at ice-9/ftw.scm:570:6
   2    (assert-nargs-ee/locals 1 2)    ;; 3 slots (0 args)
   3    (static-ref 1 12645)            ;; #f                 at ice-9/ftw.scm:571:9
   5    (scm-ref/immediate 2 2 2)       
   6    (mov 0 1)                                             at ice-9/ftw.scm:571:8
   7    (mov 1 2)                       
   8    (mov 2 0)                       
   9    (reset-frame 2)                 ;; 2 slots
  10    (handle-interrupts)             
  11    (tail-call-label -3691)         ;; opendir@guile at #x7fae263f3b48

Disassembly of <unnamed function> at #x44fc:

   0    (instrument-entry 14317)                              at ice-9/ftw.scm:575:9
   2    (assert-nargs-ee/locals 2 9)    ;; 11 slots (1 arg)
   3    (static-ref 5 12634)            ;; #f                 at ice-9/ftw.scm:576:31
   5    (mov 4 9)                                             at ice-9/ftw.scm:576:30
   6    (handle-interrupts)             
   7    (call-label 5 2 -3686)          ;; readdir@guile at #x7fae263f3b80
  10    (receive 2 5 11)                
  12    (make-immediate 7 772)          ;; ()                 at ice-9/ftw.scm:577:31
  13    (eq-immediate? 8 2564)          ;; #<eof>             at ice-9/ftw.scm:578:17
  14    (je 61)                         ;; -> L7
  15    (static-ref 3 12622)            ;; #f                 at ice-9/ftw.scm:582:24
  17    (mov 2 9)                                             at ice-9/ftw.scm:582:23
  18    (handle-interrupts)             
  19    (call-label 7 2 -3698)          ;; readdir@guile at #x7fae263f3b80
  22    (receive 4 7 11)                
  24    (scm-ref/immediate 2 10 2)      
  25    (mov 1 8)                                             at ice-9/ftw.scm:583:27
  26    (handle-interrupts)             
  27    (call 8 2)                      
  29    (receive 5 8 11)                
  31    (immediate-tag=? 5 3839 4)      ;; false?             at ice-9/ftw.scm:583:23
  33    (je 5)                          ;; -> L1
  34    (allocate-words/immediate 5 2)                        at ice-9/ftw.scm:584:27
  35    (scm-set!/immediate 5 0 8)      
  36    (scm-set!/immediate 5 1 7)      
  37    (j 2)                           ;; -> L2
L1:
  38    (mov 5 7)                       
L2:
  39    (eq-immediate? 6 2564)          ;; #<eof>             at ice-9/ftw.scm:578:17
  40    (je 33)                         ;; -> L6
L3:
  41    (instrument-loop 14276)         
  43    (handle-interrupts)             
  44    (static-ref 1 12593)            ;; #f                 at ice-9/ftw.scm:582:24
  46    (mov 0 9)                                             at ice-9/ftw.scm:582:23
  47    (handle-interrupts)             
  48    (call-label 9 2 -3727)          ;; readdir@guile at #x7fae263f3b80
  51    (receive 2 9 11)                
  53    (scm-ref/immediate 1 10 2)      
  54    (mov 0 6)                                             at ice-9/ftw.scm:583:27
  55    (handle-interrupts)             
  56    (call 9 2)                      
  58    (receive 3 9 11)                
  60    (immediate-tag=? 7 3839 4)      ;; false?             at ice-9/ftw.scm:583:23
  62    (je 5)                          ;; -> L4
  63    (allocate-words/immediate 7 2)                        at ice-9/ftw.scm:584:27
  64    (scm-set!/immediate 7 0 6)      
  65    (scm-set!/immediate 7 1 5)      
  66    (j 2)                           ;; -> L5
L4:
  67    (mov 7 5)                       
L5:
  68    (eq-immediate? 8 2564)          ;; #<eof>             at ice-9/ftw.scm:578:17
  69    (je 6)                          ;; -> L7
  70    (mov 6 8)                                             at ice-9/ftw.scm:582:17
  71    (mov 5 7)                       
  72    (j -31)                         ;; -> L3
L6:
  73    (mov 8 6)                                             at ice-9/ftw.scm:578:17
  74    (mov 7 5)                       
L7:
  75    (static-ref 3 12582)            ;; #f                 at ice-9/ftw.scm:580:20
  77    (mov 2 9)                                             at ice-9/ftw.scm:580:19
  78    (handle-interrupts)             
  79    (call-label 7 2 -3730)          ;; closedir@guile at #x7fae263f3bf0
  82    (reset-frame 11)                ;; 11 slots
  83    (static-ref 9 14224)            ;; #f                 at ice-9/ftw.scm:581:20
  85    (immediate-tag=? 9 7 0)         ;; heap-object?
  87    (je 7)                          ;; -> L8
  88    (call-scm<-scmn-scmn 9 12177 14221 112);; lookup-bound-public
  92    (static-set! 9 14215)           ;; #f
L8:
  94    (scm-ref/immediate 9 9 1)       
  95    (scm-ref/immediate 8 10 3)      
  96    (mov 10 9)                      
  97    (mov 9 7)                       
  98    (reset-frame 3)                 ;; 3 slots
  99    (handle-interrupts)             
 100    (tail-call)                     

Disassembly of <unnamed function> at #x4690:

   0    (instrument-entry 14276)                              at ice-9/ftw.scm:581:20
   2    (assert-nargs-ee/locals 1 1)    ;; 2 slots (0 args)
   3    (static-patch! 11867 1315)      
   6    (make-non-immediate 1 11862)    ;; "ice-9"
   8    (call-scm<-scm 1 1 14)          ;; string->symbol
  10    (static-set! 1 11866)           ;; ice-9
  12    (static-set! 1 12102)           ;; ice-9
  14    (static-set! 1 11950)           ;; ice-9
  16    (static-set! 1 11926)           ;; ice-9
  18    (static-set! 1 11874)           ;; ice-9
  20    (static-patch! 11860 1304)      
  23    (make-non-immediate 1 11855)    ;; "ftw"
  25    (call-scm<-scm 1 1 14)          ;; string->symbol
  27    (static-set! 1 11859)           ;; ftw
  29    (static-set! 1 12055)           ;; ftw
  31    (static-set! 1 11857)           ;; ftw
  33    (static-patch! 11861 11855)     
  36    (static-patch! 11862 1294)      
  39    (make-non-immediate 1 11857)    ;; "filename"
  41    (call-scm<-scm 1 1 14)          ;; string->symbol
  43    (static-set! 1 11861)           ;; filename
  45    (static-ref 1 11859)            ;; filename
  47    (call-scm<-scm 1 1 15)          ;; symbol->keyword
  49    (static-set! 1 11857)           ;; #:filename
  51    (static-patch! 11859 1287)      
  54    (static-patch! 11864 1292)      
  57    (make-non-immediate 1 11859)    ;; "imports"
  59    (call-scm<-scm 1 1 14)          ;; string->symbol
  61    (static-set! 1 11863)           ;; imports
  63    (static-ref 1 11861)            ;; imports
  65    (call-scm<-scm 1 1 15)          ;; symbol->keyword
  67    (static-set! 1 11859)           ;; #:imports
  69    (static-patch! 11861 1283)      
  72    (make-non-immediate 1 11856)    ;; "match"
  74    (call-scm<-scm 1 1 14)          ;; string->symbol
  76    (static-set! 1 11860)           ;; match
  78    (static-set! 1 11860)           ;; match
  80    (static-patch! 11864 11858)     
  83    (static-patch! 11863 11859)     
  86    (static-patch! 11926 11860)     
  89    (static-patch! 11863 1269)      
  92    (make-non-immediate 1 11858)    ;; "vlist"
  94    (call-scm<-scm 1 1 14)          ;; string->symbol
  96    (static-set! 1 11862)           ;; vlist
  98    (static-set! 1 11862)           ;; vlist
 100    (static-patch! 11866 11860)     
 103    (static-patch! 11865 11861)     
 106    (static-patch! 11902 11862)     
 109    (static-patch! 11865 1255)      
 112    (make-non-immediate 1 11860)    ;; "srfi"
 114    (call-scm<-scm 1 1 14)          ;; string->symbol
 116    (static-set! 1 11864)           ;; srfi
 118    (static-set! 1 11878)           ;; srfi
 120    (static-patch! 11864 1250)      
 123    (make-non-immediate 1 11859)    ;; "srfi-1"
 125    (call-scm<-scm 1 1 14)          ;; string->symbol
 127    (static-set! 1 11863)           ;; srfi-1
 129    (static-set! 1 11863)           ;; srfi-1
 131    (static-patch! 11867 11861)     
 134    (static-patch! 11866 11862)     
 137    (static-patch! 11867 11863)     
 140    (static-patch! 11870 11864)     
 143    (static-patch! 11871 11865)     
 146    (static-patch! 11872 1230)      
 149    (make-non-immediate 1 11867)    ;; "exports"
 151    (call-scm<-scm 1 1 14)          ;; string->symbol
 153    (static-set! 1 11871)           ;; exports
 155    (static-ref 1 11869)            ;; exports
 157    (call-scm<-scm 1 1 15)          ;; symbol->keyword
 159    (static-set! 1 11867)           ;; #:exports
 161    (static-patch! 11869 1221)      
 164    (make-non-immediate 1 11864)    ;; "nftw"
 166    (call-scm<-scm 1 1 14)          ;; string->symbol
 168    (static-set! 1 11868)           ;; nftw
 170    (static-set! 1 11910)           ;; nftw
 172    (static-patch! 11868 1216)      
 175    (make-non-immediate 1 11863)    ;; "file-system-fold"
 177    (call-scm<-scm 1 1 14)          ;; string->symbol
 179    (static-set! 1 11867)           ;; file-system-fold
 181    (static-set! 1 11895)           ;; file-system-fold
 183    (static-patch! 11867 1215)      
 186    (make-non-immediate 1 11862)    ;; "file-system-tree"
 188    (call-scm<-scm 1 1 14)          ;; string->symbol
 190    (static-set! 1 11866)           ;; file-system-tree
 192    (static-set! 1 11880)           ;; file-system-tree
 194    (static-patch! 11866 1214)      
 197    (make-non-immediate 1 11861)    ;; "scandir"
 199    (call-scm<-scm 1 1 14)          ;; string->symbol
 201    (static-set! 1 11865)           ;; scandir
 203    (static-set! 1 11865)           ;; scandir
 205    (static-patch! 11869 11863)     
 208    (static-patch! 11870 11864)     
 211    (static-patch! 11871 11865)     
 214    (static-patch! 11872 11866)     
 217    (static-patch! 11873 1197)      
 220    (make-non-immediate 1 11868)    ;; "autoloads"
 222    (call-scm<-scm 1 1 14)          ;; string->symbol
 224    (static-set! 1 11872)           ;; autoloads
 226    (static-ref 1 11870)            ;; autoloads
 228    (call-scm<-scm 1 1 15)          ;; symbol->keyword
 230    (static-set! 1 11868)           ;; #:autoloads
 232    (static-patch! 11870 1190)      
 235    (make-non-immediate 1 11865)    ;; "i18n"
 237    (call-scm<-scm 1 1 14)          ;; string->symbol
 239    (static-set! 1 11869)           ;; i18n
 241    (static-set! 1 11869)           ;; i18n
 243    (static-patch! 11873 11867)     
 246    (static-patch! 11890 11868)     
 249    (static-patch! 11871 1179)      
 252    (make-non-immediate 1 11866)    ;; "string-locale<?"
 254    (call-scm<-scm 1 1 14)          ;; string->symbol
 256    (static-set! 1 11870)           ;; string-locale<?
 258    (static-set! 1 11870)           ;; string-locale<?
 260    (static-patch! 11872 11868)     
 263    (static-patch! 11875 11869)     
 266    (static-patch! 11876 1170)      
 269    (make-non-immediate 1 11871)    ;; "declarative?"
 271    (call-scm<-scm 1 1 14)          ;; string->symbol
 273    (static-set! 1 11875)           ;; declarative?
 275    (static-ref 1 11873)            ;; declarative?
 277    (call-scm<-scm 1 1 15)          ;; symbol->keyword
 279    (static-set! 1 11871)           ;; #:declarative?
 281    (static-patch! 11875 1163)      
 284    (make-non-immediate 1 11870)    ;; "guile"
 286    (call-scm<-scm 1 1 14)          ;; string->symbol
 288    (static-set! 1 11874)           ;; guile
 290    (static-set! 1 11874)           ;; guile
 292    (static-patch! 11878 1158)      
 295    (static-patch! 11885 1163)      
 298    (static-patch! 11890 1170)      
 301    (make-non-immediate 1 11885)    ;; "getuid-or-false"
 303    (call-scm<-scm 1 1 14)          ;; string->symbol
 305    (static-set! 1 11889)           ;; getuid-or-false
 307    (static-patch! 11891 1169)      
 310    (make-non-immediate 1 11886)    ;; "macro"
 312    (call-scm<-scm 1 1 14)          ;; string->symbol
 314    (static-set! 1 11890)           ;; macro
 316    (static-patch! 11894 1166)      
 319    (static-patch! 11899 -4562)     
 322    (static-patch! 11900 1170)      
 325    (make-non-immediate 1 11895)    ;; "getgid-or-false"
 327    (call-scm<-scm 1 1 14)          ;; string->symbol
 329    (static-set! 1 11899)           ;; getgid-or-false
 331    (static-patch! 11901 -4400)     
 334    (static-patch! 11902 1166)      
 337    (make-non-immediate 1 11897)    ;; "directory-files"
 339    (call-scm<-scm 1 1 14)          ;; string->symbol
 341    (static-set! 1 11901)           ;; directory-files
 343    (static-patch! 11905 -4280)     
 346    (static-patch! 11906 1162)      
 349    (make-non-immediate 1 11901)    ;; "pathify"
 351    (call-scm<-scm 1 1 14)          ;; string->symbol
 353    (static-set! 1 11905)           ;; pathify
 355    (static-patch! 11907 -4093)     
 358    (static-patch! 11908 1156)      
 361    (make-non-immediate 1 11903)    ;; "visited?-proc"
 363    (call-scm<-scm 1 1 14)          ;; string->symbol
 365    (static-set! 1 11907)           ;; visited?-proc
 367    (static-patch! 11909 -3962)     
 370    (static-patch! 11910 1152)      
 373    (make-non-immediate 1 11905)    ;; "stat-dir-readable?-proc"
 375    (call-scm<-scm 1 1 14)          ;; string->symbol
 377    (static-set! 1 11909)           ;; stat-dir-readable?-proc
 379    (static-patch! 11911 -3734)     
 382    (static-patch! 11912 1150)      
 385    (make-non-immediate 1 11907)    ;; "stat&flag-proc"
 387    (call-scm<-scm 1 1 14)          ;; string->symbol
 389    (static-set! 1 11911)           ;; stat&flag-proc
 391    (static-patch! 11913 -3548)     
 394    (static-patch! 11914 1146)      
 397    (make-non-immediate 1 11909)    ;; "clean"
 399    (call-scm<-scm 1 1 14)          ;; string->symbol
 401    (static-set! 1 11913)           ;; clean
 403    (static-patch! 11915 -3235)     
 406    (static-patch! 11916 -3158)     
 409    (static-patch! 11917 -2858)     
 412    (static-patch! 11918 1134)      
 415    (make-non-immediate 1 11913)    ;; "errno-if-exception"
 417    (call-scm<-scm 1 1 14)          ;; string->symbol
 419    (static-set! 1 11917)           ;; errno-if-exception
 421    (static-set! 1 13241)           ;; errno-if-exception
 423    (static-set! 1 13215)           ;; errno-if-exception
 425    (static-patch! 11915 -2062)     
 428    (static-patch! 11916 -1972)     
 431    (static-patch! 11917 -1140)     
 434    (static-patch! 11918 -652)      
 437    (static-patch! 11925 1119)      
 440    (make-non-immediate 1 11920)    ;; "_"
 442    (call-scm<-scm 1 1 14)          ;; string->symbol
 444    (static-set! 1 11924)           ;; _
 446    (static-set! 1 11934)           ;; _
 448    (static-patch! 11924 1114)      
 451    (make-non-immediate 1 11919)    ;; "any"
 453    (call-scm<-scm 1 1 14)          ;; string->symbol
 455    (static-set! 1 11923)           ;; any
 457    (static-set! 1 13009)           ;; any
 459    (static-set! 1 13011)           ;; any
 461    (static-set! 1 11921)           ;; any
 463    (static-patch! 11925 1105)      
 466    (static-patch! 11930 1110)      
 469    (static-patch! 11937 1123)      
 472    (static-patch! 11950 -4604)     
 475    (static-patch! 11959 1127)      
 478    (static-patch! 11970 1132)      
 481    (make-non-immediate 1 11965)    ;; "getuid"
 483    (call-scm<-scm 1 1 14)          ;; string->symbol
 485    (static-set! 1 11969)           ;; getuid
 487    (static-patch! 11981 1129)      
 490    (static-patch! 11992 1134)      
 493    (static-patch! 12009 -4465)     
 496    (static-patch! 12016 1136)      
 499    (make-non-immediate 1 12011)    ;; "getgid"
 501    (call-scm<-scm 1 1 14)          ;; string->symbol
 503    (static-set! 1 12015)           ;; getgid
 505    (static-patch! 12035 1133)      
 508    (static-patch! 12042 1136)      
 511    (static-patch! 12055 1139)      
 514    (static-patch! 12066 1142)      
 517    (static-patch! 12077 1145)      
 520    (static-patch! 12088 1150)      
 523    (static-patch! 12099 -4247)     
 526    (static-patch! 12106 1152)      
 529    (static-patch! 12111 1155)      
 532    (static-patch! 12118 1158)      
 535    (make-non-immediate 1 12113)    ;; "wrong-type-arg"
 537    (call-scm<-scm 1 1 14)          ;; string->symbol
 539    (static-set! 1 12117)           ;; wrong-type-arg
 541    (static-set! 1 12663)           ;; wrong-type-arg
 543    (static-set! 1 12159)           ;; wrong-type-arg
 545    (static-set! 1 12131)           ;; wrong-type-arg
 547    (static-patch! 12113 1151)      
 550    (static-patch! 12128 12108)     
 553    (static-patch! 12115 1151)      
 556    (make-non-immediate 1 12110)    ;; "Wrong type argument in position 1 (expecting pair): ~S"
 558    (static-set! 1 12650)           ;; "Wrong type argument in position 1 (expecting pair): ~S"
 560    (static-set! 1 12120)           ;; "Wrong type argument in position 1 (expecting pair): ~S"
 562    (static-patch! 12124 1160)      
 565    (static-patch! 12139 12119)     
 568    (static-patch! 12126 1162)      
 571    (static-patch! 12135 12121)     
 574    (static-patch! 12142 1176)      
 577    (static-patch! 12153 1181)      
 580    (static-patch! 12178 1186)      
 583    (static-patch! 12205 1191)      
 586    (static-patch! 12216 1196)      
 589    (static-patch! 12227 1201)      
 592    (static-patch! 12238 1206)      
 595    (static-patch! 12249 1211)      
 598    (static-patch! 12274 1216)      
 601    (static-patch! 12281 1221)      
 604    (static-patch! 12288 1226)      
 607    (static-patch! 12295 1229)      
 610    (static-patch! 12306 1234)      
 613    (make-non-immediate 1 12301)    ;; "depth"
 615    (call-scm<-scm 1 1 14)          ;; string->symbol
 617    (static-set! 1 12305)           ;; depth
 619    (static-patch! 12309 1231)      
 622    (static-patch! 12314 1234)      
 625    (make-non-immediate 1 12309)    ;; "directory-processed"
 627    (call-scm<-scm 1 1 14)          ;; string->symbol
 629    (static-set! 1 12313)           ;; directory-processed
 631    (static-patch! 12315 1235)      
 634    (make-non-immediate 1 12310)    ;; "directory"
 636    (call-scm<-scm 1 1 14)          ;; string->symbol
 638    (static-set! 1 12314)           ;; directory
 640    (static-patch! 12316 1234)      
 643    (make-non-immediate 1 12311)    ;; "nftw-style"
 645    (call-scm<-scm 1 1 14)          ;; string->symbol
 647    (static-set! 1 12315)           ;; nftw-style
 649    (static-patch! 12317 1233)      
 652    (make-non-immediate 1 12312)    ;; "stale-symlink"
 654    (call-scm<-scm 1 1 14)          ;; string->symbol
 656    (static-set! 1 12316)           ;; stale-symlink
 658    (static-patch! 12318 1232)      
 661    (make-non-immediate 1 12313)    ;; "symlink"
 663    (call-scm<-scm 1 1 14)          ;; string->symbol
 665    (static-set! 1 12317)           ;; symlink
 667    (static-patch! 12319 1229)      
 670    (make-non-immediate 1 12314)    ;; "physical"
 672    (call-scm<-scm 1 1 14)          ;; string->symbol
 674    (static-set! 1 12318)           ;; physical
 676    (static-patch! 12328 -3576)     
 679    (static-patch! 12331 -3520)     
 682    (static-patch! 12332 1222)      
 685    (make-non-immediate 1 12327)    ;; "directory-not-readable"
 687    (call-scm<-scm 1 1 14)          ;; string->symbol
 689    (static-set! 1 12331)           ;; directory-not-readable
 691    (static-patch! 12333 1223)      
 694    (make-non-immediate 1 12328)    ;; "regular"
 696    (call-scm<-scm 1 1 14)          ;; string->symbol
 698    (static-set! 1 12332)           ;; regular
 700    (static-patch! 12334 1220)      
 703    (make-non-immediate 1 12329)    ;; "invalid-stat"
 705    (call-scm<-scm 1 1 14)          ;; string->symbol
 707    (static-set! 1 12333)           ;; invalid-stat
 709    (static-patch! 12349 1219)      
 712    (static-patch! 12366 1222)      
 715    (static-patch! 12377 1225)      
 718    (static-patch! 12390 1230)      
 721    (static-patch! 12409 1233)      
 724    (make-non-immediate 1 12404)    ;; "out-of-range"
 726    (call-scm<-scm 1 1 14)          ;; string->symbol
 728    (static-set! 1 12408)           ;; out-of-range
 730    (static-set! 1 12428)           ;; out-of-range
 732    (static-patch! 12408 1230)      
 735    (make-non-immediate 1 12403)    ;; "string-ref"
 737    (call-scm<-scm 1 1 14)          ;; string->symbol
 739    (static-set! 1 12407)           ;; string-ref
 741    (static-set! 1 12419)           ;; string-ref
 743    (static-patch! 12407 1227)      
 746    (static-patch! 12416 12402)     
 749    (static-patch! 12423 1233)      
 752    (static-patch! 12434 1236)      
 755    (make-non-immediate 1 12429)    ;; "hash-size"
 757    (call-scm<-scm 1 1 14)          ;; string->symbol
 759    (static-set! 1 12433)           ;; hash-size
 761    (static-patch! 12435 1235)      
 764    (static-patch! 12442 12430)     
 767    (static-patch! 12445 1235)      
 770    (make-non-immediate 1 12440)    ;; "ftw-early-exit"
 772    (call-scm<-scm 1 1 14)          ;; string->symbol
 774    (static-set! 1 12444)           ;; ftw-early-exit
 776    (static-patch! 12448 -3246)     
 779    (static-patch! 12463 1231)      
 782    (make-non-immediate 1 12458)    ;; "for-each"
 784    (call-scm<-scm 1 1 14)          ;; string->symbol
 786    (static-set! 1 12462)           ;; for-each
 788    (static-patch! 12490 1230)      
 791    (static-patch! 12495 -2945)     
 794    (static-patch! 12496 1230)      
 797    (make-non-immediate 1 12491)    ;; "mount"
 799    (call-scm<-scm 1 1 14)          ;; string->symbol
 801    (static-set! 1 12495)           ;; mount
 803    (static-patch! 12497 -2925)     
 806    (static-patch! 12498 1224)      
 809    (make-non-immediate 1 12493)    ;; "chdir"
 811    (call-scm<-scm 1 1 14)          ;; string->symbol
 813    (static-set! 1 12497)           ;; chdir
 815    (static-patch! 12501 1221)      
 818    (static-patch! 12506 -2889)     
 821    (static-patch! 12507 -2859)     
 824    (static-patch! 12508 -2842)     
 827    (static-patch! 12509 -2839)     
 830    (static-patch! 12510 -2827)     
 833    (static-patch! 12511 1213)      
 836    (make-non-immediate 1 12506)    ;; "nftw-early-exit"
 838    (call-scm<-scm 1 1 14)          ;; string->symbol
 840    (static-set! 1 12510)           ;; nftw-early-exit
 842    (static-patch! 12512 -2486)     
 845    (static-patch! 12627 12621)     
 848    (static-patch! 12628 -2426)     
 851    (make-non-immediate 1 12225)    ;; "catch"
 853    (call-scm<-scm 1 1 14)          ;; string->symbol
 855    (static-set! 1 12629)           ;; catch
 857    (static-set! 1 12865)           ;; catch
 859    (static-patch! 12629 1195)      
 862    (make-non-immediate 1 12624)    ;; "top"
 864    (call-scm<-scm 1 1 14)          ;; string->symbol
 866    (static-set! 1 12628)           ;; top
 868    (static-set! 1 12628)           ;; top
 870    (make-non-immediate 1 12626)    ;; (top)
 872    (static-set! 1 12770)           ;; (top)
 874    (static-set! 1 12680)           ;; (top)
 876    (static-set! 1 12672)           ;; (top)
 878    (static-set! 1 12830)           ;; (top)
 880    (static-patch! 12622 1180)      
 883    (make-non-immediate 1 12617)    ;; "ribcage"
 885    (call-scm<-scm 1 1 14)          ;; string->symbol
 887    (static-set! 1 12621)           ;; ribcage
 889    (static-set! 1 12791)           ;; ribcage
 891    (static-set! 1 12739)           ;; ribcage
 893    (static-set! 1 12697)           ;; ribcage
 895    (static-set! 1 12685)           ;; ribcage
 897    (static-patch! 12615 1169)      
 900    (make-non-immediate 1 12610)    ;; "dummy"
 902    (call-scm<-scm 1 1 14)          ;; string->symbol
 904    (static-set! 1 12614)           ;; dummy
 906    (static-set! 1 12626)           ;; dummy
 908    (static-patch! 12614 1164)      
 911    (make-non-immediate 1 12609)    ;; "expr"
 913    (call-scm<-scm 1 1 14)          ;; string->symbol
 915    (static-set! 1 12613)           ;; expr
 917    (static-set! 1 13339)           ;; expr
 919    (static-set! 1 12615)           ;; expr
 921    (static-patch! 12661 12609)     
 924    (static-patch! 12614 1154)      
 927    (make-non-immediate 1 12609)    ;; "m-1b8ca79d6eff4af2-12b"
 929    (call-scm<-scm 1 1 14)          ;; string->symbol
 931    (static-set! 1 12613)           ;; m-1b8ca79d6eff4af2-12b
 933    (static-set! 1 12613)           ;; m-1b8ca79d6eff4af2-12b
 935    (make-non-immediate 1 12611)    ;; (m-1b8ca79d6eff4af2-12b top)
 937    (static-set! 1 12677)           ;; (m-1b8ca79d6eff4af2-12b top)
 939    (static-set! 1 12613)           ;; (m-1b8ca79d6eff4af2-12b top)
 941    (static-patch! 12643 12609)     
 944    (static-patch! 12614 1144)      
 947    (static-patch! 12627 12609)     
 950    (static-patch! 12616 1148)      
 953    (static-patch! 12623 12611)     
 956    (static-patch! 12630 12616)     
 959    (static-patch! 12745 12619)     
 962    (static-patch! 12738 12626)     
 965    (static-patch! 12635 1143)      
 968    (make-non-immediate 1 12630)    ;; "x"
 970    (call-scm<-scm 1 1 14)          ;; string->symbol
 972    (static-set! 1 12634)           ;; x
 974    (static-set! 1 12636)           ;; x
 976    (static-patch! 12656 12632)     
 979    (static-patch! 12655 12633)     
 982    (static-patch! 12636 1132)      
 985    (static-patch! 12641 12631)     
 988    (static-patch! 12648 12636)     
 991    (static-patch! 12705 12637)     
 994    (static-patch! 12688 12644)     
 997    (make-non-immediate 1 12645)    ;; ((top))
 999    (static-set! 1 12665)           ;; ((top))
1001    (static-set! 1 12683)           ;; ((top))
1003    (static-patch! 12645 1121)      
1006    (make-non-immediate 1 12640)    ;; "hygiene"
1008    (call-scm<-scm 1 1 14)          ;; string->symbol
1010    (static-set! 1 12644)           ;; hygiene
1012    (static-set! 1 12644)           ;; hygiene
1014    (static-patch! 12644 10878)     
1017    (make-non-immediate 1 12639)    ;; (hygiene ice-9 ftw)
1019    (static-set! 1 12847)           ;; (hygiene ice-9 ftw)
1021    (static-set! 1 12817)           ;; (hygiene ice-9 ftw)
1023    (static-set! 1 12787)           ;; (hygiene ice-9 ftw)
1025    (static-set! 1 12749)           ;; (hygiene ice-9 ftw)
1027    (static-set! 1 12719)           ;; (hygiene ice-9 ftw)
1029    (static-set! 1 12697)           ;; (hygiene ice-9 ftw)
1031    (static-set! 1 12635)           ;; (hygiene ice-9 ftw)
1033    (static-set! 1 12637)           ;; (hygiene ice-9 ftw)
1035    (static-patch! 12637 12625)     
1038    (static-patch! 12636 12632)     
1041    (static-patch! 12645 12633)     
1044    (make-non-immediate 1 12634)    ;; #(ribcage (errno-if-exception) ((top)) (((hygiene ice-9 ftw) . #<syntax e…>)))
1046    (static-set! 1 12642)           ;; #(ribcage (errno-if-exception) ((top)) (((hygiene ice-9 ftw) . #<syntax e…>)))
1048    (static-set! 1 12644)           ;; #(ribcage (errno-if-exception) ((top)) (((hygiene ice-9 ftw) . #<syntax e…>)))
1050    (static-patch! 12644 12638)     
1053    (static-patch! 12645 12639)     
1056    (static-patch! 12646 12640)     
1059    (static-patch! 12647 12641)     
1062    (static-patch! 12648 12642)     
1065    (make-non-immediate 1 12643)    ;; ((top) #(ribcage #(dummy expr) #((m-1b8ca79d6eff4af2-12b top) (top)) #(…)) # …)
1067    (static-set! 1 12797)           ;; ((top) #(ribcage #(dummy expr) #((m-1b8ca79d6eff4af2-12b top) (top)) #(…)) # …)
1069    (static-set! 1 12767)           ;; ((top) #(ribcage #(dummy expr) #((m-1b8ca79d6eff4af2-12b top) (top)) #(…)) # …)
1071    (static-set! 1 12737)           ;; ((top) #(ribcage #(dummy expr) #((m-1b8ca79d6eff4af2-12b top) (top)) #(…)) # …)
1073    (static-set! 1 12699)           ;; ((top) #(ribcage #(dummy expr) #((m-1b8ca79d6eff4af2-12b top) (top)) #(…)) # …)
1075    (static-set! 1 12669)           ;; ((top) #(ribcage #(dummy expr) #((m-1b8ca79d6eff4af2-12b top) (top)) #(…)) # …)
1077    (static-set! 1 12647)           ;; ((top) #(ribcage #(dummy expr) #((m-1b8ca79d6eff4af2-12b top) (top)) #(…)) # …)
1079    (make-non-immediate 1 10829)    ;; "ice-9/ftw.scm"
1081    (static-set! 1 12773)           ;; "ice-9/ftw.scm"
1083    (static-set! 1 12743)           ;; "ice-9/ftw.scm"
1085    (static-set! 1 12713)           ;; "ice-9/ftw.scm"
1087    (static-set! 1 12675)           ;; "ice-9/ftw.scm"
1089    (static-set! 1 12625)           ;; "ice-9/ftw.scm"
1091    (static-patch! 12637 12621)     
1094    (static-patch! 12638 1036)      
1097    (make-non-immediate 1 12633)    ;; "quote"
1099    (call-scm<-scm 1 1 14)          ;; string->symbol
1101    (static-set! 1 12637)           ;; quote
1103    (static-set! 1 12639)           ;; quote
1105    (static-patch! 12677 12635)     
1108    (static-patch! 12644 1028)      
1111    (make-non-immediate 1 12639)    ;; "system-error"
1113    (call-scm<-scm 1 1 14)          ;; string->symbol
1115    (static-set! 1 12643)           ;; system-error
1117    (static-set! 1 12653)           ;; system-error
1119    (static-patch! 12657 12641)     
1122    (static-patch! 12656 12646)     
1125    (static-patch! 12659 12653)     
1128    (static-patch! 12660 1016)      
1131    (make-non-immediate 1 12655)    ;; "lambda"
1133    (call-scm<-scm 1 1 14)          ;; string->symbol
1135    (static-set! 1 12659)           ;; lambda
1137    (static-set! 1 12669)           ;; lambda
1139    (static-patch! 12673 12657)     
1142    (static-patch! 12744 12662)     
1145    (static-patch! 12671 1005)      
1148    (make-non-immediate 1 12666)    ;; "args"
1150    (call-scm<-scm 1 1 14)          ;; string->symbol
1152    (static-set! 1 12670)           ;; args
1154    (static-set! 1 12680)           ;; args
1156    (static-patch! 12684 12668)     
1159    (make-non-immediate 1 12673)    ;; #<syntax:ftw.scm:410:12 args>
1161    (static-set! 1 12709)           ;; #<syntax:ftw.scm:410:12 args>
1163    (static-set! 1 12719)           ;; #<syntax:ftw.scm:410:12 args>
1165    (static-patch! 12679 991)       
1168    (make-non-immediate 1 12674)    ;; "system-error-errno"
1170    (call-scm<-scm 1 1 14)          ;; string->symbol
1172    (static-set! 1 12678)           ;; system-error-errno
1174    (static-set! 1 12688)           ;; system-error-errno
1176    (static-patch! 12692 12676)     
1179    (static-patch! 12695 12681)     
1182    (static-patch! 12694 12688)     
1185    (static-patch! 12693 12689)     
1188    (static-patch! 12696 12690)     
1191    (static-patch! 12697 12691)     
1194    (static-patch! 12696 12692)     
1197    (static-patch! 12707 -2651)     
1200    (static-patch! 12710 966)       
1203    (static-patch! 12743 971)       
1206    (static-patch! 12750 976)       
1209    (static-patch! 12755 -2034)     
1212    (static-patch! 12760 978)       
1215    (static-patch! 12765 -2005)     
1218    (static-patch! 12768 982)       
1221    (static-patch! 12791 985)       
1224    (static-patch! 12816 990)       
1227    (static-patch! 12833 -1806)     
1230    (static-patch! 12834 -1635)     
1233    (static-patch! 12835 -1632)     
1236    (static-patch! 12836 -1624)     
1239    (static-patch! 12837 985)       
1242    (make-non-immediate 1 12832)    ;; "match-error"
1244    (call-scm<-scm 1 1 14)          ;; string->symbol
1246    (static-set! 1 12836)           ;; match-error
1248    (static-patch! 12838 984)       
1251    (static-patch! 12869 991)       
1254    (static-patch! 12882 994)       
1257    (static-patch! 12917 999)       
1260    (static-patch! 12928 1002)      
1263    (static-patch! 12947 1005)      
1266    (static-patch! 12958 1008)      
1269    (make-non-immediate 1 12953)    ;; "macro-type"
1271    (call-scm<-scm 1 1 14)          ;; string->symbol
1273    (static-set! 1 12957)           ;; macro-type
1275    (static-set! 1 12967)           ;; macro-type
1277    (static-patch! 12957 1005)      
1280    (make-non-immediate 1 12952)    ;; "syntax-rules"
1282    (call-scm<-scm 1 1 14)          ;; string->symbol
1284    (static-set! 1 12956)           ;; syntax-rules
1286    (static-set! 1 12958)           ;; syntax-rules
1288    (static-patch! 12984 12954)     
1291    (static-patch! 12957 999)       
1294    (make-non-immediate 1 12952)    ;; "patterns"
1296    (call-scm<-scm 1 1 14)          ;; string->symbol
1298    (static-set! 1 12956)           ;; patterns
1300    (static-set! 1 12964)           ;; patterns
1302    (static-patch! 12958 12954)     
1305    (static-patch! 12961 12955)     
1308    (static-patch! 12960 12956)     
1311    (static-patch! 12963 12957)     
1314    (reset-frame 1)                 ;; 1 slot
1315    (make-immediate 0 2052)         ;; #<unspecified>
1316    (return-values)                 

-- 
There are only two hard things in Computer Science:
cache invalidation, naming things and off-by-one errors.