Fix bootstrap bug and ungraft bug

slava 2006-07-05 22:47:42 +00:00
parent 23ebcbad42
commit 81a9a2f977
3 changed files with 4 additions and 5 deletions

View File

@ -8,7 +8,6 @@
- multiple listener-run-files is broken - multiple listener-run-files is broken
- roundoff is still not quite right with tracks - roundoff is still not quite right with tracks
- world title a model? gadget-title returns one
- httpd search tools - httpd search tools
- get embedded factor templates in httpd working better - get embedded factor templates in httpd working better
- docs: slice: if sequence or seq start is changed, abstraction violation - docs: slice: if sequence or seq start is changed, abstraction violation
@ -29,10 +28,10 @@ tathi: hrm. wish I knew more about OpenGL.
+ ui: + ui:
- xref f and \ f together
- grid slows down with 2000 lines - grid slows down with 2000 lines
- f should be clickable - f should be clickable
- clickable vocabs - clickable vocabs
- x11 raise-window
- remaining HTML issues need fixing - remaining HTML issues need fixing
- better component padding and spacing in UI - better component padding and spacing in UI
- see if its possible to only repaint dirty regions - see if its possible to only repaint dirty regions

View File

@ -1,7 +1,7 @@
USING: io kernel parser sequences ; USING: io kernel parser sequences ;
"/library/unix/types.factor" run-resource "/library/io/unix/types.factor" run-resource
"/library/unix/syscalls-" os ".factor" append3 run-resource "/library/io/unix/syscalls-" os ".factor" append3 run-resource
[ [
"/library/io/unix/syscalls.factor" "/library/io/unix/syscalls.factor"

View File

@ -19,7 +19,7 @@ M: gadget ungraft* drop ;
: ungraft ( gadget -- ) : ungraft ( gadget -- )
dup gadget-grafted? [ dup gadget-grafted? [
dup [ ungraft* ] each-child dup [ ungraft ] each-child
dup ungraft* dup ungraft*
f over set-gadget-grafted? f over set-gadget-grafted?
] when drop ; ] when drop ;