Paste: linux bootstrap error

Author: doublec
Mode: factor
Date: Mon, 20 Oct 2008 00:50:34
Plain Text |
Loading resource:basis/unix/stat/linux/linux.factor
Loading resource:basis/unix/stat/linux/32/32.factor
:warnings - print 764 semantic warnings.
[ [ dup parse-file call ] assert-depth -> drop ]
[
    >r datastack r>
    dip ->
    >r datastack r>
    2dup [ length ] compare { ~array~ ~array~ ~array~ } case
]
[ >r call -> r> ]
[ swap >c call -> c> drop ]
[
    millis
    >r default-image-name "output-image" set-global
    "math compiler threads help io tools ui ui.tools random unicode handbook"
    "include" set-global "" "exclude" set-global
    parse-command-line "-no-crossref" cli-args member?
    [ do-crossref ] unless os wince?
    [ "windows.ce" require ] when os winnt?
    [ "windows.nt" require ] when "deploy-vocab" get
    [ "stage2: deployment mode" print ]
    [ "listener" require "none" require ] if
    [ load-components run-bootstrap-init ] with-compiler-errors
    -> :errors f error set-global
    f error-continuation set-global "deploy-vocab" get
    [ "tools.deploy.shaker" run ] [
        ~quotation~ set-boot-quot millis r>
        - dup bootstrap-time set-global print-report
        "output-image" get save-image-and-exit
    ] if
]
[ H{ } clone >n call -> ndrop ]
[ over >r compose [ dip rethrow ] curry recover -> r> call ]
[ swap >c call -> c> drop ]
[ load-components -> run-bootstrap-init ]
[ iterate-step -> iterate-next (each-integer) ]
[ swap >r 2dup 2slip -> r> swap ]
[ >r >r call -> r> r> ]
[ load-vocab -> drop ]
[ dup load-vocab-hook get call -> vocab ]
[ swap >c call -> c> drop ]
[
    dup vocab-source-loaded? [ dup load-source ] unless
    -> dup vocab-docs-loaded? [ dup load-docs ] unless drop
]
[ load-vocab -> drop ]
[ dup load-vocab-hook get call -> vocab ]
[ swap >c call -> c> drop ]
[
    dup vocab-source-loaded? [ dup load-source ] unless
    -> dup vocab-docs-loaded? [ dup load-docs ] unless drop
]
[
    f over set-vocab-source-loaded?
    [ vocab-source-path ~quotation~ ~quotation~ if* ] keep
    -> t swap set-vocab-source-loaded?
    [ % ] [ call ] if-bootstrapping
]
[ >r call -> r> ]
[ swap >c call -> c> drop ]
[ H{ } clone >n call -> ndrop ]
[ over >r compose [ dip rethrow ] curry recover -> r> call ]
[ swap >c call -> c> drop ]
[ H{ } clone >n call -> ndrop ]
[ swap >c call -> c> drop ]
[ lines dup parse-fresh -> tuck finish-parsing forget-smudged ]
[ H{ } clone >n call -> ndrop ]
[ swap >c call -> c> drop ]
[ f parse-until -> >quotation ]
[ dup >r parse-step -> [ r> (parse-until) ] [ r> drop ] if ]
[ nip execute-parsing -> t ]
[ iterate-step -> iterate-next (each-integer) ]
[ swap >r 2dup 2slip -> r> swap ]
[ >r >r call -> r> r> ]
[ load-vocab -> (use+) ]
[ dup load-vocab-hook get call -> vocab ]
[ swap >c call -> c> drop ]
[
    dup vocab-source-loaded? [ dup load-source ] unless
    -> dup vocab-docs-loaded? [ dup load-docs ] unless drop
]
[
    f over set-vocab-source-loaded?
    [ vocab-source-path ~quotation~ ~quotation~ if* ] keep
    -> t swap set-vocab-source-loaded?
    [ % ] [ call ] if-bootstrapping
]
[ >r call -> r> ]
[ swap >c call -> c> drop ]
[ H{ } clone >n call -> ndrop ]
[ over >r compose [ dip rethrow ] curry recover -> r> call ]
[ swap >c call -> c> drop ]
[ H{ } clone >n call -> ndrop ]
[ swap >c call -> c> drop ]
[ lines dup parse-fresh -> tuck finish-parsing forget-smudged ]
[ H{ } clone >n call -> ndrop ]
[ swap >c call -> c> drop ]
[ f parse-until -> >quotation ]
[ dup >r parse-step -> [ r> (parse-until) ] [ r> drop ] if ]
[ nip execute-parsing -> t ]
[ iterate-step -> iterate-next (each-integer) ]
[ swap >r 2dup 2slip -> r> swap ]
[ >r >r call -> r> r> ]
[ load-vocab -> (use+) ]
[ dup load-vocab-hook get call -> vocab ]
[ swap >c call -> c> drop ]
[
    dup vocab-source-loaded? [ dup load-source ] unless
    -> dup vocab-docs-loaded? [ dup load-docs ] unless drop
]
[
    f over set-vocab-source-loaded?
    [ vocab-source-path ~quotation~ ~quotation~ if* ] keep
    -> t swap set-vocab-source-loaded?
    [ % ] [ call ] if-bootstrapping
]
[ >r call -> r> ]
[ swap >c call -> c> drop ]
[ H{ } clone >n call -> ndrop ]
[ over >r compose [ dip rethrow ] curry recover -> r> call ]
[ swap >c call -> c> drop ]
[ H{ } clone >n call -> ndrop ]
[ swap >c call -> c> drop ]
[ lines dup parse-fresh -> tuck finish-parsing forget-smudged ]
[ H{ } clone >n call -> ndrop ]
[ swap >c call -> c> drop ]
[ f parse-until -> >quotation ]
[ dup >r parse-step -> [ r> (parse-until) ] [ r> drop ] if ]
[ nip execute-parsing -> t ]
[ load-vocab -> drop ]
[ dup load-vocab-hook get call -> vocab ]
[ swap >c call -> c> drop ]
[
    dup vocab-source-loaded? [ dup load-source ] unless
    -> dup vocab-docs-loaded? [ dup load-docs ] unless drop
]
[ load-vocab -> drop ]
[ dup load-vocab-hook get call -> vocab ]
[ swap >c call -> c> drop ]
[
    dup vocab-source-loaded? [ dup load-source ] unless
    -> dup vocab-docs-loaded? [ dup load-docs ] unless drop
]
[
    f over set-vocab-source-loaded?
    [ vocab-source-path ~quotation~ ~quotation~ if* ] keep
    -> t swap set-vocab-source-loaded?
    [ % ] [ call ] if-bootstrapping
]
[ >r call -> r> ]
[ swap >c call -> c> drop ]
[ H{ } clone >n call -> ndrop ]
[ over >r compose [ dip rethrow ] curry recover -> r> call ]
[ swap >c call -> c> drop ]
[ H{ } clone >n call -> ndrop ]
[ swap >c call -> c> drop ]
[ lines dup parse-fresh -> tuck finish-parsing forget-smudged ]
[ H{ } clone >n call -> ndrop ]
[ swap >c call -> c> drop ]
[ f parse-until -> >quotation ]
[ dup >r parse-step -> [ r> (parse-until) ] [ r> drop ] if ]
[ nip execute-parsing -> t ]
define-struct
struct-offsets
align-offset
c-type-align
no-c-type
throw
[
    63 getenv error-thread set-global
    continuation -> error-continuation set-global rethrow
]
P" resource:basis/io/unix/unix.factor"
2: io.unix.backend io.unix.files ;
                                  ^
