Index: stml.scm
==================================================================
--- stml.scm
+++ stml.scm
@@ -64,10 +64,12 @@
 (define (s:code   . args) (s:common-tag "CODE"   args))
 (define (s:div    . args) (s:common-tag "DIV"    args))
 (define (s:h1     . args) (s:common-tag "H1"     args))
 (define (s:h2     . args) (s:common-tag "H2"     args))
 (define (s:h3     . args) (s:common-tag "H3"     args))
+(define (s:h4     . args) (s:common-tag "H4"     args))
+(define (s:h5     . args) (s:common-tag "H5"     args))
 (define (s:head   . args) (s:common-tag "HEAD"   args))
 (define (s:html   . args) (s:common-tag "HTML"   args))
 (define (s:i      . args) (s:common-tag "I"      args))
 (define (s:img    . args) (s:common-tag "IMG"    args))
 (define (s:input  . args) (s:common-tag "INPUT"  args))