(* This file has been generated automatically. DO NOT EDIT! *) (* [from code at "/usr/include/postgresql/libpq-fe.h":38.1-60.17] *) (* [by Matthias Blume's ml-nlffigen (version 0.9) for x86-unix] *) (* Send comments and suggestions to blume@research.bell-labs.com. Thanks! *) local open C.Dim C in structure T_ConnStatusType = struct type t = ET_'ConnStatusType.tag enum T.typ val typ = T.enum : ET_'ConnStatusType.tag enum T.typ : t end end