From 637df990d35c10387f26a1548955d9d24a4ee927 Mon Sep 17 00:00:00 2001
From: Vany Ingenzi <ingenzi@intel17.info.ucl.ac.be>
Date: Mon, 13 Dec 2021 08:48:45 +0100
Subject: [PATCH] Changed main to match interoporality

---
 Main.oz            | 2 +-
 Player020Hunter.oz | 2 +-
 Player020Random.oz | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/Main.oz b/Main.oz
index 9adface..5e77242 100644
--- a/Main.oz
+++ b/Main.oz
@@ -17,7 +17,7 @@ define
         of nil#nil then nil
         [] (Player|OtherPlayers)#(Color|OtherColors) then 
             player( 
-                    port:{PlayerManager.playerGenerator Player Color AccID}
+                    port:{PlayerManager.playerGenerator Player Color id(id:AccID color:Color name:Player)}
                     nbSurface: 0 %% All the players start underwater
                   )|{InitPlayers OtherPlayers OtherColors AccID+1}
         end
diff --git a/Player020Hunter.oz b/Player020Hunter.oz
index 5df8fd2..39e584a 100644
--- a/Player020Hunter.oz
+++ b/Player020Hunter.oz
@@ -417,7 +417,7 @@ define
     in
         {NewPort Stream Port}
         thread
-            {AliveTreatStream Stream '#'(   id:id(id:ID color:Color name:name) 
+            {AliveTreatStream Stream '#'(   id:ID
                                             life:Input.maxDamage
                                             pos:pt(x:0 y:0)
                                             chargingItems:{InitChargingItemsMissile Input.nbPlayer nil}
diff --git a/Player020Random.oz b/Player020Random.oz
index b471aeb..3b32e0a 100644
--- a/Player020Random.oz
+++ b/Player020Random.oz
@@ -350,7 +350,7 @@ define
     in
         {NewPort Stream Port}
         thread
-            {AliveTreatStream Stream '#'(   id:id(id:ID color:Color name:name) 
+            {AliveTreatStream Stream '#'(   id:ID
                                             life:Input.maxDamage
                                             pos:pt(x:0 y:0)
                                             chargingItems:[ {GetNewChargeFireItem mine} {GetNewChargeFireItem missile}
-- 
GitLab