GNU bug report logs - #55344
ftw thinks readable directories are unreadable if "other" don't have read permission

Previous Next

Package: guile;

Reported by: SeerLite <seerlite <at> nixnet.email>

Date: Tue, 10 May 2022 00:26:01 UTC

Severity: normal

Done: Ludovic Courtès <ludo <at> gnu.org>

Bug is archived. No further changes may be made.

To add a comment to this bug, you must first unarchive it, by sending
a message to control AT debbugs.gnu.org, with unarchive 55344 in the body.
You can then email your comments to 55344 AT debbugs.gnu.org in the normal way.

Toggle the display of automated, internal messages from the tracker.

View this report as an mbox folder, status mbox, maintainer mbox


Report forwarded to bug-guile <at> gnu.org:
bug#55344; Package guile. (Tue, 10 May 2022 00:26:01 GMT) Full text and rfc822 format available.

Acknowledgement sent to SeerLite <seerlite <at> nixnet.email>:
New bug report received and forwarded. Copy sent to bug-guile <at> gnu.org. (Tue, 10 May 2022 00:26:01 GMT) Full text and rfc822 format available.

Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):

From: SeerLite <seerlite <at> nixnet.email>
To: bug-guile <at> gnu.org
Subject: ftw thinks readable directories are unreadable if "other" don't have
 read permission
Date: Mon, 9 May 2022 20:25:17 -0400
ftw incorrectly thinks that if other users don't have the read 
permission then the owner can't read it either. This also affects ntfw.

Guile version: 3.0.8
Machine type: x86_64-pc-linux-gnu
guile <at> 3.0.8 from Guix

To reproduce: Create 2 directories, one with rwxrwxrwx permissions and 
another with rwxrwx---. Then pass them to ftw and notice it won't 
recurse because it thinks they're directory-not-readable.

scheme@(guile-user)> (passwd:uid (getpw (getlogin)))
$1 = 1001
scheme@(guile-user)> (stat:uid (stat "readable-dir"))
$2 = 1001
scheme@(guile-user)> (stat:uid (stat "also-readable-dir"))
$3 = 1001
scheme@(guile-user)> (format #f "~o" (stat:perms (stat "readable-dir")))
$4 = "777"
scheme@(guile-user)> (format #f "~o" (stat:perms (stat 
"also-readable-dir")))
$5 = "770"
scheme@(guile-user)> (stat "readable-dir")
$6 = #(24 61374845 16895 1 1001 998 0 0 1652140343 1652140343 1652141421 
4096 0 directory 511 216530924 216530924 1652141421)
scheme@(guile-user)> (stat "also-readable-dir")
$7 = #(24 61374847 16888 1 1001 998 0 0 1652140345 1652140345 1652141426 
4096 0 directory 504 20542871 20542871 1652141426)
scheme@(guile-user)> (ftw "readable-dir" (lambda (filename statinfo 
flag) (display flag) (newline) #t))
directory
$8 = #t
scheme@(guile-user)> (ftw "also-readable-dir" (lambda (filename statinfo 
flag) (display flag) (newline) #t))directory-not-readable
$9 = #t




Information forwarded to bug-guile <at> gnu.org:
bug#55344; Package guile. (Tue, 17 May 2022 16:08:02 GMT) Full text and rfc822 format available.

Message #8 received at submit <at> debbugs.gnu.org (full text, mbox):

From: angry rectangle <angryrectangle <at> cock.li>
To: bug-guile <at> gnu.org
Subject: bug#55344: ftw thinks readable directories are unreadable if
 "other" don't have read permission
Date: Tue, 17 May 2022 12:03:34 -0400
(hmm... resending this because it didnt work. hopefully i'm doing it right this time.)

It looks like guile's compiler and optimizer could be replacing the `getuid' and `setuid' calls with constant, compile-time values.

Here is a test I performed:
1. Make directory with 770 owned by root and the `guixbuild' group. When guile is compiled with guix, I think the process is done under one of the guixbuilder<XX> users who have the `guixbuild' group.
2. Run guile under my regular user.
3. Try to `ftw' that directory. ftw detects it as a readable directory and then ends up throwing a "permission denied" error because it's not actually readable.

If I compile guile manually under my regular user and try ftw on a different user, I observe the results that support my conclusion.

System info:
Guile 3.0.8.13-cc455
guix on amd64




Information forwarded to bug-guile <at> gnu.org:
bug#55344; Package guile. (Mon, 13 Mar 2023 07:33:02 GMT) Full text and rfc822 format available.

Message #11 received at 55344 <at> debbugs.gnu.org (full text, mbox):

From: Saad Rhoulam <saad <at> rhoulam.com>
To: 55344 <at> debbugs.gnu.org
Subject: ftw thinks readable directories are unreadable if "other" don't have
 read permission
Date: Sun, 12 Mar 2023 23:38:07 -0400
I am also experiencing this issue on Guile 3.0.9, guix on Ubuntu 22.04, 
amd64 architecture. It won't descend into a directory unless it has o+rx 
permissions set.




Information forwarded to bug-guile <at> gnu.org:
bug#55344; Package guile. (Fri, 13 Oct 2023 10:40:01 GMT) Full text and rfc822 format available.

Message #14 received at 55344 <at> debbugs.gnu.org (full text, mbox):

From: wolf <wolf <at> wolfsden.cz>
To: 55344 <at> debbugs.gnu.org
Subject: getuid and getgid are indeed replaced with compile-time constants
Date: Fri, 13 Oct 2023 12:38:32 +0200
[Message part 1 (text/plain, inline)]
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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> guile at #x7fae263f4908


Disassembly of lstat <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> guile at #x7fae263f55fc


Disassembly of chdir <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> guile at #x7fae263f6000


Disassembly of system-error-errno <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> guile at #x7fae263f6000


Disassembly of vhash-cons <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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 <at> 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.
[signature.asc (application/pgp-signature, inline)]

bug closed, send any further explanations to 55344 <at> debbugs.gnu.org and SeerLite <seerlite <at> nixnet.email> Request was from Ludovic Courtès <ludo <at> gnu.org> to control <at> debbugs.gnu.org. (Mon, 29 Jan 2024 13:32:01 GMT) Full text and rfc822 format available.

bug archived. Request was from Debbugs Internal Request <help-debbugs <at> gnu.org> to internal_control <at> debbugs.gnu.org. (Tue, 27 Feb 2024 12:24:07 GMT) Full text and rfc822 format available.

This bug report was last modified 29 days ago.

Previous Next


GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.