试图在Ada中的文件末尾添加文本

我第一次使用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

---

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

尝试附加文件而不是输出文件：

Open（文件=>out\u parcial\u variante1，Name=>“c.txt”，Mode=>append\u file）
只是为了详细说明一个公认的答案：“out\u file”模式创建一个全新的要写入的文件（清除已有的任何文件）。类似地，模式“out”的参数没有定义的初始值（即使您提供的实际参数可能已初始化为某个值），并且在初始化之前不应从中读取。在Ada中，“out”和“In”是指他们所说的。：-）
 +1仍然使用ADA有时我希望他们将“Append_File”命名为“In_Out_File”，以与上面的参数保持一致。：-）Text_IO.Append_文件不允许您返回该文件。Direct_IO具有模式。