* Set mode explicitly to fpc

git-svn-id: trunk@26939 -

packages/rtl-extra/src/win/winsock.pp

@@ -17,6 +17,8 @@
 {$ifndef NO_SMART_LINK}
 {$smartlink on}
 {$endif}
+{$mode fpc}
+
 unit winsock;
 
   interface