ruby-dcl 1.7.1 → 1.8.0

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
Files changed (307) hide show
  1. checksums.yaml +4 -4
  2. data/{ChangeLog → .ChangeLog.until20150318} +0 -0
  3. data/LICENSE.txt +1 -1
  4. data/Rakefile +7 -11
  5. data/demo/gokuraku/hop/hop.rb +1 -1
  6. data/demo/gokuraku/jump/jump1.rb +1 -1
  7. data/demo/gokuraku/jump/jump2.rb +1 -1
  8. data/demo/gokuraku/layout/lay1.rb +1 -1
  9. data/demo/gokuraku/layout/lay2.rb +1 -1
  10. data/demo/gokuraku/step/step0.rb +1 -1
  11. data/demo/gokuraku/step/step1.rb +1 -1
  12. data/demo/gokuraku/step/step2.rb +1 -1
  13. data/demo/gokuraku/u1d/u1d1.rb +1 -1
  14. data/demo/gokuraku/u1d/u1d2.rb +1 -1
  15. data/demo/gokuraku/u2d/u2d1.rb +1 -1
  16. data/demo/gokuraku/u2d/u2d2.rb +1 -1
  17. data/demo/gokuraku/u2d/u2d3.rb +1 -1
  18. data/demo/gokuraku/u2d/u2d4.rb +1 -1
  19. data/demo/grph1/scpack/scpkt2.rb +1 -1
  20. data/demo/grph1/scpack/scpkt3.rb +1 -1
  21. data/demo/grph1/scpack/scpkt6.rb +1 -1
  22. data/demo/grph1/scpack/scpkt7.rb +1 -1
  23. data/demo/grph1/scpack/scpkt8.rb +1 -1
  24. data/demo/grph1/sgpack/sgfont.rb +1 -1
  25. data/demo/grph1/sgpack/sgfonz.rb +1 -1
  26. data/demo/grph1/sgpack/sgksx1.rb +1 -1
  27. data/demo/grph1/sgpack/sgksx2.rb +1 -1
  28. data/demo/grph1/sgpack/sgksx3.rb +1 -1
  29. data/demo/grph1/sgpack/sglidx.rb +1 -1
  30. data/demo/grph1/sgpack/sgltyp.rb +1 -1
  31. data/demo/grph1/sgpack/sgpk01.rb +1 -1
  32. data/demo/grph1/sgpack/sgpk02.rb +1 -1
  33. data/demo/grph1/sgpack/sgpk03.rb +1 -1
  34. data/demo/grph1/sgpack/sgpk04.rb +1 -1
  35. data/demo/grph1/sgpack/sgpk05.rb +1 -1
  36. data/demo/grph1/sgpack/sgpk06.rb +1 -1
  37. data/demo/grph1/sgpack/sgpk07.rb +1 -1
  38. data/demo/grph1/sgpack/sgpk08.rb +1 -1
  39. data/demo/grph1/sgpack/sgpk09.rb +1 -1
  40. data/demo/grph1/sgpack/sgpk10.rb +1 -1
  41. data/demo/grph1/sgpack/sgtclr.rb +1 -1
  42. data/demo/grph1/sgpack/sgtone.rb +1 -1
  43. data/demo/grph1/sgpack/sgtonz.rb +1 -1
  44. data/demo/grph1/slpack/slpk01.rb +1 -1
  45. data/demo/grph1/slpack/slpk02.rb +1 -1
  46. data/demo/grph1/slpack/slpk03.rb +1 -1
  47. data/demo/grph1/slpack/slpk04.rb +1 -1
  48. data/demo/grph2/grpack/grpk01.rb +1 -1
  49. data/demo/grph2/ucpack/ucpk01.rb +1 -1
  50. data/demo/grph2/ucpack/ucpk02.rb +1 -1
  51. data/demo/grph2/udegpk/u2df01.rb +1 -1
  52. data/demo/grph2/udegpk/u2df02.rb +1 -1
  53. data/demo/grph2/udegpk/u2df03.rb +1 -1
  54. data/demo/grph2/udegpk/u2df04.rb +1 -1
  55. data/demo/grph2/udegpk/u2df05.rb +1 -1
  56. data/demo/grph2/udegpk/u2df06.rb +1 -1
  57. data/demo/grph2/udegpk/u2df07.rb +1 -1
  58. data/demo/grph2/udegpk/u2df08.rb +1 -1
  59. data/demo/grph2/uipack/uipk01.rb +1 -1
  60. data/demo/grph2/uipack/uipk02.rb +1 -1
  61. data/demo/grph2/ulpack/ulpk01.rb +1 -1
  62. data/demo/grph2/ulpack/ulpk01n.rb +1 -1
  63. data/demo/grph2/ulpack/ulpk02.rb +1 -1
  64. data/demo/grph2/ulpack/ulpk02n.rb +1 -1
  65. data/demo/grph2/umpack/test01.rb +1 -1
  66. data/demo/grph2/umpack/test02.rb +1 -1
  67. data/demo/grph2/umpack/test03.rb +1 -1
  68. data/demo/grph2/umpack/test04.rb +1 -1
  69. data/demo/grph2/umpack/test05.rb +1 -1
  70. data/demo/grph2/umpack/test06.rb +1 -1
  71. data/demo/grph2/umpack/test07.rb +1 -1
  72. data/demo/grph2/umpack/test08.rb +1 -1
  73. data/demo/grph2/umpack/umpk01.rb +1 -1
  74. data/demo/grph2/umpack/umpk02.rb +1 -1
  75. data/demo/grph2/umpack/umpk03.rb +1 -1
  76. data/demo/grph2/umpack/umpk04.rb +1 -1
  77. data/demo/grph2/umpack/umpk05.rb +1 -1
  78. data/demo/grph2/uspack/uspk01.rb +1 -1
  79. data/demo/grph2/uspack/uspk02.rb +1 -1
  80. data/demo/grph2/uspack/uspk03.rb +1 -1
  81. data/demo/grph2/uspack/uspk04.rb +1 -1
  82. data/demo/grph2/uspack/uspk05.rb +1 -1
  83. data/demo/grph2/uspack/uspk06.rb +1 -1
  84. data/demo/grph2/uspack/uspk07.rb +1 -1
  85. data/demo/grph2/uspack/uspk08.rb +1 -1
  86. data/demo/grph2/uspack/uspk09.rb +1 -1
  87. data/demo/grph2/uspack/uspk10.rb +1 -1
  88. data/demo/grph2/uspack/uspk11.rb +1 -1
  89. data/demo/grph2/uspack/uspk12.rb +1 -1
  90. data/demo/grph2/uupack/uupk01.rb +1 -1
  91. data/demo/grph2/uupack/uupk02.rb +1 -1
  92. data/demo/grph2/uupack/uupk03.rb +1 -1
  93. data/demo/grph2/uupack/uupk04.rb +1 -1
  94. data/demo/grph2/uupack/uupk05.rb +1 -1
  95. data/demo/grph2/uupack/uupk06.rb +1 -1
  96. data/demo/grph2/uupack/uupk07.rb +1 -1
  97. data/demo/grph2/uxyzpk/uxyz01.rb +1 -1
  98. data/demo/grph2/uxyzpk/uxyz02.rb +1 -1
  99. data/demo/grph2/uxyzpk/uxyz03.rb +1 -1
  100. data/demo/grph2/uxyzpk/uxyz04.rb +1 -1
  101. data/demo/grph2/uxyzpk/uxyz05.rb +1 -1
  102. data/demo/grph2/uxyzpk/uxyz06.rb +1 -1
  103. data/demo/grph2/uxyzpk/uxyz07.rb +1 -1
  104. data/demo/grph2/uxyzpk/uxyz08.rb +1 -1
  105. data/demo/grph2/uxyzpk/uxyz09.rb +1 -1
  106. data/demo/grph2/uxyzpk/uxyz10.rb +1 -1
  107. data/demo/grph2/ximage/ximg01.rb +1 -1
  108. data/demo/math1/clsplib/cslb01.rb +1 -1
  109. data/demo/math2/fftlib/fftl01.rb +1 -1
  110. data/demo/math2/fftlib/fftl02.rb +1 -1
  111. data/demo/math2/intrlib/intr01.rb +1 -1
  112. data/demo/math2/rnmlib/rnml01.rb +1 -1
  113. data/demo/math2/vstlib/vstl01.rb +1 -1
  114. data/demo/math2/vstlib/vstl02.rb +1 -1
  115. data/demo/rakuraku/color/color1.rb +1 -1
  116. data/demo/rakuraku/color/color2.rb +1 -1
  117. data/demo/rakuraku/color/color3.rb +1 -1
  118. data/demo/rakuraku/kihon/kihon1.rb +1 -1
  119. data/demo/rakuraku/kihon/kihon2.rb +1 -1
  120. data/demo/rakuraku/kihon/kihon3.rb +1 -1
  121. data/demo/rakuraku/kihon/kihon4.rb +1 -1
  122. data/demo/rakuraku/kihon/kihon5.rb +1 -1
  123. data/demo/rakuraku/kihon/kihon6.rb +1 -1
  124. data/demo/rakuraku/kihon/kihon7.rb +1 -1
  125. data/demo/rakuraku/kihon/kihon8.rb +1 -1
  126. data/demo/rakuraku/kihon/kihon9.rb +1 -1
  127. data/demo/rakuraku/kihon/kihona.rb +1 -1
  128. data/demo/rakuraku/kihon/kihonb.rb +1 -1
  129. data/demo/rakuraku/kihon/kihonc.rb +1 -1
  130. data/demo/rakuraku/layout/lay1.rb +1 -1
  131. data/demo/rakuraku/layout/lay2.rb +1 -1
  132. data/demo/rakuraku/layout/lay3.rb +1 -1
  133. data/demo/rakuraku/map3d/map3d1.rb +1 -1
  134. data/demo/rakuraku/map3d/map3d2.rb +1 -1
  135. data/demo/rakuraku/map3d/map3d3.rb +1 -1
  136. data/demo/rakuraku/map3d/map3d4.rb +1 -1
  137. data/demo/rakuraku/map3d/map3d5.rb +1 -1
  138. data/demo/rakuraku/miss/miss1.rb +1 -1
  139. data/demo/rakuraku/miss/miss2.rb +1 -1
  140. data/demo/rakuraku/quick/quick1.rb +1 -1
  141. data/demo/rakuraku/quick/quick2.rb +1 -1
  142. data/demo/rakuraku/quick/quick3.rb +1 -1
  143. data/demo/rakuraku/quick/quick4.rb +1 -1
  144. data/demo/rakuraku/quick/quick5.rb +1 -1
  145. data/demo/rakuraku/u2d/u2d1.rb +1 -1
  146. data/demo/rakuraku/u2d/u2d2.rb +1 -1
  147. data/demo/rakuraku/u2d/u2d3.rb +1 -1
  148. data/demo/rakuraku/u2d/u2d4.rb +1 -1
  149. data/demo/rakuraku/u2d/u2d5.rb +1 -1
  150. data/demo/rakuraku/u2d/u2d6.rb +1 -1
  151. data/demo/rakuraku/u2d/u2d7.rb +1 -1
  152. data/demo/rakuraku/uspack/uspac1.rb +1 -1
  153. data/demo/rakuraku/uspack/uspac2.rb +1 -1
  154. data/demo/rakuraku/uspack/uspac3.rb +1 -1
  155. data/demo/rakuraku/uspack/uspac4.rb +1 -1
  156. data/demo/rakuraku/uxyz/uxyz1.rb +1 -1
  157. data/demo/rakuraku/uxyz/uxyz2.rb +1 -1
  158. data/demo/rakuraku/uxyz/uxyz3.rb +1 -1
  159. data/demo/rakuraku/uxyz/uxyz4.rb +1 -1
  160. data/demo/rakuraku/uxyz/uxyz5.rb +1 -1
  161. data/demo/rakuraku/uxyz/uxyz6.rb +1 -1
  162. data/demo/rakuraku/uxyz/uxyz7.rb +1 -1
  163. data/demo/rakuraku/uxyz/uxyz8.rb +1 -1
  164. data/ext/numru/dcl_cary2obj.c +28 -23
  165. data/ext/numru/dcl_obj2cary.c +8 -4
  166. data/ext/numru/dcl_rubydcloriginal.c +14 -4
  167. data/ext/numru/extconf.rb +9 -51
  168. data/ext/numru/grph1_csgi.c +9 -5
  169. data/ext/numru/grph1_scpack.c +9 -5
  170. data/ext/numru/grph1_sgpack.c +9 -5
  171. data/ext/numru/grph1_slpack.c +9 -5
  172. data/ext/numru/grph1_stpack.c +9 -5
  173. data/ext/numru/grph1_swpack.c +69 -5
  174. data/ext/numru/grph2_grpack.c +9 -5
  175. data/ext/numru/grph2_ucpack.c +9 -5
  176. data/ext/numru/grph2_udpack.c +9 -5
  177. data/ext/numru/grph2_uepack.c +9 -5
  178. data/ext/numru/grph2_ugpack.c +9 -5
  179. data/ext/numru/grph2_uhpack.c +9 -5
  180. data/ext/numru/grph2_uipack.c +9 -5
  181. data/ext/numru/grph2_ulpack.c +9 -5
  182. data/ext/numru/grph2_umpack.c +9 -5
  183. data/ext/numru/grph2_uspack.c +9 -5
  184. data/ext/numru/grph2_uupack.c +9 -5
  185. data/ext/numru/grph2_uvpack.c +9 -5
  186. data/ext/numru/grph2_uwpack.c +9 -5
  187. data/ext/numru/grph2_uxpack.c +9 -5
  188. data/ext/numru/grph2_uypack.c +9 -5
  189. data/ext/numru/grph2_uzpack.c +9 -5
  190. data/ext/numru/init.c +202 -0
  191. data/ext/numru/init.c.default +7 -0
  192. data/ext/numru/math1_blklib.c +9 -5
  193. data/ext/numru/math1_chrlib.c +9 -5
  194. data/ext/numru/math1_clsplib.c +9 -5
  195. data/ext/numru/math1_fnclib.c +9 -5
  196. data/ext/numru/math1_gnmlib.c +9 -5
  197. data/ext/numru/math1_gt2dlib.c +9 -5
  198. data/ext/numru/math1_ifalib.c +9 -5
  199. data/ext/numru/math1_indxlib.c +9 -5
  200. data/ext/numru/math1_intlib.c +9 -5
  201. data/ext/numru/math1_lrllib.c +9 -5
  202. data/ext/numru/math1_maplib.c +9 -5
  203. data/ext/numru/math1_oslib.c +9 -5
  204. data/ext/numru/math1_rfalib.c +9 -5
  205. data/ext/numru/math1_rfblib.c +9 -5
  206. data/ext/numru/math1_sublib.c +9 -5
  207. data/ext/numru/math1_syslib.c +9 -5
  208. data/ext/numru/math1_vialib.c +9 -5
  209. data/ext/numru/math1_viblib.c +9 -5
  210. data/ext/numru/math1_vralib.c +9 -5
  211. data/ext/numru/math1_vrblib.c +9 -5
  212. data/ext/numru/math1_xfclib.c +9 -5
  213. data/ext/numru/math2_fftlib.c +9 -5
  214. data/ext/numru/math2_intrlib.c +9 -5
  215. data/ext/numru/math2_rnmlib.c +9 -5
  216. data/ext/numru/math2_shtlib.c +9 -5
  217. data/ext/numru/math2_vstlib.c +9 -5
  218. data/ext/numru/misc1_chnlib.c +9 -5
  219. data/ext/numru/misc1_datelib.c +9 -5
  220. data/ext/numru/misc1_fmtlib.c +9 -5
  221. data/ext/numru/misc1_misclib.c +9 -5
  222. data/ext/numru/misc1_randlib.c +9 -5
  223. data/ext/numru/misc1_timelib.c +9 -5
  224. data/lib/numru/dcl.rb +6 -5580
  225. data/lib/numru/dcl/dcl.rb +5591 -0
  226. data/lib/numru/dcl/version.rb +5 -0
  227. data/ruby-dcl-bigmem.gemspec +36 -0
  228. data/ruby-dcl.gemspec +10 -9
  229. metadata +17 -93
  230. data/.gitignore +0 -13
  231. data/.rspec +0 -2
  232. data/.travis.yml +0 -3
  233. data/GenWrapper/cproto2init.rb +0 -41
  234. data/GenWrapper/dcl_narrayed_funcs.rb +0 -181
  235. data/GenWrapper/dcl_rb_footing +0 -29
  236. data/GenWrapper/dcl_rb_heading +0 -123
  237. data/GenWrapper/def.rb +0 -20
  238. data/GenWrapper/elim_ary_size.rb +0 -398
  239. data/GenWrapper/etc/p_header +0 -64
  240. data/GenWrapper/pparse.rb +0 -137
  241. data/GenWrapper/proto/grph1_00 +0 -17
  242. data/GenWrapper/proto/grph1_csgi.fp +0 -27
  243. data/GenWrapper/proto/grph1_scpack.fp +0 -442
  244. data/GenWrapper/proto/grph1_sgpack.fp +0 -1772
  245. data/GenWrapper/proto/grph1_slpack.fp +0 -316
  246. data/GenWrapper/proto/grph1_stpack.fp +0 -455
  247. data/GenWrapper/proto/grph1_swpack.fp +0 -826
  248. data/GenWrapper/proto/grph2_00 +0 -16
  249. data/GenWrapper/proto/grph2_grpack.fp +0 -139
  250. data/GenWrapper/proto/grph2_ucpack.fp +0 -522
  251. data/GenWrapper/proto/grph2_udpack.fp +0 -692
  252. data/GenWrapper/proto/grph2_uepack.fp +0 -601
  253. data/GenWrapper/proto/grph2_ugpack.fp +0 -436
  254. data/GenWrapper/proto/grph2_uhpack.fp +0 -246
  255. data/GenWrapper/proto/grph2_uipack.fp +0 -508
  256. data/GenWrapper/proto/grph2_ulpack.fp +0 -516
  257. data/GenWrapper/proto/grph2_umpack.fp +0 -676
  258. data/GenWrapper/proto/grph2_uspack.fp +0 -989
  259. data/GenWrapper/proto/grph2_uupack.fp +0 -663
  260. data/GenWrapper/proto/grph2_uvpack.fp +0 -246
  261. data/GenWrapper/proto/grph2_uwpack.fp +0 -203
  262. data/GenWrapper/proto/grph2_uxpack.fp +0 -295
  263. data/GenWrapper/proto/grph2_uypack.fp +0 -295
  264. data/GenWrapper/proto/grph2_uzpack.fp +0 -574
  265. data/GenWrapper/proto/math1_00 +0 -12
  266. data/GenWrapper/proto/math1_blklib.fp +0 -58
  267. data/GenWrapper/proto/math1_chrlib.fp +0 -83
  268. data/GenWrapper/proto/math1_clsplib.fp +0 -74
  269. data/GenWrapper/proto/math1_fnclib.fp +0 -79
  270. data/GenWrapper/proto/math1_gnmlib.fp +0 -118
  271. data/GenWrapper/proto/math1_gt2dlib.fp +0 -144
  272. data/GenWrapper/proto/math1_ifalib.fp +0 -123
  273. data/GenWrapper/proto/math1_indxlib.fp +0 -222
  274. data/GenWrapper/proto/math1_intlib.fp +0 -46
  275. data/GenWrapper/proto/math1_lrllib.fp +0 -276
  276. data/GenWrapper/proto/math1_maplib.fp +0 -24
  277. data/GenWrapper/proto/math1_oslib.fp +0 -28
  278. data/GenWrapper/proto/math1_rfalib.fp +0 -420
  279. data/GenWrapper/proto/math1_rfblib.fp +0 -51
  280. data/GenWrapper/proto/math1_sublib.fp +0 -60
  281. data/GenWrapper/proto/math1_syslib.fp +0 -767
  282. data/GenWrapper/proto/math1_vialib.fp +0 -339
  283. data/GenWrapper/proto/math1_viblib.fp +0 -264
  284. data/GenWrapper/proto/math1_vralib.fp +0 -339
  285. data/GenWrapper/proto/math1_vrblib.fp +0 -264
  286. data/GenWrapper/proto/math1_xfclib.fp +0 -68
  287. data/GenWrapper/proto/math2_00 +0 -12
  288. data/GenWrapper/proto/math2_fftlib.fp +0 -803
  289. data/GenWrapper/proto/math2_intrlib.fp +0 -32
  290. data/GenWrapper/proto/math2_odelib.fp_notused +0 -568
  291. data/GenWrapper/proto/math2_rnmlib.fp +0 -54
  292. data/GenWrapper/proto/math2_shtlib.fp +0 -1292
  293. data/GenWrapper/proto/math2_vstlib.fp +0 -84
  294. data/GenWrapper/proto/misc1_00 +0 -17
  295. data/GenWrapper/proto/misc1_chnlib.fp +0 -47
  296. data/GenWrapper/proto/misc1_datelib.fp +0 -352
  297. data/GenWrapper/proto/misc1_fmtlib.fp +0 -19
  298. data/GenWrapper/proto/misc1_misclib.fp +0 -26
  299. data/GenWrapper/proto/misc1_randlib.fp +0 -50
  300. data/GenWrapper/proto/misc1_timelib.fp +0 -151
  301. data/GenWrapper/proto2c.rb +0 -13
  302. data/GenWrapper/prototype.rb +0 -209
  303. data/GenWrapper/util.rb +0 -9
  304. data/GenWrapper/variable.rb +0 -671
  305. data/ToDo +0 -2
  306. data/bin/console +0 -14
  307. data/bin/setup +0 -7
