Commit e4fafdc1 authored by Maxime Perrotin's avatar Maxime Perrotin

Make sure adainit is called during initialization

parent 342acd22
......@@ -50,6 +50,10 @@ void init_@_LOWER:Name_@()
@@IF@@ @_Language_@ /= "Ada" and @_Language_@ /= "QGenAda" and @_Language_@ /= "QGenC" and @_Language_@ /= "SDL"
// Call user code startup function
@_LOWER:Name_@_startup();
@@ELSIF@@ @_Language_@ = Ada or @_Language_@ = SDL
// Initialize Ada runtime to call elaboration functions
extern void adainit();
adainit();
@@END_IF@@
@@IF@@ @_EXIST:Sync_RIs_Parent_@
// Iterate over all synchronous RIs, and call their parent's
......@@ -59,7 +63,7 @@ void init_@_LOWER:Name_@()
extern void init_@_LOWER:Sync_RIs_Parent_@();
init_@_LOWER:Sync_RIs_Parent_@();
@@END_TABLE@@
puts ("init done");
puts ("[TASTE] Initialization completed for function @_Name_@");
}
}
@@-- For blackbox devices, don't generate the PI functions, they will be
......
KAZOO=../../kazoo
all: test-parse
all: ada c
ada: test-parse-ada
make -C output.ada && \
cp input_data/obsw.pr output.ada/obsw/SDL/src && \
cp input_data/gnc.c output.ada/gnc/C/src && \
......@@ -16,13 +18,13 @@ c: test-parse-c # Polyorb_HI_C output
ocarina -x main.aadl && \
make -f Makefile.taste
test-parse: clean
test-parse-ada: clean-ada
$(KAZOO) --gw \
-o output.ada \
--glue \
--debug
test-parse-c: clean
test-parse-c: clean-c
$(KAZOO) -p --gw \
-o output.pohic \
--glue
......@@ -38,7 +40,12 @@ gdb: clean
--glue \
--debug
clean:
rm -rf output.ada output.pohic
clean-ada:
rm -rf output.ada
clean-c:
rm -rf output.pohic
clean: clean-ada clean-c
.PHONY: clean test-parse gdb test-parse-c buildsupport_pohic buildsupport_pohiada c
.PHONY: clean clean-ada clean-c test-parse-ada gdb test-parse-c buildsupport_pohic buildsupport_pohiada c
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment