guard against CC_COMMENT tokens when expecting a CS from Until param

brucemiller · Nov 20, 2023 · b82c74f · b82c74f
1 parent ccd423f
commit b82c74f
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/lib/LaTeXML/Package/pgfmath.code.tex.ltxml b/lib/LaTeXML/Package/pgfmath.code.tex.ltxml
@@ -283,7 +283,9 @@ DefMacro('\@@@test@mathresult{}{}{}', sub {
 
 DefMacro('\pgfmath@smuggleone Until:\endgroup', sub {
     my ($gullet, $arg) = @_;
-    $arg = $$arg[0] if (ref $arg eq 'LaTeXML::Core::Tokens');
+    if (ref $arg eq 'LaTeXML::Core::Tokens') {
+      my @ts = grep { my $cc = $$_[1]; $cc ne CC_COMMENT and $cc ne CC_MARKER } $arg->unlist;
+      $arg = shift @ts; }
     my $def = LookupDefinition($arg);
     if (my $is_expandable = $def && $def->isExpandable) {
       # Texlive 2020 definition: