1361 |
(ses-set-parameter 'ses--file-format 2) |
(ses-set-parameter 'ses--file-format 2) |
1362 |
(message "Upgrading from SES-1 file format"))) |
(message "Upgrading from SES-1 file format"))) |
1363 |
(or (= ses--file-format 2) |
(or (= ses--file-format 2) |
1364 |
(error "This file needs a newer version of the SES library code.")) |
(error "This file needs a newer version of the SES library code")) |
1365 |
(ses-create-cell-variable-range 0 (1- ses--numrows) 0 (1- ses--numcols)) |
(ses-create-cell-variable-range 0 (1- ses--numrows) 0 (1- ses--numcols)) |
1366 |
;;Initialize cell array |
;;Initialize cell array |
1367 |
(setq ses--cells (make-vector ses--numrows nil)) |
(setq ses--cells (make-vector ses--numrows nil)) |