Collections

Zend/tests/collection/collection_dict_basic.phpt

@@ -0,0 +1,67 @@
+--TEST--
+Collection: Dictionary
+--FILE--
+<?php
+class Article
+{
+	function __construct(public string $title)
+	{
+	}
+}
+
+collection(Dict) Articles<string => Article>
+{
+}
+
+$c = new Articles;
+$c["nine"] = new Article("First Test");
+$c["ten"] = new Article("Second Test");
+$c->add("seven", new Article("Third Test"));
+
+var_dump($c);
+
+var_dump(isset($c["eight"]));
+var_dump(isset($c["nine"]));
+var_dump(isset($c["ten"]));
+
+var_dump($c["nine"]);
+
+unset($c["nine"]);
+var_dump(isset($c["nine"]));
+
+try {
+	var_dump(isset($c[11]));
+} catch (Error $e) {
+	echo get_class($e), ': ', $e->getMessage(), "\n";
+}
+?>
+--EXPECTF--
+object(Articles)#%d (%d) {
+  ["value"]=>
+  array(3) {
+    ["nine"]=>
+    object(Article)#%d (%d) {
+      ["title"]=>
+      string(10) "First Test"
+    }
+    ["ten"]=>
+    object(Article)#%d (%d) {
+      ["title"]=>
+      string(11) "Second Test"
+    }
+    ["seven"]=>
+    object(Article)#%d (%d) {
+      ["title"]=>
+      string(10) "Third Test"
+    }
+  }
+}
+bool(false)
+bool(true)
+bool(true)
+object(Article)#%d (%d) {
+  ["title"]=>
+  string(10) "First Test"
+}
+bool(false)
+TypeError: Key type int of element does not match Articles dictionary key type string

Zend/tests/collection/collection_dict_concat-errors.phpt

@@ -0,0 +1,82 @@
+--TEST--
+Collection: Dictionary: Concat Errors
+--FILE--
+<?php
+
+class Book {
+    public function __construct(public string $title) {}
+}
+class DutchBook extends Book {}
+
+class Article {
+    public function __construct(public string $subject) {}
+}
+
+collection(Dict) Books<string => Book> {}
+collection(Dict) YBooks<int => Book> {}
+collection(Dict) DutchBooks<string => DutchBook> {}
+collection(Dict) Articles<string => Article> {}
+
+$c1 = new Books();
+$c1->add("one", new Book('Title 1'));
+$c1->add("two", new Book('Title 2'));
+
+$y1 = new YBooks();
+$y1->add(1970, new Book('Title 1'));
+$y1->add(1971, new Book('Title 2'));
+
+$d1 = new DutchBooks();
+$d1->add("één", new DutchBook('Titel 1'));
+$d1->add("twee", new DutchBook('Titel 2'));
+
+$a2 = new Articles();
+$a2->add("three", new Article('Subject 1'));
+$a2->add("four", new Article('Subject 2'));
+
+try {
+	$c1->concat(new Book('Title E'));
+} catch (TypeError $e) {
+	echo get_class($e), ': ', $e->getMessage(), "\n";
+}
+
+try {
+	$c1->concat($a2);
+} catch (TypeError $e) {
+	echo get_class($e), ': ', $e->getMessage(), "\n";
+}
+
+try {
+	$cr = $c1->concat($d1);
+	echo "Inheritence: OK\n";
+} catch (TypeError $e) {
+	echo get_class($e), ': ', $e->getMessage(), "\n";
+}
+
+try {
+	$cr = $d1->concat($c1);
+} catch (TypeError $e) {
+	echo get_class($e), ': ', $e->getMessage(), "\n";
+}
+
+try {
+	$why = $c1->concat($y1);
+	var_dump( $why );
+} catch (TypeError $e) {
+	echo get_class($e), ': ', $e->getMessage(), "\n";
+}
+
+try {
+	$why = $y1->concat($c1);
+	var_dump( $why );
+} catch (TypeError $e) {
+	echo get_class($e), ': ', $e->getMessage(), "\n";
+}
+
+?>
+--EXPECT--
+TypeError: Books::concat(): Argument #1 ($other) must be of type DictCollection, Book given
+TypeError: Value type Books does not match Article collection item type Book
+Inheritence: OK
+TypeError: Value type DutchBooks does not match Book collection item type DutchBook
+TypeError: Key type int of element does not match Books dictionary key type string
+TypeError: Key type string of element does not match YBooks dictionary key type int

Zend/tests/collection/collection_dict_concat_idx.phpt

@@ -0,0 +1,70 @@
+--TEST--
+Collection: Dictionary: Concat (int key)
+--FILE--
+<?php
+
+class Book {
+    public function __construct(public string $title) {}
+}
+
+collection(Dict) Books<int => Book> {}
+
+$c1 = new Books();
+$c2 = new Books();
+
+$c1->add(41, new Book('Title 1'));
+$c1->add(42, new Book('Title 2'));
+
+$c2->add(43, new Book('Title 3'));
+$c2->add(44, new Book('Title 4'));
+
+$c3 = $c1->concat($c2);
+
+// Four items.
+var_dump($c3);
+
+// Still two items.
+var_dump($c1);
+
+?>
+--EXPECTF--
+object(Books)#%d (1) {
+  ["value"]=>
+  array(4) {
+    [41]=>
+    object(Book)#%d (1) {
+      ["title"]=>
+      string(7) "Title 1"
+    }
+    [42]=>
+    object(Book)#%d (1) {
+      ["title"]=>
+      string(7) "Title 2"
+    }
+    [43]=>
+    object(Book)#%d (1) {
+      ["title"]=>
+      string(7) "Title 3"
+    }
+    [44]=>
+    object(Book)#%d (1) {
+      ["title"]=>
+      string(7) "Title 4"
+    }
+  }
+}
+object(Books)#%d (1) {
+  ["value"]=>
+  array(2) {
+    [41]=>
+    object(Book)#%d (1) {
+      ["title"]=>
+      string(7) "Title 1"
+    }
+    [42]=>
+    object(Book)#%d (1) {
+      ["title"]=>
+      string(7) "Title 2"
+    }
+  }
+}

