Emacs отступы в десятичной системе в поплавках

Question

Давайте предположим, что текстовый файл выглядит так:

0.00 33.90 -93.9 
    0.00  43.90 -93.9 
    10.00 53.90 -93.9 
    10.00 63.90 -93.9 

-100.00 10.00 -7.0 
-100.00 9.00 -8.0 
100.00 9.00 -9.0 
100.00 63.00 -10.0 

Что бы соответствующие Emacs команды выстраиваться текст так выглядеть следующим образом:

 0.00 33.90 -93.9 
    0.00 43.90 -93.9 
    10.00 53.90 -93.9 
    10.00 63.90 -93.9 

-100.00 10.00  -7.0 
-100.00  9.00  -8.0 
100.00  9.00  -9.0 
100.00 63.00 -10.0 

Поплавки должны выравниваться по вертикали в десятичной точке. Я знаком с align-regexp, но я не знаю, что align-rule-list Я должен использовать.

Answer 1

Следующая функция не работает отлично, но она должна вас начать. Атрибут justify важен для выравнивания в десятичной точке. Но нет необязательного аргумента justify для align-regexp. Чтобы узнать значение атрибутов, обратитесь к справке align-rules-list.

(defun align-numbers (beg end) 
    (interactive "r") 
    (let (indent-tabs-mode 
     (align-rules-list '((temporary 
       (regexp . "\\(*[+-]?[0-9]*\\.\\)") 
       (group . 1) 
       (justify . t) 
       (repeat . t) 
       )))) 
    (align beg end)))