Paste: bootstrap failure
Author: | j |
Mode: | text |
Date: | Sat, 29 Oct 2011 23:47:00 |
Plain Text |
Loading resource:basis/stack-checker/known-words/known-words.factor
Loading vocab:bootstrap/bootstrap-error.factor
(U) Quotation: [ c-to-factor -> ]
Word: c-to-factor
(U) Quotation: [
2dup [
~quotation~ dip
dup terminated?>> ~quotation~ ~quotation~ if
] 2dip -> rot [ 2drop ] [ wrong-values ] if
]
Word: call-effect
(U) Quotation: [
[ ~quotation~ dip dip ] dip -> dup terminated?>>
[ 2drop f ]
[ dup in>> length swap out>> length check-datastack ] if
]
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
nano-count f parser-quiet? set-global
default-image-name "output-image" set-global
"math compiler threads help io tools ui ui.tools unicode handbook"
"include" set-global "" "exclude" set-global
strip-encodings (command-line) parse-command-line
os windows? [ "windows" require ] when
"staging" get "deploy-vocab" get or
[ "stage2: deployment mode" print ]
[ "debugger" require "listener" require "none" require ] if
load-components -> nano-count over -
core-bootstrap-time set-global
run-bootstrap-init f error set-global
f original-error set-global f error-continuation set-global
nano-count swap - bootstrap-time set-global
print-report "deploy-vocab" get
[ "tools.deploy.shaker" run ] [
"staging" get ~quotation~ ~quotation~ if
"output-image" get save-image-and-exit
] if
]
(U) Quotation: [ iterate-step -> iterate-next (each-integer) ]
(U) Quotation: [ swap [ 2dip ] dip -> ]
Word: 3dip
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ load-vocab -> drop ]
Word: require
(U) Quotation: [
2dup [
~quotation~ dip
dup terminated?>> ~quotation~ ~quotation~ if
] 2dip -> rot [ 2drop ] [ wrong-values ] if
]
Word: call-effect
(U) Quotation: [
[ ~quotation~ dip dip ] dip -> dup terminated?>>
[ 2drop f ]
[ dup in>> length swap out>> length check-datastack ] if
]
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
dup source-loaded?>> [ dup load-source ] unless
-> dup docs-loaded?>> [ dup load-docs ] unless
]
(U) Quotation: [ [ compose ~quotation~ curry recover ] [ drop ] 2bi -> call ]
Word: cleanup
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
+parsing+ >>source-loaded? dup vocab-source-path
[ parse-file ] [ ~quotation~ ] if* ->
[ +parsing+ >>source-loaded? ] dip
[ % ] [ ( -- ) call-effect ] if-bootstrapping
+done+ >>source-loaded? load-conditional-requires
]
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ [ compose ~quotation~ curry recover ] [ drop ] 2bi -> call ]
Word: cleanup
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
stream-lines dup parse-fresh ->
[ nip ] [ finish-parsing ] 2bi forget-smudged
]
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ [ compose ~quotation~ curry recover ] [ drop ] 2bi -> call ]
Word: cleanup
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
parse-lines -> auto-used?
[ print-use-hook get ( -- ) call-effect ] when
]
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [ f parse-until -> >quotation ]
(U) Quotation: [ [ parse-step ] keep -> swap [ (parse-until) ] [ drop ] if ]
Word: (parse-until)
(U) Quotation: [ over [ call ] dip -> ]
Word: keep
(U) Quotation: [ nip execute-parsing -> t ]
(U) Quotation: [
dup push-parsing-word ( accum -- accum ) execute-effect
-> pop-parsing-word
]
Word: (execute-parsing)
(U) Quotation: [
2dup [
~quotation~ dip
dup terminated?>> ~quotation~ ~quotation~ if
] 2dip -> rot [ 2drop ] [ wrong-values ] if
]
Word: call-effect
(U) Quotation: [
[ ~quotation~ dip dip ] dip -> dup terminated?>>
[ 2drop f ]
[ dup in>> length swap out>> length check-datastack ] if
]
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ <from> -> (add-qualified) ]
Word: add-words-from
(U) Quotation: [ (from) -> extract-words from boa ]
Word: <from>
(U) Quotation: [
2dup [
~quotation~ dip
dup terminated?>> ~quotation~ ~quotation~ if
] 2dip -> rot [ 2drop ] [ wrong-values ] if
]
Word: call-effect
(U) Quotation: [
[ ~quotation~ dip dip ] dip -> dup terminated?>>
[ 2drop f ]
[ dup in>> length swap out>> length check-datastack ] if
]
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
dup source-loaded?>> [ dup load-source ] unless
-> dup docs-loaded?>> [ dup load-docs ] unless
]
(U) Quotation: [ [ compose ~quotation~ curry recover ] [ drop ] 2bi -> call ]
Word: cleanup
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
+parsing+ >>source-loaded? dup vocab-source-path
[ parse-file ] [ ~quotation~ ] if* ->
[ +parsing+ >>source-loaded? ] dip
[ % ] [ ( -- ) call-effect ] if-bootstrapping
+done+ >>source-loaded? load-conditional-requires
]
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ [ compose ~quotation~ curry recover ] [ drop ] 2bi -> call ]
Word: cleanup
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
stream-lines dup parse-fresh ->
[ nip ] [ finish-parsing ] 2bi forget-smudged
]
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ [ compose ~quotation~ curry recover ] [ drop ] 2bi -> call ]
Word: cleanup
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
parse-lines -> auto-used?
[ print-use-hook get ( -- ) call-effect ] when
]
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [ f parse-until -> >quotation ]
(U) Quotation: [ [ parse-step ] keep -> swap [ (parse-until) ] [ drop ] if ]
Word: (parse-until)
(U) Quotation: [ over [ call ] dip -> ]
Word: keep
(U) Quotation: [ nip execute-parsing -> t ]
(U) Quotation: [
dup push-parsing-word ( accum -- accum ) execute-effect
-> pop-parsing-word
]
Word: (execute-parsing)
(U) Quotation: [
2dup [
~quotation~ dip
dup terminated?>> ~quotation~ ~quotation~ if
] 2dip -> rot [ 2drop ] [ wrong-values ] if
]
Word: call-effect
(U) Quotation: [
[ ~quotation~ dip dip ] dip -> dup terminated?>>
[ 2drop f ]
[ dup in>> length swap out>> length check-datastack ] if
]
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ load-vocab ] dip -> search-vocabs>> push ]
(U) Quotation: [
2dup [
~quotation~ dip
dup terminated?>> ~quotation~ ~quotation~ if
] 2dip -> rot [ 2drop ] [ wrong-values ] if
]
Word: call-effect
(U) Quotation: [
[ ~quotation~ dip dip ] dip -> dup terminated?>>
[ 2drop f ]
[ dup in>> length swap out>> length check-datastack ] if
]
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
dup source-loaded?>> [ dup load-source ] unless
-> dup docs-loaded?>> [ dup load-docs ] unless
]
(U) Quotation: [ [ compose ~quotation~ curry recover ] [ drop ] 2bi -> call ]
Word: cleanup
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
+parsing+ >>source-loaded? dup vocab-source-path
[ parse-file ] [ ~quotation~ ] if* ->
[ +parsing+ >>source-loaded? ] dip
[ % ] [ ( -- ) call-effect ] if-bootstrapping
+done+ >>source-loaded? load-conditional-requires
]
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ [ compose ~quotation~ curry recover ] [ drop ] 2bi -> call ]
Word: cleanup
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
stream-lines dup parse-fresh ->
[ nip ] [ finish-parsing ] 2bi forget-smudged
]
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ [ compose ~quotation~ curry recover ] [ drop ] 2bi -> call ]
Word: cleanup
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
parse-lines -> auto-used?
[ print-use-hook get ( -- ) call-effect ] when
]
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [ f parse-until -> >quotation ]
(U) Quotation: [ [ parse-step ] keep -> swap [ (parse-until) ] [ drop ] if ]
Word: (parse-until)
(U) Quotation: [ over [ call ] dip -> ]
Word: keep
(U) Quotation: [ nip execute-parsing -> t ]
(U) Quotation: [
dup push-parsing-word ( accum -- accum ) execute-effect
-> pop-parsing-word
]
Word: (execute-parsing)
(U) Quotation: [
2dup [
~quotation~ dip
dup terminated?>> ~quotation~ ~quotation~ if
] 2dip -> rot [ 2drop ] [ wrong-values ] if
]
Word: call-effect
(U) Quotation: [
[ ~quotation~ dip dip ] dip -> dup terminated?>>
[ 2drop f ]
[ dup in>> length swap out>> length check-datastack ] if
]
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ load-vocab ] dip -> search-vocabs>> push ]
(U) Quotation: [
2dup [
~quotation~ dip
dup terminated?>> ~quotation~ ~quotation~ if
] 2dip -> rot [ 2drop ] [ wrong-values ] if
]
Word: call-effect
(U) Quotation: [
[ ~quotation~ dip dip ] dip -> dup terminated?>>
[ 2drop f ]
[ dup in>> length swap out>> length check-datastack ] if
]
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
dup source-loaded?>> [ dup load-source ] unless
-> dup docs-loaded?>> [ dup load-docs ] unless
]
(U) Quotation: [ [ compose ~quotation~ curry recover ] [ drop ] 2bi -> call ]
Word: cleanup
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
+parsing+ >>source-loaded? dup vocab-source-path
[ parse-file ] [ ~quotation~ ] if* ->
[ +parsing+ >>source-loaded? ] dip
[ % ] [ ( -- ) call-effect ] if-bootstrapping
+done+ >>source-loaded? load-conditional-requires
]
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ [ compose ~quotation~ curry recover ] [ drop ] 2bi -> call ]
Word: cleanup
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
stream-lines dup parse-fresh ->
[ nip ] [ finish-parsing ] 2bi forget-smudged
]
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ [ compose ~quotation~ curry recover ] [ drop ] 2bi -> call ]
Word: cleanup
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
parse-lines -> auto-used?
[ print-use-hook get ( -- ) call-effect ] when
]
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [ f parse-until -> >quotation ]
(U) Quotation: [ [ parse-step ] keep -> swap [ (parse-until) ] [ drop ] if ]
Word: (parse-until)
(U) Quotation: [ over [ call ] dip -> ]
Word: keep
(U) Quotation: [ nip execute-parsing -> t ]
(U) Quotation: [
dup push-parsing-word ( accum -- accum ) execute-effect
-> pop-parsing-word
]
Word: (execute-parsing)
(U) Quotation: [
2dup [
~quotation~ dip
dup terminated?>> ~quotation~ ~quotation~ if
] 2dip -> rot [ 2drop ] [ wrong-values ] if
]
Word: call-effect
(U) Quotation: [
[ ~quotation~ dip dip ] dip -> dup terminated?>>
[ 2drop f ]
[ dup in>> length swap out>> length check-datastack ] if
]
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ load-vocab ] dip -> search-vocabs>> push ]
(U) Quotation: [
2dup [
~quotation~ dip
dup terminated?>> ~quotation~ ~quotation~ if
] 2dip -> rot [ 2drop ] [ wrong-values ] if
]
Word: call-effect
(U) Quotation: [
[ ~quotation~ dip dip ] dip -> dup terminated?>>
[ 2drop f ]
[ dup in>> length swap out>> length check-datastack ] if
]
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
dup source-loaded?>> [ dup load-source ] unless
-> dup docs-loaded?>> [ dup load-docs ] unless
]
(U) Quotation: [ [ compose ~quotation~ curry recover ] [ drop ] 2bi -> call ]
Word: cleanup
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
+parsing+ >>source-loaded? dup vocab-source-path
[ parse-file ] [ ~quotation~ ] if* ->
[ +parsing+ >>source-loaded? ] dip
[ % ] [ ( -- ) call-effect ] if-bootstrapping
+done+ >>source-loaded? load-conditional-requires
]
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ [ compose ~quotation~ curry recover ] [ drop ] 2bi -> call ]
Word: cleanup
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
stream-lines dup parse-fresh ->
[ nip ] [ finish-parsing ] 2bi forget-smudged
]
(U) Quotation: [ swap >n call -> ndrop ]
Word: bind
(U) Quotation: [ [ compose ~quotation~ curry recover ] [ drop ] 2bi -> call ]
Word: cleanup
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [
parse-lines -> auto-used?
[ print-use-hook get ( -- ) call-effect ] when
]
(U) Quotation: [ [ catchstack* push ] dip call -> catchstack* pop* ]
(U) Quotation: [ f parse-until -> >quotation ]
(U) Quotation: [ [ parse-step ] keep -> swap [ (parse-until) ] [ drop ] if ]
Word: (parse-until)
(U) Quotation: [ over [ call ] dip -> ]
Word: keep
(U) Quotation: [ nip execute-parsing -> t ]
(U) Quotation: [
dup push-parsing-word ( accum -- accum ) execute-effect
-> pop-parsing-word
]
Word: (execute-parsing)
(U) Quotation: [
2dup [
~quotation~ dip
dup terminated?>> ~quotation~ ~quotation~ if
] 2dip -> rot [ 2drop ] [ wrong-values ] if
]
Word: call-effect
(U) Quotation: [
[ ~quotation~ dip dip ] dip -> dup terminated?>>
[ 2drop f ]
[ dup in>> length swap out>> length check-datastack ] if
]
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ 2keep ] dip -> call ]
Word: 2bi
(U) Quotation: [ swap [ dip ] dip -> ]
Word: 2dip
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [ [ load-vocab ] dip -> search-vocabs>> push ]
(U) Quotation: [
2dup [
~quotation~ dip
dup terminated?>> ~quotation~ ~quotation~ if
] 2dip -> rot [ 2drop ] [ wrong-values ] if
]
Word: call-effect
(U) Quotation: [
[ ~quotation~ dip dip ] dip -> dup terminated?>>
[ 2drop f ]
[ dup in>> length swap out>> length check-datastack ] if
]
(U) Quotation: [ swap [ call ] dip -> ]
Word: dip
(U) Quotation: [
65 special-object error-thread set-global
continuation -> error-continuation set-global
[ original-error set-global ] [ rethrow ] bi
]
T{ source-file-error f ~lexer-error~ f...
The following restarts are available:
:1 Load resource:basis/stack-checker/known-words/known-words.factor again
:2 Load resource:basis/stack-checker/stack-checker.factor again
:3 Load resource:basis/combinators/smart/smart.factor again
4 :res Load resource:basis/compiler/compiler.factor again
5 :res Load resource:basis/bootstrap/compiler/compiler.factor again
The die word was called by the library. Unless you called it yourself,
you have triggered a bug in Factor. Please report.
Starting low level debugger...
Basic commands:
q ^D -- quit Factor
c -- continue executing Factor - NOT SAFE
t -- throw exception in Factor - NOT SAFE
.s .r .c -- print data, retain, call stacks
help -- full help, including advanced commands
> .c
==== CALL STACK:
frame: 100679fc8
executing: kernel.private:c-to-factor
scan: 1
word/quot addr: 1007e257c
word/quot xt: 10d5c0f30
return address: 10d5c0f66
frame: 100679fa8
executing: combinators:call-effect
scan: 2
word/quot addr: 100a8e8ac
word/quot xt: 10d6478b0
return address: 10d6478f9
frame: 100679f88
executing: [ [ [ kernel:datastack ] kernel:dip kernel:dip ] kernel:dip kernel:dup accessors:terminated?>> [ kernel:2drop f ] [ kernel:dup accessors:in>> sequences:length kernel:swap accessors:out>> sequences:length kernel.private:check-datastack ] kernel:if ]
scan: 1
word/quot addr: 100a8e654
word/quot xt: 10d645bf0
return address: 10d645c1f
frame: 100679f68
executing: kernel:dip
scan: 2
word/quot addr: 100a6916c
word/quot xt: 10d6409d0
return address: 10d640a0d
frame: 100679f48
executing: namespaces:bind
scan: 2
word/quot addr: 100aa061c
word/quot xt: 10d64bd20
return address: 10d64bd54
frame: 100679f28
executing: [ debugger::c debugger::error "listener" vocabs:vocab [ debugger:restarts. vocabs:vocab-main kernel:execute ] [ continuations:error namespaces:get kernel:die ] kernel:if* 1 system:exit ]
scan: 6
word/quot addr: 10c9818b4
word/quot xt: 10d8750b0
return address: 10d875113
frame: 100679f08
executing: [ debugger:restarts. vocabs:vocab-main kernel:execute ]
scan: 1
word/quot addr: 10c981954
word/quot xt: 10d87b1d0
return address: 10d87b1f6
frame: 100679ee8
executing: object=>vocab-main
scan: 0
word/quot addr: 100a3bacc
word/quot xt: 10d6381f0
return address: 10d638211
frame: 100679ec8
executing: object=>lookup-vocab
scan: 0
word/quot addr: 100a3d0cc
word/quot xt: 10d639080
return address: 10d6390a1
frame: 100679ea8
executing: vocabs:check-vocab-name
scan: 3
word/quot addr: 100a38afc
word/quot xt: 10d62ea40
return address: 10d62ea81
frame: 100679e88
executing: combinators:call-effect
scan: 2
word/quot addr: 100a8e8ac
word/quot xt: 10d6478b0
return address: 10d6478f9
frame: 100679e68
executing: [ [ [ kernel:datastack ] kernel:dip kernel:dip ] kernel:dip kernel:dup accessors:terminated?>> [ kernel:2drop f ] [ kernel:dup accessors:in>> sequences:length kernel:swap accessors:out>> sequences:length kernel.private:check-datastack ] kernel:if ]
scan: 1
word/quot addr: 100a8e654
word/quot xt: 10d645bf0
return address: 10d645c1f
frame: 100679e48
executing: kernel:dip
scan: 2
word/quot addr: 100a6916c
word/quot xt: 10d6409d0
return address: 10d640a0d
frame: 100679e28
executing: kernel:die
scan: 1
word/quot addr: 100a40adc
word/quot xt: 10d63a8b0
return address: 10d63a8f3
>
New Annotation