(* This file has been generated automatically. DO NOT EDIT! *) (* [from code at "/usr/include/postgresql/libpq-fe.h":71.1-86.17] *) (* [by Matthias Blume's ml-nlffigen (version 0.9.1) for x86-unix] *) (* Send comments and suggestions to blume@tti-c.org. Thanks! *) local open C.Dim C in structure T_ExecStatusType = struct type t = ET_'ExecStatusType.tag enum val typ = T.enum : ET_'ExecStatusType.tag enum T.typ : t T.typ end end