diff --git a/syntax/quox.vim b/syntax/quox.vim
index 193cb1c..337c99e 100644
--- a/syntax/quox.vim
+++ b/syntax/quox.vim
@@ -76,9 +76,15 @@ hi def link quoxLoad Include
 
 syn region quoxAttr matchgroup=quoxDelim start=+#\[+ end=+\]+ contains=TOP
 syn region quoxAttrBrack start=+\[+ end=+\]+ matchgroup=quoxDelim contained containedin=quoxAttr
-syn keyword quoxAttrName fail main compile-scheme contained containedin=quoxAttr
+syn keyword quoxAttrName fail main contained containedin=quoxAttr
+syn match quoxAttrName /\<compile-scheme\>/ contained containedin=quoxAttr
 hi def link quoxAttrName PreProc
 
+syn region quoxPragma matchgroup=quoxDelim start=+#!\[+ end=+\]+ contains=TOP
+syn region quoxPragmaBrack start=+\[+ end=+\]+ matchgroup=quoxDelim contained containedin=quoxPragma
+syn keyword quoxPragmaName log contained containedin=quoxPragma
+hi def link quoxPragmaName PreProc
+
 syn match quoxDisplace /[⁰¹²³⁴⁵⁶⁷⁸⁹]\+/
 syn match quoxDisplace /\^\d\+/
 hi def link quoxDisplace Special