… | |
… | |
1246 | }; |
1246 | }; |
1247 | |
1247 | |
1248 | for (civ = const_iv + sizeof (const_iv) / sizeof (const_iv [0]); civ-- > const_iv; ) |
1248 | for (civ = const_iv + sizeof (const_iv) / sizeof (const_iv [0]); civ-- > const_iv; ) |
1249 | newCONSTSUB (stash, (char *)civ->name, newSViv (civ->iv)); |
1249 | newCONSTSUB (stash, (char *)civ->name, newSViv (civ->iv)); |
1250 | |
1250 | |
1251 | newCONSTSUB (stash, "VERSION", newSVnv (DB_VERSION_MAJOR + DB_VERSION_MINOR * .1)); |
1251 | { |
|
|
1252 | /* we currently only allow version, minor-version and patchlevel to go up to 255 */ |
|
|
1253 | char vstring[3] = { DB_VERSION_MAJOR, DB_VERSION_MINOR, DB_VERSION_PATCH }; |
|
|
1254 | |
|
|
1255 | newCONSTSUB (stash, "VERSION_v", newSVpvn (vstring, 3)); |
|
|
1256 | } |
|
|
1257 | |
1252 | newCONSTSUB (stash, "VERSION_STRING", newSVpv (DB_VERSION_STRING, 0)); |
1258 | newCONSTSUB (stash, "VERSION_STRING", newSVpv (DB_VERSION_STRING, 0)); |
1253 | |
1259 | |
1254 | create_respipe (); |
1260 | create_respipe (); |
1255 | |
1261 | |
1256 | X_THREAD_ATFORK (atfork_prepare, atfork_parent, atfork_child); |
1262 | X_THREAD_ATFORK (atfork_prepare, atfork_parent, atfork_child); |