#433 fromBind, drToXmlNode等をCommon.hsに移動させた