data/ext/numru/init.c.default CHANGED
@@ -1,6 +1,7 @@
1
1
  #include <stdio.h>
2
2
  #include "ruby.h"
3
3
  #include "libtinyf2c.h"
4
+ #include "narray.h"
4
5
 
5
6
  /* for compatibility with ruby 1.6 */
6
7
  #ifndef RARRAY_PTR
@@ -124,6 +125,12 @@ Init_dcl_raw()
124
125
  mDCL = rb_define_module_under(mNumRu, "DCL");
125
126
  rb_define_const(mDCL, "DCLVERSION", rb_str_new2(DCLVersion));
126
127
 
128
+ #ifdef NARRAY_BIGMEM
129
+ rb_define_const(mDCL, "SUPPORT_BIGMEM", Qtrue);
130
+ #else
131
+ rb_define_const(mDCL, "SUPPORT_BIGMEM", Qfalse);
132
+ #endif
133
+
127
134
  init_grph1_csgi(mDCL);
128
135
  init_grph1_scpack(mDCL);
129
136
  init_grph1_sgpack(mDCL);
data/ext/numru/math1_blklib.c CHANGED
@@ -1,5 +1,5 @@
1
1
  /*
2
- * $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
2
+ * $Id$
3
3
  */
4
4
 
5
5
  #include <stdio.h>
