diff --git a/src/DearImGui.hs b/src/DearImGui.hs
index 1c5e202..bbc9e6a 100644
--- a/src/DearImGui.hs
+++ b/src/DearImGui.hs
@@ -57,6 +57,7 @@ module DearImGui
   , smallButton
   , arrowButton
   , checkbox
+  , bullet
 
     -- * Types
   , ImGuiDir
@@ -315,6 +316,12 @@ checkbox label ref = do
     return changed
 
 
+-- | Draw a small circle + keep the cursor on the same line. Advance cursor x
+-- position by 'getTreeNodeToLabelSpacing', same distance that 'treeNode' uses.
+bullet :: IO ()
+bullet = [C.exp| void { Bullet() } |]
+
+
 -- | A cardinal direction.
 newtype ImGuiDir      = ImGuiDir CInt