Give a class the same identity object each time it is identified

identify() built a new object from a class's tag on every call, where the
loader's record it replaced handed back one object per class. Callers compared
identities by reference: the new-card menu's de-duplication of recent card
types listed a type twice and dropped the next one. identify() now returns one
object per class for as long as its module canonicalizes the same way, and the
menu compares types by module and name.

Co-Authored-By: Claude Opus 5.5 (1M context) <noreply@anthropic.com>

Author: ef4

packages/host/app/components/operator-mode/interact-submode.gts

@@ -673,7 +673,14 @@ export default class InteractSubmode extends Component {
         let ref = identifyCard(card.constructor);
         let name = cardTypeDisplayName(card);
         if (isResolvedCodeRef(ref)) {
-          if (items.find((item) => item.ref === ref && item.name === name)) {
+          if (
+            items.find(
+              (item) =>
+                item.ref.module === ref.module &&
+                item.ref.name === ref.name &&
+                item.name === name,
+            )
+          ) {
             // do not add duplicate of the same card type
             return;
           }

packages/runtime-common/loader.ts

@@ -249,6 +249,12 @@ const identityTagKey = Symbol.for(exportIdentitySymbolKey);
 // records its module as compiled — a realm module by its URL — and the module
 // is canonicalized when the tag is read: the realm prefix that spells it may be
 // registered after the module was compiled.
+//
+// A class is given the same identity object each time it is identified, for as
+// long as its module canonicalizes the same way, so callers can compare
+// identities by reference.
+const identities = new WeakMap<Function, { module: string; name: string }>();
+
 function identityFromTag(
   value: Function,
   virtualNetwork: VirtualNetwork | undefined,
@@ -259,11 +265,17 @@ function identityFromTag(
   if (!tag) {
     return undefined;
   }
-  let [module, name] = tag;
-  return {
-    module: virtualNetwork ? virtualNetwork.unresolveURL(module) : module,
-    name,
-  };
+  let [taggedModule, name] = tag;
+  let module = virtualNetwork
+    ? virtualNetwork.unresolveURL(taggedModule)
+    : taggedModule;
+  let known = identities.get(value);
+  if (known?.module === module && known.name === name) {
+    return known;
+  }
+  let identity = { module, name };
+  identities.set(value, identity);
+  return identity;
 }
 
 export class Loader {