bugs fixed for parse parameters

master
xieguigang 5 years ago
parent 359593664e
commit a6bc68b4f2

@ -75,10 +75,12 @@
<DefineTrace>true</DefineTrace>
<OutputPath>..\..\..\build\Drivers\</OutputPath>
<DocumentationFile>NetCDF.xml</DocumentationFile>
<Optimize>true</Optimize>
<Optimize>false</Optimize>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
<DebugType>pdbonly</DebugType>
<DebugType>full</DebugType>
<PlatformTarget>x64</PlatformTarget>
<RemoveIntegerChecks>true</RemoveIntegerChecks>
<DebugSymbols>true</DebugSymbols>
</PropertyGroup>
<ItemGroup>
<Reference Include="System" />

@ -236,7 +236,14 @@ Namespace Script
tokenList = tokenList.Take(tokenList.Length - 1).ToArray
Dim values As Token()() = tokenList _
.SplitByTopLevelStack _
.SplitParameters _
.Select(Function(block)
If block(Scan0).name = Tokens.Comma Then
Return block.Skip(1).ToArray
Else
Return block
End If
End Function) _
.ToArray
arguments = values _

Loading…
Cancel
Save