ruby-dcl 1.7.0.3 → 1.7.1
Sign up to get free protection for your applications and to get access to all the features.
- checksums.yaml +4 -4
- data/.gitignore +5 -0
- data/ChangeLog +8 -0
- data/GenWrapper/def.rb +1 -1
- data/GenWrapper/etc/p_header +2 -1
- data/GenWrapper/pparse.rb +1 -1
- data/GenWrapper/proto/grph1_00 +1 -1
- data/GenWrapper/proto/grph1_csgi.fp +1 -1
- data/GenWrapper/proto/grph1_scpack.fp +1 -1
- data/GenWrapper/proto/grph1_sgpack.fp +1 -1
- data/GenWrapper/proto/grph1_slpack.fp +1 -1
- data/GenWrapper/proto/grph1_stpack.fp +1 -1
- data/GenWrapper/proto/grph1_swpack.fp +13 -2
- data/GenWrapper/proto/grph2_00 +1 -1
- data/GenWrapper/proto/grph2_grpack.fp +1 -1
- data/GenWrapper/proto/grph2_ucpack.fp +1 -1
- data/GenWrapper/proto/grph2_udpack.fp +1 -1
- data/GenWrapper/proto/grph2_uepack.fp +1 -1
- data/GenWrapper/proto/grph2_ugpack.fp +1 -1
- data/GenWrapper/proto/grph2_uhpack.fp +1 -1
- data/GenWrapper/proto/grph2_uipack.fp +1 -1
- data/GenWrapper/proto/grph2_ulpack.fp +1 -1
- data/GenWrapper/proto/grph2_umpack.fp +1 -1
- data/GenWrapper/proto/grph2_uspack.fp +1 -1
- data/GenWrapper/proto/grph2_uupack.fp +1 -1
- data/GenWrapper/proto/grph2_uvpack.fp +1 -1
- data/GenWrapper/proto/grph2_uwpack.fp +1 -1
- data/GenWrapper/proto/grph2_uxpack.fp +1 -1
- data/GenWrapper/proto/grph2_uypack.fp +1 -1
- data/GenWrapper/proto/grph2_uzpack.fp +1 -1
- data/GenWrapper/proto/math1_00 +1 -1
- data/GenWrapper/proto/math1_blklib.fp +1 -1
- data/GenWrapper/proto/math1_chrlib.fp +1 -1
- data/GenWrapper/proto/math1_clsplib.fp +1 -1
- data/GenWrapper/proto/math1_fnclib.fp +1 -1
- data/GenWrapper/proto/math1_gnmlib.fp +1 -1
- data/GenWrapper/proto/math1_ifalib.fp +1 -1
- data/GenWrapper/proto/math1_indxlib.fp +1 -1
- data/GenWrapper/proto/math1_intlib.fp +1 -1
- data/GenWrapper/proto/math1_lrllib.fp +1 -1
- data/GenWrapper/proto/math1_oslib.fp +1 -1
- data/GenWrapper/proto/math1_rfalib.fp +1 -1
- data/GenWrapper/proto/math1_rfblib.fp +1 -1
- data/GenWrapper/proto/math1_sublib.fp +1 -1
- data/GenWrapper/proto/math1_syslib.fp +1 -1
- data/GenWrapper/proto/math1_vialib.fp +1 -1
- data/GenWrapper/proto/math1_viblib.fp +1 -1
- data/GenWrapper/proto/math1_vralib.fp +1 -1
- data/GenWrapper/proto/math1_vrblib.fp +1 -1
- data/GenWrapper/proto/math1_xfclib.fp +1 -1
- data/GenWrapper/proto/math2_00 +1 -1
- data/GenWrapper/proto/math2_fftlib.fp +1 -1
- data/GenWrapper/proto/math2_intrlib.fp +1 -1
- data/GenWrapper/proto/math2_odelib.fp_notused +1 -1
- data/GenWrapper/proto/math2_rnmlib.fp +1 -1
- data/GenWrapper/proto/math2_shtlib.fp +1 -1
- data/GenWrapper/proto/math2_vstlib.fp +1 -1
- data/GenWrapper/proto/misc1_00 +1 -1
- data/GenWrapper/proto/misc1_chnlib.fp +1 -1
- data/GenWrapper/proto/misc1_datelib.fp +1 -1
- data/GenWrapper/proto/misc1_fmtlib.fp +1 -1
- data/GenWrapper/proto/misc1_misclib.fp +1 -1
- data/GenWrapper/proto/misc1_randlib.fp +1 -1
- data/GenWrapper/proto/misc1_timelib.fp +1 -1
- data/GenWrapper/proto2c.rb +1 -1
- data/GenWrapper/prototype.rb +1 -1
- data/GenWrapper/util.rb +1 -1
- data/GenWrapper/variable.rb +1 -1
- data/Rakefile +32 -1
- data/demo/gokuraku/hop/hop.rb +1 -1
- data/demo/gokuraku/jump/jump1.rb +1 -1
- data/demo/gokuraku/jump/jump2.rb +1 -1
- data/demo/gokuraku/layout/lay1.rb +1 -1
- data/demo/gokuraku/layout/lay2.rb +1 -1
- data/demo/gokuraku/step/step0.rb +1 -1
- data/demo/gokuraku/step/step1.rb +1 -1
- data/demo/gokuraku/step/step2.rb +1 -1
- data/demo/gokuraku/u1d/u1d1.rb +1 -1
- data/demo/gokuraku/u1d/u1d2.rb +1 -1
- data/demo/gokuraku/u2d/u2d1.rb +1 -1
- data/demo/gokuraku/u2d/u2d2.rb +1 -1
- data/demo/gokuraku/u2d/u2d3.rb +1 -1
- data/demo/gokuraku/u2d/u2d4.rb +1 -1
- data/demo/grph1/scpack/scpkt2.rb +1 -1
- data/demo/grph1/scpack/scpkt3.rb +1 -1
- data/demo/grph1/scpack/scpkt6.rb +1 -1
- data/demo/grph1/scpack/scpkt7.rb +1 -1
- data/demo/grph1/scpack/scpkt8.rb +1 -1
- data/demo/grph1/sgpack/sgfont.rb +1 -1
- data/demo/grph1/sgpack/sgfonz.rb +1 -1
- data/demo/grph1/sgpack/sgksx1.rb +1 -1
- data/demo/grph1/sgpack/sgksx2.rb +1 -1
- data/demo/grph1/sgpack/sgksx3.rb +1 -1
- data/demo/grph1/sgpack/sglidx.rb +1 -1
- data/demo/grph1/sgpack/sgltyp.rb +1 -1
- data/demo/grph1/sgpack/sgpk01.rb +1 -1
- data/demo/grph1/sgpack/sgpk02.rb +1 -1
- data/demo/grph1/sgpack/sgpk03.rb +1 -1
- data/demo/grph1/sgpack/sgpk04.rb +1 -1
- data/demo/grph1/sgpack/sgpk05.rb +1 -1
- data/demo/grph1/sgpack/sgpk06.rb +1 -1
- data/demo/grph1/sgpack/sgpk07.rb +1 -1
- data/demo/grph1/sgpack/sgpk08.rb +1 -1
- data/demo/grph1/sgpack/sgpk09.rb +1 -1
- data/demo/grph1/sgpack/sgpk10.rb +1 -1
- data/demo/grph1/sgpack/sgtclr.rb +1 -1
- data/demo/grph1/sgpack/sgtone.rb +1 -1
- data/demo/grph1/sgpack/sgtonz.rb +1 -1
- data/demo/grph1/slpack/slpk01.rb +1 -1
- data/demo/grph1/slpack/slpk02.rb +1 -1
- data/demo/grph1/slpack/slpk03.rb +1 -1
- data/demo/grph1/slpack/slpk04.rb +1 -1
- data/demo/grph2/grpack/grpk01.rb +1 -1
- data/demo/grph2/ucpack/ucpk01.rb +1 -1
- data/demo/grph2/ucpack/ucpk02.rb +1 -1
- data/demo/grph2/udegpk/u2df01.rb +1 -1
- data/demo/grph2/udegpk/u2df02.rb +1 -1
- data/demo/grph2/udegpk/u2df03.rb +1 -1
- data/demo/grph2/udegpk/u2df04.rb +1 -1
- data/demo/grph2/udegpk/u2df05.rb +1 -1
- data/demo/grph2/udegpk/u2df06.rb +1 -1
- data/demo/grph2/udegpk/u2df07.rb +1 -1
- data/demo/grph2/udegpk/u2df08.rb +1 -1
- data/demo/grph2/uipack/uipk01.rb +1 -1
- data/demo/grph2/uipack/uipk02.rb +1 -1
- data/demo/grph2/ulpack/ulpk01.rb +1 -1
- data/demo/grph2/ulpack/ulpk01n.rb +1 -1
- data/demo/grph2/ulpack/ulpk02.rb +1 -1
- data/demo/grph2/ulpack/ulpk02n.rb +1 -1
- data/demo/grph2/umpack/test01.rb +1 -1
- data/demo/grph2/umpack/test02.rb +1 -1
- data/demo/grph2/umpack/test03.rb +1 -1
- data/demo/grph2/umpack/test04.rb +1 -1
- data/demo/grph2/umpack/test05.rb +1 -1
- data/demo/grph2/umpack/test06.rb +1 -1
- data/demo/grph2/umpack/test07.rb +1 -1
- data/demo/grph2/umpack/test08.rb +1 -1
- data/demo/grph2/umpack/umpk01.rb +1 -1
- data/demo/grph2/umpack/umpk02.rb +1 -1
- data/demo/grph2/umpack/umpk03.rb +1 -1
- data/demo/grph2/umpack/umpk04.rb +1 -1
- data/demo/grph2/umpack/umpk05.rb +1 -1
- data/demo/grph2/uspack/uspk01.rb +1 -1
- data/demo/grph2/uspack/uspk02.rb +1 -1
- data/demo/grph2/uspack/uspk03.rb +1 -1
- data/demo/grph2/uspack/uspk04.rb +1 -1
- data/demo/grph2/uspack/uspk05.rb +1 -1
- data/demo/grph2/uspack/uspk06.rb +1 -1
- data/demo/grph2/uspack/uspk07.rb +1 -1
- data/demo/grph2/uspack/uspk08.rb +1 -1
- data/demo/grph2/uspack/uspk09.rb +1 -1
- data/demo/grph2/uspack/uspk10.rb +1 -1
- data/demo/grph2/uspack/uspk11.rb +1 -1
- data/demo/grph2/uspack/uspk12.rb +1 -1
- data/demo/grph2/uupack/uupk01.rb +1 -1
- data/demo/grph2/uupack/uupk02.rb +1 -1
- data/demo/grph2/uupack/uupk03.rb +1 -1
- data/demo/grph2/uupack/uupk04.rb +1 -1
- data/demo/grph2/uupack/uupk05.rb +1 -1
- data/demo/grph2/uupack/uupk06.rb +1 -1
- data/demo/grph2/uupack/uupk07.rb +1 -1
- data/demo/grph2/uxyzpk/uxyz01.rb +1 -1
- data/demo/grph2/uxyzpk/uxyz02.rb +1 -1
- data/demo/grph2/uxyzpk/uxyz03.rb +1 -1
- data/demo/grph2/uxyzpk/uxyz04.rb +1 -1
- data/demo/grph2/uxyzpk/uxyz05.rb +1 -1
- data/demo/grph2/uxyzpk/uxyz06.rb +1 -1
- data/demo/grph2/uxyzpk/uxyz07.rb +1 -1
- data/demo/grph2/uxyzpk/uxyz08.rb +1 -1
- data/demo/grph2/uxyzpk/uxyz09.rb +1 -1
- data/demo/grph2/uxyzpk/uxyz10.rb +1 -1
- data/demo/grph2/ximage/ximg01.rb +1 -1
- data/demo/math1/clsplib/cslb01.rb +1 -1
- data/demo/math2/fftlib/fftl01.rb +1 -1
- data/demo/math2/fftlib/fftl02.rb +1 -1
- data/demo/math2/intrlib/intr01.rb +1 -1
- data/demo/math2/rnmlib/rnml01.rb +1 -1
- data/demo/math2/vstlib/vstl01.rb +1 -1
- data/demo/math2/vstlib/vstl02.rb +1 -1
- data/demo/rakuraku/color/color1.rb +1 -1
- data/demo/rakuraku/color/color2.rb +1 -1
- data/demo/rakuraku/color/color3.rb +1 -1
- data/demo/rakuraku/kihon/kihon1.rb +1 -1
- data/demo/rakuraku/kihon/kihon2.rb +1 -1
- data/demo/rakuraku/kihon/kihon3.rb +1 -1
- data/demo/rakuraku/kihon/kihon4.rb +1 -1
- data/demo/rakuraku/kihon/kihon5.rb +1 -1
- data/demo/rakuraku/kihon/kihon6.rb +1 -1
- data/demo/rakuraku/kihon/kihon7.rb +1 -1
- data/demo/rakuraku/kihon/kihon8.rb +1 -1
- data/demo/rakuraku/kihon/kihon9.rb +1 -1
- data/demo/rakuraku/kihon/kihona.rb +1 -1
- data/demo/rakuraku/kihon/kihonb.rb +1 -1
- data/demo/rakuraku/kihon/kihonc.rb +1 -1
- data/demo/rakuraku/layout/lay1.rb +1 -1
- data/demo/rakuraku/layout/lay2.rb +1 -1
- data/demo/rakuraku/layout/lay3.rb +1 -1
- data/demo/rakuraku/map3d/map3d1.rb +1 -1
- data/demo/rakuraku/map3d/map3d2.rb +1 -1
- data/demo/rakuraku/map3d/map3d3.rb +1 -1
- data/demo/rakuraku/map3d/map3d4.rb +1 -1
- data/demo/rakuraku/map3d/map3d5.rb +1 -1
- data/demo/rakuraku/miss/miss1.rb +1 -1
- data/demo/rakuraku/miss/miss2.rb +1 -1
- data/demo/rakuraku/quick/quick1.rb +1 -1
- data/demo/rakuraku/quick/quick2.rb +1 -1
- data/demo/rakuraku/quick/quick3.rb +1 -1
- data/demo/rakuraku/quick/quick4.rb +1 -1
- data/demo/rakuraku/quick/quick5.rb +1 -1
- data/demo/rakuraku/u2d/u2d1.rb +1 -1
- data/demo/rakuraku/u2d/u2d2.rb +1 -1
- data/demo/rakuraku/u2d/u2d3.rb +1 -1
- data/demo/rakuraku/u2d/u2d4.rb +1 -1
- data/demo/rakuraku/u2d/u2d5.rb +1 -1
- data/demo/rakuraku/u2d/u2d6.rb +1 -1
- data/demo/rakuraku/u2d/u2d7.rb +1 -1
- data/demo/rakuraku/uspack/uspac1.rb +1 -1
- data/demo/rakuraku/uspack/uspac2.rb +1 -1
- data/demo/rakuraku/uspack/uspac3.rb +1 -1
- data/demo/rakuraku/uspack/uspac4.rb +1 -1
- data/demo/rakuraku/uxyz/uxyz1.rb +1 -1
- data/demo/rakuraku/uxyz/uxyz2.rb +1 -1
- data/demo/rakuraku/uxyz/uxyz3.rb +1 -1
- data/demo/rakuraku/uxyz/uxyz4.rb +1 -1
- data/demo/rakuraku/uxyz/uxyz5.rb +1 -1
- data/demo/rakuraku/uxyz/uxyz6.rb +1 -1
- data/demo/rakuraku/uxyz/uxyz7.rb +1 -1
- data/demo/rakuraku/uxyz/uxyz8.rb +1 -1
- data/{dcl_cary2obj.c → ext/numru/dcl_cary2obj.c} +1 -1
- data/{dcl_narrayed_funcs.c → ext/numru/dcl_narrayed_funcs.c} +0 -0
- data/{dcl_obj2cary.c → ext/numru/dcl_obj2cary.c} +1 -1
- data/{dcl_rubydcloriginal.c → ext/numru/dcl_rubydcloriginal.c} +0 -0
- data/{extconf.rb → ext/numru/extconf.rb} +2 -2
- data/{grph1_csgi.c → ext/numru/grph1_csgi.c} +2 -1
- data/{grph1_scpack.c → ext/numru/grph1_scpack.c} +2 -1
- data/{grph1_sgpack.c → ext/numru/grph1_sgpack.c} +2 -1
- data/{grph1_slpack.c → ext/numru/grph1_slpack.c} +2 -1
- data/{grph1_stpack.c → ext/numru/grph1_stpack.c} +2 -1
- data/{grph1_swpack.c → ext/numru/grph1_swpack.c} +46 -5
- data/{grph2_grpack.c → ext/numru/grph2_grpack.c} +2 -1
- data/{grph2_ucpack.c → ext/numru/grph2_ucpack.c} +2 -1
- data/{grph2_udpack.c → ext/numru/grph2_udpack.c} +2 -1
- data/{grph2_uepack.c → ext/numru/grph2_uepack.c} +2 -1
- data/{grph2_ugpack.c → ext/numru/grph2_ugpack.c} +2 -1
- data/{grph2_uhpack.c → ext/numru/grph2_uhpack.c} +2 -1
- data/{grph2_uipack.c → ext/numru/grph2_uipack.c} +2 -1
- data/{grph2_ulpack.c → ext/numru/grph2_ulpack.c} +2 -1
- data/{grph2_umpack.c → ext/numru/grph2_umpack.c} +2 -1
- data/{grph2_uspack.c → ext/numru/grph2_uspack.c} +2 -1
- data/{grph2_uupack.c → ext/numru/grph2_uupack.c} +2 -1
- data/{grph2_uvpack.c → ext/numru/grph2_uvpack.c} +2 -1
- data/{grph2_uwpack.c → ext/numru/grph2_uwpack.c} +2 -1
- data/{grph2_uxpack.c → ext/numru/grph2_uxpack.c} +2 -1
- data/{grph2_uypack.c → ext/numru/grph2_uypack.c} +2 -1
- data/{grph2_uzpack.c → ext/numru/grph2_uzpack.c} +2 -1
- data/{init.c.default → ext/numru/init.c.default} +1 -1
- data/{math1_blklib.c → ext/numru/math1_blklib.c} +2 -1
- data/{math1_chrlib.c → ext/numru/math1_chrlib.c} +2 -1
- data/{math1_clsplib.c → ext/numru/math1_clsplib.c} +2 -1
- data/{math1_fnclib.c → ext/numru/math1_fnclib.c} +2 -1
- data/{math1_gnmlib.c → ext/numru/math1_gnmlib.c} +2 -1
- data/{math1_gt2dlib.c → ext/numru/math1_gt2dlib.c} +2 -1
- data/{math1_ifalib.c → ext/numru/math1_ifalib.c} +2 -1
- data/{math1_indxlib.c → ext/numru/math1_indxlib.c} +2 -1
- data/{math1_intlib.c → ext/numru/math1_intlib.c} +2 -1
- data/{math1_lrllib.c → ext/numru/math1_lrllib.c} +2 -1
- data/{math1_maplib.c → ext/numru/math1_maplib.c} +2 -1
- data/{math1_oslib.c → ext/numru/math1_oslib.c} +2 -1
- data/{math1_rfalib.c → ext/numru/math1_rfalib.c} +2 -1
- data/{math1_rfblib.c → ext/numru/math1_rfblib.c} +2 -1
- data/{math1_sublib.c → ext/numru/math1_sublib.c} +2 -1
- data/{math1_syslib.c → ext/numru/math1_syslib.c} +2 -1
- data/{math1_vialib.c → ext/numru/math1_vialib.c} +2 -1
- data/{math1_viblib.c → ext/numru/math1_viblib.c} +2 -1
- data/{math1_vralib.c → ext/numru/math1_vralib.c} +2 -1
- data/{math1_vrblib.c → ext/numru/math1_vrblib.c} +2 -1
- data/{math1_xfclib.c → ext/numru/math1_xfclib.c} +2 -1
- data/{math2_fftlib.c → ext/numru/math2_fftlib.c} +2 -1
- data/{math2_intrlib.c → ext/numru/math2_intrlib.c} +2 -1
- data/{math2_rnmlib.c → ext/numru/math2_rnmlib.c} +2 -1
- data/{math2_shtlib.c → ext/numru/math2_shtlib.c} +2 -1
- data/{math2_vstlib.c → ext/numru/math2_vstlib.c} +2 -1
- data/{misc1_chnlib.c → ext/numru/misc1_chnlib.c} +2 -1
- data/{misc1_datelib.c → ext/numru/misc1_datelib.c} +2 -1
- data/{misc1_fmtlib.c → ext/numru/misc1_fmtlib.c} +2 -1
- data/{misc1_misclib.c → ext/numru/misc1_misclib.c} +2 -1
- data/{misc1_randlib.c → ext/numru/misc1_randlib.c} +2 -1
- data/{misc1_timelib.c → ext/numru/misc1_timelib.c} +2 -1
- data/lib/{dcl.rb → numru/dcl.rb} +3 -0
- data/ruby-dcl.gemspec +3 -3
- metadata +65 -65
- data/lib/ruby-dcl_version.rb +0 -5
File without changes
|
File without changes
|
@@ -39,8 +39,8 @@ if ( ! ( have_header("narray.h") && have_header("narray_config.h") ) ) then
|
|
39
39
|
exit(-1)
|
40
40
|
end
|
41
41
|
|
42
|
-
initcfile_default = "init.c.default"
|
43
|
-
initcfile = "init.c"
|
42
|
+
initcfile_default = $srcdir+"/init.c.default"
|
43
|
+
initcfile = $srcdir+"/init.c"
|
44
44
|
|
45
45
|
if(xsystem("which cdclconfig"))
|
46
46
|
cflags = `cdclconfig --cflags`.gsub(/\n/, " ")
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -409,13 +410,21 @@ dcl_swgton(obj, np, wpx, wpy, itpat)
|
|
409
410
|
}
|
410
411
|
|
411
412
|
static VALUE
|
412
|
-
dcl_swiopn(obj, iwx, iwy, imw, imh)
|
413
|
-
VALUE obj, iwx, iwy, imw, imh;
|
413
|
+
dcl_swiopn(obj, iwx, iwy, imw, imh, wx1, wy1, wx2, wy2, wx3, wy3, wx4, wy4)
|
414
|
+
VALUE obj, iwx, iwy, imw, imh, wx1, wy1, wx2, wy2, wx3, wy3, wx4, wy4;
|
414
415
|
{
|
415
416
|
integer i_iwx;
|
416
417
|
integer i_iwy;
|
417
418
|
integer i_imw;
|
418
419
|
integer i_imh;
|
420
|
+
real i_wx1;
|
421
|
+
real i_wy1;
|
422
|
+
real i_wx2;
|
423
|
+
real i_wy2;
|
424
|
+
real i_wx3;
|
425
|
+
real i_wy3;
|
426
|
+
real i_wx4;
|
427
|
+
real i_wy4;
|
419
428
|
|
420
429
|
if ((TYPE(iwx) != T_BIGNUM) || (TYPE(iwx) != T_FIXNUM)) {
|
421
430
|
iwx = rb_funcall(iwx, rb_intern("to_i"), 0);
|
@@ -429,14 +438,46 @@ dcl_swiopn(obj, iwx, iwy, imw, imh)
|
|
429
438
|
if ((TYPE(imh) != T_BIGNUM) || (TYPE(imh) != T_FIXNUM)) {
|
430
439
|
imh = rb_funcall(imh, rb_intern("to_i"), 0);
|
431
440
|
}
|
441
|
+
if (TYPE(wx1) != T_FLOAT) {
|
442
|
+
wx1 = rb_funcall(wx1, rb_intern("to_f"), 0);
|
443
|
+
}
|
444
|
+
if (TYPE(wy1) != T_FLOAT) {
|
445
|
+
wy1 = rb_funcall(wy1, rb_intern("to_f"), 0);
|
446
|
+
}
|
447
|
+
if (TYPE(wx2) != T_FLOAT) {
|
448
|
+
wx2 = rb_funcall(wx2, rb_intern("to_f"), 0);
|
449
|
+
}
|
450
|
+
if (TYPE(wy2) != T_FLOAT) {
|
451
|
+
wy2 = rb_funcall(wy2, rb_intern("to_f"), 0);
|
452
|
+
}
|
453
|
+
if (TYPE(wx3) != T_FLOAT) {
|
454
|
+
wx3 = rb_funcall(wx3, rb_intern("to_f"), 0);
|
455
|
+
}
|
456
|
+
if (TYPE(wy3) != T_FLOAT) {
|
457
|
+
wy3 = rb_funcall(wy3, rb_intern("to_f"), 0);
|
458
|
+
}
|
459
|
+
if (TYPE(wx4) != T_FLOAT) {
|
460
|
+
wx4 = rb_funcall(wx4, rb_intern("to_f"), 0);
|
461
|
+
}
|
462
|
+
if (TYPE(wy4) != T_FLOAT) {
|
463
|
+
wy4 = rb_funcall(wy4, rb_intern("to_f"), 0);
|
464
|
+
}
|
432
465
|
|
433
466
|
i_iwx = NUM2INT(iwx);
|
434
467
|
i_iwy = NUM2INT(iwy);
|
435
468
|
i_imw = NUM2INT(imw);
|
436
469
|
i_imh = NUM2INT(imh);
|
470
|
+
i_wx1 = (real)NUM2DBL(wx1);
|
471
|
+
i_wy1 = (real)NUM2DBL(wy1);
|
472
|
+
i_wx2 = (real)NUM2DBL(wx2);
|
473
|
+
i_wy2 = (real)NUM2DBL(wy2);
|
474
|
+
i_wx3 = (real)NUM2DBL(wx3);
|
475
|
+
i_wy3 = (real)NUM2DBL(wy3);
|
476
|
+
i_wx4 = (real)NUM2DBL(wx4);
|
477
|
+
i_wy4 = (real)NUM2DBL(wy4);
|
437
478
|
|
438
479
|
|
439
|
-
swiopn_(&i_iwx, &i_iwy, &i_imw, &i_imh);
|
480
|
+
swiopn_(&i_iwx, &i_iwy, &i_imw, &i_imh, &i_wx1, &i_wy1, &i_wx2, &i_wy2, &i_wx3, &i_wy3, &i_wx4, &i_wy4);
|
440
481
|
|
441
482
|
return Qnil;
|
442
483
|
|
@@ -2021,7 +2062,7 @@ VALUE mDCL;
|
|
2021
2062
|
rb_define_module_function(mDCL, "swstcl", dcl_swstcl, 1);
|
2022
2063
|
#endif
|
2023
2064
|
rb_define_module_function(mDCL, "swgton", dcl_swgton, 4);
|
2024
|
-
rb_define_module_function(mDCL, "swiopn", dcl_swiopn,
|
2065
|
+
rb_define_module_function(mDCL, "swiopn", dcl_swiopn, 12);
|
2025
2066
|
rb_define_module_function(mDCL, "swidat", dcl_swidat, 2);
|
2026
2067
|
#if DCLVER >= 544
|
2027
2068
|
rb_define_module_function(mDCL, "swiclr", dcl_swiclr, 2);
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|
@@ -1,11 +1,12 @@
|
|
1
1
|
/*
|
2
|
-
* $Id: p_header,v 1.
|
2
|
+
* $Id: p_header,v 1.3 2015/03/18 03:27:42 horinout Exp $
|
3
3
|
*/
|
4
4
|
|
5
5
|
#include <stdio.h>
|
6
6
|
#include "ruby.h"
|
7
7
|
#include "libtinyf2c.h"
|
8
8
|
#include "narray.h"
|
9
|
+
#include "cdcl.h"
|
9
10
|
|
10
11
|
/* for compatibility with ruby 1.6 */
|
11
12
|
#ifndef StringValuePtr
|