Fixing for 110.46

[hcoop/smlsql.git] / libpq / FFI / st--PQArgBlock.sml

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