1
1
mirror of https://github.com/kanaka/mal.git synced 2024-10-05 18:08:55 +03:00

ada.2: typo

This commit is contained in:
Nicolas Boulenguez 2020-07-21 18:34:36 +02:00
parent 2db459fc59
commit ece70f9703

View File

@ -46,7 +46,7 @@ package body Types.Atoms is
function Swap (Args : in T_Array) return T is
begin
Err.Check (2 <= Args'Length and then Args (Args'First).Kind = Kind_Atom,
"expected an atom, optional arguments then a function");
"expected an atom, a function, then optional arguments");
declare
X : T renames Args (Args'First).Atom.all.Data;
F : T renames Args (Args'First + 1);