method
packing : (
GObj
.widget
->
unit) =
match
packing
with
None
->
(
fun
x
->
())
|
Some
f
->
f