sorry. I made wrong tags.v1_8_5_54

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/tags/v1_8_5_54@13009 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 0 insertions, 62 deletions

diff --git a/ruby_1_8_5/ext/dl/mkcall.rb b/ruby_1_8_5/ext/dl/mkcall.rb
deleted file mode 100644
index 6a85570152..0000000000
--- a/ruby_1_8_5/ext/dl/mkcall.rb
+++ /dev/null
@@ -1,62 +0,0 @@
-# -*- ruby -*-
-
-require 'mkmf'
-$:.unshift File.dirname(__FILE__)
-require 'type'
-require 'dlconfig'
-
-def output_arg(x,i)
-  "args[#{i}].#{DLTYPE[x][:stmem]}"
-end
-
-def output_args(types)
-  t = []
-  types[1..-1].each_with_index{|x,i| t.push(output_arg(x,i))}
-  t.join(",")
-end
-
-def output_callfunc(types)
-  t = types[0]
-  stmem = DLTYPE[t][:stmem]
-  ctypes = types2ctypes(types)
-  if( t == VOID )
-    callstm = "(*f)(#{output_args(types)})"
-  else
-    callstm = "ret.#{stmem} = (*f)(#{output_args(types)})"
-  end
-  [ "{",
-    "#{ctypes[0]} (*f)(#{ctypes[1..-1].join(',')}) = func;",
-    "#{callstm};",
-    "}"].join(" ")
-end
-
-def output_case(types)
-  num = types2num(types)
-  callfunc_stm = output_callfunc(types)
-<<EOF
-  case #{num}:
-#ifdef DEBUG
-    printf("#{callfunc_stm}\\n");
-#endif
-    #{callfunc_stm};
-    break;
-EOF
-end
-
-def rec_output(types = [VOID])
-  print output_case(types)
-  if( types.length <= MAX_ARG )
-    DLTYPE.keys.sort.each{|t|
-      if( t != VOID && DLTYPE[t][:sym] )
-	rec_output(types + [t])
-      end
-    }
-  end
-end
-
-DLTYPE.keys.sort.each{|t|
-  if( DLTYPE[t][:sym] )
-    $stderr.printf("  #{DLTYPE[t][:ctype]}\n")
-    rec_output([t])
-  end
-}