source: EcnlProtoTool/trunk/asp3_dcre/tecsgen/tecs/mruby/nMruby_tTECSInitializer.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.8 KB
Line 
1/* #[<PREAMBLE>]#
2 * #[<...>]# から #[</...>]# で囲まれたコメントは編集しないでください
3 * tecsmerge によるマージに使用されます
4 *
5 * 属性アクセスマクロ #_CAAM_#
6 * TECS struct RClass * VAR_TECS
7 *
8 * 呼び口関数 #_TCPF_#
9 * call port : cInitialize signature: nMruby_sInitializeTECSBridge context: task
10 * void cInitialize_initializeBridge( subscript, const mrb_state* mrb, const struct RClass * TECS );
11 * subscript: 0...(NCP_cInitialize-1)
12 *
13 * #[</PREAMBLE>]# */
14
15/* プロトタイプ宣言や変数の定義をここに書きます #_PAC_# */
16#include "nMruby_tTECSInitializer_tecsgen.h"
17
18#ifndef E_OK
19#define E_OK 0 /* success */
20#define E_ID (-18) /* illegal ID */
21#endif
22
23/* 受け口関数 #_TEPF_# */
24/* #[<ENTRY_PORT>]# eInitialize
25 * entry port: eInitialize
26 * signature: nMruby_sInitializeBridge
27 * context: task
28 * #[</ENTRY_PORT>]# */
29
30/* #[<ENTRY_FUNC>]# eInitialize_initializeBridge
31 * name: eInitialize_initializeBridge
32 * global_name: nMruby_tTECSInitializer_eInitialize_initializeBridge
33 * oneway: false
34 * #[</ENTRY_FUNC>]# */
35void
36eInitialize_initializeBridge(CELLIDX idx, const mrb_state* mrb)
37{
38 CELLCB *p_cellcb;
39 int i;
40 struct RClass *TECS;
41
42 if (VALID_IDX(idx)) {
43 p_cellcb = GET_CELLCB(idx);
44 }
45 else {
46 /* エラー処理コードをここに記述します */
47 } /* end if VALID_IDX(idx) */
48
49 /* ここに処理本体を記述します #_TEFB_# */
50 TECS = mrb_define_module( (mrb_state *)mrb, "TECS" );
51 // mrb: const mrb_state * => mrb_state *
52 VAR_TECS = TECS;
53
54 for( i = 0; i < NCP_cInitialize; i++ )
55 cInitialize_initializeBridge( i, (mrb_state*)mrb, TECS );
56}
57
58/* #[<POSTAMBLE>]#
59 * これより下に非受け口関数を書きます
60 * #[</POSTAMBLE>]#*/
Note: See TracBrowser for help on using the repository browser.