1 | /* #[<PREAMBLE>]#
|
---|
2 | * #[<...>]# ãã #[</...>]# ã§å²ã¾ããã³ã¡ã³ãã¯ç·¨éããªãã§ãã ãã
|
---|
3 | * tecsmerge ã«ãããã¼ã¸ã«ä½¿ç¨ããã¾ã
|
---|
4 | *
|
---|
5 | * #[</PREAMBLE>]# */
|
---|
6 |
|
---|
7 | /* ãããã¿ã¤ã宣è¨ãå¤æ°ã®å®ç¾©ãããã«æ¸ãã¾ã #_PAC_# */
|
---|
8 | #include "nMruby_tCharPointer_tecsgen.h"
|
---|
9 |
|
---|
10 | #ifndef E_OK
|
---|
11 | #define E_OK 0 /* success */
|
---|
12 | #define E_ID (-18) /* illegal ID */
|
---|
13 | #endif
|
---|
14 |
|
---|
15 | GET_SET_INT( Char, char_t )
|
---|
16 | POINTER_CLASS( Char, char_t )
|
---|
17 | #ifndef TECS_Use_MrbString_for_CharPointer
|
---|
18 | CHECK_AND_GET_POINTER( Char, char_t )
|
---|
19 | #else
|
---|
20 | CHECK_AND_GET_CHAR_POINTER( Char, char_t )
|
---|
21 | CHECK_AND_GET_CHAR_POINTER_MOD( Char, char_t )
|
---|
22 | #endif
|
---|
23 |
|
---|
24 | /* åãå£é¢æ° #_TEPF_# */
|
---|
25 | /* #[<ENTRY_PORT>]# eInitialize
|
---|
26 | * entry port: eInitialize
|
---|
27 | * signature: nMruby_sInitializeTECSBridge
|
---|
28 | * context: task
|
---|
29 | * #[</ENTRY_PORT>]# */
|
---|
30 |
|
---|
31 | /* #[<ENTRY_FUNC>]# eInitialize_initializeBridge
|
---|
32 | * name: eInitialize_initializeBridge
|
---|
33 | * global_name: nMruby_tCharPointer_eInitialize_initializeBridge
|
---|
34 | * oneway: false
|
---|
35 | * #[</ENTRY_FUNC>]# */
|
---|
36 | void
|
---|
37 | eInitialize_initializeBridge(mrb_state* mrb, struct RClass * TECS)
|
---|
38 | {
|
---|
39 | struct RClass *c;
|
---|
40 |
|
---|
41 | /* ããã«å¦çæ¬ä½ãè¨è¿°ãã¾ã #_TEFB_# */
|
---|
42 | c = tecs_init_CharPointer( mrb, TECS );
|
---|
43 | mrb_define_method(mrb, c, "to_s", CharPointer_to_s, MRB_ARGS_NONE());
|
---|
44 | mrb_define_method(mrb, c, "from_s", CharPointer_from_s, MRB_ARGS_REQ(1));
|
---|
45 |
|
---|
46 | }
|
---|
47 |
|
---|
48 | /* #[<POSTAMBLE>]#
|
---|
49 | * ããããä¸ã«éåãå£é¢æ°ãæ¸ãã¾ã
|
---|
50 | * #[</POSTAMBLE>]#*/
|
---|