diff --git a/rtl/i386/mathu.inc b/rtl/i386/mathu.inc
index a85db115d5..4c2227078a 100644
--- a/rtl/i386/mathu.inc
+++ b/rtl/i386/mathu.inc
@@ -49,7 +49,7 @@ function cotan(x : float) : float;assembler;
   asm
     fldt X
     fptan
-    fdivrp
+    fdivp
     fwait
   end;