diff --git a/src/lib.rs b/src/lib.rs
index 8ac0eea..5ecba37 100644
--- a/src/lib.rs
+++ b/src/lib.rs
@@ -1511,7 +1511,9 @@ impl<'a> Serializer<'a> {
                 CallingConv::Cdecl => {
                     write!(self.w, "__cdecl ")?;
                 }
-                CallingConv::Pascal => {}
+                CallingConv::Pascal => {
+                    write!(self.w, "__pascal ")?;
+                }
                 CallingConv::Thiscall => {
                     write!(self.w, "__thiscall ")?;
                 }
diff --git a/tests/llvm-cases/unused/ms-windows.test b/tests/llvm-cases/ms-windows.test
similarity index 100%
rename from tests/llvm-cases/unused/ms-windows.test
rename to tests/llvm-cases/ms-windows.test
diff --git a/tests/test_llvm.rs b/tests/test_llvm.rs
index 28e37db..aa57ccd 100644
--- a/tests/test_llvm.rs
+++ b/tests/test_llvm.rs
@@ -107,3 +107,8 @@ fn test_llvm_ms_basic() {
 fn test_llvm_ms_operators() {
     llvm_test!("llvm-cases/ms-operators.test");
 }
+
+#[test]
+fn test_llvm_ms_windows() {
+    llvm_test!("llvm-cases/ms-windows.test");
+}