let rec sgSem_of_list =
function
| [] -> Ast.SgNil ghost
| [ t ] -> t
| t :: ts ->
let _loc = loc_of_sig_item t
in Ast.SgSem (_loc, t, (sgSem_of_list ts))