- Modified getAccessFromScopeNodeList to use ToC chName (bug #322).

- Incremented version number in `printVersion` from "4.5.2.4" to "4.5.2.5".
- Updated `Argu` package version in `asn1scc.fsproj` from "6.1.1" to "6.2.5".

Author: usr3-1415

FrontEndAst/DAstUtilFunctions.fs

@@ -22,7 +22,7 @@ let getAccessFromScopeNodeList (ReferenceToType nodes)  (childTypeIsString: bool
         | SEQ_CHILD (chName, chOpt)  ->
             let isPresent =
                 match chOpt with
-                | true ->  [lm.lg.getSeqChildIsPresent pVal.arg chName] //[sprintf "%s%sexist.%s" pVal.arg.p (lm.lg.getAccess pVal.arg) chName]
+                | true ->  [lm.lg.getSeqChildIsPresent pVal.arg (ToC chName)] //[sprintf "%s%sexist.%s" pVal.arg.p (lm.lg.getAccess pVal.arg) chName]
                 | false -> []
             isPresent, {pVal with arg = lm.lg.getSeqChild pVal.arg (ToC chName) childTypeIsString chOpt}
         | CH_CHILD (chName, pre_name, chParent)  ->

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.4"
+    let version = "4.5.2.5"
     printfn "asn1scc version %s\n" version
     ()
 

asn1scc/asn1scc.fsproj

@@ -70,7 +70,7 @@
   </ItemGroup>
 
   <ItemGroup>
-    <PackageReference Include="Argu" Version="6.1.1" />
+    <PackageReference Include="Argu" Version="6.2.5" />
   </ItemGroup>
 
   <ItemGroup>