From a75df25adcc0717a49ed4c1772ab989e508f4610 Mon Sep 17 00:00:00 2001
From: keithw <unknown>
Date: Thu, 6 Jul 2000 17:22:40 +0000
Subject: [PATCH] [project @ 2000-07-06 17:22:40 by keithw] Fix obvious typo
 (pprStgARg for pprStgArg).  Clearly not a frequently- tickled part of the
 compiler!

---
 ghc/compiler/stgSyn/StgSyn.lhs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/compiler/stgSyn/StgSyn.lhs b/ghc/compiler/stgSyn/StgSyn.lhs
index 0b429a0aaedc..fabedee55448 100644
--- a/ghc/compiler/stgSyn/StgSyn.lhs
+++ b/ghc/compiler/stgSyn/StgSyn.lhs
@@ -607,7 +607,7 @@ pprStgArg :: (Outputable bdee) => GenStgArg bdee -> SDoc
 
 pprStgArg (StgVarArg var) = ppr var
 pprStgArg (StgLitArg con) = ppr con
-pprStgARg (StgTypeArg ty) = char '@' <+> ppr ty
+pprStgArg (StgTypeArg ty) = char '@' <+> ppr ty
 \end{code}
 
 \begin{code}
-- 
GitLab