diff --git a/core/metacling/src/TCling.cxx b/core/metacling/src/TCling.cxx
index 71200387f7231cc34e9834bdae10c4c5fbdcbd54..b4e702085eea781f3a4298b354037e0e9d38a070 100644
--- a/core/metacling/src/TCling.cxx
+++ b/core/metacling/src/TCling.cxx
@@ -3525,7 +3525,7 @@ static ETupleOrdering IsTupleAscending()
    }
 }
 
-std::string AtlernateTuple(const char *classname)
+std::string AlternateTuple(const char *classname)
 {
    TClassEdit::TSplitType tupleContent(classname);
    std::string alternateName = "TEmulatedTuple";
@@ -3569,7 +3569,7 @@ std::string AtlernateTuple(const char *classname)
          break;
       }
       case ETupleOrdering::kUnexpected: {
-         Fatal("TCling::SetClassInfo::AtlernateTuple",
+         Fatal("TCling::SetClassInfo::AlternateTuple",
                "Layout of std::tuple on this platform is unexpected.");
          break;
       }
@@ -3611,7 +3611,7 @@ void TCling::SetClassInfo(TClass* cl, Bool_t reload)
    // for the I/O to understand and handle.
    if (!(fCxxModulesEnabled && IsFromRootCling()) && strncmp(cl->GetName(),"tuple<",strlen("tuple<"))==0) {
 
-      name = AtlernateTuple(cl->GetName());
+      name = AlternateTuple(cl->GetName());
 
    }