| 1 | (* This file has been generated automatically. DO NOT EDIT! *) |
| 2 | (* [from code at "/usr/include/postgresql/libpq-fe.h":163.1-172.13] *) |
| 3 | (* [by Matthias Blume's ml-nlffigen (version 0.9.1) for x86-unix] *) |
| 4 | (* Send comments and suggestions to blume@tti-c.org. Thanks! *) |
| 5 | local |
| 6 | structure S_'PQArgBlock = struct |
| 7 | local |
| 8 | open Tag |
| 9 | in |
| 10 | type tag = s t_' t_P t_Q t_A t_r t_g t_B t_l t_o t_c t_k |
| 11 | end |
| 12 | val size = C_Int.mk_su_size 0wxc : tag C.su C.S.size |
| 13 | val typ = C_Int.mk_su_typ size |
| 14 | end |
| 15 | in |
| 16 | structure ST_'PQArgBlock = S_'PQArgBlock |
| 17 | end |