Get rid of warnings in roboorte generated code

diff --git a/src/types/roboortegen.pl b/src/types/roboortegen.pl
index ae3a197d747d264bb9d772ff7db569a4637bc5bf..3f4e03f03f84d2eec7adbba26faf6abf5f165ffe 100755 (executable)
--- a/src/types/roboortegen.pl
+++ b/src/types/roboortegen.pl
@@ -264,7 +264,7 @@ print OUTFILE << "(END)";
 
        foreach $var (@ortegen) {
 print OUTFILE << "(END)";
-void ${roboorte_name}_subscriber_$var->{"topic"}_create(struct ${roboorte_name}_orte_data *data, ORTERecvCallBack callback, void *arg);
+ORTESubscription *${roboorte_name}_subscriber_$var->{"topic"}_create(struct ${roboorte_name}_orte_data *data, ORTERecvCallBack callback, void *arg);
 (END)
        }
 
@@ -362,16 +362,15 @@ print OUTFILE << "(END)";
            ($dmsec, $dsec) = POSIX::modf($var->{"deadline"});
            $dmsec = POSIX::floor($dmsec*1000);
 print OUTFILE << "(END)";
-void ${roboorte_name}_subscriber_$var->{"topic"}_create(struct ${roboorte_name}_orte_data *data, ORTERecvCallBack callback, void *arg)
+ORTESubscription * ${roboorte_name}_subscriber_$var->{"topic"}_create(struct ${roboorte_name}_orte_data *data, ORTERecvCallBack callback, void *arg)
 {
-\tORTESubscription *s;
 \tNtpTime deadline, minimumSeparation;
 \t
 \t$var->{"type"}_type_register($data_arg_name->$orte_domain);
 \t
 \tNtpTimeAssembFromMs(deadline, $dsec, $dmsec);
 \tNtpTimeAssembFromMs(minimumSeparation, $msec, $mmsec);
-\ts = ORTESubscriptionCreate(
+\treturn ORTESubscriptionCreate(
 \t\t\t$data_arg_name->$orte_domain, $subscription_mode, $subscription_type, 
 \t\t\t"$var->{"topic"}", "$var->{"type"}", 
 \t\t\t&$data_arg_name->$var->{"topic"}, &deadline, &minimumSeparation,