X-Git-Url: http://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=Ada95%2Fgen%2Fgen.c;h=3394aa4c0c622f119c7097175d030055dad38fe5;hp=86cfd0e11fb7fe781f11cc372752b9b8f3a7832f;hb=3ec8f79f3ceda990461c80de2f96d66b886e00d5;hpb=3faafb2efcc426a48649c12943d5006cae12cff1;ds=sidebyside diff --git a/Ada95/gen/gen.c b/Ada95/gen/gen.c index 86cfd0e1..3394aa4c 100644 --- a/Ada95/gen/gen.c +++ b/Ada95/gen/gen.c @@ -32,7 +32,7 @@ /* Version Control - $Id: gen.c,v 1.47 2007/04/07 22:29:23 tom Exp $ + $Id: gen.c,v 1.48 2007/05/05 17:24:36 tom Exp $ --------------------------------------------------------------------------*/ /* This program generates various record structures and constants from the @@ -775,7 +775,7 @@ gen_acs(void) { printf(" type C_ACS_Map is array (Character'Val (0) .. Character'Val (127))\n"); printf(" of Attributed_Character;\n"); -#if USE_REENTRANT +#if USE_REENTRANT || BROKEN_LINKER printf(" type C_ACS_Ptr is access C_ACS_Map;\n"); printf(" function ACS_Map return C_ACS_Ptr;\n"); printf(" pragma Import (C, ACS_Map, \"_nc_acs_map\");\n");