(defvar array-respect-tabs))
;;; Internal information functions.
-
+
(defun array-cursor-in-array-range ()
"Return t if the cursor is in a valid array cell.
Its ok to be on a row number line."
(insert array-copy-string))
(move-to-column array-buffer-column)
(setq count (1- count)))))
-
+
(defun array-copy-to-column (a-column)
"Copy current field horizontally into every cell up to and including A-COLUMN.
Leave point at the beginning of the field."
(provide 'array)
+;;; arch-tag: 0086605d-79fe-4a1a-992a-456417261f80
;;; array.el ends here