Create events on RI calls

templates/concurrency_view/aadl_4_makefile/node.tmplt

@@ -22,7 +22,7 @@
 
 
 @_LOWER:Node_Name_@_simu:	@_LOWER:REPLACE_ALL(,/):Partition_Names_@ DriversConfig/drivers_config.h simulation.asn
-	asn2dataModel -toAda -o ../dataview/C simulation.asn ../dataview/dataview-uniq.asn
+	asn2dataModel -toAda -o ../dataview/Ada simulation.asn ../dataview/dataview-uniq.asn
 	$(MAKE) -j -C @_Node_Name_@ -f Makefile.@_Node_Name_@ simulate
 
 # Force build of node @_Node_Name_@ for RTEMS

templates/glue/language_wrappers/simu_pi_ads/interface.tmplt

@@ -6,12 +6,12 @@
 @@IF@@ @_Direction_@ = "PI"
 @@IF@@ @_EXIST:Param_Names_@
 procedure @_CAPITALIZE:Name_@
-   @@INLINE(      \()(;\n       )(\);\n)@@
+   @@INLINE(   \()(;\n    )(\);\n)@@
       @@TABLE'ALIGN_ON(":")@@
          @@IF@@ @_Param_Directions_@ = "PARAM_IN"
-            @_CAPITALIZE:Param_Names_@ : in out @_CAPITALIZE:REPLACE_ALL(-/_):Param_Types_@
+            @_CAPITALIZE:Param_Names_@ : in out asn1Scc@_CAPITALIZE:REPLACE_ALL(-/_):Param_Types_@
          @@ELSE@@
-            @_CAPITALIZE:Param_Names_@ :    out @_CAPITALIZE:REPLACE_ALL(-/_):Param_Types_@
+            @_CAPITALIZE:Param_Names_@ :    out asn1Scc@_CAPITALIZE:REPLACE_ALL(-/_):Param_Types_@
          @@END_IF@@
       @@END_TABLE@@
    @@END_INLINE@@

templates/glue/language_wrappers/simu_ri_ads/function.tmplt

@@ -13,7 +13,7 @@ with Simulation_Dataview;   use Simulation_Dataview;
 package @_CAPITALIZE:Name_@_RI is
 
    @@IF@@ @_EXIST:Required_Interfaces_@ and @_Language_@ /= "Blackbox_C"
-   --  Required interface hooks
+   --  Required interface hooks for simulation
    @_Required_Interfaces'Indent_@
    @@END_IF@@
 

templates/glue/language_wrappers/simu_ri_ads/interface.tmplt

@@ -5,12 +5,12 @@
 @@-- $HOME/tool-inst/share/kazoo/doc/templates_skeletons_sub_interface.ascii
 @@IF@@ @_EXIST:Param_Names_@
 procedure @_CAPITALIZE:Name_@
-@@INLINE(      \()(;\n       )(\);\n)@@
+@@INLINE(   \()(;\n    )(\);\n)@@
    @@TABLE'ALIGN_ON("out")@@
       @@IF@@ @_Param_Directions_@ = "PARAM_IN"
-         @_CAPITALIZE:Param_Names_@ : in out @_CAPITALIZE:REPLACE_ALL(-/_):Param_Types_@
+         @_CAPITALIZE:Param_Names_@ : in out asn1Scc@_CAPITALIZE:REPLACE_ALL(-/_):Param_Types_@
       @@ELSE@@
-         @_CAPITALIZE:Param_Names_@ : out @_CAPITALIZE:REPLACE_ALL(-/_):Param_Types_@
+         @_CAPITALIZE:Param_Names_@ : out asn1Scc@_CAPITALIZE:REPLACE_ALL(-/_):Param_Types_@
       @@END_IF@@
    @@END_TABLE@@
 @@END_INLINE@@

templates/skeletons/ada-ri-source/trigger.tmplt

-@@-- This template must return either TRUE or something else (meaning FALSE)
-@@-- It is used to determine if the other templates in this folder will be
-@@-- processed or ignored.
-@@-- One folder can contain two templates: one for a function, and one for
-@@-- a corresponding makefile (or build script)
-@@-- The name of the function is read from template "function-filename.tmplt"
-@@-- The name of the makefile is read from template "makefile-filename.tmplt"
-@@-- These files are optional, if absent no error is raised
-@@-- The following tags are available in this template:
-@@--
-@@-- @_Name_@                : The name of the function
-@@-- @_Is_Type_@             : True if function type
-@@-- @_Instance_Of_@         : Name of instance or empty string
-@@-- @_Language_@            : Implementation language for the function
-@@-- @_Filename_Is_Present_@ : True if target function output already exists
-@@-- @_Makefile_Is_Present_@ : True if target build script already exists
-@@-- @_C_Middleware_@        : True if middleware is in C (e.g. PO-HI-C)
-@@IF@@ (@_Language_@ = Ada or @_Language_@ = SDL) and not @_Is_Type_@ and @_Instance_Of_@ = ""
+@@IF@@ @_Target_@ /= SIMU and (@_Language_@ = Ada or @_Language_@ = SDL) and not @_Is_Type_@ and @_Instance_Of_@ = ""
 TRUE
 @@END_IF@@

test/Demo_Ada_GUI/Makefile

@@ -13,6 +13,12 @@ c: test-parse-c # Polyorb_HI_C output
 	cp router/router.adb work/router/Ada/src
 	$(MAKE) -C work
 
+simu: clean-c
+	$(KAZOO) -t SIMU -p --gw --glue
+	cp displayer/displayer.adb work/displayer/Ada/src
+	cp router/router.adb work/router/Ada/src
+	$(MAKE) -C work
+
 test-parse-ada: clean-ada
 	$(KAZOO) --gw \
 	         -o output.ada \