@@ -15,6 +15,10 @@
15
15
 
16
16
  #define DFLT_SIZE 32
17
17
 
18
+ #ifndef NARRAY_BIGMEM
19
+ typedef int na_shape_t;
20
+ #endif
21
+
18
22
  extern char *dcl_obj2ccharary(VALUE, int, int);
19
23
  extern integer *dcl_obj2cintegerary(VALUE);
20
24
  extern real *dcl_obj2crealary(VALUE);
@@ -22,10 +26,10 @@ extern complex *dcl_obj2ccomplexary(VALUE);
22
26
  extern logical *dcl_obj2clogicalary(VALUE);
23
27
 
24
28
  extern VALUE dcl_ccharary2obj(char *, int, int);
25
- extern VALUE dcl_cintegerary2obj(integer *, int, int, int *);
26
- extern VALUE dcl_crealary2obj(real *, int, int, int *);
27
- extern VALUE dcl_ccomplexary2obj(complex *, int, char *);
28
- extern VALUE dcl_clogicalary2obj(logical *, int, int, int *);
29
+ extern VALUE dcl_cintegerary2obj(integer *, na_shape_t, int, na_shape_t *);
30
+ extern VALUE dcl_crealary2obj(real *, na_shape_t, int, na_shape_t *);
31
+ /* extern VALUE dcl_ccomplexary2obj(complex *, int, char *); */
32
+ extern VALUE dcl_clogicalary2obj(logical *, na_shape_t, int, na_shape_t *);
29
33
 
