Fixes
parent
76049e7d9c
commit
674e993ce3
|
@ -2,11 +2,11 @@
|
||||||
|
|
||||||
- inline float allocation needs a gc check
|
- inline float allocation needs a gc check
|
||||||
- docs: don't pass volatile aliens to callbacks
|
- docs: don't pass volatile aliens to callbacks
|
||||||
|
- docs: mention that 'like' may destroy the underlying sequence
|
||||||
|
- don't save big free chunk at the end of the code heap
|
||||||
|
|
||||||
+ ui:
|
+ ui:
|
||||||
|
|
||||||
- doc/handbook/alien.facts formatting wrong (erg)
|
|
||||||
- docs: mention that 'like' may destroy the underlying sequence
|
|
||||||
- live search: timer delay would be nice
|
- live search: timer delay would be nice
|
||||||
- menu should stay up if mouse button released
|
- menu should stay up if mouse button released
|
||||||
- roundoff is still not quite right with tracks
|
- roundoff is still not quite right with tracks
|
||||||
|
@ -73,7 +73,6 @@
|
||||||
|
|
||||||
+ misc:
|
+ misc:
|
||||||
|
|
||||||
- don't save big free chunk at the end of the code heap
|
|
||||||
- faster apropos
|
- faster apropos
|
||||||
- growable data heap
|
- growable data heap
|
||||||
- minor GC takes too long now, we should card mark code heap
|
- minor GC takes too long now, we should card mark code heap
|
||||||
|
|
|
@ -7,12 +7,12 @@ vectors math parser ;
|
||||||
|
|
||||||
PREDICATE: word class ( obj -- ? ) "class" word-prop ;
|
PREDICATE: word class ( obj -- ? ) "class" word-prop ;
|
||||||
|
|
||||||
PREDICATE: word builtin ( obj -- ? ) builtins get memq? ;
|
|
||||||
|
|
||||||
SYMBOL: typemap
|
SYMBOL: typemap
|
||||||
SYMBOL: class<map
|
SYMBOL: class<map
|
||||||
SYMBOL: builtins
|
SYMBOL: builtins
|
||||||
|
|
||||||
|
PREDICATE: word builtin ( obj -- ? ) builtins get memq? ;
|
||||||
|
|
||||||
: classes ( -- seq ) class<map get hash-keys ;
|
: classes ( -- seq ) class<map get hash-keys ;
|
||||||
|
|
||||||
: type>class ( n -- class ) builtins get nth ;
|
: type>class ( n -- class ) builtins get nth ;
|
||||||
|
|
|
@ -118,7 +118,7 @@ M: tuple-class see-class*
|
||||||
M: word see-class* drop ;
|
M: word see-class* drop ;
|
||||||
|
|
||||||
: see-class ( word -- )
|
: see-class ( word -- )
|
||||||
dup class? over builtin? not [
|
dup class? over builtin? not and [
|
||||||
terpri [ see-class* ] with-pprint terpri
|
terpri [ see-class* ] with-pprint terpri
|
||||||
] [
|
] [
|
||||||
drop
|
drop
|
||||||
|
|
Loading…
Reference in New Issue