gel.world: Add 'Mirror_as_observer' parameter to 'deregister' procedure.

This commit is contained in:
Rod Kay
2024-08-20 11:07:04 +10:00
parent 2a82dc5fda
commit e63740494b
7 changed files with 28 additions and 19 deletions

View File

@@ -51,7 +51,8 @@ is
procedure register (Self : access Item; the_Mirror : in remote.World.view;
Mirror_as_observer : in lace.Observer.view);
overriding
procedure deregister (Self : access Item; the_Mirror : in remote.World.view);
procedure deregister (Self : access Item; the_Mirror : in remote.World.view;
Mirror_as_observer : in lace.Observer.view);
overriding
procedure evolve (Self : in out Item);