glu 8.2.0-x64-mingw32

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: 26b3f1156ae3f8eba17e333c7d6870ff0d502bf8
+  data.tar.gz: 2095791768b216b27344d598bcdc6a46deb490c1
+SHA512:
+  metadata.gz: feee7510ef93bddbf33837ee2313670dc201850a3a29584041f608b1cf3ac2ce39b036a5d89c71a28064c96fa036c11ac366941b6807db6a95fba364dc2e37f1
+  data.tar.gz: 310f7c5f3dcd5937cafe9bf2f489de8c9f8ea95cbf0bc95e2abae3922a37cafdbab248bb7dc3a4c3c1ffcf35e938bb9cf0a5186bf5496643a9ec6a2b06f715c9

checksums.yaml.gz.sig

@@ -0,0 +1,2 @@
+P���{��T�p;;�i��Q�䛃��K�א��br>��h֮���,3ҟ�,�.���	�Q~u-������y��<[��;|�MD�ݭ���(Q�~�7��k�~�|��I�ጵI��׻��/fD�v
+�!?�+c�5�}f���f_@`�+۳����,o��E|d�|����,��^�/�J$�]���upF�6���y�9�Q~|.�T1�Z���@���SB�>G���ŕ��]���@�<�㊩

data/.autotest

@@ -0,0 +1,29 @@
+require 'autotest/restart'
+
+Autotest.add_hook :initialize do |at|
+  at.add_exception /\.git/
+  at.add_exception /doc/
+  at.add_exception /examples/
+  at.add_exception /utils/
+  at.add_exception /website/
+
+  at.add_mapping(/^lib\/.*(\.bundle|so|dll)$/) do |filename, match|
+    possible = File.basename(filename, match[1])
+    at.files_matching %r%^test/test_#{possible}%
+  end
+
+  def at.path_to_classname s
+    sep = File::SEPARATOR
+    n = s.sub(/^test#{sep}test_(.*)\.rb/, '\1')
+    c = if n =~ /^(glu?)_?(.*)/ then
+          "#{$1.capitalize}#{$2.split(/_|(\d+)/).map { |seg| seg.capitalize }.join}"
+        end
+
+    "Test#{c}"
+  end
+end
+
+Autotest.add_hook :run_command do |at|
+  at.unit_diff = 'cat'
+  system Gem.ruby, Gem.bin_path('rake', 'rake'), 'compile'
+end

data/.gitignore

@@ -0,0 +1,6 @@
+*.swp
+/TAGS
+/lib/glu/*.so
+/lib/glu/*.bundle
+/pkg
+/tmp

data/.travis.yml

@@ -0,0 +1,15 @@
+language: ruby
+rvm:
+#   - "1.9.3"
+  - "2.0.0"
+#   - jruby-19mode # JRuby in 1.9 mode
+#   - rbx-19mode
+before_install:
+  - gem install hoe rake-compiler;
+  - sudo apt-get install xpra xserver-xorg-video-dummy freeglut3-dev;
+before_script:
+  - "xpra --xvfb=\"Xorg +extension GLX -config `pwd`/test/dummy.xorg.conf -logfile ${HOME}/.xpra/xorg.log\"  start :9"
+script: "env DISPLAY=:9 rake test"
+after_script:
+  - "xpra stop :9"
+  - "cat ~/.xpra/*"

data/History.rdoc

@@ -0,0 +1,8 @@
+=== 8.2.0 / 2014-03-14
+
+* Add x64-mingw platform for cross build and add ruby-2.0.0 to binary gems.
+* Don't pollute the global namespace. Use GLU namespace.
+
+=== 8.1.0 / 2013-03-03
+
+Split Glu into a separate gem.

data/MIT-LICENSE

@@ -0,0 +1,18 @@
+
+Permission is hereby granted, free of charge, to any person obtaining a
+copy of this software and associated documentation files (the "Software"),
+to deal in the Software without restriction, including without limitation
+the rights to use, copy, modify, merge, publish, distribute, sublicense,
+and/or sell copies of the Software, and to permit persons to whom the
+Software is furnished to do so, subject to the following conditions: 
+
+The above copyright notice and this permission notice shall be included in
+all copies or substantial portions of the Software. 
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+DEALINGS IN THE SOFTWARE. 

data/Manifest.txt

@@ -0,0 +1,20 @@
+.autotest
+.gemtest
+.gitignore
+.travis.yml
+History.rdoc
+MIT-LICENSE
+Manifest.txt
+README.rdoc
+Rakefile
+ext/glu/common.h
+ext/glu/conv.h
+ext/glu/extconf.rb
+ext/glu/gl-enums.h
+ext/glu/glu-enums.c
+ext/glu/glu-enums.h
+ext/glu/glu.c
+lib/glu.rb
+lib/glu/dummy.rb
+test/dummy.xorg.conf
+test/test_glu.rb

data/README.rdoc

@@ -0,0 +1,36 @@
+= glu
+
+== Description
+
+Glu bindings for the opengl gem, split into a separate gem because of Glu deprecation.
+
+== License
+
+(The MIT License)
+
+Copyright (c) Blaž Hrastnik (current maintainer)
+Copyright (c) Eric Hodel    (current maintainer)
+Copyright (c) Alain Hoang   (previous maintainer)
+Copyright (c) Jan Dvorak    (contributor)
+Copyright (c) Minh Thu Vo   (contributor)
+Copyright (c) James Adam    (contributor)
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+'Software'), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+

data/Rakefile

@@ -0,0 +1,49 @@
+# -*- coding: UTF-8 -*-
+#-*-ruby-*-
+#
+# Copyright (C) 2006 John M. Gabriele <jmg3000@gmail.com>
+# Copyright (C) Eric Hodel <drbrain@segment7.net>
+#
+# This program is distributed under the terms of the MIT license.
+# See the included MIT-LICENSE file for the terms of this license.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
+# OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+# IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+# CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+# TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+# SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+require 'hoe'
+require 'rake/extensiontask'
+
+hoe = Hoe.spec 'glu' do
+  developer 'Eric Hodel', 'drbrain@segment7.net'
+  developer 'Lars Kanis',  ''
+  developer 'Blaž Hrastnik', 'speed.the.bboy@gmail.com'
+  developer 'Alain Hoang', ''
+  developer 'Jan Dvorak',  ''
+  developer 'Minh Thu Vo', ''
+  developer 'James Adam',  ''
+
+  self.readme_file = 'README.rdoc'
+  self.history_file = 'History.rdoc'
+  self.extra_rdoc_files = FileList['*.rdoc']
+
+  extra_dev_deps << ['rake-compiler', '~> 0.7', '>= 0.7.9']
+
+  self.spec_extras = {
+    :extensions            => %w[ext/glu/extconf.rb],
+    :required_ruby_version => '>= 1.9.2',
+  }
+end
+
+Rake::ExtensionTask.new 'glu', hoe.spec do |ext|
+  ext.lib_dir = 'lib/glu'
+
+  ext.cross_compile = true
+  ext.cross_platform = ['i386-mingw32', 'x64-mingw32']
+end
+
+task :test => :compile

data/ext/glu/common.h

@@ -0,0 +1,227 @@
+/*
+ * Last edit by previous maintainer:
+ * 2000/01/06 16:37:43, kusano
+ *
+ * Copyright (C) 1999 - 2005 Yoshi <yoshi@giganet.net>
+ * Copyright (C) 2006 John M. Gabriele <jmg3000@gmail.com>
+ * Copyright (C) 2007 James Adam <james@lazyatom.com>
+ * Copyright (C) 2007 Jan Dvorak <jan.dvorak@kraxnet.cz>
+ *
+ * This program is distributed under the terms of the MIT license.
+ * See the included MIT-LICENSE file for the terms of this license.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
+ * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+ * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+ * IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+ * CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+ * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+ * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+ */
+
+#ifndef _COMMON_H_
+#define _COMMON_H_
+
+#include <ruby.h>
+#include "extconf.h"
+
+#ifdef HAVE_OPENGL_GL_H
+#include <OpenGL/gl.h>
+#endif
+
+#ifdef HAVE_GL_GL_H
+#include <GL/gl.h>
+#endif
+
+#ifdef HAVE_OPENGL_GLU_H
+#include <OpenGL/glu.h>
+#endif
+
+#ifdef HAVE_GL_GLU_H
+#include <GL/glu.h>
+#endif
+
+#include "gl-enums.h"
+#include "glu-enums.h"
+#include "conv.h"
+
+#ifndef CALLBACK
+#define CALLBACK
+#endif
+
+#ifdef HAVE_WINDOWS_H
+#define DLLEXPORT __declspec(dllexport)
+#else
+#define DLLEXPORT
+#endif
+
+/* these two macros are cast to a 32 bit type in the places they are used */
+#ifndef RARRAY_LENINT
+#define RARRAY_LENINT RARRAY_LEN
+#endif
+
+/* -------------------------------------------------------------------- */
+
+/* gets number of components for given format */
+static inline int glformat_size(GLenum format)
+{
+  switch(format)
+  {
+    case GL_COLOR_INDEX:
+    case GL_RED:
+    case GL_GREEN:
+    case GL_BLUE:
+    case GL_ALPHA:
+    case GL_RED_INTEGER_EXT:
+    case GL_GREEN_INTEGER_EXT:
+    case GL_BLUE_INTEGER_EXT:
+    case GL_ALPHA_INTEGER_EXT:
+    case GL_STENCIL_INDEX:
+    case GL_DEPTH_COMPONENT:
+    case GL_LUMINANCE:
+    case GL_LUMINANCE_INTEGER_EXT:
+      return 1;
+
+    case GL_LUMINANCE_ALPHA:
+    case GL_LUMINANCE_ALPHA_INTEGER_EXT:
+    case GL_422_EXT:
+    case GL_422_REV_EXT:
+    case GL_422_AVERAGE_EXT:
+    case GL_422_REV_AVERAGE_EXT:
+    case GL_YCRCB_422_SGIX:
+    case GL_YCBCR_422_APPLE:
+    case GL_YCBCR_MESA:
+    case GL_DEPTH_STENCIL_NV:
+    case GL_HILO_NV:
+    case GL_DSDT_NV:
+    case GL_DUDV_ATI:
+    case GL_DU8DV8_ATI:
+    case GL_FORMAT_SUBSAMPLE_24_24_OML:
+      return 2;
+
+    case GL_RGB:
+    case GL_RGB_INTEGER_EXT:
+    case GL_BGR_EXT:
+    case GL_BGR_INTEGER_EXT:
+    case GL_YCRCB_444_SGIX:
+    case GL_DSDT_MAG_NV:
+    case GL_FORMAT_SUBSAMPLE_244_244_OML:
+      return 3;
+
+    case GL_RGBA:
+    case GL_RGBA_INTEGER_EXT:
+    case GL_BGRA_EXT:
+    case GL_BGRA_INTEGER_EXT:
+    case GL_ABGR_EXT:
+    case GL_CMYK_EXT:
+    case GL_DSDT_MAG_VIB_NV:
+      return 4;
+
+    case GL_CMYKA_EXT:
+      return 5;
+
+    /* GL spec permits passing direct format size instead of enum (now obsolete) */
+    case 1:
+    case 2:
+    case 3:
+    case 4:
+      return format;
+
+    default:
+      rb_raise(rb_eArgError, "Unknown GL format enum %i",format);
+      return -1; /* not reached */
+  }
+}
+
+ /* computes unit (pixel) size for given type and format */
+static inline int gltype_glformat_unit_size(GLenum type,GLenum format)
+{
+  unsigned int format_size;
+
+  format_size = glformat_size(format);
+
+  switch(type)
+  {
+    case GL_BYTE:
+    case GL_UNSIGNED_BYTE:
+    case GL_BITMAP:
+      return 1*format_size;
+
+    case GL_SHORT:
+    case GL_UNSIGNED_SHORT:
+    case GL_HALF_FLOAT_ARB:
+      return 2*format_size;
+
+    case GL_INT:
+    case GL_UNSIGNED_INT:
+    case GL_FLOAT:
+      return 4*format_size;
+
+    /* in packed formats all components are packed into/unpacked from single datatype,
+       so number of components(format_size) doesn't matter for total size calculation */
+    case GL_UNSIGNED_BYTE_3_3_2:
+    case GL_UNSIGNED_BYTE_2_3_3_REV:
+      return 1;
+
+    case GL_UNSIGNED_SHORT_5_6_5:
+    case GL_UNSIGNED_SHORT_5_6_5_REV:
+    case GL_UNSIGNED_SHORT_4_4_4_4:
+    case GL_UNSIGNED_SHORT_4_4_4_4_REV:
+    case GL_UNSIGNED_SHORT_5_5_5_1:
+    case GL_UNSIGNED_SHORT_1_5_5_5_REV:
+    case GL_UNSIGNED_SHORT_8_8_APPLE:
+    case GL_UNSIGNED_SHORT_8_8_REV_APPLE:
+      return 2;
+
+    case GL_UNSIGNED_INT_8_8_8_8:
+    case GL_UNSIGNED_INT_8_8_8_8_REV:
+    case GL_UNSIGNED_INT_10_10_10_2:
+    case GL_UNSIGNED_INT_2_10_10_10_REV:
+    case GL_UNSIGNED_INT_24_8_NV:
+    case GL_UNSIGNED_INT_S8_S8_8_8_NV:
+    case GL_UNSIGNED_INT_8_8_S8_S8_REV_NV:
+    case GL_UNSIGNED_INT_10F_11F_11F_REV_EXT:
+    case GL_UNSIGNED_INT_5_9_9_9_REV_EXT:
+    case GL_FLOAT_32_UNSIGNED_INT_24_8_REV_NV:
+      return 4;
+
+    default:
+      rb_raise(rb_eArgError, "Unknown GL type enum %i",type);
+      return -1; /* not reached */
+  }
+}
+
+static inline int GetDataSize(GLenum type,GLenum format,int num)
+{
+  int size;
+  int unit_size;
+
+  unit_size = gltype_glformat_unit_size(type,format);
+
+  if (type==GL_BITMAP)
+    size = unit_size*(num/8); /* FIXME account for alignment */
+  else
+    size = unit_size*num;
+
+  return size;
+}
+
+/* Checks if data size of 'data' string confirms to passed format values */
+/* 'num' is number of elements, each of size 'format' * 'type' */
+static inline void CheckDataSize(GLenum type,GLenum format,int num,VALUE data)
+{
+  int size;
+
+  size = GetDataSize(type,format,num);
+
+  if (RSTRING_LEN(data) < size)
+    rb_raise(rb_eArgError, "Length of specified data doesn't correspond to format and type parameters passed. Calculated length: %i",size);
+}
+
+/* -------------------------------------------------------------------- */
+static inline VALUE allocate_buffer_with_string( long size )
+{
+    return rb_str_new(NULL, size);
+}
+
+#endif

data/ext/glu/conv.h

@@ -0,0 +1,143 @@
+/*
+ * Copyright (C) 2007 Jan Dvorak <jan.dvorak@kraxnet.cz>
+ *
+ * This program is distributed under the terms of the MIT license.
+ * See the included MIT-LICENSE file for the terms of this license.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
+ * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+ * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+ * IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+ * CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+ * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+ * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+ */
+
+/* Functions and macros for datatype conversion between Ruby and C */
+
+/*
+	Fast inline conversion functions as a replacement for the ones in libruby.
+	FIXNUM_P is simple logical AND check so it comes first, TYPE() is simple function,
+	and specified in header file so it can be inlined. For conversion, FIX2LONG is
+	simple right shift, and RFLOAT()-> just pointer dereference. For converting
+	Fixnum and Float types (which accounts for 99.9% of things you would want to pass
+	to OpenGL), there is large performance boost as result.
+
+	Also ruby 'true' and 'false' are converted to GL_TRUE/GL_FALSE for compatibility, and
+	finally, we fallback to library functions for any other data types (and error handling).
+*/
+
+#if HAVE_STRUCT_RFLOAT_FLOAT_VALUE
+#define	FLOAT_VAL_ACCESS(val) RFLOAT(val)->float_value
+#else
+#define	FLOAT_VAL_ACCESS(val) RFLOAT(val)->value
+#endif
+
+/* For conversion between ruby and GL boolean values */
+#define GLBOOL2RUBY(x) \
+	(x) == GL_TRUE ? Qtrue : ((x)==GL_FALSE ? Qfalse : INT2NUM((x)))
+
+#define RUBYBOOL2GL(x) \
+	(x) == Qtrue ? GL_TRUE : GL_FALSE
+
+#define cond_GLBOOL2RUBY_FUNC(_name_,_type_,_conv_) \
+static inline VALUE _name_(GLenum pname,_type_ value) \
+{ \
+	switch (pname) { \
+	case GL_DELETE_STATUS: \
+	case GL_LINK_STATUS: \
+	case GL_VALIDATE_STATUS: \
+	case GL_COMPILE_STATUS: \
+	case GL_MINMAX_SINK: \
+	case GL_HISTOGRAM_SINK: \
+	case GL_COORD_REPLACE: \
+	case GL_TEXTURE_COMPRESSED: \
+	case GL_GENERATE_MIPMAP: \
+	case GL_TEXTURE_RESIDENT: \
+	case GL_BUFFER_MAPPED: \
+	case GL_VERTEX_ATTRIB_ARRAY_NORMALIZED: \
+	case GL_VERTEX_ATTRIB_ARRAY_ENABLED: \
+	case GL_QUERY_RESULT_AVAILABLE: \
+	case GL_PROGRAM_UNDER_NATIVE_LIMITS_ARB: \
+	case GL_FRAMEBUFFER_ATTACHMENT_LAYERED_EXT: \
+	case GL_FENCE_STATUS_NV: \
+	case GL_TEXTURE_FLOAT_COMPONENTS_NV: \
+	case GL_SHADER_CONSISTENT_NV: \
+	case GL_TEXTURE_COMPARE_SGIX: \
+	case GLU_TESS_BOUNDARY_ONLY: \
+	case GLU_CULLING: \
+	case GLU_AUTO_LOAD_MATRIX: \
+		return GLBOOL2RUBY(value); \
+	default: \
+		return _conv_(value); \
+	} \
+}
+
+cond_GLBOOL2RUBY_FUNC(cond_GLBOOL2RUBY,GLint,INT2NUM)
+cond_GLBOOL2RUBY_FUNC(cond_GLBOOL2RUBY_U,GLuint,UINT2NUM)
+cond_GLBOOL2RUBY_FUNC(cond_GLBOOL2RUBY_F,GLfloat,rb_float_new)
+cond_GLBOOL2RUBY_FUNC(cond_GLBOOL2RUBY_D,GLdouble,rb_float_new)
+
+
+/* For conversion between ruby array (or object that can be converted to
+ * array) and C array.
+ *
+ * The C array has to be preallocated by calling function. */
+#define ARY2CTYPE(_type_,_convert_) \
+static inline long ary2c##_type_( arg, cary, maxlen ) \
+VALUE arg; \
+GL##_type_ cary[]; \
+long maxlen; \
+{ \
+	long i; \
+	VALUE ary = rb_Array(arg); \
+	if (maxlen < 1) \
+		maxlen = RARRAY_LEN(ary); \
+	else \
+		maxlen = maxlen < RARRAY_LEN(ary) ? maxlen : RARRAY_LEN(ary); \
+	for (i=0; i < maxlen; i++) \
+		cary[i] = (GL##_type_)_convert_(rb_ary_entry(ary,i)); \
+	return i; \
+}
+
+ARY2CTYPE(int,NUM2INT)
+ARY2CTYPE(uint,NUM2UINT)
+ARY2CTYPE(byte,NUM2INT)
+ARY2CTYPE(ubyte,NUM2INT)
+ARY2CTYPE(short,NUM2INT)
+ARY2CTYPE(ushort,NUM2INT)
+ARY2CTYPE(boolean,GLBOOL2RUBY)
+ARY2CTYPE(float,NUM2DBL)
+ARY2CTYPE(double,NUM2DBL)
+
+#define ary2cflt ary2cfloat
+#define ary2cdbl ary2cdouble
+
+#undef ARY2CTYPE
+
+/* Converts either array or object responding to #to_a to C-style array */
+#define ARY2CMAT(_type_) \
+static inline void ary2cmat##_type_(rary, cary, cols, rows) \
+VALUE rary; \
+_type_ cary[]; \
+int cols,rows; \
+{ \
+	int i; \
+\
+	rary = rb_Array(rary); \
+	rary = rb_funcall(rary,rb_intern("flatten"),0); \
+\
+	if (RARRAY_LEN(rary) != cols*rows) \
+		rb_raise(rb_eArgError, "passed array/matrix must have %i*%i elements",cols,rows); \
+\
+	for (i=0; i < cols*rows; i++) \
+		cary[i] = (_type_) NUM2DBL(rb_ary_entry(rary,i)); \
+}
+
+ARY2CMAT(double)
+ARY2CMAT(float)
+#undef ARY2CMAT
+
+#define EMPTY
+#define FREE(_x_) xfree(_x_);
+