Zend/tests/collection/collection_dict_concat_key.phpt

@@ -0,0 +1,70 @@
+--TEST--
+Collection: Dictionary: Concat (string key)
+--FILE--
+<?php
+
+class Book {
+    public function __construct(public string $title) {}
+}
+
+collection(Dict) Books<string => Book> {}
+
+$c1 = new Books();
+$c2 = new Books();
+
+$c1->add('one', new Book('Title 1'));
+$c1->add('two', new Book('Title 2'));
+
+$c2->add('three', new Book('Title 3'));
+$c2->add('four', new Book('Title 4'));
+
+$c3 = $c1->concat($c2);
+
+// Four items.
+var_dump($c3);
+
+// Still two items.
+var_dump($c1);
+
+?>
+--EXPECTF--
+object(Books)#%d (1) {
+  ["value"]=>
+  array(4) {
+    ["one"]=>
+    object(Book)#%d (1) {
+      ["title"]=>
+      string(7) "Title 1"
+    }
+    ["two"]=>
+    object(Book)#%d (1) {
+      ["title"]=>
+      string(7) "Title 2"
+    }
+    ["three"]=>
+    object(Book)#%d (1) {
+      ["title"]=>
+      string(7) "Title 3"
+    }
+    ["four"]=>
+    object(Book)#%d (1) {
+      ["title"]=>
+      string(7) "Title 4"
+    }
+  }
+}
+object(Books)#%d (1) {
+  ["value"]=>
+  array(2) {
+    ["one"]=>
+    object(Book)#%d (1) {
+      ["title"]=>
+      string(7) "Title 1"
+    }
+    ["two"]=>
+    object(Book)#%d (1) {
+      ["title"]=>
+      string(7) "Title 2"
+    }
+  }
+}

Zend/tests/collection/collection_dict_equality.phpt

@@ -0,0 +1,95 @@
+--TEST--
+Collection: Dictionary: Equals
+--FILE--
+<?php
+
+class Book {
+    public function __construct(public string $title) {}
+}
+
+collection(Dict) Books<string => Book> {}
+collection(Dict) BooksOther<string => Book> {}
+collection(Dict) YearBooks<int => Book> {}
+
+$c1 = new Books();
+$c1->add('one', new Book('Title 1'));
+$c1->add('two', new Book('Title 2'));
+
+$c2 = new Books();
+$c2->add('one', new Book('Title 1'));
+$c2->add('two', new Book('Title 2'));
+
+$c3 = new Books();
+$c3->add('one', new Book('Title 1'));
+$c3->add('two', new Book('Title 2'));
+$c3->add('tri', new Book('Title 3'));
+
+$c4 = new Books();
+$c4->add('one', new Book('Title 1'));
+$c4->add('XXX', new Book('Title X'));
+$c4->add('two', new Book('Title 2'));
+
+$c5 = new Books();
+$c5->add('one', new Book('Title 1'));
+$c5->add('two', new Book('Title X'));
+$c5->add('tri', new Book('Title 2'));
+
+$c6 = new Books();
+$c6->add('one', new Book('Title 1'));
+$c6->add('XXX', new Book('Title 2'));
+$c6->add('tri', new Book('Title 3'));
+
+$c7 = new BooksOther();
+$c7->add('one', new Book('Title 1'));
+$c7->add('two', new Book('Title 2'));
+
+$c8 = new YearBooks();
+$c8->add(1970, new Book('Title 1'));
+$c8->add(1971, new Book('Title 2'));
+
+$c9 = new Books();
+$c9->add('two', new Book('Title 2'));
+$c9->add('one', new Book('Title 1'));
+
+
+// True
+var_dump($c1->equals($c1));
+var_dump($c1->equals($c2));
+var_dump($c1->equals($c7));
+var_dump($c1->equals($c9));
+
+$c2['tri'] = new Book('Title 3');
+
+var_dump($c2->equals($c3));
+
+// False
+var_dump($c1->equals($c2));
+var_dump($c1->equals($c8));
+var_dump($c3->equals($c4));
+var_dump($c3->equals($c5));
+var_dump($c3->equals($c6));
+
+unset($c4['XXX']);
+
+// True
+var_dump($c1->equals($c4));
+
+unset($c6['XXX']);
+$c6['two'] = new Book('Title 2');
+
+// True
+var_dump($c3->equals($c6));
+?>
+--EXPECTF--
+bool(true)
+bool(true)
+bool(true)
+bool(true)
+bool(true)
+bool(false)
+bool(false)
+bool(false)
+bool(false)
+bool(false)
+bool(true)
+bool(true)