fix standard packet payload size for ipv6

git-svn-id: file:///svnroot/lcore/trunk@22 b1de8a11-f9be-4011-bde0-cc7ace90066a

diff --git a/lcore.pas b/lcore.pas
index da0fd66b89365b4272b74707dd40de189c7f2f58..99fbe983c7b8f46831b6664f2b15f09639c0c973 100755 (executable)
--- a/lcore.pas
+++ b/lcore.pas
@@ -35,7 +35,8 @@ interface
 \r
 \r
   const\r
-    packetbasesize = 1460;\r
+    {for IPv6 it is 1440: 1500 - IP header (40) - TCP/UDP header (20). for ipv4 it is 1460}\r
+    packetbasesize = 1440;\r
     receivebufsize=packetbasesize*8;\r
 \r
   var\r