File tree Expand file tree Collapse file tree 2 files changed +2
-2
lines changed
Expand file tree Collapse file tree 2 files changed +2
-2
lines changed Original file line number Diff line number Diff line change @@ -362,7 +362,7 @@ let createIA5StringInitFunc (r:Asn1AcnAst.AstRoot) (lm:LanguageMacros) (t:Asn1A
362362 let i = sprintf " i%d " ii
363363 let resVar = p.accessPath.asIdentifier
364364 let td = strTypeDef.longTypedefName2 ( lm.lg.hasModules) ( ToC p.modName)
365- let funcBody = initTestCaseIA5String ( p.accessPath.joined lm.lg) ( lm.lg.getAccess p.accessPath) ( ( o.maxSize.uper+ 1 I)) ( ( o.maxSize.uper+ 1 I)) i td bAlpha arrAsciiCodes ( BigInteger arrAsciiCodes.Length) true resVar
365+ let funcBody = initTestCaseIA5String ( p.accessPath.joined lm.lg) ( lm.lg.getAccess p.accessPath) ( ( o.maxSize.uper+ 1 I)) ( ( o.maxSize.uper+ 1 I)) i td bAlpha arrAsciiCodes ( BigInteger arrAsciiCodes.Length) false resVar
366366 let lvars = lm.lg.init.zeroIA5String_ localVars ii
367367 let resVar = p.accessPath.asIdentifier
368368 { InitFunctionResult.funcBody = funcBody; resultVar = resVar; localVariables= lvars}
Original file line number Diff line number Diff line change @@ -305,7 +305,7 @@ type LangGeneric_c() =
305305 }
306306 override this.init =
307307 {
308- Initialize_ parts.zeroIA5String_ localVars = fun _ -> []
308+ Initialize_ parts.zeroIA5String_ localVars = fun ii -> [ SequenceOfIndex ( ii , None ) ]
309309 choiceComponentTempInit = false
310310 initMethSuffix = fun _ -> " "
311311 }
You can’t perform that action at this time.
0 commit comments