tests: add NSPopUpButtonCell tests

Cover the menu model: the defaults, adding/inserting/removing titled
items, the automatic first-item selection, duplicate-title handling, the
item and index queries, selection, and the pull-down/autoenable/edge/
arrow-position accessors.

Author: DTW-Thalion

ChangeLog

@@ -1,3 +1,12 @@
+2026-07-12 Todd White <todd.white@thalion.global>
+
+	* Tests/gui/NSPopUpButtonCell/menu.m:
+	* Tests/gui/NSPopUpButtonCell/TestInfo:
+	Add tests for the NSPopUpButtonCell menu model: the defaults, adding,
+	inserting and removing titled items, the automatic first-item
+	selection, duplicate-title handling, the item and index queries,
+	selection, and the pull-down/autoenable/edge/arrow-position accessors.
+
 2026-07-12 Todd White <todd.white@thalion.global>
 
 	* Tests/gui/NSFormCell/title.m:

Tests/gui/NSPopUpButtonCell/TestInfo

@@ -0,0 +1,123 @@
+/* Coverage for the NSPopUpButtonCell menu model: the defaults, adding /
+   inserting / removing titled items, the automatic selection of the first
+   item, the way a duplicate title moves the existing item, the item and
+   index queries, selection by index and title, and the pull-down /
+   autoenable / edge / arrow-position accessors.  The cell builds a menu in
+   -init, so the set is skipped when the backend is unavailable.
+*/
+#include "Testing.h"
+
+#include <Foundation/NSArray.h>
+#include <Foundation/NSAutoreleasePool.h>
+
+#include <AppKit/NSApplication.h>
+#include <AppKit/NSMenuItem.h>
+#include <AppKit/NSPopUpButtonCell.h>
+
+static NSPopUpButtonCell *
+popup(void)
+{
+  return AUTORELEASE([[NSPopUpButtonCell alloc] initTextCell: @"" pullsDown: NO]);
+}
+
+int
+main(int argc, char **argv)
+{
+  CREATE_AUTORELEASE_POOL(arp);
+  NSPopUpButtonCell *cell;
+
+  START_SET("NSPopUpButtonCell menu")
+
+  NS_DURING
+  {
+    [NSApplication sharedApplication];
+  }
+  NS_HANDLER
+  {
+    if ([[localException name] isEqualToString: NSInternalInconsistencyException])
+      SKIP("It looks like GNUstep backend is not yet installed")
+  }
+  NS_ENDHANDLER
+
+  /* Defaults. */
+  cell = popup();
+  pass([cell pullsDown] == NO, "a popup cell does not pull down by default");
+  pass([cell autoenablesItems] == YES, "items are auto-enabled by default");
+  pass([cell usesItemFromMenu] == YES, "it uses the item from the menu by default");
+  pass([cell altersStateOfSelectedItem] == YES, "it alters the selected item state by default");
+  pass([cell numberOfItems] == 0, "a new popup cell has no items");
+  pass([cell indexOfSelectedItem] == -1, "a new popup cell has no selection");
+
+  /* Adding the first item selects it automatically. */
+  cell = popup();
+  [cell addItemWithTitle: @"alpha"];
+  pass([cell numberOfItems] == 1 && [cell indexOfSelectedItem] == 0
+    && [[cell titleOfSelectedItem] isEqualToString: @"alpha"],
+    "adding the first item selects it");
+  [cell addItemsWithTitles: [NSArray arrayWithObjects: @"beta", @"gamma", nil]];
+  pass([cell numberOfItems] == 3 && [cell indexOfSelectedItem] == 0,
+    "adding more items leaves the first one selected");
+  pass([[cell itemTitles] isEqualToArray:
+         ([NSArray arrayWithObjects: @"alpha", @"beta", @"gamma", nil])],
+    "itemTitles returns the titles in order");
+
+  /* A duplicate title moves the existing item rather than adding another. */
+  [cell addItemWithTitle: @"beta"];
+  pass([cell numberOfItems] == 3 && [cell indexOfItemWithTitle: @"beta"] == 2,
+    "re-adding a title moves the item to the end without duplicating it");
+
+  /* Inserting at a position. */
+  cell = popup();
+  [cell addItemsWithTitles: [NSArray arrayWithObjects: @"a", @"b", @"c", nil]];
+  [cell insertItemWithTitle: @"inserted" atIndex: 1];
+  pass([[cell itemTitleAtIndex: 1] isEqualToString: @"inserted"]
+    && [cell numberOfItems] == 4,
+    "insertItemWithTitle:atIndex: inserts at the index");
+
+  /* Item and index queries. */
+  cell = popup();
+  [cell addItemsWithTitles: [NSArray arrayWithObjects: @"one", @"two", @"three", nil]];
+  pass([cell indexOfItemWithTitle: @"two"] == 1, "indexOfItemWithTitle: finds the item");
+  pass([cell indexOfItemWithTitle: @"missing"] == -1,
+    "indexOfItemWithTitle: returns -1 for an absent title");
+  pass([cell itemWithTitle: @"three"] != nil, "itemWithTitle: returns the item");
+  pass([[[cell lastItem] title] isEqualToString: @"three"], "lastItem returns the last item");
+  pass([[cell itemAtIndex: 0] title] != nil, "itemAtIndex: returns the item at the index");
+
+  /* Tag lookup. */
+  [[cell itemAtIndex: 2] setTag: 42];
+  pass([cell indexOfItemWithTag: 42] == 2, "indexOfItemWithTag: finds the tagged item");
+  pass([cell indexOfItemWithTag: 99] == -1, "indexOfItemWithTag: returns -1 for an absent tag");
+
+  /* Selection by index and title. */
+  [cell selectItemAtIndex: 2];
+  pass([cell indexOfSelectedItem] == 2
+    && [[cell titleOfSelectedItem] isEqualToString: @"three"],
+    "selectItemAtIndex: selects the item at the index");
+  [cell selectItemWithTitle: @"one"];
+  pass([cell indexOfSelectedItem] == 0, "selectItemWithTitle: selects the matching item");
+
+  /* Removing by title, and clearing the whole list. */
+  [cell removeItemWithTitle: @"two"];
+  pass([cell numberOfItems] == 2 && [cell indexOfItemWithTitle: @"two"] == -1,
+    "removeItemWithTitle: removes the item");
+  [cell removeAllItems];
+  pass([cell numberOfItems] == 0 && [cell indexOfSelectedItem] == -1,
+    "removeAllItems empties the list and clears the selection");
+
+  /* Property accessors round-trip. */
+  cell = popup();
+  [cell setPullsDown: YES];
+  pass([cell pullsDown] == YES, "setPullsDown: round trips");
+  [cell setAutoenablesItems: NO];
+  pass([cell autoenablesItems] == NO, "setAutoenablesItems: round trips");
+  [cell setPreferredEdge: NSMinXEdge];
+  pass([cell preferredEdge] == NSMinXEdge, "setPreferredEdge: round trips");
+  [cell setArrowPosition: NSPopUpArrowAtBottom];
+  pass([cell arrowPosition] == NSPopUpArrowAtBottom, "setArrowPosition: round trips");
+
+  END_SET("NSPopUpButtonCell menu")
+
+  DESTROY(arp);
+  return 0;
+}