mirror of
https://github.com/tailix/libkernaux.git
synced 2026-08-22 11:04:22 -04:00
27 lines
669 B
C
27 lines
669 B
C
#include "main.h"
|
|
|
|
#ifdef KERNAUX_VERSION_WITH_FILE
|
|
|
|
static VALUE rb_KernAux_File_initialize(VALUE self, VALUE out);
|
|
|
|
static ID rb_intern_ATout = Qnil;
|
|
|
|
static VALUE rb_KernAux_File = Qnil;
|
|
|
|
void init_file() {
|
|
rb_gc_register_mark_object(ID2SYM(rb_intern_ATout = rb_intern("@out")));
|
|
|
|
rb_gc_register_mark_object(rb_KernAux_File =
|
|
rb_define_class_under(rb_KernAux, "File", rb_cObject));
|
|
|
|
rb_define_method(rb_KernAux_File, "initialize",
|
|
rb_KernAux_File_initialize, 1);
|
|
}
|
|
|
|
VALUE rb_KernAux_File_initialize(VALUE self, VALUE out)
|
|
{
|
|
rb_ivar_set(self, rb_intern_ATout, out);
|
|
return Qnil;
|
|
}
|
|
|
|
#endif // KERNAUX_VERSION_WITH_FILE
|