|
@@ -308,6 +308,7 @@ implementation
|
|
|
found : boolean;
|
|
found : boolean;
|
|
|
state : char;
|
|
state : char;
|
|
|
begin
|
|
begin
|
|
|
|
|
+ found:= false;
|
|
|
current_scanner.skipspace;
|
|
current_scanner.skipspace;
|
|
|
hs:=current_scanner.readid;
|
|
hs:=current_scanner.readid;
|
|
|
if (length(hs)>1) then
|
|
if (length(hs)>1) then
|
|
@@ -3266,7 +3267,10 @@ exit_label:
|
|
|
end.
|
|
end.
|
|
|
{
|
|
{
|
|
|
$Log$
|
|
$Log$
|
|
|
- Revision 1.87 2004-08-22 23:16:06 olle
|
|
|
|
|
|
|
+ Revision 1.88 2004-09-12 20:46:58 olle
|
|
|
|
|
+ * Minor bugfix in $IFOPT
|
|
|
|
|
+
|
|
|
|
|
+ Revision 1.87 2004/08/22 23:16:06 olle
|
|
|
+ added flag to TMacro denoting mac style compiler variable
|
|
+ added flag to TMacro denoting mac style compiler variable
|
|
|
* fixed $DEFINEC
|
|
* fixed $DEFINEC
|
|
|
* improved robustness of macro facility
|
|
* improved robustness of macro facility
|
olle