==== DATA STACK: { "IN: classes.tuple.parser.tests" "USING: accessors classes.tuple.parser lexer words classes" "sequences math kernel slots tools.test parser compiler.units" "arrays classes.tuple eval ;" "" "TUPLE: test-1 ;" "" "[ t ] [ test-1 "slots" word-prop empty? ] unit-test" "" "TUPLE: test-2 < test-1 ;"... } T{ vectors:vector { [ syntax:t ] [ # "slots" words:word-prop sequences:empty? ] tools.test:unit-test [ syntax:t ] [ # "slots" words:word-prop sequences:empty? ] tools.test:unit-test [ # ] [ # classes:superclass ] tools.test:unit-test [ { "a" } ]... } 18 } test-5? [ kernel:dup kernel:tuple? [ classes.tuple.private:layout-of 7 slots.private:slot # kernel:eq? ] [ kernel:drop f ] kernel:if ] test-5? T{ hashtables:hashtable 0 0 { } } words:visited T{ hashtables:hashtable 0 0 { } } READY .c ==== CALL STACK: [ kernel:swap continuations.private:>c kernel:call continuations.private:c> kernel:drop ] 2 aafc9b63 b0b19ef0 [ command-line:(command-line) command-line:parse-command-line command-line:load-vocab-roots command-line:run-user-init "e" namespaces:get [ eval:eval ] kernel:when* command-line:ignore-cli-args? kernel:not... ] 15 aafc9c0b b10f7240 [ T{ hashtables:hashtable 0 0 { T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } } } kernel:clone namespaces.private:>n kernel:call namespaces.private:ndrop ] 3 aafc9f0b b0b00430 [ listener.private:listen listener.private:until-quit ] 0 aafc9fcb b0b53430 [ kernel:swap continuations.private:>c kernel:call continuations.private:c> kernel:drop ] 2 aafc9b63 b0b19ef0 [ kernel:swap continuations.private:>c kernel:call continuations.private:c> kernel:drop ] 2 aafc9b63 b0b19ef0 tools.test:test-all f aafca043 b0ee35f0 tools.test:run-tests f aafca0d3 b0f3cc20 tools.test:run-test f aafca223 b0ef72b0 tools.test:(run-test) f aafca553 b0ef8170 parser:run-file f aafca673 b0d1f670 continuations:with-datastack f aafca73b b0b3fd50 [ [ [ { } sequences:like kernel:set-datastack ] kernel:dip kernel:call kernel:datastack ] kernel:dip continuations:continue-with ] 1 aafca7a3 b0b1efa0 [ [ { } sequences:like kernel:set-datastack ] kernel:dip kernel:call kernel:datastack ] 2 aafca7eb b0b1ef30 [ parser:parse-file kernel:call ] 0 aafca6e3 b0b1eff0 [ kernel:swap continuations.private:>c kernel:call continuations.private:c> kernel:drop ] 2 aafc9b63 b0b19ef0 [ T{ hashtables:hashtable 0 0 { T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } } } kernel:clone namespaces.private:>n kernel:call namespaces.private:ndrop ] 3 aafc9f0b b0b00430 [ [ kernel:compose [ kernel:dip continuations:rethrow ] kernel:curry continuations:recover ] [ kernel:drop ] kernel:2bi kernel:call ] 2 ab39225b b0aaa3e0 [ [ kernel:2keep ] kernel:dip kernel:call ] 1 ab7ad10b b0af8fd0 [ [ kernel:call ] kernel:2dip ] 1 ab15a513 b0afcd70 [ kernel:swap continuations.private:>c kernel:call continuations.private:c> kernel:drop ] 2 aafc9b63 b0b19ef0 [ T{ hashtables:hashtable 0 0 { T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } } } kernel:clone namespaces.private:>n kernel:call namespaces.private:ndrop ] 3 aafc9f0b b0b00430 [ [ kernel:compose [ kernel:dip continuations:rethrow ] kernel:curry continuations:recover ] [ kernel:drop ] kernel:2bi kernel:call ] 2 ab39225b b0aaa3e0 [ [ kernel:2keep ] kernel:dip kernel:call ] 1 ab7ad10b b0af8fd0 [ [ kernel:call ] kernel:2dip ] 1 ab15a513 b0afcd70 [ kernel:swap continuations.private:>c kernel:call continuations.private:c> kernel:drop ] 2 aafc9b63 b0b19ef0 [ T{ hashtables:hashtable 0 0 { T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } } } kernel:clone namespaces.private:>n kernel:call namespaces.private:ndrop ] 3 aafc9f0b b0b00430 [ kernel:swap continuations.private:>c kernel:call continuations.private:c> kernel:drop ] 2 aafc9b63 b0b19ef0 [ io:lines kernel:dup parser:parse-fresh [ kernel:nip ] [ parser:finish-parsing ] kernel:2bi parser:forget-smudged ] 2 ac4da22b b0b1f400 [ T{ hashtables:hashtable 0 0 { T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } T{ hashtables.private:tombstone f } } } kernel:clone namespaces.private:>n kernel:call namespaces.private:ndrop ] 3 aafc9f0b b0b00430 [ T{ vectors:vector { } 0 } kernel:clone parser:amended-use namespaces:set parser:parse-lines parser:amended-use namespaces:get sequences:empty? [ parser:print-use-hook namespaces:get kernel:call ] kernel:unless ] 4 ab3714f3 b0b1fe20 [ kernel:swap continuations.private:>c kernel:call continuations.private:c> kernel:drop ] 2 aafc9b63 b0b19ef0 [ f parser:parse-until quotations:>quotation ] 1 ac46281b b0b1ff20 [ [ parser:parse-step ] kernel:keep kernel:swap [ parser:(parse-until) ] [ kernel:drop ] kernel:if ] 1 abc495fb b0abf970 [ [ kernel:call ] kernel:dip ] 1 ab15a3f3 b0afb4c0 [ kernel:nip parser:execute-parsing syntax:t ] 1 ac946e83 b0b20430 classes:update-classes f ab244f3b b0d099a0 classes:update-class f ab238563 b0d01ed0 words:define f ab1fa403 b0d01570 words:redefined f ab2c2b7b b0cff330 hashtables:associate f aafca4c3 b0ad2a50 hashtables: f aafe0673 b0ac6e30 READY