diff --git a/plugin/functions.vim b/plugin/functions.vim
index 52d568c..b8704dc 100644
--- a/plugin/functions.vim
+++ b/plugin/functions.vim
@@ -28,6 +28,17 @@ function! CloneHighlightGroupWithAttributes(group, new_group, attributes)
         \' term='.a:attributes.' cterm='.a:attributes.' gui='.a:attributes
 endfunction
 
+function! <SID>Synstack()
+  for id in synstack(line('.'), col('.'))
+    let attributes = synIDattr(id, 'name')
+    let attr = synIDattr(id, 'fg')
+    if attr != ''
+      let attributes = attributes.' fg='.attr
+    endif
+  endfor
+endfunction
+command Synstack :call <SID>Synstack()
+
 " Strip trailing whitespace
 function! <SID>StripWhitespace()
   let l = line(".")