30
34
  extern void dcl_freeccharary(char *);
31
35
  extern void dcl_freecintegerary(integer *);
data/ext/numru/math1_chrlib.c CHANGED
@@ -1,5 +1,5 @@
1
1
  /*
2
- * $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
2
+ * $Id$
3
3
  */
4
4
 
5
5
  #include <stdio.h>
@@ -15,6 +15,10 @@
15
15
 
16
16
  #define DFLT_SIZE 32
17
17
 
18
+ #ifndef NARRAY_BIGMEM
19
+ typedef int na_shape_t;
20
+ #endif
21
+
18
22
  extern char *dcl_obj2ccharary(VALUE, int, int);
19
23
  extern integer *dcl_obj2cintegerary(VALUE);
20
24
  extern real *dcl_obj2crealary(VALUE);
@@ -22,10 +26,10 @@ extern complex *dcl_obj2ccomplexary(VALUE);
22
26
  extern logical *dcl_obj2clogicalary(VALUE);
23
27
 
24
28
  extern VALUE dcl_ccharary2obj(char *, int, int);
25
- extern VALUE dcl_cintegerary2obj(integer *, int, int, int *);
26
- extern VALUE dcl_crealary2obj(real *, int, int, int *);
27
- extern VALUE dcl_ccomplexary2obj(complex *, int, char *);
28
- extern VALUE dcl_clogicalary2obj(logical *, int, int, int *);
29
+ extern VALUE dcl_cintegerary2obj(integer *, na_shape_t, int, na_shape_t *);
30
+ extern VALUE dcl_crealary2obj(real *, na_shape_t, int, na_shape_t *);
31
+ /* extern VALUE dcl_ccomplexary2obj(complex *, int, char *); */
32
+ extern VALUE dcl_clogicalary2obj(logical *, na_shape_t, int, na_shape_t *);
29
33
 
