diff --git a/gen/tocall.cpp b/gen/tocall.cpp
index 43f6f57b..206780f6 100644
--- a/gen/tocall.cpp
+++ b/gen/tocall.cpp
@@ -49,7 +49,7 @@ llvm::CallingConv::ID DtoCallingConv(Loc loc, LINK l)
             return llvm::CallingConv::Fast;
     }
     // on the other hand, here, it's exactly what we want!!! TODO: right?
-    else if (l == LINKwindows)
+    else if (l == LINKwindows || l == LINKpascal)
         return llvm::CallingConv::X86_StdCall;
     else
     {