diff --git a/dhscanner-bitcode.cabal b/dhscanner-bitcode.cabal
--- a/dhscanner-bitcode.cabal
+++ b/dhscanner-bitcode.cabal
@@ -20,7 +20,7 @@
     in mind. The commands resemble an abstract RISC-style assembley, motivated by keeping
     later-phases analyses as simple as possible.
 
-version:            1.0.8
+version:            1.0.9
 license:            GPL-3.0-only
 license-file:       LICENSE
 author:             OrenGitHub
@@ -48,7 +48,7 @@
         aeson,
         base >=4.17 && <=4.20,
         containers,
-        dhscanner-ast >= 1.1.1,
+        dhscanner-ast >= 1.1.2,
 
     hs-source-dirs:
         src
diff --git a/src/Cfg.hs b/src/Cfg.hs
--- a/src/Cfg.hs
+++ b/src/Cfg.hs
@@ -41,8 +41,8 @@
 nodes'' :: Set Edge -> Nodes
 nodes'' edges' = Nodes { actualNodes = (map from edges') `union` (map to edges') }
 
-atom :: Node -> Cfg
-atom node = Normal (Content { entry = node, exit = node, edges = emptySetOfEdges })
+atom :: Node -> Content
+atom node = Content { entry = node, exit = node, edges = emptySetOfEdges }
 
 concat :: Cfg -> Cfg -> Cfg
 concat Empty cfg = cfg