30
34
  extern void dcl_freeccharary(char *);
31
35
  extern void dcl_freecintegerary(integer *);
data/ext/numru/math1_clsplib.c CHANGED
@@ -1,5 +1,5 @@
1
1
  /*
2
- * $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
2
+ * $Id$
3
3
  */
4
4
 
5
5
  #include <stdio.h>
@@ -15,6 +15,10 @@
15
15
 
16
16
  #define DFLT_SIZE 32
17
17
 
18
+ #ifndef NARRAY_BIGMEM
19
+ typedef int na_shape_t;
20
+ #endif
21
+
18
22
  extern char *dcl_obj2ccharary(VALUE, int, int);
19
23
  extern integer *dcl_obj2cintegerary(VALUE);
20
24
  extern real *dcl_obj2crealary(VALUE);
@@ -22,10 +26,10 @@ extern complex *dcl_obj2ccomplexary(VALUE);
22
26
  extern logical *dcl_obj2clogicalary(VALUE);
23
27
 
24
28
  extern VALUE dcl_ccharary2obj(char *, int, int);
25
- extern VALUE dcl_cintegerary2obj(integer *, int, int, int *);
26
- extern VALUE dcl_crealary2obj(real *, int, int, int *);
27
- extern VALUE dcl_ccomplexary2obj(complex *, int, char *);
28
- extern VALUE dcl_clogicalary2obj(logical *, int, int, int *);
29
+ extern VALUE dcl_cintegerary2obj(integer *, na_shape_t, int, na_shape_t *);
30
+ extern VALUE dcl_crealary2obj(real *, na_shape_t, int, na_shape_t *);
31
+ /* extern VALUE dcl_ccomplexary2obj(complex *, int, char *); */
32
+ extern VALUE dcl_clogicalary2obj(logical *, na_shape_t, int, na_shape_t *);
29
33
 
30
34
  extern void dcl_freeccharary(char *);
31
35
  extern void dcl_freecintegerary(integer *);
data/ext/numru/math1_fnclib.c CHANGED
@@ -1,5 +1,5 @@
1
1
  /*
2
- * $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
2
+ * $Id$
3
3
  */
4
4
 
5
5
  #include <stdio.h>
@@ -15,6 +15,10 @@
15
15
 
16
16
  #define DFLT_SIZE 32
17
17
 
18
+ #ifndef NARRAY_BIGMEM
19
+ typedef int na_shape_t;
20
+ #endif
21
+
18
22
  extern char *dcl_obj2ccharary(VALUE, int, int);
19
23
  extern integer *dcl_obj2cintegerary(VALUE);
20
24
  extern real *dcl_obj2crealary(VALUE);
@@ -22,10 +26,10 @@ extern complex *dcl_obj2ccomplexary(VALUE);
22
26
  extern logical *dcl_obj2clogicalary(VALUE);
23
27
 
24
28
  extern VALUE dcl_ccharary2obj(char *, int, int);
25
- extern VALUE dcl_cintegerary2obj(integer *, int, int, int *);
26
- extern VALUE dcl_crealary2obj(real *, int, int, int *);
27
- extern VALUE dcl_ccomplexary2obj(complex *, int, char *);
28
- extern VALUE dcl_clogicalary2obj(logical *, int, int, int *);
29
+ extern VALUE dcl_cintegerary2obj(integer *, na_shape_t, int, na_shape_t *);
30
+ extern VALUE dcl_crealary2obj(real *, na_shape_t, int, na_shape_t *);
31
+ /* extern VALUE dcl_ccomplexary2obj(complex *, int, char *); */
32
+ extern VALUE dcl_clogicalary2obj(logical *, na_shape_t, int, na_shape_t *);
29
33
 
30
34
  extern void dcl_freeccharary(char *);
31
35
  extern void dcl_freecintegerary(integer *);
