pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

Assertion fix in the parser.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@33 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
inoussa
2006-10-29 15:06:12 +00:00
parent e1f3f1041c
commit 0cb149edf4
3 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
wst/trunk/tests/google_api/googlewebapi_proxy.pas
View File

@ -2,7 +2,7 @@
This unit has been produced by ws_helper.
Input unit name : "googlewebapi".
This unit name : "googlewebapi_proxy".
Date : "30/07/2006 21:44".
Date : "29/10/2006 15:02".
}
Unit googlewebapi_proxy;
{$mode objfpc}{$H+}

8
wst/trunk/ws_helper/ws_helper.lpi
View File

@ -48,8 +48,8 @@
<Filename Value="ws_parser.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="ws_parser"/>
<CursorPos X="1" Y="385"/>
<TopLine Value="374"/>
<CursorPos X="20" Y="456"/>
<TopLine Value="453"/>
<UsageCount Value="195"/>
</Unit1>
<Unit2>
@ -69,8 +69,8 @@
<Filename Value="parserdefs.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="parserdefs"/>
<CursorPos X="1" Y="208"/>
<TopLine Value="189"/>
<CursorPos X="14" Y="119"/>
<TopLine Value="29"/>
<UsageCount Value="195"/>
</Unit3>
<Unit4>

2
wst/trunk/ws_helper/ws_parser.pas
View File

@ -455,7 +455,7 @@ begin
Assert(Assigned(AStream));
FStream := AStream;
FTokenizer := TParser.Create(FStream);
FSymbolTable := TSymbolTable.Create('');
FSymbolTable := TSymbolTable.Create('tmp_name');
FCurrentSymbol := Nil;
end;