suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Allowing gc heap gui shrinking

Browse Source
This commit is contained in:
Jay McCarthy 2010-08-30 14:10:16 -06:00
parent adc7d272a8
commit 5684ba4a9c
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
collects/plai/private/gc-gui.rkt
View File

@ -88,11 +88,11 @@
(vector-set! row-heights
row
(max (+ ch cell-vertical-padding)
(vector-ref row-heights row)))
#;(vector-ref row-heights row)))
(vector-set! column-widths
column
(max (+ cw cell-horizontal-padding)
(vector-ref column-widths column)))))))
#;(vector-ref column-widths column)))))))
(define/private (cell-min-size obj)
(let ([dc (get-dc)])