data/ext/numru/math1_gnmlib.c CHANGED
@@ -1,5 +1,5 @@
1
1
  /*
2
- * $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
2
+ * $Id$
3
3
  */
4
4
 
5
5
  #include <stdio.h>
@@ -15,6 +15,10 @@
15
15
 
16
16
  #define DFLT_SIZE 32
17
17
 
18
+ #ifndef NARRAY_BIGMEM
19
+ typedef int na_shape_t;
20
+ #endif
21
+
18
22
  extern char *dcl_obj2ccharary(VALUE, int, int);
19
23
  extern integer *dcl_obj2cintegerary(VALUE);
20
24
  extern real *dcl_obj2crealary(VALUE);
@@ -22,10 +26,10 @@ extern complex *dcl_obj2ccomplexary(VALUE);
22
26
  extern logical *dcl_obj2clogicalary(VALUE);
23
27
 
24
28
  extern VALUE dcl_ccharary2obj(char *, int, int);
25
- extern VALUE dcl_cintegerary2obj(integer *, int, int, int *);
26
- extern VALUE dcl_crealary2obj(real *, int, int, int *);
27
- extern VALUE dcl_ccomplexary2obj(complex *, int, char *);
28
- extern VALUE dcl_clogicalary2obj(logical *, int, int, int *);
29
+ extern VALUE dcl_cintegerary2obj(integer *, na_shape_t, int, na_shape_t *);
30
+ extern VALUE dcl_crealary2obj(real *, na_shape_t, int, na_shape_t *);
31
+ /* extern VALUE dcl_ccomplexary2obj(complex *, int, char *); */
32
+ extern VALUE dcl_clogicalary2obj(logical *, na_shape_t, int, na_shape_t *);
29
33
 
30
34
  extern void dcl_freeccharary(char *);
31
35
  extern void dcl_freecintegerary(integer *);
data/ext/numru/math1_gt2dlib.c CHANGED
@@ -1,5 +1,5 @@
1
1
  /*
2
- * $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
2
+ * $Id$
3
3
  */
4
4
 
5
5
  #include <stdio.h>
@@ -15,6 +15,10 @@
15
15
 
16
16
  #define DFLT_SIZE 32
17
17
 
18
+ #ifndef NARRAY_BIGMEM
19
+ typedef int na_shape_t;
20
+ #endif
21
+
18
22
  extern char *dcl_obj2ccharary(VALUE, int, int);
19
23
  extern integer *dcl_obj2cintegerary(VALUE);
20
24
  extern real *dcl_obj2crealary(VALUE);
@@ -22,10 +26,10 @@ extern complex *dcl_obj2ccomplexary(VALUE);
22
26
  extern logical *dcl_obj2clogicalary(VALUE);
23
27
 
24
28
  extern VALUE dcl_ccharary2obj(char *, int, int);
25
- extern VALUE dcl_cintegerary2obj(integer *, int, int, int *);
26
- extern VALUE dcl_crealary2obj(real *, int, int, int *);
27
- extern VALUE dcl_ccomplexary2obj(complex *, int, char *);
28
- extern VALUE dcl_clogicalary2obj(logical *, int, int, int *);
29
+ extern VALUE dcl_cintegerary2obj(integer *, na_shape_t, int, na_shape_t *);
30
+ extern VALUE dcl_crealary2obj(real *, na_shape_t, int, na_shape_t *);
31
+ /* extern VALUE dcl_ccomplexary2obj(complex *, int, char *); */
32
+ extern VALUE dcl_clogicalary2obj(logical *, na_shape_t, int, na_shape_t *);
29
33
 
30
34
  extern void dcl_freeccharary(char *);
31
35
  extern void dcl_freecintegerary(integer *);
data/ext/numru/math1_ifalib.c CHANGED
@@ -1,5 +1,5 @@
1
1
  /*
2
- * $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
2
+ * $Id$
3
3
  */
4
4
 
5
5
  #include <stdio.h>
@@ -15,6 +15,10 @@
15
15
 
16
16
  #define DFLT_SIZE 32
17
17
 
18
+ #ifndef NARRAY_BIGMEM
19
+ typedef int na_shape_t;
20
+ #endif
21
+
18
22
  extern char *dcl_obj2ccharary(VALUE, int, int);
19
23
  extern integer *dcl_obj2cintegerary(VALUE);
20
24
  extern real *dcl_obj2crealary(VALUE);
@@ -22,10 +26,10 @@ extern complex *dcl_obj2ccomplexary(VALUE);
22
26
  extern logical *dcl_obj2clogicalary(VALUE);
23
27
 
24
28
  extern VALUE dcl_ccharary2obj(char *, int, int);
25
- extern VALUE dcl_cintegerary2obj(integer *, int, int, int *);
26
- extern VALUE dcl_crealary2obj(real *, int, int, int *);
27
- extern VALUE dcl_ccomplexary2obj(complex *, int, char *);
28
- extern VALUE dcl_clogicalary2obj(logical *, int, int, int *);
29
+ extern VALUE dcl_cintegerary2obj(integer *, na_shape_t, int, na_shape_t *);
30
+ extern VALUE dcl_crealary2obj(real *, na_shape_t, int, na_shape_t *);
31
+ /* extern VALUE dcl_ccomplexary2obj(complex *, int, char *); */
32
+ extern VALUE dcl_clogicalary2obj(logical *, na_shape_t, int, na_shape_t *);
29
33
 
30
34
  extern void dcl_freeccharary(char *);
31
35
  extern void dcl_freecintegerary(integer *);
data/ext/numru/math1_indxlib.c CHANGED
@@ -1,5 +1,5 @@
1
1
  /*
2
- * $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
2
+ * $Id$
3
3
  */
4
4
 
5
5
  #include <stdio.h>
@@ -15,6 +15,10 @@
15
15
 
16
16
  #define DFLT_SIZE 32
17
17
 
18
+ #ifndef NARRAY_BIGMEM
19
+ typedef int na_shape_t;
20
+ #endif
21
+
18
22
  extern char *dcl_obj2ccharary(VALUE, int, int);
19
23
  extern integer *dcl_obj2cintegerary(VALUE);
