如果不告知，会使ada程序的输出缩进什么？

Question

我目前正在learning.adacore.com上进行Ada教程，现在是第二个示例：读取和输出整数。由于复制粘贴适用于不想学习语法的人，因此我手动键入了大部分代码（其中一些是由gnat-gps生成的，但现在使用的是vim）。

我编译并运行了该程序，令人惊讶的是，输出的第二行大约缩进了一个制表符。为什么？

这是代码：

With Ada.Text_IO;
Use Ada.Text_IO;
With Ada.Integer_Text_IO;
use Ada.Integer_Text_IO;

procedure Main is
    N : Integer;
begin
   --  Insert code here.
    Put("Enter an integer value: ");
    Get(N);
    if N>0 then
        Put (N);
        Put_Line(" is a positive number");
    end if;
end Main;

（如何获取语法突出显示？）

以下是输出示例（第一个输入）：

Enter an integer value: 1
          1 is a positive number

Answer 1

Ada.Integer_Text_IO的Put过程使用默认字段宽度填充空格。该过程的规范在《Ada语言参考手册》中定义为：

procedure Put(Item  : in Num;
              Width : in Field := Default_Width;
              Base  : in Number_Base := Default_Base);

给Width和Base参数指定默认值。您对Put的调用仅提供了形式参数Item的值。要消除左填充，只需指定所需的宽度即可。我建议您使用Ada命名符号进行通话，如下所示

Put(Item => N, Width => 1);