let to_list ~keep_default set =
    fold
      (fun n l -> if (n = StmtDefault.default) && not keep_default then l else n::l)
      set []