compiler.tree.propagation.known-words: retry this change, some issue with use vocabs.
parent
f5c898734c
commit
5a7e7b8d9b
|
@ -9,6 +9,7 @@ combinators generic.math splitting fry locals classes.tuple
|
||||||
alien.accessors classes.tuple.private slots.private definitions
|
alien.accessors classes.tuple.private slots.private definitions
|
||||||
strings.private vectors hashtables generic quotations alien
|
strings.private vectors hashtables generic quotations alien
|
||||||
alien.data alien.data.private
|
alien.data alien.data.private
|
||||||
|
strings sbufs byte-arrays byte-vectors
|
||||||
stack-checker.dependencies
|
stack-checker.dependencies
|
||||||
compiler.tree.comparisons
|
compiler.tree.comparisons
|
||||||
compiler.tree.propagation.info
|
compiler.tree.propagation.info
|
||||||
|
@ -240,6 +241,18 @@ generic-comparison-ops [
|
||||||
'[ _ swap interval>> <class/interval-info> ] "outputs" set-word-prop
|
'[ _ swap interval>> <class/interval-info> ] "outputs" set-word-prop
|
||||||
] assoc-each
|
] assoc-each
|
||||||
|
|
||||||
|
{
|
||||||
|
{ >array array }
|
||||||
|
{ >vector vector }
|
||||||
|
{ >string string }
|
||||||
|
{ >sbuf sbuf }
|
||||||
|
{ >byte-array byte-array }
|
||||||
|
{ >byte-vector byte-vector }
|
||||||
|
{ >hashtable hashtable }
|
||||||
|
} [
|
||||||
|
'[ drop _ <class-info> ] "outputs" set-word-prop
|
||||||
|
] assoc-each
|
||||||
|
|
||||||
{ numerator denominator }
|
{ numerator denominator }
|
||||||
[ [ drop integer <class-info> ] "outputs" set-word-prop ] each
|
[ [ drop integer <class-info> ] "outputs" set-word-prop ] each
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue