car/tools/insertMyCode.pl
Wolfgang Hottgenroth 3aa6bbc9a6 initial
2018-01-16 16:17:34 +01:00

15 lines
339 B
Perl
Executable File

#!/usr/bin/perl -w
while (<>) {
print $_;
print "#include \"main2.h\";\n" if m/USER CODE BEGIN Includes/;
print " my_setup_1();\n" if m/USER CODE BEGIN 1/;
print " my_setup_2();\n" if m/USER CODE BEGIN 2/;
print " my_loop();\n" if m/USER CODE BEGIN 3/;
print " my_errorHandler();\n" if m/USER CODE BEGIN Error_Handler/;
}