Fix typo.

diff --git a/VHDL.hs b/VHDL.hs
index fcfd91171376aff196e9f2514e5dacf1ad927d39..8f710f37a6dba640dfbea1f57ee3120a3884d5bb 100644 (file)
--- a/VHDL.hs
+++ b/VHDL.hs
@@ -279,7 +279,7 @@ mkConcSm (bndr, app@(CoreSyn.App _ _))= do
           let sel_name = mkSelectedName bndr label in
           mkUncondAssign (Right sel_name) (varToVHDLExpr arg)
     IdInfo.VanillaGlobal -> do
-      -- It's a global value imported from elsewhere. These can be builting
+      -- It's a global value imported from elsewhere. These can be builtin
       -- functions.
       funSignatures <- getA vsNameTable
       case (Map.lookup (bndrToString f) funSignatures) of