On fresh installs of Windows 7 x64, the following error (including :c :r :s)
will occur on the first bootstrap of Factor. This error has also shown up
on a Rackspace Win7 x64 Xen hosted VM, GigeNET Win7 x64 Xen hosted VM,
VMware Player 3.1.1, and a fresh Win7 x64 installation on my netbook.
Once a restart is chosen to reload the failing vocab or the bootstrap
process is re-ran, the error will not happen on subsequent bootstraps.
The below output is from adebf8cd in VMware and the netbook failed on the
clean build e5e036c6 (8-29).
-------------------------------------------------------------------------------------------------
Loading resource:basis/io/pipes/windows/nt/nt.factor
Loading resource:basis/random/random.factor
Loading resource:basis/random/windows/windows.factor
Loading resource:basis/windows/advapi32/advapi32.factor
Loading resource:basis/random/mersenne-twister/mersenne-twister.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: [ swap >c call -> c> drop ]
(U) Quotation: [
nano-count 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 wince?
[ "windows.ce" require ] when os winnt?
[ "windows.nt" 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
(O) Word: require
(O) Method: M\ vocab (load-vocab)
(O) Word: load-source
(U) Quotation: [
{
"editors"
"inspector"
"bootstrap.image"
"see"
"tools.annotations"
"tools.crossref"
"tools.errors"
"tools.deploy"
"tools.destructors"
"tools.disassembler"
"tools.dispatch"
"tools.memory"
"tools.profiler"
"tools.test"
"tools.time"
"tools.threads"
"tools.deprecation"
"vocabs.hierarchy"
"vocabs.refresh"
"vocabs.refresh.monitor"
} [ require ] each -> { ~array~ ~array~ } cond
]
(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
(O) Word: require
(O) Method: M\ vocab (load-vocab)
(O) Word: load-source
(O) Word: parse-file
(O) Word: parse-stream
(O) Word: parse-fresh
(O) Word: (parse-lines)
(O) Word: (parse-until)
(O) Word: parse-step
(O) Word: execute-parsing
(O) Word: POSTPONE: USING:
(O) Word: use-vocab
(O) Method: M\ vocab (load-vocab)
(O) Word: load-source
(O) Word: parse-file
(O) Word: parse-stream
(O) Word: parse-fresh
(O) Word: (parse-lines)
(O) Word: (parse-until)
(O) Word: parse-step
(O) Word: execute-parsing
(O) Word: POSTPONE: USING:
(O) Word: use-vocab
(O) Method: M\ vocab (load-vocab)
(O) Word: load-source
(O) Word: parse-file
(O) Word: parse-stream
(O) Word: parse-fresh
(O) Word: (parse-lines)
(O) Word: (parse-until)
(O) Word: parse-step
(O) Word: execute-parsing
(O) Word: POSTPONE: USING:
(O) Word: use-vocab
(O) Method: M\ vocab (load-vocab)
(O) Word: load-source
(O) Word: require
(O) Method: M\ vocab (load-vocab)
(O) Word: load-source
(O) Word: parse-file
(O) Word: parse-stream
(O) Word: parse-fresh
(O) Word: (parse-lines)
(O) Word: (parse-until)
(O) Word: parse-step
(O) Word: execute-parsing
(O) Word: POSTPONE: USING:
(O) Word: use-vocab
(O) Method: M\ vocab (load-vocab)
(O) Word: load-source
(O) Word: require
(O) Method: M\ vocab (load-vocab)
(O) Word: load-source
(O) Word: add-startup-hook
(U) Quotation: [ default-mersenne-twister -> random-generator set-global ]
(O) Word: default-mersenne-twister
(O) Word: random-integer
(O) Method: M\ windows-rng random-bytes*
(O) Word: windows-crypto-context
(O) Word: attempt-crypto-context
(U) Quotation: [
-> B{
112 114 105 109 105 116 105 118 101 95 97 108 105 101
110 95 99 101 108 108 0
} do-primitive
]
Word: alien-cell
(U) Quotation: [
63 special-object error-thread set-global
continuation -> error-continuation set-global
[ original-error set-global ] [ rethrow ] bi
]
resource:basis/tools/deploy/deploy.factor
3: USING: tools.deploy.backend system vocabs vocabs.loader kernel
^
resource:basis/tools/deploy/backend/backend.factor
3: USING: namespaces make continuations.private kernel.private init
8: io.directories.hierarchy io.backend quotations io.launcher
^
resource:basis/io/launcher/launcher.factor
3: USING: system kernel namespaces strings hashtables sequences assocs
6: io.backend io.timeouts io.pipes io.pipes.private io.encodings
^
resource:basis/io/pipes/windows/nt/nt.factor
3: USING: alien alien.c-types arrays destructors io io.backend.windows libc
6: random combinators accessors io.pipes io.ports literals ;
^
Type check error
Object: 1
Object type: fixnum
Expected type: alien
The following restarts are available:
:1 Load resource:basis/io/pipes/windows/nt/nt.factor again
:2 Load resource:basis/io/launcher/launcher.factor again
:3 Load resource:basis/tools/deploy/backend/backend.factor again
4 :res Load resource:basis/tools/deploy/deploy.factor again
( scratchpad ) :c :r :s
(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: [ swap >c call -> c> drop ]
(U) Quotation: [
nano-count 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 wince?
[ "windows.ce" require ] when os winnt?
[ "windows.nt" 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
(O) Word: require
(O) Method: M\ vocab (load-vocab)
(O) Word: load-source
(U) Quotation: [
{
"editors"
"inspector"
"bootstrap.image"
"see"
"tools.annotations"
"tools.crossref"
"tools.errors"
"tools.deploy"
"tools.destructors"
"tools.disassembler"
"tools.dispatch"
"tools.memory"
"tools.profiler"
"tools.test"
"tools.time"
"tools.threads"
"tools.deprecation"
"vocabs.hierarchy"
"vocabs.refresh"
"vocabs.refresh.monitor"
} [ require ] each -> { ~array~ ~array~ } cond
]
(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
(O) Word: require
(O) Method: M\ vocab (load-vocab)
(O) Word: load-source
(O) Word: parse-file
(O) Word: parse-stream
(O) Word: parse-fresh
(O) Word: (parse-lines)
(O) Word: (parse-until)
(O) Word: parse-step
(O) Word: execute-parsing
(O) Word: POSTPONE: USING:
(O) Word: use-vocab
(O) Method: M\ vocab (load-vocab)
(O) Word: load-source
(O) Word: parse-file
(O) Word: parse-stream
(O) Word: parse-fresh
(O) Word: (parse-lines)
(O) Word: (parse-until)
(O) Word: parse-step
(O) Word: execute-parsing
(O) Word: POSTPONE: USING:
(O) Word: use-vocab
(O) Method: M\ vocab (load-vocab)
(O) Word: load-source
(O) Word: parse-file
(O) Word: parse-stream
(O) Word: parse-fresh
(O) Word: (parse-lines)
(O) Word: (parse-until)
(O) Word: parse-step
(O) Word: execute-parsing
(O) Word: POSTPONE: USING:
(O) Word: use-vocab
(O) Method: M\ vocab (load-vocab)
(O) Word: load-source
(O) Word: require
(O) Method: M\ vocab (load-vocab)
(O) Word: load-source
(O) Word: parse-file
(O) Word: parse-stream
(O) Word: parse-fresh
(O) Word: (parse-lines)
(O) Word: (parse-until)
(O) Word: parse-step
(O) Word: execute-parsing
(O) Word: POSTPONE: USING:
(O) Word: use-vocab
(O) Method: M\ vocab (load-vocab)
(O) Word: load-source
(O) Word: require
(O) Method: M\ vocab (load-vocab)
(O) Word: load-source
(O) Word: add-startup-hook
(U) Quotation: [ default-mersenne-twister -> random-generator set-global ]
(O) Word: default-mersenne-twister
(O) Word: random-integer
(O) Method: M\ windows-rng random-bytes*
(O) Word: windows-crypto-context
(O) Word: attempt-crypto-context
(U) Quotation: [
-> B{
112 114 105 109 105 116 105 118 101 95 97 108 105 101
110 95 99 101 108 108 0
} do-primitive
]
Word: alien-cell
(U) Quotation: [
63 special-object error-thread set-global
continuation -> error-continuation set-global
[ original-error set-global ] [ rethrow ] bi
]
[ ~quotation~ ~quotation~ recover ]
(( -- ))
(( -- ))
{ }
[ ~array~ nth-unsafe "bootstrap." prepend require ]
10
5
[ ~array~ nth-unsafe require ]
20
7
f
";"
T{ manifest f f H{ ~array~ } ~vector~ ~vector~ ~vector~ }
"tools.deploy.backend"
T{ manifest f f H{ ~array~ } ~vector~ ~vector~ ~vector~ }
f
";"
T{ manifest f f H{ ~array~ ~array~ ~array~ ~array~ ~array~...
"io.launcher"
T{ manifest f f H{ ~array~ ~array~ ~array~ ~array~ ~array~...
f
";"
T{ manifest f f H{ ~array~ ~array~ ~array~ ~array~ ~array~...
"io.pipes"
T{ manifest f f H{ ~array~ ~array~ ~array~ ~array~ ~array~...
f
";"
T{ manifest f f H{ ~array~ ~array~ ~array~ ~array~ ~array~...
"random"
T{ manifest f f H{ ~array~ ~array~ ~array~ ~array~ ~array~...
V{ ~array~ ~array~ ~array~ ~array~ ~array~ ~array~ ~array~...
"bootstrap.random"
[ default-mersenne-twister random-generator set-global ]
5
1
"Microsoft Enhanced Cryptographic Provider v1.0"
31140169025672
T{ vocab f "bootstrap.tools" H{ } f f f f }
T{ vocab f "bootstrap.tools" H{ } f f f f }
T{ vocab f "tools.deploy" H{ } f f f f }
T{ vocab f "tools.deploy" H{ } f f f f }
{ "! Copyright (C) 2007, 2010 Slava Pestov."...
V{ }
T{ vocab f "tools.deploy.backend" H{ } f f f f }
T{ vocab f "tools.deploy.backend" H{ } f f f f }
{ "! Copyright (C) 2007, 2010 Slava Pestov."...
V{ }
T{ vocab f "io.launcher" H{ } f f f f }
T{ vocab f "io.launcher" H{ } f f f f }
{ "! Copyright (C) 2008, 2010 Slava Pestov."...
V{ }
T{ vocab f "io.pipes" H{ ~array~ ~array~ ~array~ ~array~...
T{ vocab f "io.pipes" H{ ~array~ ~array~ ~array~ ~array~...
T{ vocab f "io.pipes.windows.nt" H{ } f f f f }
T{ vocab f "io.pipes.windows.nt" H{ } f f f f }
{ "! Copyright (C) 2007, 2008 Doug Coleman, Slava Pestov."...
V{ }
T{ vocab f "random" H{ ~array~ ~array~ ~array~ ~array~ ~array~...
T{ vocab f "random" H{ ~array~ ~array~ ~array~ ~array~ ~array~...
T{ vocab f "random.mersenne-twister" H{ ~array~ ~array~ } f f f...
T{ vocab f "random.mersenne-twister" H{ ~array~ ~array~ } f f f...
4294967296
5
{ "kernel-error" 3 6 1 }
-------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------
This SF.net Dev2Dev email is sponsored by:
Show off your parallel programming skills.
Enter the Intel(R) Threading Challenge 2010.
http://p.sf.net/sfu/intel-thread-sfd
_______________________________________________
Factor-talk mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/factor-talk