compiler.tree.propagation.known-words: retry this change, some issue with use vocabs.

db4
John Benediktsson 2013-01-22 07:09:49 -08:00
parent f5c898734c
commit 5a7e7b8d9b
1 changed files with 13 additions and 0 deletions

View File

@ -9,6 +9,7 @@ combinators generic.math splitting fry locals classes.tuple
alien.accessors classes.tuple.private slots.private definitions
strings.private vectors hashtables generic quotations alien
alien.data alien.data.private
strings sbufs byte-arrays byte-vectors
stack-checker.dependencies
compiler.tree.comparisons
compiler.tree.propagation.info
@ -240,6 +241,18 @@ generic-comparison-ops [
'[ _ swap interval>> <class/interval-info> ] "outputs" set-word-prop
] 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 }
[ [ drop integer <class-info> ] "outputs" set-word-prop ] each