add is directive

AG.PascalTokenizer.pas

@@ -89,8 +89,9 @@ type
   end;
 
 function IsComment(s:string):boolean;
-function IsName(s:string): boolean;
+function IsDirective(s:string):boolean;
-function IsString(const s:string): boolean;
+function IsName(s:string):boolean;
+function IsString(const s:string):boolean;
 
 implementation
 

DOC_EN.MD

@@ -58,9 +58,10 @@ Has constructor Create with input: `TStrings`, GetComments: `boolean=True` and s
 
 Helper functions to analyze token text.
 
-* IsName(s: `string`): `boolean` Check for valid identifier (can be reserved word too).
+* IsName(s: `string`): `boolean` Check is identifier (can be reserved word too).
-* IsComment(s: `string`): `boolean` Check for valid comment.
+* IsComment(s: `string`): `boolean` Check is comment.
-* IsString(s: `string`): `boolean` Check for string constant.
+* IsDirective(s: `string`): `boolean` Check is compiler directive.
+* IsString(s: `string`): `boolean` Check is string constant.
 
 ## Author
 

DOC_RU.MD

@@ -58,8 +58,9 @@ TAGToken это тип `record` из:
 
 Вспомогательные функции для анализа текста.
 
-* IsName(s: `string`): `boolean` Проверка что идентификатор правильный.
+* IsName(s: `string`): `boolean` Проверка что это  идентификатор.
-* IsComment(s: `string`): `boolean` Проверка что комментарий правильный.
+* IsComment(s: `string`): `boolean` Проверка что это комментарий.
+* IsDirective(s: `string`): `boolean` Проверка что это директива компилятора.
 * IsString(s: `string`): `boolean` Проверка что это строковое значение.
 
 ## Авторы