/trunk/Lib/guile/std_pair.i

# · Swig · 868 lines · 824 code · 23 blank · 21 comment · 0 complexity · 626cd6aca9cb7dfa80c5499896c9617f MD5 · raw file 

    

  1. /* -----------------------------------------------------------------------------
    2. 

  2.  * std_pair.i
    3. 

  3.  *
    4. 

  4.  * SWIG typemaps for std::pair
    5. 

  5.  * ----------------------------------------------------------------------------- */
    6. 

  6. 

  7. %include <std_common.i>
    8. 

  8. %include <exception.i>
    9. 

  9. 

  10. // ------------------------------------------------------------------------
    11. 

  11. // std::pair
    12. 

  12. //
    13. 

  13. // See std_vector.i for the rationale of typemap application
    14. 

  14. // ------------------------------------------------------------------------
    15. 

  15. 

  16. %{
    17. 

  17. #include <utility>
    18. 

  18. %}
    19. 

  19. 

  20. // exported class
    21. 

  21. 

  22. namespace std {
    23. 

  23. 

  24.     template<class T, class U> struct pair {
    25. 

  25.         %typemap(in) pair<T,U> (std::pair<T,U>* m) {
    26. 

  26.             if (gh_pair_p($input)) {
    27. 

  27.                 T* x;
    28. 

  28.                 U* y;
    29. 

  29.                 SCM first, second;
    30. 

  30.                 first = gh_car($input);
    31. 

  31.                 second = gh_cdr($input);
    32. 

  32.                 x = (T*) SWIG_MustGetPtr(first,$descriptor(T *),$argnum, 0);
    33. 

  33.                 y = (U*) SWIG_MustGetPtr(second,$descriptor(U *),$argnum, 0);
    34. 

  34.                 $1 = std::make_pair(*x,*y);
    35. 

  35.             } else {
    36. 

  36.                 $1 = *(($&1_type)
    37. 

  37.                        SWIG_MustGetPtr($input,$&1_descriptor,$argnum, 0));
    38. 

  38.             }
    39. 

  39.         }
    40. 

  40.         %typemap(in) const pair<T,U>& (std::pair<T,U> temp,
    41. 

  41.                                       std::pair<T,U>* m),
    42. 

  42.                      const pair<T,U>* (std::pair<T,U> temp,
    43. 

  43.                                       std::pair<T,U>* m) {
    44. 

  44.             if (gh_pair_p($input)) {
    45. 

  45.                 T* x;
    46. 

  46.                 U* y;
    47. 

  47.                 SCM first, second;
    48. 

  48.                 first = gh_car($input);
    49. 

  49.                 second = gh_cdr($input);
    50. 

  50.                 x = (T*) SWIG_MustGetPtr(first,$descriptor(T *),$argnum, 0);
    51. 

  51.                 y = (U*) SWIG_MustGetPtr(second,$descriptor(U *),$argnum, 0);
    52. 

  52.                 temp = std::make_pair(*x,*y);
    53. 

  53.                 $1 = &temp;
    54. 

  54.             } else {
    55. 

  55.                 $1 = ($1_ltype)
    56. 

  56.                     SWIG_MustGetPtr($input,$1_descriptor,$argnum, 0);
    57. 

  57.             }
    58. 

  58.         }
    59. 

  59.         %typemap(out) pair<T,U> {
    60. 

  60.             T* x = new T($1.first);
    61. 

  61.             U* y = new U($1.second);
    62. 

  62.             SCM first = SWIG_NewPointerObj(x,$descriptor(T *), 1);
    63. 

  63.             SCM second = SWIG_NewPointerObj(y,$descriptor(U *), 1);
    64. 

  64.             $result = gh_cons(first,second);
    65. 

  65.         }
    66. 

  66.         %typecheck(SWIG_TYPECHECK_PAIR) pair<T,U> {
    67. 

  67.             /* native pair? */
    68. 

  68.             if (gh_pair_p($input)) {
    69. 

  69.                 T* x;
    70. 

  70.                 U* y;
    71. 

  71.                 SCM first = gh_car($input);
    72. 

  72.                 SCM second = gh_cdr($input);
    73. 

  73.                 if (SWIG_ConvertPtr(first,(void**) &x,
    74. 

  74.                                     $descriptor(T *), 0) == 0 &&
    75. 

  75.                     SWIG_ConvertPtr(second,(void**) &y,
    76. 

  76.                                     $descriptor(U *), 0) == 0) {
    77. 

  77.                     $1 = 1;
    78. 

  78.                 } else {
    79. 

  79.                     $1 = 0;
    80. 

  80.                 }
    81. 

  81.             } else {
    82. 

  82.                 /* wrapped pair? */
    83. 

  83.                 std::pair<T,U >* m;
    84. 

  84.                 if (SWIG_ConvertPtr($input,(void **) &m,
    85. 

  85.                                     $&1_descriptor, 0) == 0)
    86. 

  86.                     $1 = 1;
    87. 

  87.                 else
    88. 

  88.                     $1 = 0;
    89. 

  89.             }
    90. 

  90.         }
    91. 

  91.         %typecheck(SWIG_TYPECHECK_PAIR) const pair<T,U>&,
    92. 

  92.                                         const pair<T,U>* {
    93. 

  93.             /* native pair? */
    94. 

  94.             if (gh_pair_p($input)) {
    95. 

  95.                 T* x;
    96. 

  96.                 U* y;
    97. 

  97.                 SCM first = gh_car($input);
    98. 

  98.                 SCM second = gh_cdr($input);
    99. 

  99.                 if (SWIG_ConvertPtr(first,(void**) &x,
    100. 

  100.                                     $descriptor(T *), 0) == 0 &&
    101. 

  101.                     SWIG_ConvertPtr(second,(void**) &y,
    102. 

  102.                                     $descriptor(U *), 0) == 0) {
    103. 

  103.                     $1 = 1;
    104. 

  104.                 } else {
    105. 

  105.                     $1 = 0;
    106. 

  106.                 }
    107. 

  107.             } else {
    108. 

  108.                 /* wrapped pair? */
    109. 

  109.                 std::pair<T,U >* m;
    110. 

  110.                 if (SWIG_ConvertPtr($input,(void **) &m,
    111. 

  111.                                     $1_descriptor, 0) == 0)
    112. 

  112.                     $1 = 1;
    113. 

  113.                 else
    114. 

  114.                     $1 = 0;
    115. 

  115.             }
    116. 

  116.         }
    117. 

  117.         pair();
    118. 

  118.         pair(T first, U second);
    119. 

  119.         pair(const pair& p);
    120. 

  120. 

  121.         template <class U1, class U2> pair(const pair<U1, U2> &p);
    122. 

  122. 

  123.         T first;
    124. 

  124.         U second;
    125. 

  125.     };
    126. 

  126. 

  127. 

  128.     // specializations for built-ins
    129. 

  129. 

  130.     %define specialize_std_pair_on_first(T,CHECK,CONVERT_FROM,CONVERT_TO)
    131. 

  131.     template<class U> struct pair<T,U> {
    132. 

  132.         %typemap(in) pair<T,U> (std::pair<T,U>* m) {
    133. 

  133.             if (gh_pair_p($input)) {
    134. 

  134.                 U* y;
    135. 

  135.                 SCM first, second;
    136. 

  136.                 first = gh_car($input);
    137. 

  137.                 second = gh_cdr($input);
    138. 

  138.                 if (!CHECK(first))
    139. 

  139.                     SWIG_exception(SWIG_TypeError,
    140. 

  140.                                    "map<" #T "," #U "> expected");
    141. 

  141.                 y = (U*) SWIG_MustGetPtr(second,$descriptor(U *),$argnum, 0);
    142. 

  142.                 $1 = std::make_pair(CONVERT_FROM(first),*y);
    143. 

  143.             } else {
    144. 

  144.                 $1 = *(($&1_type)
    145. 

  145.                        SWIG_MustGetPtr($input,$&1_descriptor,$argnum, 0));
    146. 

  146.             }
    147. 

  147.         }
    148. 

  148.         %typemap(in) const pair<T,U>& (std::pair<T,U> temp,
    149. 

  149.                                        std::pair<T,U>* m),
    150. 

  150.                      const pair<T,U>* (std::pair<T,U> temp,
    151. 

  151.                                        std::pair<T,U>* m) {
    152. 

  152.             if (gh_pair_p($input)) {
    153. 

  153.                 U* y;
    154. 

  154.                 SCM first, second;
    155. 

  155.                 first = gh_car($input);
    156. 

  156.                 second = gh_cdr($input);
    157. 

  157.                 if (!CHECK(first))
    158. 

  158.                     SWIG_exception(SWIG_TypeError,
    159. 

  159.                                    "map<" #T "," #U "> expected");
    160. 

  160.                 y = (U*) SWIG_MustGetPtr(second,$descriptor(U *),$argnum, 0);
    161. 

  161.                 temp = std::make_pair(CONVERT_FROM(first),*y);
    162. 

  162.                 $1 = &temp;
    163. 

  163.             } else {
    164. 

  164.                 $1 = ($1_ltype)
    165. 

  165.                     SWIG_MustGetPtr($input,$1_descriptor,$argnum, 0);
    166. 

  166.             }
    167. 

  167.         }
    168. 

  168.         %typemap(out) pair<T,U> {
    169. 

  169.             U* y = new U($1.second);
    170. 

  170.             SCM second = SWIG_NewPointerObj(y,$descriptor(U *), 1);
    171. 

  171.             $result = gh_cons(CONVERT_TO($1.first),second);
    172. 

  172.         }
    173. 

  173.         %typecheck(SWIG_TYPECHECK_PAIR) pair<T,U> {
    174. 

  174.             /* native pair? */
    175. 

  175.             if (gh_pair_p($input)) {
    176. 

  176.                 U* y;
    177. 

  177.                 SCM first = gh_car($input);
    178. 

  178.                 SCM second = gh_cdr($input);
    179. 

  179.                 if (CHECK(first) &&
    180. 

  180.                     SWIG_ConvertPtr(second,(void**) &y,
    181. 

  181.                                     $descriptor(U *), 0) == 0) {
    182. 

  182.                     $1 = 1;
    183. 

  183.                 } else {
    184. 

  184.                     $1 = 0;
    185. 

  185.                 }
    186. 

  186.             } else {
    187. 

  187.                 /* wrapped pair? */
    188. 

  188.                 std::pair<T,U >* m;
    189. 

  189.                 if (SWIG_ConvertPtr($input,(void **) &m,
    190. 

  190.                                     $&1_descriptor, 0) == 0)
    191. 

  191.                     $1 = 1;
    192. 

  192.                 else
    193. 

  193.                     $1 = 0;
    194. 

  194.             }
    195. 

  195.         }
    196. 

  196.         %typecheck(SWIG_TYPECHECK_PAIR) const pair<T,U>&,
    197. 

  197.                                         const pair<T,U>* {
    198. 

  198.             /* native pair? */
    199. 

  199.             if (gh_pair_p($input)) {
    200. 

  200.                 U* y;
    201. 

  201.                 SCM first = gh_car($input);
    202. 

  202.                 SCM second = gh_cdr($input);
    203. 

  203.                 if (CHECK(first) &&
    204. 

  204.                     SWIG_ConvertPtr(second,(void**) &y,
    205. 

  205.                                     $descriptor(U *), 0) == 0) {
    206. 

  206.                     $1 = 1;
    207. 

  207.                 } else {
    208. 

  208.                     $1 = 0;
    209. 

  209.                 }
    210. 

  210.             } else {
    211. 

  211.                 /* wrapped pair? */
    212. 

  212.                 std::pair<T,U >* m;
    213. 

  213.                 if (SWIG_ConvertPtr($input,(void **) &m,
    214. 

  214.                                     $1_descriptor, 0) == 0)
    215. 

  215.                     $1 = 1;
    216. 

  216.                 else
    217. 

  217.                     $1 = 0;
    218. 

  218.             }
    219. 

  219.         }
    220. 

  220.         pair();
    221. 

  221.         pair(T first, U second);
    222. 

  222.         pair(const pair& p);
    223. 

  223. 

  224.         template <class U1, class U2> pair(const pair<U1, U2> &p);
    225. 

  225. 

  226.         T first;
    227. 

  227.         U second;
    228. 

  228.     };
    229. 

  229.     %enddef
    230. 

  230. 

  231.     %define specialize_std_pair_on_second(U,CHECK,CONVERT_FROM,CONVERT_TO)
    232. 

  232.     template<class T> struct pair<T,U> {
    233. 

  233.         %typemap(in) pair<T,U> (std::pair<T,U>* m) {
    234. 

  234.             if (gh_pair_p($input)) {
    235. 

  235.                 T* x;
    236. 

  236.                 SCM first, second;
    237. 

  237.                 first = gh_car($input);
    238. 

  238.                 second = gh_cdr($input);
    239. 

  239.                 x = (T*) SWIG_MustGetPtr(first,$descriptor(T *),$argnum, 0);
    240. 

  240.                 if (!CHECK(second))
    241. 

  241.                     SWIG_exception(SWIG_TypeError,
    242. 

  242.                                    "map<" #T "," #U "> expected");
    243. 

  243.                 $1 = std::make_pair(*x,CONVERT_FROM(second));
    244. 

  244.             } else {
    245. 

  245.                 $1 = *(($&1_type)
    246. 

  246.                        SWIG_MustGetPtr($input,$&1_descriptor,$argnum, 0));
    247. 

  247.             }
    248. 

  248.         }
    249. 

  249.         %typemap(in) const pair<T,U>& (std::pair<T,U> temp,
    250. 

  250.                                       std::pair<T,U>* m),
    251. 

  251.                      const pair<T,U>* (std::pair<T,U> temp,
    252. 

  252.                                       std::pair<T,U>* m) {
    253. 

  253.             if (gh_pair_p($input)) {
    254. 

  254.                 T* x;
    255. 

  255.                 SCM first, second;
    256. 

  256.                 first = gh_car($input);
    257. 

  257.                 second = gh_cdr($input);
    258. 

  258.                 x = (T*) SWIG_MustGetPtr(first,$descriptor(T *),$argnum, 0);
    259. 

  259.                 if (!CHECK(second))
    260. 

  260.                     SWIG_exception(SWIG_TypeError,
    261. 

  261.                                    "map<" #T "," #U "> expected");
    262. 

  262.                 temp = std::make_pair(*x,CONVERT_FROM(second));
    263. 

  263.                 $1 = &temp;
    264. 

  264.             } else {
    265. 

  265.                 $1 = ($1_ltype)
    266. 

  266.                     SWIG_MustGetPtr($input,$1_descriptor,$argnum, 0);
    267. 

  267.             }
    268. 

  268.         }
    269. 

  269.         %typemap(out) pair<T,U> {
    270. 

  270.             T* x = new T($1.first);
    271. 

  271.             SCM first = SWIG_NewPointerObj(x,$descriptor(T *), 1);
    272. 

  272.             $result = gh_cons(first,CONVERT_TO($1.second));
    273. 

  273.         }
    274. 

  274.         %typecheck(SWIG_TYPECHECK_PAIR) pair<T,U> {
    275. 

  275.             /* native pair? */
    276. 

  276.             if (gh_pair_p($input)) {
    277. 

  277.                 T* x;
    278. 

  278.                 SCM first = gh_car($input);
    279. 

  279.                 SCM second = gh_cdr($input);
    280. 

  280.                 if (SWIG_ConvertPtr(first,(void**) &x,
    281. 

  281.                                     $descriptor(T *), 0) == 0 &&
    282. 

  282.                     CHECK(second)) {
    283. 

  283.                     $1 = 1;
    284. 

  284.                 } else {
    285. 

  285.                     $1 = 0;
    286. 

  286.                 }
    287. 

  287.             } else {
    288. 

  288.                 /* wrapped pair? */
    289. 

  289.                 std::pair<T,U >* m;
    290. 

  290.                 if (SWIG_ConvertPtr($input,(void **) &m,
    291. 

  291.                                     $&1_descriptor, 0) == 0)
    292. 

  292.                     $1 = 1;
    293. 

  293.                 else
    294. 

  294.                     $1 = 0;
    295. 

  295.             }
    296. 

  296.         }
    297. 

  297.         %typecheck(SWIG_TYPECHECK_PAIR) const pair<T,U>&,
    298. 

  298.                                         const pair<T,U>* {
    299. 

  299.             /* native pair? */
    300. 

  300.             if (gh_pair_p($input)) {
    301. 

  301.                 T* x;
    302. 

  302.                 SCM first = gh_car($input);
    303. 

  303.                 SCM second = gh_cdr($input);
    304. 

  304.                 if (SWIG_ConvertPtr(first,(void**) &x,
    305. 

  305.                                     $descriptor(T *), 0) == 0 &&
    306. 

  306.                     CHECK(second)) {
    307. 

  307.                     $1 = 1;
    308. 

  308.                 } else {
    309. 

  309.                     $1 = 0;
    310. 

  310.                 }
    311. 

  311.             } else {
    312. 

  312.                 /* wrapped pair? */
    313. 

  313.                 std::pair<T,U >* m;
    314. 

  314.                 if (SWIG_ConvertPtr($input,(void **) &m,
    315. 

  315.                                     $1_descriptor, 0) == 0)
    316. 

  316.                     $1 = 1;
    317. 

  317.                 else
    318. 

  318.                     $1 = 0;
    319. 

  319.             }
    320. 

  320.         }
    321. 

  321.         pair();
    322. 

  322.         pair(T first, U second);
    323. 

  323.         pair(const pair& p);
    324. 

  324. 

  325.         template <class U1, class U2> pair(const pair<U1, U2> &p);
    326. 

  326. 

  327.         T first;
    328. 

  328.         U second;
    329. 

  329.     };
    330. 

  330.     %enddef
    331. 

  331. 

  332.     %define specialize_std_pair_on_both(T,CHECK_T,CONVERT_T_FROM,CONVERT_T_TO,
    333. 

  333.                                         U,CHECK_U,CONVERT_U_FROM,CONVERT_U_TO)
    334. 

  334.     template<> struct pair<T,U> {
    335. 

  335.         %typemap(in) pair<T,U> (std::pair<T,U>* m) {
    336. 

  336.             if (gh_pair_p($input)) {
    337. 

  337.                 SCM first, second;
    338. 

  338.                 first = gh_car($input);
    339. 

  339.                 second = gh_cdr($input);
    340. 

  340.                 if (!CHECK_T(first) || !CHECK_U(second))
    341. 

  341.                     SWIG_exception(SWIG_TypeError,
    342. 

  342.                                    "map<" #T "," #U "> expected");
    343. 

  343.                 $1 = std::make_pair(CONVERT_T_FROM(first),
    344. 

  344.                                     CONVERT_U_FROM(second));
    345. 

  345.             } else {
    346. 

  346.                 $1 = *(($&1_type)
    347. 

  347.                        SWIG_MustGetPtr($input,$&1_descriptor,$argnum, 0));
    348. 

  348.             }
    349. 

  349.         }
    350. 

  350.         %typemap(in) const pair<T,U>& (std::pair<T,U> temp,
    351. 

  351.                                       std::pair<T,U>* m),
    352. 

  352.                      const pair<T,U>* (std::pair<T,U> temp,
    353. 

  353.                                       std::pair<T,U>* m) {
    354. 

  354.             if (gh_pair_p($input)) {
    355. 

  355.                 SCM first, second;
    356. 

  356.                 first = gh_car($input);
    357. 

  357.                 second = gh_cdr($input);
    358. 

  358.                 if (!CHECK_T(first) || !CHECK_U(second))
    359. 

  359.                     SWIG_exception(SWIG_TypeError,
    360. 

  360.                                    "map<" #T "," #U "> expected");
    361. 

  361.                 temp = std::make_pair(CONVERT_T_FROM(first),
    362. 

  362.                                       CONVERT_U_FROM(second));
    363. 

  363.                 $1 = &temp;
    364. 

  364.             } else {
    365. 

  365.                 $1 = ($1_ltype)
    366. 

  366.                     SWIG_MustGetPtr($input,$1_descriptor,$argnum, 0);
    367. 

  367.             }
    368. 

  368.         }
    369. 

  369.         %typemap(out) pair<T,U> {
    370. 

  370.             $result = gh_cons(CONVERT_T_TO($1.first),
    371. 

  371.                               CONVERT_U_TO($1.second));
    372. 

  372.         }
    373. 

  373.         %typecheck(SWIG_TYPECHECK_PAIR) pair<T,U> {
    374. 

  374.             /* native pair? */
    375. 

  375.             if (gh_pair_p($input)) {
    376. 

  376.                 SCM first = gh_car($input);
    377. 

  377.                 SCM second = gh_cdr($input);
    378. 

  378.                 if (CHECK_T(first) && CHECK_U(second)) {
    379. 

  379.                     $1 = 1;
    380. 

  380.                 } else {
    381. 

  381.                     $1 = 0;
    382. 

  382.                 }
    383. 

  383.             } else {
    384. 

  384.                 /* wrapped pair? */
    385. 

  385.                 std::pair<T,U >* m;
    386. 

  386.                 if (SWIG_ConvertPtr($input,(void **) &m,
    387. 

  387.                                     $&1_descriptor, 0) == 0)
    388. 

  388.                     $1 = 1;
    389. 

  389.                 else
    390. 

  390.                     $1 = 0;
    391. 

  391.             }
    392. 

  392.         }
    393. 

  393.         %typecheck(SWIG_TYPECHECK_PAIR) const pair<T,U>&,
    394. 

  394.                                         const pair<T,U>* {
    395. 

  395.             /* native pair? */
    396. 

  396.             if (gh_pair_p($input)) {
    397. 

  397.                 SCM first = gh_car($input);
    398. 

  398.                 SCM second = gh_cdr($input);
    399. 

  399.                 if (CHECK_T(first) && CHECK_U(second)) {
    400. 

  400.                     $1 = 1;
    401. 

  401.                 } else {
    402. 

  402.                     $1 = 0;
    403. 

  403.                 }
    404. 

  404.             } else {
    405. 

  405.                 /* wrapped pair? */
    406. 

  406.                 std::pair<T,U >* m;
    407. 

  407.                 if (SWIG_ConvertPtr($input,(void **) &m,
    408. 

  408.                                     $1_descriptor, 0) == 0)
    409. 

  409.                     $1 = 1;
    410. 

  410.                 else
    411. 

  411.                     $1 = 0;
    412. 

  412.             }
    413. 

  413.         }
    414. 

  414.         pair();
    415. 

  415.         pair(T first, U second);
    416. 

  416.         pair(const pair& p);
    417. 

  417. 

  418.         template <class U1, class U2> pair(const pair<U1, U2> &p);
    419. 

  419. 

  420.         T first;
    421. 

  421.         U second;
    422. 

  422.     };
    423. 

  423.     %enddef
    424. 

  424. 

  425. 

  426.     specialize_std_pair_on_first(bool,gh_boolean_p,
    427. 

  427.                               gh_scm2bool,SWIG_bool2scm);
    428. 

  428.     specialize_std_pair_on_first(int,gh_number_p,
    429. 

  429.                               gh_scm2long,gh_long2scm);
    430. 

  430.     specialize_std_pair_on_first(short,gh_number_p,
    431. 

  431.                               gh_scm2long,gh_long2scm);
    432. 

  432.     specialize_std_pair_on_first(long,gh_number_p,
    433. 

  433.                               gh_scm2long,gh_long2scm);
    434. 

  434.     specialize_std_pair_on_first(unsigned int,gh_number_p,
    435. 

  435.                               gh_scm2ulong,gh_ulong2scm);
    436. 

  436.     specialize_std_pair_on_first(unsigned short,gh_number_p,
    437. 

  437.                               gh_scm2ulong,gh_ulong2scm);
    438. 

  438.     specialize_std_pair_on_first(unsigned long,gh_number_p,
    439. 

  439.                               gh_scm2ulong,gh_ulong2scm);
    440. 

  440.     specialize_std_pair_on_first(double,gh_number_p,
    441. 

  441.                               gh_scm2double,gh_double2scm);
    442. 

  442.     specialize_std_pair_on_first(float,gh_number_p,
    443. 

  443.                               gh_scm2double,gh_double2scm);
    444. 

  444.     specialize_std_pair_on_first(std::string,gh_string_p,
    445. 

  445.                               SWIG_scm2string,SWIG_string2scm);
    446. 

  446. 

  447.     specialize_std_pair_on_second(bool,gh_boolean_p,
    448. 

  448.                                 gh_scm2bool,SWIG_bool2scm);
    449. 

  449.     specialize_std_pair_on_second(int,gh_number_p,
    450. 

  450.                                 gh_scm2long,gh_long2scm);
    451. 

  451.     specialize_std_pair_on_second(short,gh_number_p,
    452. 

  452.                                 gh_scm2long,gh_long2scm);
    453. 

  453.     specialize_std_pair_on_second(long,gh_number_p,
    454. 

  454.                                 gh_scm2long,gh_long2scm);
    455. 

  455.     specialize_std_pair_on_second(unsigned int,gh_number_p,
    456. 

  456.                                 gh_scm2ulong,gh_ulong2scm);
    457. 

  457.     specialize_std_pair_on_second(unsigned short,gh_number_p,
    458. 

  458.                                 gh_scm2ulong,gh_ulong2scm);
    459. 

  459.     specialize_std_pair_on_second(unsigned long,gh_number_p,
    460. 

  460.                                 gh_scm2ulong,gh_ulong2scm);
    461. 

  461.     specialize_std_pair_on_second(double,gh_number_p,
    462. 

  462.                                 gh_scm2double,gh_double2scm);
    463. 

  463.     specialize_std_pair_on_second(float,gh_number_p,
    464. 

  464.                                 gh_scm2double,gh_double2scm);
    465. 

  465.     specialize_std_pair_on_second(std::string,gh_string_p,
    466. 

  466.                                 SWIG_scm2string,SWIG_string2scm);
    467. 

  467. 

  468.     specialize_std_pair_on_both(bool,gh_boolean_p,
    469. 

  469.                                gh_scm2bool,SWIG_bool2scm,
    470. 

  470.                                bool,gh_boolean_p,
    471. 

  471.                                gh_scm2bool,SWIG_bool2scm);
    472. 

  472.     specialize_std_pair_on_both(bool,gh_boolean_p,
    473. 

  473.                                gh_scm2bool,SWIG_bool2scm,
    474. 

  474.                                int,gh_number_p,
    475. 

  475.                                gh_scm2long,gh_long2scm);
    476. 

  476.     specialize_std_pair_on_both(bool,gh_boolean_p,
    477. 

  477.                                gh_scm2bool,SWIG_bool2scm,
    478. 

  478.                                short,gh_number_p,
    479. 

  479.                                gh_scm2long,gh_long2scm);
    480. 

  480.     specialize_std_pair_on_both(bool,gh_boolean_p,
    481. 

  481.                                gh_scm2bool,SWIG_bool2scm,
    482. 

  482.                                long,gh_number_p,
    483. 

  483.                                gh_scm2long,gh_long2scm);
    484. 

  484.     specialize_std_pair_on_both(bool,gh_boolean_p,
    485. 

  485.                                gh_scm2bool,SWIG_bool2scm,
    486. 

  486.                                unsigned int,gh_number_p,
    487. 

  487.                                gh_scm2ulong,gh_ulong2scm);
    488. 

  488.     specialize_std_pair_on_both(bool,gh_boolean_p,
    489. 

  489.                                gh_scm2bool,SWIG_bool2scm,
    490. 

  490.                                unsigned short,gh_number_p,
    491. 

  491.                                gh_scm2ulong,gh_ulong2scm);
    492. 

  492.     specialize_std_pair_on_both(bool,gh_boolean_p,
    493. 

  493.                                gh_scm2bool,SWIG_bool2scm,
    494. 

  494.                                unsigned long,gh_number_p,
    495. 

  495.                                gh_scm2ulong,gh_ulong2scm);
    496. 

  496.     specialize_std_pair_on_both(bool,gh_boolean_p,
    497. 

  497.                                gh_scm2bool,SWIG_bool2scm,
    498. 

  498.                                double,gh_number_p,
    499. 

  499.                                gh_scm2double,gh_double2scm);
    500. 

  500.     specialize_std_pair_on_both(bool,gh_boolean_p,
    501. 

  501.                                gh_scm2bool,SWIG_bool2scm,
    502. 

  502.                                float,gh_number_p,
    503. 

  503.                                gh_scm2double,gh_double2scm);
    504. 

  504.     specialize_std_pair_on_both(bool,gh_boolean_p,
    505. 

  505.                                gh_scm2bool,SWIG_bool2scm,
    506. 

  506.                                std::string,gh_string_p,
    507. 

  507.                                SWIG_scm2string,SWIG_string2scm);
    508. 

  508.     specialize_std_pair_on_both(int,gh_number_p,
    509. 

  509.                                gh_scm2long,gh_long2scm,
    510. 

  510.                                bool,gh_boolean_p,
    511. 

  511.                                gh_scm2bool,SWIG_bool2scm);
    512. 

  512.     specialize_std_pair_on_both(int,gh_number_p,
    513. 

  513.                                gh_scm2long,gh_long2scm,
    514. 

  514.                                int,gh_number_p,
    515. 

  515.                                gh_scm2long,gh_long2scm);
    516. 

  516.     specialize_std_pair_on_both(int,gh_number_p,
    517. 

  517.                                gh_scm2long,gh_long2scm,
    518. 

  518.                                short,gh_number_p,
    519. 

  519.                                gh_scm2long,gh_long2scm);
    520. 

  520.     specialize_std_pair_on_both(int,gh_number_p,
    521. 

  521.                                gh_scm2long,gh_long2scm,
    522. 

  522.                                long,gh_number_p,
    523. 

  523.                                gh_scm2long,gh_long2scm);
    524. 

  524.     specialize_std_pair_on_both(int,gh_number_p,
    525. 

  525.                                gh_scm2long,gh_long2scm,
    526. 

  526.                                unsigned int,gh_number_p,
    527. 

  527.                                gh_scm2ulong,gh_ulong2scm);
    528. 

  528.     specialize_std_pair_on_both(int,gh_number_p,
    529. 

  529.                                gh_scm2long,gh_long2scm,
    530. 

  530.                                unsigned short,gh_number_p,
    531. 

  531.                                gh_scm2ulong,gh_ulong2scm);
    532. 

  532.     specialize_std_pair_on_both(int,gh_number_p,
    533. 

  533.                                gh_scm2long,gh_long2scm,
    534. 

  534.                                unsigned long,gh_number_p,
    535. 

  535.                                gh_scm2ulong,gh_ulong2scm);
    536. 

  536.     specialize_std_pair_on_both(int,gh_number_p,
    537. 

  537.                                gh_scm2long,gh_long2scm,
    538. 

  538.                                double,gh_number_p,
    539. 

  539.                                gh_scm2double,gh_double2scm);
    540. 

  540.     specialize_std_pair_on_both(int,gh_number_p,
    541. 

  541.                                gh_scm2long,gh_long2scm,
    542. 

  542.                                float,gh_number_p,
    543. 

  543.                                gh_scm2double,gh_double2scm);
    544. 

  544.     specialize_std_pair_on_both(int,gh_number_p,
    545. 

  545.                                gh_scm2long,gh_long2scm,
    546. 

  546.                                std::string,gh_string_p,
    547. 

  547.                                SWIG_scm2string,SWIG_string2scm);
    548. 

  548.     specialize_std_pair_on_both(short,gh_number_p,
    549. 

  549.                                gh_scm2long,gh_long2scm,
    550. 

  550.                                bool,gh_boolean_p,
    551. 

  551.                                gh_scm2bool,SWIG_bool2scm);
    552. 

  552.     specialize_std_pair_on_both(short,gh_number_p,
    553. 

  553.                                gh_scm2long,gh_long2scm,
    554. 

  554.                                int,gh_number_p,
    555. 

  555.                                gh_scm2long,gh_long2scm);
    556. 

  556.     specialize_std_pair_on_both(short,gh_number_p,
    557. 

  557.                                gh_scm2long,gh_long2scm,
    558. 

  558.                                short,gh_number_p,
    559. 

  559.                                gh_scm2long,gh_long2scm);
    560. 

  560.     specialize_std_pair_on_both(short,gh_number_p,
    561. 

  561.                                gh_scm2long,gh_long2scm,
    562. 

  562.                                long,gh_number_p,
    563. 

  563.                                gh_scm2long,gh_long2scm);
    564. 

  564.     specialize_std_pair_on_both(short,gh_number_p,
    565. 

  565.                                gh_scm2long,gh_long2scm,
    566. 

  566.                                unsigned int,gh_number_p,
    567. 

  567.                                gh_scm2ulong,gh_ulong2scm);
    568. 

  568.     specialize_std_pair_on_both(short,gh_number_p,
    569. 

  569.                                gh_scm2long,gh_long2scm,
    570. 

  570.                                unsigned short,gh_number_p,
    571. 

  571.                                gh_scm2ulong,gh_ulong2scm);
    572. 

  572.     specialize_std_pair_on_both(short,gh_number_p,
    573. 

  573.                                gh_scm2long,gh_long2scm,
    574. 

  574.                                unsigned long,gh_number_p,
    575. 

  575.                                gh_scm2ulong,gh_ulong2scm);
    576. 

  576.     specialize_std_pair_on_both(short,gh_number_p,
    577. 

  577.                                gh_scm2long,gh_long2scm,
    578. 

  578.                                double,gh_number_p,
    579. 

  579.                                gh_scm2double,gh_double2scm);
    580. 

  580.     specialize_std_pair_on_both(short,gh_number_p,
    581. 

  581.                                gh_scm2long,gh_long2scm,
    582. 

  582.                                float,gh_number_p,
    583. 

  583.                                gh_scm2double,gh_double2scm);
    584. 

  584.     specialize_std_pair_on_both(short,gh_number_p,
    585. 

  585.                                gh_scm2long,gh_long2scm,
    586. 

  586.                                std::string,gh_string_p,
    587. 

  587.                                SWIG_scm2string,SWIG_string2scm);
    588. 

  588.     specialize_std_pair_on_both(long,gh_number_p,
    589. 

  589.                                gh_scm2long,gh_long2scm,
    590. 

  590.                                bool,gh_boolean_p,
    591. 

  591.                                gh_scm2bool,SWIG_bool2scm);
    592. 

  592.     specialize_std_pair_on_both(long,gh_number_p,
    593. 

  593.                                gh_scm2long,gh_long2scm,
    594. 

  594.                                int,gh_number_p,
    595. 

  595.                                gh_scm2long,gh_long2scm);
    596. 

  596.     specialize_std_pair_on_both(long,gh_number_p,
    597. 

  597.                                gh_scm2long,gh_long2scm,
    598. 

  598.                                short,gh_number_p,
    599. 

  599.                                gh_scm2long,gh_long2scm);
    600. 

  600.     specialize_std_pair_on_both(long,gh_number_p,
    601. 

  601.                                gh_scm2long,gh_long2scm,
    602. 

  602.                                long,gh_number_p,
    603. 

  603.                                gh_scm2long,gh_long2scm);
    604. 

  604.     specialize_std_pair_on_both(long,gh_number_p,
    605. 

  605.                                gh_scm2long,gh_long2scm,
    606. 

  606.                                unsigned int,gh_number_p,
    607. 

  607.                                gh_scm2ulong,gh_ulong2scm);
    608. 

  608.     specialize_std_pair_on_both(long,gh_number_p,
    609. 

  609.                                gh_scm2long,gh_long2scm,
    610. 

  610.                                unsigned short,gh_number_p,
    611. 

  611.                                gh_scm2ulong,gh_ulong2scm);
    612. 

  612.     specialize_std_pair_on_both(long,gh_number_p,
    613. 

  613.                                gh_scm2long,gh_long2scm,
    614. 

  614.                                unsigned long,gh_number_p,
    615. 

  615.                                gh_scm2ulong,gh_ulong2scm);
    616. 

  616.     specialize_std_pair_on_both(long,gh_number_p,
    617. 

  617.                                gh_scm2long,gh_long2scm,
    618. 

  618.                                double,gh_number_p,
    619. 

  619.                                gh_scm2double,gh_double2scm);
    620. 

  620.     specialize_std_pair_on_both(long,gh_number_p,
    621. 

  621.                                gh_scm2long,gh_long2scm,
    622. 

  622.                                float,gh_number_p,
    623. 

  623.                                gh_scm2double,gh_double2scm);
    624. 

  624.     specialize_std_pair_on_both(long,gh_number_p,
    625. 

  625.                                gh_scm2long,gh_long2scm,
    626. 

  626.                                std::string,gh_string_p,
    627. 

  627.                                SWIG_scm2string,SWIG_string2scm);
    628. 

  628.     specialize_std_pair_on_both(unsigned int,gh_number_p,
    629. 

  629.                                gh_scm2ulong,gh_ulong2scm,
    630. 

  630.                                bool,gh_boolean_p,
    631. 

  631.                                gh_scm2bool,SWIG_bool2scm);
    632. 

  632.     specialize_std_pair_on_both(unsigned int,gh_number_p,
    633. 

  633.                                gh_scm2ulong,gh_ulong2scm,
    634. 

  634.                                int,gh_number_p,
    635. 

  635.                                gh_scm2long,gh_long2scm);
    636. 

  636.     specialize_std_pair_on_both(unsigned int,gh_number_p,
    637. 

  637.                                gh_scm2ulong,gh_ulong2scm,
    638. 

  638.                                short,gh_number_p,
    639. 

  639.                                gh_scm2long,gh_long2scm);
    640. 

  640.     specialize_std_pair_on_both(unsigned int,gh_number_p,
    641. 

  641.                                gh_scm2ulong,gh_ulong2scm,
    642. 

  642.                                long,gh_number_p,
    643. 

  643.                                gh_scm2long,gh_long2scm);
    644. 

  644.     specialize_std_pair_on_both(unsigned int,gh_number_p,
    645. 

  645.                                gh_scm2ulong,gh_ulong2scm,
    646. 

  646.                                unsigned int,gh_number_p,
    647. 

  647.                                gh_scm2ulong,gh_ulong2scm);
    648. 

  648.     specialize_std_pair_on_both(unsigned int,gh_number_p,
    649. 

  649.                                gh_scm2ulong,gh_ulong2scm,
    650. 

  650.                                unsigned short,gh_number_p,
    651. 

  651.                                gh_scm2ulong,gh_ulong2scm);
    652. 

  652.     specialize_std_pair_on_both(unsigned int,gh_number_p,
    653. 

  653.                                gh_scm2ulong,gh_ulong2scm,
    654. 

  654.                                unsigned long,gh_number_p,
    655. 

  655.                                gh_scm2ulong,gh_ulong2scm);
    656. 

  656.     specialize_std_pair_on_both(unsigned int,gh_number_p,
    657. 

  657.                                gh_scm2ulong,gh_ulong2scm,
    658. 

  658.                                double,gh_number_p,
    659. 

  659.                                gh_scm2double,gh_double2scm);
    660. 

  660.     specialize_std_pair_on_both(unsigned int,gh_number_p,
    661. 

  661.                                gh_scm2ulong,gh_ulong2scm,
    662. 

  662.                                float,gh_number_p,
    663. 

  663.                                gh_scm2double,gh_double2scm);
    664. 

  664.     specialize_std_pair_on_both(unsigned int,gh_number_p,
    665. 

  665.                                gh_scm2ulong,gh_ulong2scm,
    666. 

  666.                                std::string,gh_string_p,
    667. 

  667.                                SWIG_scm2string,SWIG_string2scm);
    668. 

  668.     specialize_std_pair_on_both(unsigned short,gh_number_p,
    669. 

  669.                                gh_scm2ulong,gh_ulong2scm,
    670. 

  670.                                bool,gh_boolean_p,
    671. 

  671.                                gh_scm2bool,SWIG_bool2scm);
    672. 

  672.     specialize_std_pair_on_both(unsigned short,gh_number_p,
    673. 

  673.                                gh_scm2ulong,gh_ulong2scm,
    674. 

  674.                                int,gh_number_p,
    675. 

  675.                                gh_scm2long,gh_long2scm);
    676. 

  676.     specialize_std_pair_on_both(unsigned short,gh_number_p,
    677. 

  677.                                gh_scm2ulong,gh_ulong2scm,
    678. 

  678.                                short,gh_number_p,
    679. 

  679.                                gh_scm2long,gh_long2scm);
    680. 

  680.     specialize_std_pair_on_both(unsigned short,gh_number_p,
    681. 

  681.                                gh_scm2ulong,gh_ulong2scm,
    682. 

  682.                                long,gh_number_p,
    683. 

  683.                                gh_scm2long,gh_long2scm);
    684. 

  684.     specialize_std_pair_on_both(unsigned short,gh_number_p,
    685. 

  685.                                gh_scm2ulong,gh_ulong2scm,
    686. 

  686.                                unsigned int,gh_number_p,
    687. 

  687.                                gh_scm2ulong,gh_ulong2scm);
    688. 

  688.     specialize_std_pair_on_both(unsigned short,gh_number_p,
    689. 

  689.                                gh_scm2ulong,gh_ulong2scm,
    690. 

  690.                                unsigned short,gh_number_p,
    691. 

  691.                                gh_scm2ulong,gh_ulong2scm);
    692. 

  692.     specialize_std_pair_on_both(unsigned short,gh_number_p,
    693. 

  693.                                gh_scm2ulong,gh_ulong2scm,
    694. 

  694.                                unsigned long,gh_number_p,
    695. 

  695.                                gh_scm2ulong,gh_ulong2scm);
    696. 

  696.     specialize_std_pair_on_both(unsigned short,gh_number_p,
    697. 

  697.                                gh_scm2ulong,gh_ulong2scm,
    698. 

  698.                                double,gh_number_p,
    699. 

  699.                                gh_scm2double,gh_double2scm);
    700. 

  700.     specialize_std_pair_on_both(unsigned short,gh_number_p,
    701. 

  701.                                gh_scm2ulong,gh_ulong2scm,
    702. 

  702.                                float,gh_number_p,
    703. 

  703.                                gh_scm2double,gh_double2scm);
    704. 

  704.     specialize_std_pair_on_both(unsigned short,gh_number_p,
    705. 

  705.                                gh_scm2ulong,gh_ulong2scm,
    706. 

  706.                                std::string,gh_string_p,
    707. 

  707.                                SWIG_scm2string,SWIG_string2scm);
    708. 

  708.     specialize_std_pair_on_both(unsigned long,gh_number_p,
    709. 

  709.                                gh_scm2ulong,gh_ulong2scm,
    710. 

  710.                                bool,gh_boolean_p,
    711. 

  711.                                gh_scm2bool,SWIG_bool2scm);
    712. 

  712.     specialize_std_pair_on_both(unsigned long,gh_number_p,
    713. 

  713.                                gh_scm2ulong,gh_ulong2scm,
    714. 

  714.                                int,gh_number_p,
    715. 

  715.                                gh_scm2long,gh_long2scm);
    716. 

  716.     specialize_std_pair_on_both(unsigned long,gh_number_p,
    717. 

  717.                                gh_scm2ulong,gh_ulong2scm,
    718. 

  718.                                short,gh_number_p,
    719. 

  719.                                gh_scm2long,gh_long2scm);
    720. 

  720.     specialize_std_pair_on_both(unsigned long,gh_number_p,
    721. 

  721.                                gh_scm2ulong,gh_ulong2scm,
    722. 

  722.                                long,gh_number_p,
    723. 

  723.                                gh_scm2long,gh_long2scm);
    724. 

  724.     specialize_std_pair_on_both(unsigned long,gh_number_p,
    725. 

  725.                                gh_scm2ulong,gh_ulong2scm,
    726. 

  726.                                unsigned int,gh_number_p,
    727. 

  727.                                gh_scm2ulong,gh_ulong2scm);
    728. 

  728.     specialize_std_pair_on_both(unsigned long,gh_number_p,
    729. 

  729.                                gh_scm2ulong,gh_ulong2scm,
    730. 

  730.                                unsigned short,gh_number_p,
    731. 

  731.                                gh_scm2ulong,gh_ulong2scm);
    732. 

  732.     specialize_std_pair_on_both(unsigned long,gh_number_p,
    733. 

  733.                                gh_scm2ulong,gh_ulong2scm,
    734. 

  734.                                unsigned long,gh_number_p,
    735. 

  735.                                gh_scm2ulong,gh_ulong2scm);
    736. 

  736.     specialize_std_pair_on_both(unsigned long,gh_number_p,
    737. 

  737.                                gh_scm2ulong,gh_ulong2scm,
    738. 

  738.                                double,gh_number_p,
    739. 

  739.                                gh_scm2double,gh_double2scm);
    740. 

  740.     specialize_std_pair_on_both(unsigned long,gh_number_p,
    741. 

  741.                                gh_scm2ulong,gh_ulong2scm,
    742. 

  742.                                float,gh_number_p,
    743. 

  743.                                gh_scm2double,gh_double2scm);
    744. 

  744.     specialize_std_pair_on_both(unsigned long,gh_number_p,
    745. 

  745.                                gh_scm2ulong,gh_ulong2scm,
    746. 

  746.                                std::string,gh_string_p,
    747. 

  747.                                SWIG_scm2string,SWIG_string2scm);
    748. 

  748.     specialize_std_pair_on_both(double,gh_number_p,
    749. 

  749.                                gh_scm2double,gh_double2scm,
    750. 

  750.                                bool,gh_boolean_p,
    751. 

  751.                                gh_scm2bool,SWIG_bool2scm);
    752. 

  752.     specialize_std_pair_on_both(double,gh_number_p,
    753. 

  753.                                gh_scm2double,gh_double2scm,
    754. 

  754.                                int,gh_number_p,
    755. 

  755.                                gh_scm2long,gh_long2scm);
    756. 

  756.     specialize_std_pair_on_both(double,gh_number_p,
    757. 

  757.                                gh_scm2double,gh_double2scm,
    758. 

  758.                                short,gh_number_p,
    759. 

  759.                                gh_scm2long,gh_long2scm);
    760. 

  760.     specialize_std_pair_on_both(double,gh_number_p,
    761. 

  761.                                gh_scm2double,gh_double2scm,
    762. 

  762.                                long,gh_number_p,
    763. 

  763.                                gh_scm2long,gh_long2scm);
    764. 

  764.     specialize_std_pair_on_both(double,gh_number_p,
    765. 

  765.                                gh_scm2double,gh_double2scm,
    766. 

  766.                                unsigned int,gh_number_p,
    767. 

  767.                                gh_scm2ulong,gh_ulong2scm);
    768. 

  768.     specialize_std_pair_on_both(double,gh_number_p,
    769. 

  769.                                gh_scm2double,gh_double2scm,
    770. 

  770.                                unsigned short,gh_number_p,
    771. 

  771.                                gh_scm2ulong,gh_ulong2scm);
    772. 

  772.     specialize_std_pair_on_both(double,gh_number_p,
    773. 

  773.                                gh_scm2double,gh_double2scm,
    774. 

  774.                                unsigned long,gh_number_p,
    775. 

  775.                                gh_scm2ulong,gh_ulong2scm);
    776. 

  776.     specialize_std_pair_on_both(double,gh_number_p,
    777. 

  777.                                gh_scm2double,gh_double2scm,
    778. 

  778.                                double,gh_number_p,
    779. 

  779.                                gh_scm2double,gh_double2scm);
    780. 

  780.     specialize_std_pair_on_both(double,gh_number_p,
    781. 

  781.                                gh_scm2double,gh_double2scm,
    782. 

  782.                                float,gh_number_p,
    783. 

  783.                                gh_scm2double,gh_double2scm);
    784. 

  784.     specialize_std_pair_on_both(double,gh_number_p,
    785. 

  785.                                gh_scm2double,gh_double2scm,
    786. 

  786.                                std::string,gh_string_p,
    787. 

  787.                                SWIG_scm2string,SWIG_string2scm);
    788. 

  788.     specialize_std_pair_on_both(float,gh_number_p,
    789. 

  789.                                gh_scm2double,gh_double2scm,
    790. 

  790.                                bool,gh_boolean_p,
    791. 

  791.                                gh_scm2bool,SWIG_bool2scm);
    792. 

  792.     specialize_std_pair_on_both(float,gh_number_p,
    793. 

  793.                                gh_scm2double,gh_double2scm,
    794. 

  794.                                int,gh_number_p,
    795. 

  795.                                gh_scm2long,gh_long2scm);
    796. 

  796.     specialize_std_pair_on_both(float,gh_number_p,
    797. 

  797.                                gh_scm2double,gh_double2scm,
    798. 

  798.                                short,gh_number_p,
    799. 

  799.                                gh_scm2long,gh_long2scm);
    800. 

  800.     specialize_std_pair_on_both(float,gh_number_p,
    801. 

  801.                                gh_scm2double,gh_double2scm,
    802. 

  802.                                long,gh_number_p,
    803. 

  803.                                gh_scm2long,gh_long2scm);
    804. 

  804.     specialize_std_pair_on_both(float,gh_number_p,
    805. 

  805.                                gh_scm2double,gh_double2scm,
    806. 

  806.                                unsigned int,gh_number_p,
    807. 

  807.                                gh_scm2ulong,gh_ulong2scm);
    808. 

  808.     specialize_std_pair_on_both(float,gh_number_p,
    809. 

  809.                                gh_scm2double,gh_double2scm,
    810. 

  810.                                unsigned short,gh_number_p,
    811. 

  811.                                gh_scm2ulong,gh_ulong2scm);
    812. 

  812.     specialize_std_pair_on_both(float,gh_number_p,
    813. 

  813.                                gh_scm2double,gh_double2scm,
    814. 

  814.                                unsigned long,gh_number_p,
    815. 

  815.                                gh_scm2ulong,gh_ulong2scm);
    816. 

  816.     specialize_std_pair_on_both(float,gh_number_p,
    817. 

  817.                                gh_scm2double,gh_double2scm,
    818. 

  818.                                double,gh_number_p,
    819. 

  819.                                gh_scm2double,gh_double2scm);
    820. 

  820.     specialize_std_pair_on_both(float,gh_number_p,
    821. 

  821.                                gh_scm2double,gh_double2scm,
    822. 

  822.                                float,gh_number_p,
    823. 

  823.                                gh_scm2double,gh_double2scm);
    824. 

  824.     specialize_std_pair_on_both(float,gh_number_p,
    825. 

  825.                                gh_scm2double,gh_double2scm,
    826. 

  826.                                std::string,gh_string_p,
    827. 

  827.                                SWIG_scm2string,SWIG_string2scm);
    828. 

  828.     specialize_std_pair_on_both(std::string,gh_string_p,
    829. 

  829.                                SWIG_scm2string,SWIG_string2scm,
    830. 

  830.                                bool,gh_boolean_p,
    831. 

  831.                                gh_scm2bool,SWIG_bool2scm);
    832. 

  832.     specialize_std_pair_on_both(std::string,gh_string_p,
    833. 

  833.                                SWIG_scm2string,SWIG_string2scm,
    834. 

  834.                                int,gh_number_p,
    835. 

  835.                                gh_scm2long,gh_long2scm);
    836. 

  836.     specialize_std_pair_on_both(std::string,gh_string_p,
    837. 

  837.                                SWIG_scm2string,SWIG_string2scm,
    838. 

  838.                                short,gh_number_p,
    839. 

  839.                                gh_scm2long,gh_long2scm);
    840. 

  840.     specialize_std_pair_on_both(std::string,gh_string_p,
    841. 

  841.                                SWIG_scm2string,SWIG_string2scm,
    842. 

  842.                                long,gh_number_p,
    843. 

  843.                                gh_scm2long,gh_long2scm);
    844. 

  844.     specialize_std_pair_on_both(std::string,gh_string_p,
    845. 

  845.                                SWIG_scm2string,SWIG_string2scm,
    846. 

  846.                                unsigned int,gh_number_p,
    847. 

  847.                                gh_scm2ulong,gh_ulong2scm);
    848. 

  848.     specialize_std_pair_on_both(std::string,gh_string_p,
    849. 

  849.                                SWIG_scm2string,SWIG_string2scm,
    850. 

  850.                                unsigned short,gh_number_p,
    851. 

  851.                                gh_scm2ulong,gh_ulong2scm);
    852. 

  852.     specialize_std_pair_on_both(std::string,gh_string_p,
    853. 

  853.                                SWIG_scm2string,SWIG_string2scm,
    854. 

  854.                                unsigned long,gh_number_p,
    855. 

  855.                                gh_scm2ulong,gh_ulong2scm);
    856. 

  856.     specialize_std_pair_on_both(std::string,gh_string_p,
    857. 

  857.                                SWIG_scm2string,SWIG_string2scm,
    858. 

  858.                                double,gh_number_p,
    859. 

  859.                                gh_scm2double,gh_double2scm);
    860. 

  860.     specialize_std_pair_on_both(std::string,gh_string_p,
    861. 

  861.                                SWIG_scm2string,SWIG_string2scm,
    862. 

  862.                                float,gh_number_p,
    863. 

  863.                                gh_scm2double,gh_double2scm);
    864. 

  864.     specialize_std_pair_on_both(std::string,gh_string_p,
    865. 

  865.                                SWIG_scm2string,SWIG_string2scm,
    866. 

  866.                                std::string,gh_string_p,
    867. 

  867.                                SWIG_scm2string,SWIG_string2scm);
    868. 

  868. }
    869.