X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=code%2FSokoban.dcl;h=32b5e110fee9a4498fbaa6e1be9a302e81f83c4b;hb=1df8158b127c3888d1ab10db0e6c05da2c795e1c;hp=30e9465e163abfc5518b5736db1da3ffbe9ac1db;hpb=9754f5cfb7a38d480ecf72dc87d4c67cd774c9d7;p=mc1516pa.git

diff --git a/code/Sokoban.dcl b/code/Sokoban.dcl
index 30e9465..32b5e11 100644
--- a/code/Sokoban.dcl
+++ b/code/Sokoban.dcl
@@ -4,6 +4,6 @@ definition module Sokoban
 	width :: Int,
 	height :: Int,
 	data :: [[SokobanTile]]}
-:: SokobanTile = Wall | Free | Box | Target
+:: SokobanTile = Wall | Free | Box | Target | Agent
 
 parse :: String *World -> (SokobanPuzzle, *World)