diff --git a/checks/ArrayUsageCheckTest.hs b/checks/ArrayUsageCheckTest.hs
index 1c2db86..a7462cc 100644
--- a/checks/ArrayUsageCheckTest.hs
+++ b/checks/ArrayUsageCheckTest.hs
@@ -51,7 +51,8 @@ instance Show FlattenedExp where
   show fexp = runIdentity $ showFlattenedExp (return . showOccam) fexp
 
 testCompState :: CompState
-testCompState = emptyState
+testCompState = execState defineOccamOperators emptyState
+
 rr :: ReaderT CompState m a -> m a
 rr = flip runReaderT testCompState