source: EcnlProtoTool/trunk/asp3_dcre/tecsgen/tecs/mruby/nMruby_tSCharPointer.c@ 270

Last change on this file since 270 was 270, checked in by coas-nagasima, 7 years ago

mruby版ECNLプロトタイピング・ツールを追加

  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
  • Property svn:mime-type set to text/x-csrc
File size: 1.5 KB
Line 
1/* #[<PREAMBLE>]#
2 * #[<...>]# から #[</...>]# で囲まれたコメントは編集しないでください
3 * tecsmerge によるマージに使用されます
4 *
5 * #[</PREAMBLE>]# */
6
7/* プロトタイプ宣言や変数の定義をここに書きます #_PAC_# */
8#include "nMruby_tSCharPointer_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( SChar, schar_t )
16//POINTER_CLASS( SChar, schar_t )
17GET_SET_INT( SChar, char_t )
18POINTER_CLASS( SChar, char_t )
19#ifndef TECS_Use_MrbString_for_CharPointer
20//CHECK_AND_GET_POINTER( SChar, schar_t )
21CHECK_AND_GET_POINTER( SChar, char_t )
22#else
23CHECK_AND_GET_CHAR_POINTER( SChar, schar_t )
24CHECK_AND_GET_CHAR_POINTER_MOD( SChar, schar_t )
25#endif
26
27/* 受け口関数 #_TEPF_# */
28/* #[<ENTRY_PORT>]# eInitialize
29 * entry port: eInitialize
30 * signature: nMruby_sInitializeTECSBridge
31 * context: task
32 * #[</ENTRY_PORT>]# */
33
34/* #[<ENTRY_FUNC>]# eInitialize_initializeBridge
35 * name: eInitialize_initializeBridge
36 * global_name: nMruby_tSCharPointer_eInitialize_initializeBridge
37 * oneway: false
38 * #[</ENTRY_FUNC>]# */
39void
40eInitialize_initializeBridge(mrb_state* mrb, struct RClass * TECS)
41{
42 struct RClass *c;
43
44 /* ここに処理本体を記述します #_TEFB_# */
45 c=tecs_init_SCharPointer( mrb, TECS );
46 mrb_define_method(mrb, c, "to_s", CharPointer_to_s, MRB_ARGS_NONE());
47 mrb_define_method(mrb, c, "from_s", CharPointer_from_s, MRB_ARGS_REQ(1));
48}
49
50/* #[<POSTAMBLE>]#
51 * これより下に非受け口関数を書きます
52 * #[</POSTAMBLE>]#*/
Note: See TracBrowser for help on using the repository browser.