20
24
  extern real *dcl_obj2crealary(VALUE);
@@ -22,10 +26,10 @@ extern complex *dcl_obj2ccomplexary(VALUE);
22
26
  extern logical *dcl_obj2clogicalary(VALUE);
23
27
 
24
28
  extern VALUE dcl_ccharary2obj(char *, int, int);
25
- extern VALUE dcl_cintegerary2obj(integer *, int, int, int *);
26
- extern VALUE dcl_crealary2obj(real *, int, int, int *);
27
- extern VALUE dcl_ccomplexary2obj(complex *, int, char *);
28
- extern VALUE dcl_clogicalary2obj(logical *, int, int, int *);
29
+ extern VALUE dcl_cintegerary2obj(integer *, na_shape_t, int, na_shape_t *);
30
+ extern VALUE dcl_crealary2obj(real *, na_shape_t, int, na_shape_t *);
31
+ /* extern VALUE dcl_ccomplexary2obj(complex *, int, char *); */
32
+ extern VALUE dcl_clogicalary2obj(logical *, na_shape_t, int, na_shape_t *);
29
33
 
30
34
  extern void dcl_freeccharary(char *);
31
35
  extern void dcl_freecintegerary(integer *);
data/ext/numru/math1_intlib.c CHANGED
@@ -1,5 +1,5 @@
1
1
  /*
2
- * $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
2
+ * $Id$
3
3
  */
4
4
 
5
5
  #include <stdio.h>
@@ -15,6 +15,10 @@
15
15
 
16
16
  #define DFLT_SIZE 32
17
17
 
18
+ #ifndef NARRAY_BIGMEM
19
+ typedef int na_shape_t;
20
+ #endif
21
+
18
22
  extern char *dcl_obj2ccharary(VALUE, int, int);
19
23
  extern integer *dcl_obj2cintegerary(VALUE);
20
24
  extern real *dcl_obj2crealary(VALUE);
@@ -22,10 +26,10 @@ extern complex *dcl_obj2ccomplexary(VALUE);
22
26
  extern logical *dcl_obj2clogicalary(VALUE);
23
27
 
24
28
  extern VALUE dcl_ccharary2obj(char *, int, int);
25
- extern VALUE dcl_cintegerary2obj(integer *, int, int, int *);
26
- extern VALUE dcl_crealary2obj(real *, int, int, int *);
27
- extern VALUE dcl_ccomplexary2obj(complex *, int, char *);
28
- extern VALUE dcl_clogicalary2obj(logical *, int, int, int *);
29
+ extern VALUE dcl_cintegerary2obj(integer *, na_shape_t, int, na_shape_t *);
30
+ extern VALUE dcl_crealary2obj(real *, na_shape_t, int, na_shape_t *);
31
+ /* extern VALUE dcl_ccomplexary2obj(complex *, int, char *); */
32
+ extern VALUE dcl_clogicalary2obj(logical *, na_shape_t, int, na_shape_t *);
29
33
 
30
34
  extern void dcl_freeccharary(char *);
31
35
  extern void dcl_freecintegerary(integer *);
data/ext/numru/math1_lrllib.c CHANGED
@@ -1,5 +1,5 @@
1
1
  /*
2
- * $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
2
+ * $Id$
3
3
  */
4
4
 
5
5
  #include <stdio.h>
@@ -15,6 +15,10 @@
15
15
 
16
16
  #define DFLT_SIZE 32
17
17
 
18
+ #ifndef NARRAY_BIGMEM
19
+ typedef int na_shape_t;
20
+ #endif
21
+
18
22
  extern char *dcl_obj2ccharary(VALUE, int, int);
19
23
  extern integer *dcl_obj2cintegerary(VALUE);
20
24
  extern real *dcl_obj2crealary(VALUE);
@@ -22,10 +26,10 @@ extern complex *dcl_obj2ccomplexary(VALUE);
22
26
  extern logical *dcl_obj2clogicalary(VALUE);
23
27
 
24
28
  extern VALUE dcl_ccharary2obj(char *, int, int);
25
- extern VALUE dcl_cintegerary2obj(integer *, int, int, int *);
26
- extern VALUE dcl_crealary2obj(real *, int, int, int *);
27
- extern VALUE dcl_ccomplexary2obj(complex *, int, char *);
28
- extern VALUE dcl_clogicalary2obj(logical *, int, int, int *);
29
+ extern VALUE dcl_cintegerary2obj(integer *, na_shape_t, int, na_shape_t *);
30
+ extern VALUE dcl_crealary2obj(real *, na_shape_t, int, na_shape_t *);
31
+ /* extern VALUE dcl_ccomplexary2obj(complex *, int, char *); */
32
+ extern VALUE dcl_clogicalary2obj(logical *, na_shape_t, int, na_shape_t *);
29
33
 
30
34
  extern void dcl_freeccharary(char *);
31
35
  extern void dcl_freecintegerary(integer *);
data/ext/numru/math1_maplib.c CHANGED
@@ -1,5 +1,5 @@
1
1
  /*
2
- * $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
2
+ * $Id$
3
3
  */
4
4
 
5
5
  #include <stdio.h>
@@ -15,6 +15,10 @@
15
15
 
16
16
  #define DFLT_SIZE 32
17
17
 
18
+ #ifndef NARRAY_BIGMEM
19
+ typedef int na_shape_t;
20
+ #endif
21
+
18
22
  extern char *dcl_obj2ccharary(VALUE, int, int);
19
23
  extern integer *dcl_obj2cintegerary(VALUE);
20
24
  extern real *dcl_obj2crealary(VALUE);
@@ -22,10 +26,10 @@ extern complex *dcl_obj2ccomplexary(VALUE);
22
26
  extern logical *dcl_obj2clogicalary(VALUE);
23
27
 
24
28
  extern VALUE dcl_ccharary2obj(char *, int, int);
