about summary refs log tree commit diff stats
path: root/apps/mu.subx
diff options
context:
space:
mode:
Diffstat (limited to 'apps/mu.subx')
-rw-r--r--apps/mu.subx8
1 files changed, 4 insertions, 4 deletions
diff --git a/apps/mu.subx b/apps/mu.subx
index 378410d3..5cdd9247 100644
--- a/apps/mu.subx
+++ b/apps/mu.subx
@@ -12401,8 +12401,8 @@ $type-component-match?:compare-addr:
     0f 84/jump-if-= $type-component-match?:end/disp32
 $type-component-match?:compare-atom-state:
     # if (def->is-atom? != call->is-atom?) return false
-    8b/-> *ecx 3/r32/ebx  # Type-tree-value
-    39/compare *edx 3/r32/ebx  # Type-tree-value
+    8b/-> *ecx 3/r32/ebx  # Type-tree-is-atom
+    39/compare *edx 3/r32/ebx  # Type-tree-is-atom
     b8/copy-to-eax 0/imm32/false
     0f 85/jump-if-!= $type-component-match?:end/disp32
     # if def->is-atom? return (def->value == call->value)
@@ -12657,8 +12657,8 @@ $type-equal?:compare-addr:
     0f 84/jump-if-= $type-equal?:end/disp32
 $type-equal?:compare-atom-state:
     # if (a->is-atom? != b->is-atom?) return false
-    8b/-> *ecx 3/r32/ebx  # Type-tree-value
-    39/compare *edx 3/r32/ebx  # Type-tree-value
+    8b/-> *ecx 3/r32/ebx  # Type-tree-is-atom
+    39/compare *edx 3/r32/ebx  # Type-tree-is-atom
     b8/copy-to-eax 0/imm32/false
     0f 85/jump-if-!= $type-equal?:end/disp32
     # if a->is-atom? return (a->value == b->value)