X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=win32%2Ffcrypt.c;h=ff132d338d8b770b80cb98f6e4b1fef7cf75662d;hb=92e71c9183a0db74aa4ef4999dac86e2ffadfac4;hp=4c9f2733f6033e8377d1ebdd6c257276e4ded17b;hpb=2534dd6e31cc0cf46c9012b51820cb53e717e775;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/win32/fcrypt.c b/win32/fcrypt.c
index 4c9f273..ff132d3 100644
--- a/win32/fcrypt.c
+++ b/win32/fcrypt.c
@@ -9,6 +9,10 @@
  * eay@psych.psy.uq.oz.au
  */
 
+#if defined(__BORLANDC__)
+#pragma warn -8004	/* "'foo' is assigned a value that is never used" */
+#endif
+
 typedef unsigned char des_cblock[8];
 
 typedef struct des_ks_struct