From 051ddb2a265dda897bce72edc318beadd111eba2 Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Sun, 6 Aug 2017 21:55:23 +1000 Subject: Mouseclick pathing now implemented --- src/moves.ads | 10 ++++++++++ 1 file changed, 10 insertions(+) (limited to 'src/moves.ads') diff --git a/src/moves.ads b/src/moves.ads index 1462847..728526c 100644 --- a/src/moves.ads +++ b/src/moves.ads @@ -32,6 +32,11 @@ package Moves is List : in Path); + procedure Prefix + (This : in out Path; + Item : in Move); + + function Latest (This : in Path) return Move; @@ -46,6 +51,11 @@ package Moves is return Natural; + procedure Total_Delta + (This : in Path; + DX, DY : out Integer); + + private -- cgit