diff --git a/dmd/expression.c b/dmd/expression.c
index edfd5d90..326e72e7 100644
--- a/dmd/expression.c
+++ b/dmd/expression.c
@@ -2195,6 +2195,11 @@ Lagain:
 
         if (!f->originalType && f->scope)       // semantic not yet run
             f->semantic(f->scope);
+        if (f->isUnitTestDeclaration())
+        {
+            error("cannot call unittest function %s", toChars());
+            return new ErrorExp();
+        }
         if (!f->type->deco)
         {
             error("forward reference to %s", toChars());