ruby-dcl 1.8.0 → 1.8.1

data/.ChangeLog.until20150318

@@ -1,389 +0,0 @@
-Wed Mar 18  2015  T Horinouchi
-	* ruby-dcl-1.7.1 released (cvs tag ruby-dcl-1_7_1)
-Wed Mar 18  2015  T Horinouchi
-	* GenWrapper/etc/p_header: added: #include "cdcl.h"
-	* GenWrapper/proto/grph1_swpack.fp: updated the arguments of
-	  SWIOPN for dcl >= 5.3
-Tue Jan 21  2014  S Otsuka
-	* init.c.default: updated the calling format of rb_raise
-Wed Apr 25  2012  T Koshiro
-	* ruby-dcl-1.7.0 released (cvs tag ruby-dcl-1_7_0)
-Fri Mar 30  2012  T Koshiro
-	* Added new demo programs: demo/grph2/uipack/uipk01.rb
-	* demo/math1/clsplib/cslb01.rb: minor improvement
-Fri Mar  9  2012  T Koshiro
-	* GenWrapper/elim_ary_size.rb: uipack support.
-	* Added new demo programs: demo/grph2/uipack/uipk02.rb,
-	  demo/grph2/umpack/test09_2.rb, and demo/math1/clsplib/cslb01.rb.
-Thu Mar  8  2012  T Koshiro
-	* dcl_rubydcloriginal.c:
-	  correct prototype declarations of math1 functions: doublereal -> real
-	* GenWrapper/Makefile: added the generation of dcl_narrayed_funcs.c.
-	  (I thought dcl_narrayed_funcs.c is generated by the command
-	  "cd GenWrapper && make", but it didn't work.)
-	* init.c.default: to call the initializer in grph2_uipack.c and
-	  math1_clsplib.c.
-	* Removed unused files: GenWrapper/etc/Mk_proto,
-	  GenWrapper/etc/dcl_gen, and GenWrapper/etc/p_init.
-Thu Mar  8  2012  T Koshiro
-	* GenWrapper/proto/grph2_uipack.fp, GenWrapper/proto/math1_clsplib.fp:
-	  debug.
-Thu Mar  8  2012  T Koshiro
-	* GenWrapper/proto/grph2_uipack.fp, GenWrapper/proto/math1_clsplib.fp:
-	  debug.
-Sat Mar  3  2012  T Koshiro
-	* GenWrapper/dcl_rb_heading: added uip(set|stx|get).
-	* GenWrapper/proto/Makefile: minor improvement; added grph2_uipack.fp
-	  and math1_clsplib.fp.
-	* GenWrapper/proto/grph1_sgpack.fp: added prototype definitions
-	  for full-color support (for DCL 5.4.4).
-	* GenWrapper/proto/grph1_stpack.fp: added prototype definitions
-	  for sample map projections (for DCL 5.4.4).
-	* GenWrapper/proto/grph1_swpack.fp: added prototype definitions
-	  for full-color support and color map change (for DCL 5.4.4).
-	* GenWrapper/proto/misc1_randlib.fp: added prototype definitions
-	  of rngu0 (for DCL 5.4.4). rngu3 is used for earlier versions of
-	  DCL.
-	* GenWrapper/proto/grph2_uipack.fp: created (for DCL 5.4.4).
-	* GenWrapper/proto/math1_clsplib.fp: created (for DCL 5.4.4).
-	* Removed GenWrapper/proto/math2_shtlib.fp_old.
-Tue Feb 28  2012  T Koshiro
-	* Removed dcl_narrayed_funcs.c, which is also generated by the
-	  following command when released:
-	  % cd GenWrapper && make
-	* Removed README_old.
-Tue Feb 28  2012  T Koshiro
-	* Moved a change in the previous commit, which was mistakenly
-	  coded directly in lib/dcl.rb, into GenWrapper/dcl_rb_heading.
-	* Removed lib/dcl.rb and C source files (grph[12]_*.c, math[12]_*.c,
-	  misc1_*.c) which are generated by the following command when
-	  released:
-	  % cd GenWrapper && make
-	* Removed an unused file: dummy.c
-Wed Feb  1  2012  S Nishizawa
-	* remove grph1_zgpack not to depend on ruby-gtk2
-	  (The methods are move to a new library RubyDCLExt-Gtk.)
-Thu Aug 11  2011  T Horinouchi
-	* ruby-dcl-1.6.3 released (cvs tag ruby-dcl-1_6_3)
-	* LICENCE.txt: Added (BSD 2-clause licence)
-Thu Feb 24  2011  T Horinouchi
-	* ruby-dcl-1.6.2 released (cvs tag ruby-dcl-1_6_2)
-	  because of a packaging miss of 1.6.1
-Thu Feb 24  2011  T Horinouchi
-	* README: Updated (to leave the installation part to web page)
-Thu Feb 24  2011  T Koshiro
-	* add a dot file .keepme to an empty directory lib/ (for "cvs export")
-Thu Feb 24  2011  T Horinouchi
-	* ruby-dcl-1.6.1 released (cvs tag ruby-dcl-1_6_1)
-Thu Feb 24  2011  T Koshiro
-	* demo/grph1/scpack/scpkt7.rb, demo/grph1/sgpack/sgpk02.rb: debug.
-	* GenWrapper/dcl_narrayed_funcs.rb, GenWrapper/etc/p_header:
-	  correct prototype declarations of math1 functions:
-	  doublereal -> real
-	* GenWrapper/elim_ary_size.rb, GenWrapper/etc/Mk_proto,
-	  GenWrapper/etc/dcl_gen, GenWrapper/proto/Makefile:
-	  change a directory name: src/ -> ../
-	  (because CVS does not support symbolic links.)
-Wed Feb 23  2011  T Koshiro
-	* GenWrapper/proto/grph2_uepack.fp: added a prototype definition of
-	  uetonb; the change is made limited to #if DCLVER >= 534.
-	* demo/grph2/umpack/test10.rb, demo/grph2/udegpk/u2df09[bcef].rb:
-	  created (for DCL 5.3.4).
-	* dcl_obj2cary.c: To use StringValue, RSTRING_PTR, and RSTRING_LEN
-	  macros instead of rb_str2cstr for Ruby 1.8 or later.
-Fri Feb 18  2011  T Horinouchi
-	* ruby-dcl-1.6.1 preview
-Fri Feb 18  2011  T Horinouchi < T Koshiro [dennou-ruby: 003224] (2010-12-11)
-	* ruby-dcl-1.6.0-ruby1_9_2.patch
-	* Support ruby 1.9.2
-	* ruby-dcl-1.6.0-dcl_rb_GenWrapper.patch
-	* Moved a change in ruby-dcl-1.6.0, which was mistakenly
-	  coded directly in lib/dcl.rb, into GenWrapper:
-	  Added a new file dcl_rb_footing. dcl_rb_heading was modified too.
-Thu Jul 17  2008  T Horinouchi
-	* ruby-dcl-1.6.0 released
-Wed Jul 16  2008  T Horinouchi
-	* init.c.gtk,init.c.default : To use RARRAY_LEN and
-	  RARRAY_PTR macros
-Wed Jul 16  2008  T Horinouchi < M Otsuka [dennou-ruby: 002920]
-	* extconf.rb,dcl_obj2cary.c : applied a patch
-Tue Jul 15  2008  T Horinouchi
-	* dcl_obj2cary.c : introduced RARRAY_PTR and RARRAY_LEN
-	* dcl_rubydcloriginal.c : created -- defined uemrkz
-	* lib/dcl.rb : uemrkz support
-	* demo/rubydcloriginal/uemrkz1.rb : created
-	* GenWrapper/dcl_narrayed_funcs.rb : created -- generator
-	  of NArray versions of scalar functions such as stftrf.
-	  ( real,real -> real,real kind of subroutines in
-	  stpack, maplib, ctlib functions ) 
-	  NOTE: the remaining subprograms in stpack and maplib are 
-	  fully covered by *.fp, but prototypes of ctlib is 
-	  not made --- it's easy, you can directly use narray.
-	* dcl_narrayed_funcs.c : Automatically generated by
-	  GenWrapper/dcl_narrayed_funcs.rb -- DO NOT EDIT IT.
-	* GenWrapper/proto/grph1_stpack.fp : commented out prototype
-	  definitions of stftrf stitrf stfpr2 stipr2, which 
-	  are covered by dcl_narrayed_funcs.rb
-	* GenWrapper/proto/math1_maplib.fp : created to cover functions
-	  in MAPLIB, which are not treated by dcl_narrayed_funcs.rb
-	* init.c.default, init.c.gtk : to call the initializer in 
-	  dcl_rubydcloriginal.c and dcl_narrayed_funcs.c
-Mon Jul 14  2008  T Horinouchi < T Koshiro [dennou-ruby:002958]
-	* Debug in swp*
-Tue Dec  5  2006  T Horinouchi
- 	* ruby-dcl-1.5.3 re-released (sorry!)
-	* init.c.gtk,init.c.default: debug (insufficient alloc length)
-Fri Dec  1  2006  T Horinouchi
- 	* ruby-dcl-1.5.3 released
-	* extconf.rb, init.c.*: debug for cdcl 5.3.2
-Thu Nov 30  2006  T Horinouchi
-        * Re-generated C source files and dcl.rb
-	  % cd GenWrapper && make
-	* Changed to deal with DCL minor versions such as 5.3.2 etc
-	  in adition to 5.3 etc. Changed files are:
-	  extconf.rb, init.c.gtk, init.c.default,
-	  GenWrapper/proto/grph1_sgpack.fp, GenWrapper/proto/grph1_stpack.fp
-	  GenWrapper/proto/grph1_swpack.fp, GenWrapper/proto/grph2_grpack.fp,
-	  GenWrapper/proto/grph2_umpack.fp, GenWrapper/proto/math1_gt2dlib.fp
-        * Patch ruby-dcl-1.5.2_arg.patch from [dennou-ruby:002548]
-          (by S Nishizawa) was adapted in a very different way
-	  * init.c.gtk, init.c.default: added dcl_init_arg instead of 
-	    to math1_oslib.c. Also, changes are made limited to 
-	    #if DCLVER >= 532.
-	  * GenWrapper/dcl_rb_heading: added 
-	    init_arg($0,ARGV) if DCLVERSION >= "5.3.2"
-Thu Nov 30  2006  T Horinouchi < T Koshiro
-	* GenWrapper/dcl_rb_heading: /cygwin|mingw/ --> /cygwin|mingw|darwin/
-Wed Nov 17  2005  T Horinouchi
-	* ruby-dcl-1.5.2 released
-Mon Nov 14  2005  T Horinouchi < S Nishizawa 
-	(patch, Message-Id: <20051111204153.c17a86f0.seiya@kugi.kyoto-u.ac.jp>)
-	* grph1_zgpack.c: added methods zgqdrw and zgqpmp to enable us to
-	  extract Gtk objects made by DCL).
-Tue Aug  2 17:24:48 JST 2005
-        * demo/rakuraku/kihon/kihonc.rb: debug
-Fri May 13  2005  T Horinouchi
-	* ruby-dcl-1.5.1 released
-Mon Apr 11 2005  Takeshi Horinouchi 
-	* init.c.*: changed global variable mNumRu to file locale.
-Thu Mar 31  2005  T Horinouchi
-	* GenWrapper/etc/p_header: added extern
-Tue Dec 28  2004  T Horinouchi
-	* GenWrapper/dcl_rb_heading: added glib2 requirement for windows 
-	  (cygwin)
-
-Thu Nov 11  2004  T Horinouchi
-	* ruby-dcl-1.5.0 released
-	* extconf.rb: added messaging on DCL version
-	* demo/grph2/umpack/test09.rb,demo/grph2/ulpack/ulpk0[12]n.f,
-	  demo/math1/gt2dlib/gt2d01.rb: created (for DCL 5.3).
-	* demo/grph2/g2pack/g2pk0[12].rb: very minor update2]
-Tue Nov  9  2004  T Horinouchi
-	* Revisions are made to support both dcl-5.2 and dcl-5.3:
-          * demo/grph2/g2pack/g2pk0[12].rb: created (equivalent to
-	    g2pk0[12].f of the Fortran version)
-	  * GenWrapper/proto/:
-	    Makefile: minor improvement;  math1_gt2dlib.fp: created
-	    grph1_stpack.fp, grph1_swpack.fp, grph2_grpack.fp,
-	    grph2_umpack.fp: updated for dcl-5.3
-	  * GenWrapper/pparse.rb: to retain macros starting with /^#/.
-	  * GenWrapper/cproto2init.rb: deal with /^#if *DCLVER/ .. /^#endif/
-	  * GenWrapper/{variable.rb,prototype.rb,cproto2init.rb}: 
-	    updated for ruby 1.8 (and 1.6 as before).
-	  * extconf.rb: to add -DDCLVER=52 (or 53 ..) in $CFLAGS
-	  * init.c.{default|gtk}: added new constant NumRu::DCL::DCLVERSION
-	    which is either "5.2" or "5.3", currently.
-Thu Aug 04  2004  T Horinouchi < D Tsukahara
-	* lib/dcl.rb: debug for SHTLIB (Spherical Harmonics Transforpmation)
-	* GenWrapper/proto/math2_shtlib.fp: debug for SHTLIB
-Thu Jul 15  2004  T Horinouchi < T Koshiro
-	* ruby-dcl-1.4.1 released
-	* lib/dcl.rb: dependent library updated only for cygwin & mingw.
-Tue Jul 13  2004  T Horinouchi < T Koshiro
-	* extconf.rb: further minor update for cygwin & mingw.
-Tue Jun 29  2004  T Horinouchi < T Koshiro
-	* extconf.rb: debug for cygwin & mingw.
-Fri Mar  5  2004  T Horinouchi < S Nishizawa
-	* ruby-dcl-1.4.0 released
-	* extconf.rb,grph1_zgpack.c.org: modified to support gtk2
-	  (dcl-5.2-C.3-gtk2-5.tar.gz).
-	  gtk1 support stil remains, because dcl-5.2-C.3 supports gtk1.
-Mon Jan 19  2004  T Horinouchi
-	* ruby-dcl-1.3.2 released
-	* Debug in GenWrapper/proto/math2_shtlib.fp
-	  --> cd GenWrapper & make; Also did make dcl_rb and editting
-	      of lib/dcl.rb by hand. Especially needed was to avoid
-	      size checking of the "work" or "q" array initialized
-	      by shtint because not all info on its size is provided
-	      as array arguments (im, jm, or mm).
-Wed Dec 10  2003  T Horinouchi < T Koshiro
-	* ruby-dcl-1.3.1 released
-	* dcl_obj2cary.c: minor debug for Cygwin (EXTERN -> extern)
-Wed Oct  1  2003  T Horinouchi < S Nishizawa
-	* demo/rakuraku/map3d/map3d1.rb: debug 
-Tue Sep 23 2003  Takeshi Horinouchi < T Koshiro
-	* ruby-dcl-1.3.0 released
-	* dcl_obj2cary.c: support NArrayMiss
-	* lib/dcl.rb: modified not to exclude NArrayMiss
-	* GenWrapper/variable.c: modified not to exclude NArrayMiss
-	* GenWrapper/old/: eliminated
-	* extconf.rb: debug for windows (by T Koshiro)
-Wed Aug 27 2003  Takeshi Horinouchi
-	* ruby-dcl-1.2.2 released
-	* Verified that demo programs work fine with Ruby 1.8.0. (not all
-	  but so far all work fine)
-	* lib/dcl.rb: applied the gotoken patch (to eliminate unneccesary 
-	  spaces)
-	* init.c.default,init.c.gtk: Init_dcl: No longer asks whether NumRu
-	  has been defined -- ok for Ruby 1.6.5 or so or later
-	* extconf.rb: do not edit "install:" anymore (for Ruby 1.8; works
-	  with 1.6 too.)
-	
-Tue Jun 10  2003  T Horinouchi
-	* ruby-dcl-1.2.1 released
-
-Tue Jun 10  2003  T Horinouchi thanks to S Nishizawa
-	* gtk handling by S Nishizawa was merged in.
-	  added: ./grph1_zgpack.c.org ./init.c.gtk
-	  modified: extconf.rb
-	  (these are based on ruby-dcl-1.2.0-gtk-5.patch with some
-	  modification --- file handling in extconf.rb and extern->EXTERN
-	  in init.c.gtk)
-
-Tue Jun 10  2003  T Horinouchi
-	* extconf.rb: added have_library("narray") (for windows)
-	* init.c: extern -> EXTERN (for windows)
-	* lib/dcl.rb: added (gl|sg|us|..)p(set|stx|get)
-	
-Sun Jun  8  2003  T Horinouchi
-	* directory structure reorganization -- to re-include the wrapper
-	  generator etc in the tar ball. This time, the source generator
-	  is put in the subdirectory GenWrapper, and ordinary users do not
-	  have to generate the C sources.
-	* demo/ minor debug to add "DCL::" to where forgotten
-	* GenWrapper/proto/grph2_udpack.fp activated udlabl
-
-Tue May 13  2003  T Horinouchi
-	* ruby-dcl-1.2.0 released
-	* directory structure reorganization: separeted the C source
-	  generation from the distributed package.
-	   - renamed src/ as ruby-dcl-1.1.3/
-	   - move some files into (the old) src: 
-	     ChangeLog (this file)
-	   - Wrote the new README file.`
-	
-Tue May 21  2002  T Horinouchi
-	* ruby-dcl-1.1.2 released
-	* elim_ary_size.rb: make old methods (such as __udcntr) private
-	* demo:  minor refinement of some demo programs
-
-Mon May 20  2002  S Nishizawa
-	* demo/*/*/*.rb: include only NumRu instead of NumRu::DCL
-
-Mon May 20  2002  T Horinouchi
-	* demo/rakuraku/map3d/map3d7.rb: made from map3d6.rb (below)
-	  -- wire frame with painting.  great!
-	* demo/rakuraku/map3d/map3d6.rb: written based on map3d6.f
-	  in dcl-5.2 (FORTRAN). Wire frame!
-
-Mon May 20  2002  T Horinouchi
-	* ruby-dcl-1.1.1 released
-	* elim_ary_size.rb: debug: added calls of "module_fucntion" to the
-	  top of the source file to generate (src/lib/dcl.rb).
-	* demo/gokuraku/*/*.rb: modified to use array expressions
-	  (note: u2d/u2d[14].rb were rewritten only half way because of
-	  a bug in NArray to support a[0..2,0..3]=b[0..2,1] type
-	  substitution)
-	
-Sun May 19  2002  T Horinouchi
-	* demo/*/*/*.rb: downcased most constants (downcase_demos.rb)
-	
-Sat May 18  2002  T Horinouchi
-	* ruby-dcl-1.1.0 released
-	* src/dcl_cary2obj.c, variable.rb, etc/p_header:
-	  modified to return NArray instead of Array
-	  (it has long been supposed to do so, but it never worked)
-	
-Fri May 17  2002  T Horinouchi
-	* proto/misc1_(date|time)lib added protoypes of C functions,
-	  but they are commented out so far. (anyway, these two libraries
-	  are not very needed since RUby has date and time libs)
-
-Mon May 13-15  2002  T Horinouchi
-	* MAJOR CHANGE: Arguments to represent array sizes are now
-	  eliminated from all the methods. This is done as follows:
-	  the original ruby-dcl library is renamed from dcl to dcl_raw,
-	  and a new ruby source code, dcl.rb, is generated from the
-	  prototype definitions in proto/*.fp by using the filter
-	  elim_ary_size.rb (new).
-	* src/extconf.rb: rename dcl -> dcl_raw (dcl.so -> dcl_raw.so)
-	                  minor change to better handle the numru
-			  directory
-	* src/init.c: rename Init_dcl -> Init_dcl_raw
-	* elim_ary_size.rb: created (filter to eliminate array size arguments)
-	* Makefile
-	
-Thu Dec 28  2001  T Horinouchi
-	* ruby-dcl-1.0.0 released
-	* proto_old/,demo_new_notworking/: moved to old/
-	* test/u2df01.rb: eliminated, since it is obsolete
-	* README: install instruction updated
-	* src/extconf.rb: set $sitearchdir as a default include path for
-	NArray headers. Also, made possible to alter it with
-	--with-narray-include=
-Thu Dec 20  2001  T Horinouchi
-	* proto/*.fp: Commented out *P(SET|GET|PSTX) because the parameter
-	type they accept is not unique. Use instead *[RLC](SET|GET|STX)
-	(automatically done with ~horinout/davis/scripts/dclproto_comout.rb)
-
-Thu Dec 13  2001  T Horinouchi
-	* src/init.c: the Dec 06 modification was made more robust
-
-Thu Dec 06  2001  T Horinouchi
-	* ruby-dcl-1.beta.7 released
-	* src/init.c: rename mNum as mNumRu; initialize it only at first time
-
-Thu Nov 06  2001  Naoki Kawanabe
-        
-	* ruby-dcl-1.beta.6 released
-	* modified bug in make
-	
-Thu Nov 03  2001  Naoki Kawanabe & GOTO kentaro(gotoken@notwork.org)
-	* ruby-dcl-1.beta.5 released
-	* pparse.rb: does not depend on cpp(1).
-	* install directry changed (require 'dcl'-> require 'numru/dcl')
-	* added module 'NumRu'
-	* changed module name (DCL -> NumRu::DCL)
-Thu Oct 23  2001  Takeshi Horinouchi
-
-	* ruby-dcl-1.beta.4 released
-	* src/extconf.rb: now install: is made equiv to site-install: in
-	  src/Makefile (as well as in ./Makefile). Plus, the program was a 
-	  bit tidied up (no essential change).
-	* Makefile,proto/Makefile: add target distclean
-	* rename: demo_new --> demo_new_notworking
-	          proto --> proto_old
-		  proto_new --> proto
-	  edited Makefile etc accordingly (esp. for proto_new proto)
-	* rbdcl is renamed to RubyDCL
-	
-Thu Sep 28  2001  Naoki Kawanbe
-
-	* rbdcl-1.beta.3 released
-	* dcl_obj2cary.c,dcl_cary2obj.c: include libtinyf2c.h insead of f2c.h
-	
-Thu Sep 13  2001  Takeshi Horinouchi
-
-	* rbdcl-1.beta.2 released
-
-Thu Sep 12  2001  Takeshi Horinouchi
-
-	* updated: README
-
-	* debug: src/dcl_obj2cary.c
-	  (integer coarcing / messages)
-
-Thu Sep 12  2001  Takeshi Horinouchi
-
-	* rbdcl-1.beta.1 released
-

data/README

@@ -1,29 +0,0 @@
-
-	     RubyDCL -- a ruby interface to the DCL library
-
-	 by T. Horinouchi, K. Goto, and K. Kuroi, T Koshiro
-
-Last Updated: Feb 24, 2011 by T Horinouchi
-
-* WHAT IS THIS?
-
-  This is a one-to-one wrapper to a scientific graphic library DCL
-  (http://www.gfd-dennou.org/arch/dcl/).
-
-* DOCUMENTATION
-
-  Documentation of this library is distributed sepately, since it is
-  very big. You can download it from the following addresses.
-
-    Jappanese Documentation:
-      http://ruby.gfd-dennou.org/products/ruby-dcl/ruby-dcl-doc.tar.gz
-    English Documentation:
-      http://ruby.gfd-dennou.org/products/ruby-dcl/ruby-dcl-Edoc.tar.gz
-
-  The documentation is available on the web:
-
-      http://ruby.gfd-dennou.org/products/ruby-dcl/
-
-* INSTALLATION (dependent software)
-
-  See http://ruby.gfd-dennou.org/products/ruby-dcl/#installation

data/demo/grph2/ximage/MEMO

@@ -1,23 +0,0 @@
-# ���Υǥ��쥯�ȥ�˴ޤޤ��ǥ�ץ�����������
-
-���Υǥ��쥯�ȥ�ˤϰʲ��Υե����뤬����. 
-
-  ximg01.rb    : �ӥåȥ��᡼����ɽ�����뤿��Υƥ��ȥץ������.
-
-  tomsclmt.dat : ximg01.rb ���Ѥ���ǡ���. 
-		 TOMS �η�ʿ�ѥ��������̥ǡ��� (���12����ʬ)
-
-  MEMO         : �����. 
-
-ximg01.rb ���
-
-	swlstx('LDUMP', false)
-��
-	swlstx('LDUMP', true)
-
-�Ȥ����, dcl_NNN.xwd �Ȥ�������ץե��������������. ���θ�
-
-	animate *.xwd
-
-�ʤɤˤ�ä�, ���˥᡼����󤬲�ǽ�Ǥ���. 
-

data/ext/numru/init.c

@@ -1,202 +0,0 @@
-#include <stdio.h>
-#include "ruby.h"
-#include "libtinyf2c.h"
-#include "narray.h"
-
-/* for compatibility with ruby 1.6 */
-#ifndef RARRAY_PTR
-#define RARRAY_PTR(a) (RARRAY(a)->ptr)
-#endif
-#ifndef RARRAY_LEN
-#define RARRAY_LEN(a) (RARRAY(a)->len)
-#endif
-#ifndef StringValuePtr
-#define StringValuePtr(s) STR2CSTR(s)
-#endif
-
-VALUE mDCL;
-static VALUE mNumRu;
-
-void init_grph1_csgi(VALUE mDCL);
-void init_grph1_scpack(VALUE mDCL);
-void init_grph1_sgpack(VALUE mDCL);
-void init_grph1_slpack(VALUE mDCL);
-void init_grph1_stpack(VALUE mDCL);
-void init_grph1_swpack(VALUE mDCL);
-void init_grph2_grpack(VALUE mDCL);
-void init_grph2_ucpack(VALUE mDCL);
-void init_grph2_udpack(VALUE mDCL);
-void init_grph2_uepack(VALUE mDCL);
-void init_grph2_ugpack(VALUE mDCL);
-void init_grph2_uhpack(VALUE mDCL);
-void init_grph2_uipack(VALUE mDCL);
-void init_grph2_ulpack(VALUE mDCL);
-void init_grph2_umpack(VALUE mDCL);
-void init_grph2_uspack(VALUE mDCL);
-void init_grph2_uupack(VALUE mDCL);
-void init_grph2_uvpack(VALUE mDCL);
-void init_grph2_uwpack(VALUE mDCL);
-void init_grph2_uxpack(VALUE mDCL);
-void init_grph2_uypack(VALUE mDCL);
-void init_grph2_uzpack(VALUE mDCL);
-void init_math1_blklib(VALUE mDCL);
-void init_math1_chrlib(VALUE mDCL);
-void init_math1_clsplib(VALUE mDCL);
-void init_math1_fnclib(VALUE mDCL);
-void init_math1_gt2dlib(VALUE mDCL);
-void init_math1_gnmlib(VALUE mDCL);
-void init_math1_ifalib(VALUE mDCL);
-void init_math1_indxlib(VALUE mDCL);
-void init_math1_intlib(VALUE mDCL);
-void init_math1_lrllib(VALUE mDCL);
-void init_math1_oslib(VALUE mDCL);
-void init_math1_rfalib(VALUE mDCL);
-void init_math1_rfblib(VALUE mDCL);
-void init_math1_sublib(VALUE mDCL);
-void init_math1_syslib(VALUE mDCL);
-void init_math1_vialib(VALUE mDCL);
-void init_math1_viblib(VALUE mDCL);
-void init_math1_vralib(VALUE mDCL);
-void init_math1_vrblib(VALUE mDCL);
-void init_math1_xfclib(VALUE mDCL);
-void init_math2_fftlib(VALUE mDCL);
-void init_math2_intrlib(VALUE mDCL);
-/*
-void init_math2_odelib(VALUE mDCL);
-*/
-void init_math2_rnmlib(VALUE mDCL);
-void init_math2_shtlib(VALUE mDCL);
-void init_math2_vstlib(VALUE mDCL);
-void init_misc1_chnlib(VALUE mDCL);
-void init_misc1_datelib(VALUE mDCL);
-void init_misc1_fmtlib(VALUE mDCL);
-void init_misc1_misclib(VALUE mDCL);
-void init_misc1_randlib(VALUE mDCL);
-void init_misc1_timelib(VALUE mDCL);
-
-
-static int ruby_msgdmp_err_func(char *csub, char *cmsg, 
-			      int csub_len, int cmsg_len)
-{
-    int lmsg, lsub, i;
-    char msg[300];
-    lsub = lenc_(csub, csub_len);
-    if (lsub > 32) {lsub=32;}
-    lmsg = lenc_(cmsg, cmsg_len);
-    if (lmsg > 200) {lmsg=200;}
-    msg[0]='[';
-    strncpy(msg+1,csub,lsub);
-    msg[lsub+1]=']';
-    msg[lsub+2]=' ';
-    strncpy(msg+lsub+3,cmsg,lmsg);
-    for(i=lsub+3+lmsg;i<300;i++){msg[i]='\0';}
-    rb_raise(rb_eRuntimeError, "%s", msg);
-    return(0);
-}
-
-#if DCLVER >= 532
-static VALUE
-dcl_init_arg(obj, name, ary)
-	VALUE obj, name, ary;
-{
-    integer argc;
-    char **argv;
-    VALUE *ptr;
-    integer i;
-
-    Check_Type(ary,T_ARRAY);
-    argc = RARRAY_LEN(ary);
-    ptr = RARRAY_PTR(ary);
-    argv = ALLOC_N(char*,argc+1);
-    argv[0] = StringValuePtr(name);
-    for (i=0;i<argc;i++)
-       argv[i+1] = StringValuePtr(ptr[i]);
-    init_arg_(argc+1, argv);
-
-    return Qnil;
-}
-#endif
-
-void
-Init_dcl_raw()
-{
-    set_msgdmp_err_func(ruby_msgdmp_err_func);
-    mNumRu = rb_define_module("NumRu");
-    mDCL = rb_define_module_under(mNumRu, "DCL");
-    rb_define_const(mDCL, "DCLVERSION", rb_str_new2("5.4.8"));
-
-#ifdef NARRAY_BIGMEM
-    rb_define_const(mDCL, "SUPPORT_BIGMEM", Qtrue);
-#else
-    rb_define_const(mDCL, "SUPPORT_BIGMEM", Qfalse);
-#endif
-
-    init_grph1_csgi(mDCL);
-    init_grph1_scpack(mDCL);
-    init_grph1_sgpack(mDCL);
-    init_grph1_slpack(mDCL);
-    init_grph1_stpack(mDCL);
-    init_grph1_swpack(mDCL);
-    init_grph2_grpack(mDCL);
-    init_grph2_ucpack(mDCL);
-    init_grph2_udpack(mDCL);
-    init_grph2_uepack(mDCL);
-    init_grph2_ugpack(mDCL);
-    init_grph2_uhpack(mDCL);
-#if DCLVER >= 544
-    init_grph2_uipack(mDCL);
-#endif
-    init_grph2_ulpack(mDCL);
-    init_grph2_umpack(mDCL);
-    init_grph2_uspack(mDCL);
-    init_grph2_uupack(mDCL);
-    init_grph2_uvpack(mDCL);
-    init_grph2_uwpack(mDCL);
-    init_grph2_uxpack(mDCL);
-    init_grph2_uypack(mDCL);
-    init_grph2_uzpack(mDCL);
-    init_math1_blklib(mDCL);
-    init_math1_chrlib(mDCL);
-#if DCLVER >= 544
-    init_math1_clsplib(mDCL);
-#endif
-    init_math1_fnclib(mDCL);
-#if DCLVER >= 530
-    init_math1_gt2dlib(mDCL);
-#endif
-    init_math1_gnmlib(mDCL);
-    init_math1_ifalib(mDCL);
-    init_math1_indxlib(mDCL);
-    init_math1_intlib(mDCL);
-    init_math1_lrllib(mDCL);
-    init_math1_oslib(mDCL);
-    init_math1_rfalib(mDCL);
-    init_math1_rfblib(mDCL);
-    init_math1_sublib(mDCL);
-    init_math1_syslib(mDCL);
-    init_math1_vialib(mDCL);
-    init_math1_viblib(mDCL);
-    init_math1_vralib(mDCL);
-    init_math1_vrblib(mDCL);
-    init_math1_xfclib(mDCL);
-    init_math2_fftlib(mDCL);
-    init_math2_intrlib(mDCL);
-/*
-    init_math2_odelib(mDCL);
-*/
-    init_math2_rnmlib(mDCL);
-    init_math2_shtlib(mDCL);
-    init_math2_vstlib(mDCL);
-    init_misc1_chnlib(mDCL);
-    init_misc1_datelib(mDCL);
-    init_misc1_fmtlib(mDCL);
-    init_misc1_misclib(mDCL);
-    init_misc1_randlib(mDCL);
-    init_misc1_timelib(mDCL);
-#if DCLVER >= 532
-    rb_define_module_function(mDCL, "init_arg", dcl_init_arg, 2);
-#endif
-
-    init_rubydcloriginal(mDCL);
-    init_narrayed_funcs(mDCL);
-}