#!/bin/csh -f # This script was automatically generated by Synsh. set _start=main_VOID set _params=() if ($#argv > 0) then if ("$argv[1]" == '-jump') then shift argv set _start=($argv[1]) shift argv endif endif while ($#argv > 0) if ("$argv[1]" == '-param') then shift argv set _params=($_params:q $argv[1]) shift argv else break endif end goto $_start #------- fact_int: @ iadd_a1 = 0 + 1 set intvar_a0="$_params[${iadd_a1}]" if ( ${intvar_a0} < 1 ) then echo 1 > "/tmp/synsh_RV" exit 0 else @ isub_a2 = ${intvar_a0} - 1 $0 -jump fact_int -param ${isub_a2} $argv:q if ( $status ) exit $status set irv_a3=(`head -1 "/tmp/synsh_RV"`) if ( $#irv_a3 > 0 ) then set irv_a3="$irv_a3[1]" else set irv_a3=0 endif @ imul_a4 = ${intvar_a0} * ${irv_a3} echo ${imul_a4} > "/tmp/synsh_RV" exit 0 endif echo ERROR: no value returned from fact_int exit 1 #------- main_VOID: $0 -jump fact_int -param 5 $argv:q if ( $status ) exit $status set irv_a6=(`head -1 "/tmp/synsh_RV"`) if ( $#irv_a6 > 0 ) then set irv_a6="$irv_a6[1]" else set irv_a6=0 endif set sadd_a7="Fact(5) = "${irv_a6} echo -n "$sadd_a7" exit 0 #-------