Home Explore Help
Sign In
pascal
/
fpc
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

* fixed typo in comment

git-svn-id: trunk@30079 -
Jonas Maebe 10 years ago
parent
6defd861b0
commit
b4033efc00
1 changed files with 1 additions and 1 deletions
Unified View Show Diff Stats
  1. 1 1
      rtl/inc/generic.inc

+ 1 - 1
rtl/inc/generic.inc
View File 

@@ -1090,7 +1090,7 @@ function Utf8CodePointLen(P: PAnsiChar; MaxLookAhead: SizeInt; IncludeCombiningD
 
         result:=0;
 
         result:=0;
 
         exit;
 
         exit;
 
       end;
 
       end;
 
-    { inlcude the first byte }
 
+    { include the first byte }
 
     result:=1;
 
     result:=1;
 
     { multiple byte utf-8 code point? }
 
     { multiple byte utf-8 code point? }
 
     if p[0]>#127 then
 
     if p[0]>#127 then