git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@7390 8c9fc860-2736-0410-a75d-ab315db34111
@@ -3562,6 +3562,10 @@ BEGIN
NEW(image); RETURN image;
END GenImage;
+PROCEDURE GenImagePanel*() : XML.Element;
+VAR ip : ImagePanel;
+BEGIN NEW(ip); RETURN ip
+END GenImagePanel;
(**********************************************************************************************)