kotovalexarian-likes-github/ruby--ruby
1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
Code Releases Activity

* Merge YARV

Browse source 
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@11439 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
ko1 2006-12-31 15:02:22 +00:00
parent 3e7566d8fb
commit a3e1b1ce7e
233 changed files with 46004 additions and 13653 deletions
Download patch file Download diff file Expand all files Collapse all files

71
debug.c Normal file
View file

@ -0,0 +1,71 @@
/**********************************************************************
debug.c -
$Author$
$Date$
created at: 04/08/25 02:31:54 JST
Copyright (C) 2004-2006 Koichi Sasada
**********************************************************************/
#include "ruby.h"
void
debug_indent(int level, int debug_level, int indent_level)
{
if (level < debug_level) {
int i;
for (i = 0; i < indent_level; i++) {
fprintf(stderr, " ");
}
fflush(stderr);
}
}
VALUE
debug_value(int level, int debug_level, char *header, VALUE obj)
{
if (level < debug_level) {
VALUE str;
str = rb_inspect(obj);
fprintf(stderr, "DBG> %s: %s\n", header,
obj == -1 ? "" : StringValueCStr(str));
fflush(stderr);
}
return obj;
}
void
debug_v(VALUE v)
{
debug_value(0, 1, "", v);
}
ID
debug_id(int level, int debug_level, char *header, ID id)
{
if (level < debug_level) {
fprintf(stderr, "DBG> %s: %s\n", header, rb_id2name(id));
fflush(stderr);
}
return id;
}
void
gc_check_func(void)
{
int i;
#define GCMKMAX 0x10
for (i = 0; i < GCMKMAX; i++) {
rb_ary_new2(1000);
}
rb_gc();
}
void
debug_breakpoint(void)
{
/* */
}