Commit aa03068a authored by bp's avatar bp

Fixed crash with backing&doublebuffer

git-svn-id: https://forth-ev.de/repos/bigforth@1661 3b8d8251-53f3-0310-8f3b-fd1cb8370982
parent 111f2a3b
......@@ -183,7 +183,7 @@ how: : >box 'nil bind childs 'nil bind active
IF xywh 2dup 2>r resize xywh 2swap 2drop
>range 2r> d= IF draw EXIT THEN THEN
ELSE hglue 2drop vglue 2drop THEN
parent resized ;
parent self IF parent resized THEN ;
: flip attribs c@ :flip and IF +flip ELSE -flip THEN ;
: -flip attribs c@ :flip or attribs c!
hide parent !resized parent resized ;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment