mysqls.pp 767 B

1234567891011121314151617181920212223242526
  1. program mysqls;
  2. uses mysql,mysql_com;
  3. begin
  4. Writeln('PASCAL');
  5. Writeln ('MYSQL : ',sizeof(TMYSQL),' options : ',sizeof(st_mysql_options));
  6. writeln ('MYSQL_DATA : ',sizeof(TMYSQL_DATA));
  7. writeln ('MYSQL_ROWS : ',sizeof(TMYSQL_ROWS));
  8. writeln ('MYSQL_ROW : ',sizeof(TMYSQL_ROW));
  9. writeln ('MYSQL_FIELD : ',sizeof(TMYSQL_FIELD));
  10. writeln ('MYSQL_RES : ',sizeof(TMYSQL_RES));
  11. writeln ('MEM_ROOT : ',sizeof(TMEM_ROOT));
  12. writeln ('my_bool : ',sizeof(my_bool));
  13. writeln ('TNET : ',sizeof(TNET),' TNET.nettype : ',SizeOf(net_type));
  14. writeln ('USED_MEM : ',sizeof(TUSED_MEM));
  15. end.
  16. $Log$
  17. Revision 1.2 2002-09-07 15:42:53 peter
  18. * old logs removed and tabs fixed
  19. Revision 1.1 2002/01/29 17:54:54 peter
  20. * splitted to base and extra
  21. }