#325 sequenceof index corrected

Author: usr3-1415

BackendAst/DAstXer.fs

@@ -279,7 +279,7 @@ let createSequenceOfFunction (r:Asn1AcnAst.AstRoot) (lm:LanguageMacros) (codec:C
         let xmlTag = xmlTag |> orElse (XerLiteralConstant "SEQUENCE-OF")
         let ii = p.arg.SequenceOfLevel + 1
         let i = sprintf "i%d" ii
-        let lv = SequenceOfIndex (ii + 1, None)
+        let lv = SequenceOfIndex (ii, None)
         let pp =  lm.lg.getPointer p.arg
         let nLevel = BigInteger (t.id.AcnAbsPath.Length - 2)
         let chFunc =

asn1scc/Program.fs

@@ -123,7 +123,7 @@ let printVersion () =
     //let fvi = System.Diagnostics.FileVersionInfo.GetVersionInfo(assembly.Location);
     //let version = fvi.FileVersion;
 
-    let version = "4.5.2.7"
+    let version = "4.5.2.8"
     printfn "asn1scc version %s\n" version
     ()