P" resource:basis/io/unix/files/files.factor"
9: environment fry io.encodings.utf8 alien.strings ;
                                                    ^
P" resource:basis/unix/stat/stat.factor"
27: } case >>
             ^
P" resource:basis/unix/stat/linux/32/32.factor"
44:     { "long"    "f_namelen" } ;
                                   ^
T{ no-c-type { name "fsid_t" } }

The following restarts are available:

:1    Load resource:basis/unix/stat/linux/32/32.factor again
:2    Load resource:basis/unix/stat/stat.factor again
:3    Load resource:basis/io/unix/files/files.factor again
4 :res  Load resource:basis/io/unix/unix.factor again
( scratchpad ) 

Annotation: current error

Author: doublec
Mode: factor
Date: Mon, 20 Oct 2008 01:18:01
Plain Text |
:errors - print 1 semantic errors.
:warnings - print 2206 semantic warnings.

While compiling directory.: 

Nesting:
{ if-iterate? if-iterate? }
{ (each-integer) ~inline-recursive~ }
{ each-integer each-integer }
{ each each }
{ assoc-each assoc-each }
{ ~literal~ f }
{ ~literal~ f }
{ directory. directory. }
Unbalanced branches:
[ iterate-step iterate-next (each-integer) ] ( -- object )
[ 3drop ] ( -- )
Bootstrap completed in 9 minutes and 29 seconds.
15569 compiled words
1323 symbol words
17674 words total
Bootstrapping is complete.

New Annotation

Summary:
Author:
Mode:
Body: