1{
2  Contains the non-external functions for MySQL v4.0
3}
4
5function IS_PRI_KEY(n : longint) : Boolean;
6begin
7   IS_PRI_KEY:=(n and PRI_KEY_FLAG)<>0;
8end;
9
10
11function IS_NOT_NULL(n : longint) : Boolean;
12begin
13   IS_NOT_NULL:=(n and NOT_NULL_FLAG)<>0;
14end;
15
16
17function IS_BLOB(n : longint) : Boolean;
18begin
19   IS_BLOB:=(n and BLOB_FLAG)<>0;
20end;
21
22// This function is not used?!?!
23{function IS_NUM_FIELD(f : Pst_mysql_field) : Boolean;
24begin
25   IS_NUM_FIELD:=((f^.flags) and NUM_FLAG)<>0;
26end;}
27
28
29function MYSQL_COUNT_ERROR : longint;
30begin
31  MYSQL_COUNT_ERROR:= not ({my_ulonglong}(0));
32end;
33
34
35function mysql_reload(mysql : pmysql) : longint;
36begin
37  mysql_reload:=mysql_refresh(mysql,REFRESH_GRANT);
38end;
39