let sf fmt = ksprintf s fmt