let pending_statements_at_beginning : stmt list ref = ref []