Warning, /frameworks/syntax-highlighting/autotests/input/highlight.cgis is written in an unsupported language. File is not indexed.
0001 PROGRAM testtest; 0002 0003 0004 INTERFACE 0005 0006 extern inout int inputs_int[]; 0007 extern out int nur_out[]; 0008 extern in int nur_in[]; 0009 0010 CODE 0011 0012 function jetzt_mach_schon(in int grenze, out int fak){ 0013 int temp, counter; 0014 counter=grenze; 0015 temp=1; 0016 while(counter>1) 0017 temp*=(counter--); 0018 fak=temp; 0019 } 0020 0021 function mach_mal(inout int i){ 0022 if(i==3) i=6; 0023 else if(i==4) i=24; 0024 else if(i>=5) jetzt_mach_schon(i,i); 0025 // 1 und 2: gleich. 0026 } 0027 0028 function mach_nochmal(in int k1, out int k2, in int vektor){ 0029 int4 hossa; 0030 hossa=k1; 0031 int4 hasso; 0032 hasso=-vektor; 0033 0034 k2=(hasso|hossa>k1)?k1:-k1; //parse error before `|' 0035 // k2=(hasso||hossa>k1)?k1:-k1; //only works on expressions of equal dimension 0036 0037 } 0038 0039 CONTROL 0040 forall (int i in inputs_int:1D) do { 0041 mach_mal(i); 0042 } 0043 forall (int j in inputs_int:1D; 0044 int i in nur_out:1D; 0045 int vektor in nur_in:1D) do { 0046 mach_nochmal(j,i, vektor); 0047 }