let cell_stop ~loc ~(error:Error.error_fun) tab =
    begin match tab.current_cell with
    | Some c -> 
        tab.cells <- c :: tab.cells;
        tab.current_cell <- None;
    | None ->
        (* already errored *)
        ()
    end