ada - 尝试在 Ada 中的文件末尾添加文本

Question

我是第一次使用 Ada，有一个 txt 文件，上面写着以下内容

      23.000000#:599.659058,-67.651642

我想在存档的换行符中添加一个 R，这样它就结束了

      23.000000#:599.659058,-67.651642
      R,

为此，我使用以下代码

  Open (File => out_parcial_variante1, Name => "c.txt", Mode => out_file);
    new_line(out_parcial_variante1);
    put(File => out_parcial_variante1, Item=> "R,");
  close(out_parcial_variante1);

但是这样做会删除存档中所有以前写入的数据，只留下新行和唯一的 R，

我如何将这段文本准确地附加到文件的末尾，我似乎可以找到函数，这是我能想到的唯一方法

Answer 1

尝试 append_file 而不是 out_file:Open (File => out_parcial_variante1, Name => "c.txt", Mode => Append_File);