25
- extern VALUE dcl_cintegerary2obj(integer *, int, int, int *);
26
- extern VALUE dcl_crealary2obj(real *, int, int, int *);
27
- extern VALUE dcl_ccomplexary2obj(complex *, int, char *);
28
- extern VALUE dcl_clogicalary2obj(logical *, int, int, int *);
29
+ extern VALUE dcl_cintegerary2obj(integer *, na_shape_t, int, na_shape_t *);
30
+ extern VALUE dcl_crealary2obj(real *, na_shape_t, int, na_shape_t *);
31
+ /* extern VALUE dcl_ccomplexary2obj(complex *, int, char *); */
32
+ extern VALUE dcl_clogicalary2obj(logical *, na_shape_t, int, na_shape_t *);
29
33
 
30
34
  extern void dcl_freeccharary(char *);
31
35
  extern void dcl_freecintegerary(integer *);
data/ext/numru/math1_oslib.c CHANGED
@@ -1,5 +1,5 @@
1
1
  /*
2
- * $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
2
+ * $Id$
3
3
  */
4
4
 
5
5
  #include <stdio.h>
@@ -15,6 +15,10 @@
15
15
 
16
16
  #define DFLT_SIZE 32
17
17
 
18
+ #ifndef NARRAY_BIGMEM
19
+ typedef int na_shape_t;
20
+ #endif
21
+
18
22
  extern char *dcl_obj2ccharary(VALUE, int, int);
19
23
  extern integer *dcl_obj2cintegerary(VALUE);
20
24
  extern real *dcl_obj2crealary(VALUE);
@@ -22,10 +26,10 @@ extern complex *dcl_obj2ccomplexary(VALUE);
22
26
  extern logical *dcl_obj2clogicalary(VALUE);
23
27
 
24
28
  extern VALUE dcl_ccharary2obj(char *, int, int);
25
- extern VALUE dcl_cintegerary2obj(integer *, int, int, int *);
26
- extern VALUE dcl_crealary2obj(real *, int, int, int *);
27
- extern VALUE dcl_ccomplexary2obj(complex *, int, char *);
28
- extern VALUE dcl_clogicalary2obj(logical *, int, int, int *);
29
+ extern VALUE dcl_cintegerary2obj(integer *, na_shape_t, int, na_shape_t *);
30
+ extern VALUE dcl_crealary2obj(real *, na_shape_t, int, na_shape_t *);
31
+ /* extern VALUE dcl_ccomplexary2obj(complex *, int, char *); */
32
+ extern VALUE dcl_clogicalary2obj(logical *, na_shape_t, int, na_shape_t *);
29
33
 
30
34
  extern void dcl_freeccharary(char *);
31
35
  extern void dcl_freecintegerary(integer *);
data/ext/numru/math1_rfalib.c CHANGED
@@ -1,5 +1,5 @@
1
1
  /*
2
- * $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
2
+ * $Id$
3
3
  */
4
4
 
5
5
  #include <stdio.h>
@@ -15,6 +15,10 @@
15
15
 
16
16
  #define DFLT_SIZE 32
17
17
 
18
+ #ifndef NARRAY_BIGMEM
19
+ typedef int na_shape_t;
20
+ #endif
21
+
18
22
  extern char *dcl_obj2ccharary(VALUE, int, int);
19
23
  extern integer *dcl_obj2cintegerary(VALUE);
20
24
  extern real *dcl_obj2crealary(VALUE);
@@ -22,10 +26,10 @@ extern complex *dcl_obj2ccomplexary(VALUE);
22
26
  extern logical *dcl_obj2clogicalary(VALUE);
23
27
 
24
28
  extern VALUE dcl_ccharary2obj(char *, int, int);
25
- extern VALUE dcl_cintegerary2obj(integer *, int, int, int *);
26
- extern VALUE dcl_crealary2obj(real *, int, int, int *);
27
- extern VALUE dcl_ccomplexary2obj(complex *, int, char *);
28
- extern VALUE dcl_clogicalary2obj(logical *, int, int, int *);
29
+ extern VALUE dcl_cintegerary2obj(integer *, na_shape_t, int, na_shape_t *);
30
+ extern VALUE dcl_crealary2obj(real *, na_shape_t, int, na_shape_t *);
31
+ /* extern VALUE dcl_ccomplexary2obj(complex *, int, char *); */
32
+ extern VALUE dcl_clogicalary2obj(logical *, na_shape_t, int, na_shape_t *);
29
33
 
30
34
  extern void dcl_freeccharary(char *);
31
35
  extern void dcl_freecintegerary(integer *);
data/ext/numru/math1_rfblib.c CHANGED
@@ -1,5 +1,5 @@
1
1
  /*
2
- * $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
2
+ * $Id$
3
3
  */
4
4
 
5
5
  #include <stdio.h>
@@ -15,6 +15,10 @@
15
15
 
16
16
  #define DFLT_SIZE 32
17
17
 
18
+ #ifndef NARRAY_BIGMEM
19
+ typedef int na_shape_t;
20
+ #endif
21
+
18
22
  extern char *dcl_obj2ccharary(VALUE, int, int);
19
23
  extern integer *dcl_obj2cintegerary(VALUE);
20
24
  extern real *dcl_obj2crealary(VALUE);
@@ -22,10 +26,10 @@ extern complex *dcl_obj2ccomplexary(VALUE);
22
26
  extern logical *dcl_obj2clogicalary(VALUE);
23
27
 
24
28
  extern VALUE dcl_ccharary2obj(char *, int, int);
25
- extern VALUE dcl_cintegerary2obj(integer *, int, int, int *);
26
- extern VALUE dcl_crealary2obj(real *, int, int, int *);
27
- extern VALUE dcl_ccomplexary2obj(complex *, int, char *);
28
- extern VALUE dcl_clogicalary2obj(logical *, int, int, int *);
29
+ extern VALUE dcl_cintegerary2obj(integer *, na_shape_t, int, na_shape_t *);
30
+ extern VALUE dcl_crealary2obj(real *, na_shape_t, int, na_shape_t *);
31
+ /* extern VALUE dcl_ccomplexary2obj(complex *, int, char *); */
32
+ extern VALUE dcl_clogicalary2obj(logical *, na_shape_t, int, na_shape_t *);
29
33
 
30
34
  extern void dcl_freeccharary(char *);
31
35
  extern void dcl_freecintegerary(integer *);