diff --git a/src/Text/LLVM/AST.hs b/src/Text/LLVM/AST.hs
index 552fd6d..525bee5 100644
--- a/src/Text/LLVM/AST.hs
+++ b/src/Text/LLVM/AST.hs
@@ -1353,6 +1353,8 @@ data DILocalVariable' lab = DILocalVariable
   , dilvType :: Maybe (ValMd' lab)
   , dilvArg :: Word16
   , dilvFlags :: DIFlags
+  , dilvAlignment :: Maybe Word32
+    -- ^ Introduced in LLVM 4.
   } deriving (Data, Eq, Functor, Generic, Generic1, Ord, Show, Typeable)
 
 type DILocalVariable = DILocalVariable' BlockLabel
diff --git a/src/Text/LLVM/PP.hs b/src/Text/LLVM/PP.hs
index eb8f9eb..d46f48d 100644
--- a/src/Text/LLVM/PP.hs
+++ b/src/Text/LLVM/PP.hs
@@ -1156,6 +1156,7 @@ ppDILocalVariable' pp lv = "!DILocalVariable"
        ,      (("type:"  <+>) . ppValMd' pp) <$> (dilvType lv)
        , pure ("arg:"    <+> integral (dilvArg lv))
        , pure ("flags:"  <+> integral (dilvFlags lv))
+       ,      (("align:" <+>) . integral) <$> dilvAlignment lv
        ])
 
 ppDILocalVariable :: LLVM => DILocalVariable -> Doc