Merge pull request #140 from monaka/pr-remove-unused-static-functions

Remove unused static functions

src/class.c

@@ -34,7 +34,6 @@ typedef struct fc_result {
     struct fc_result *prev;
 } fcresult_t;
 
-struct RClass* mrb_class_real(struct RClass* cl);
 int kiv_lookup(khash_t(iv) *table, mrb_sym key, mrb_value *value);
 extern struct kh_iv *mrb_class_tbl;
 

src/encoding.c

@@ -84,12 +84,6 @@ enum {
 
 #define mrb_usascii_str_new2 mrb_usascii_str_new_cstr
 
-static size_t
-enc_memsize(mrb_state *mrb, const void *p)
-{
-    return 0;
-}
-
 static const struct mrb_data_type encoding_data_type = {
   "encoding", 0,
 };

src/encoding.h

@@ -92,7 +92,6 @@ int mrb_toupper(int c);
 
 typedef OnigEncodingType mrb_encoding;
 
-mrb_encoding* mrb_enc_get(mrb_state *mrb, mrb_value obj);
 /* mrb_encoding * -> name */
 #define mrb_enc_name(enc) (enc)->name
 int mrb_enc_get_index(mrb_state *mrb, mrb_value obj);

src/error.c

@@ -404,29 +404,6 @@ mrb_sys_fail(mrb_state *mrb, const char *mesg)
   mrb_raise(mrb, mrb->eRuntimeError_class, "%s", mesg);
 }
 
-static mrb_value
-mrb_exc_c_exception(mrb_state *mrb, mrb_value exc)
-{
-  mrb_value *argv;
-  int argc;
-
-  mrb_get_args(mrb, "*", &argv, &argc);
-  return mrb_make_exception(mrb, argc, argv);
-}
-
-static mrb_value
-mrb_exc_exception(mrb_state *mrb, mrb_value exc)
-{
-  mrb_value *argv;
-  int argc;
-  mrb_value exclass;
-
-  mrb_get_args(mrb, "*", &argv, &argc);
-  if (argc == 0) return exc;
-  exclass = mrb_obj_value(mrb_class(mrb, exc));
-  return mrb_funcall(mrb, exclass, "exception", argc, argv);
-}
-
 void
 mrb_init_exception(mrb_state *mrb)
 {

src/numeric.c

@@ -37,8 +37,6 @@
 #define fmod(x,y) fmodf(x,y)
 #endif
 
-void mrb_cmperr(mrb_state *mrb, mrb_value x, mrb_value y);
-
 void
 mrb_num_zerodiv(mrb_state *mrb)
 {

src/parse.y

@@ -4726,7 +4726,6 @@ mrb_parse_string(mrb_state *mrb, const char *s)
 #define PARSER_DUMP
 
 void parser_dump(mrb_state *mrb, node *tree, int offset);
-int mrb_generate_code(mrb_state*, mrb_ast_node*);
 
 int
 mrb_compile_file(mrb_state * mrb, FILE *f)

src/range.c

@@ -32,8 +32,6 @@
 mrb_value mrb_exec_recursive_paired(mrb_state *mrb, mrb_value (*func) (mrb_state *, mrb_value, mrb_value, int),
                                   mrb_value obj, mrb_value paired_obj, void* arg);
 
-int printf (const char*, ...);
-
 mrb_value
 mrb_range_new(mrb_state *mrb, mrb_value beg, mrb_value end, int excl)
 {

src/re.c

@@ -54,14 +54,11 @@ unsigned long ruby_scan_oct(const char *, size_t, size_t *);
 unsigned long ruby_scan_hex(const char *, size_t, size_t *);
 
 static mrb_value mrb_match_to_a(mrb_state *mrb, mrb_value match);
-int re_adjust_startpos(struct re_pattern_buffer *bufp, const char *string, int size, int startpos, int range);
 static mrb_value mrb_reg_preprocess(mrb_state *mrb, const char *p, const char *end, mrb_encoding *enc,
         mrb_encoding **fixed_enc, onig_errmsg_buffer err);
 static void mrb_reg_expr_str(mrb_state *mrb, mrb_value str, const char *s, long len,
       mrb_encoding *enc, mrb_encoding *resenc);
 static char * option_to_str(char str[4], int options);
-mrb_value match_alloc(mrb_state *mrb);
-void mrb_warn(const char *fmt, ...);
 
 static mrb_value reg_cache;
 //static int may_need_recompile;

src/string.c

@@ -47,7 +47,6 @@ static mrb_value str_replace(mrb_state *mrb, mrb_value str, mrb_value str2);
 #ifdef INCLUDE_ENCODING
 static long str_strlen(mrb_state *mrb, mrb_value str, mrb_encoding *enc);
 #endif //INCLUDE_ENCODING
-int mrb_block_given_p();
 #ifdef INCLUDE_ENCODING
 #define is_ascii_string(mrb, str) (mrb_enc_str_coderange(mrb, str) == ENC_CODERANGE_7BIT)
 #define is_broken_string(mrb, str) (mrb_enc_str_coderange(mrb, str) == ENC_CODERANGE_BROKEN)

src/struct.c

@@ -31,8 +31,6 @@ mrb_value mrb_exec_recursive_paired(mrb_state *mrb, mrb_value (*func) (mrb_state
 #define mrb_long2int(n) ((int)(n))
 
 
-static mrb_value struct_alloc(mrb_state *mrb, mrb_value);
-
 static struct RClass *
 struct_class(mrb_state *mrb)
 {