|
@@ -234,6 +234,10 @@ implementation
|
|
begin
|
|
begin
|
|
hp:=genloadmethodcallnode(pprocsym(p^.left^.symtableprocentry),p^.left^.symtableproc,
|
|
hp:=genloadmethodcallnode(pprocsym(p^.left^.symtableprocentry),p^.left^.symtableproc,
|
|
getcopy(p^.left^.methodpointer));
|
|
getcopy(p^.left^.methodpointer));
|
|
|
|
+ disposetree(p);
|
|
|
|
+ firstpass(hp);
|
|
|
|
+ p:=hp;
|
|
|
|
+ exit;
|
|
end
|
|
end
|
|
else
|
|
else
|
|
hp:=genloadcallnode(pprocsym(p^.left^.symtableprocentry),p^.left^.symtableproc);
|
|
hp:=genloadcallnode(pprocsym(p^.left^.symtableprocentry),p^.left^.symtableproc);
|
|
@@ -636,7 +640,10 @@ implementation
|
|
end.
|
|
end.
|
|
{
|
|
{
|
|
$Log$
|
|
$Log$
|
|
- Revision 1.34 1999-11-18 15:34:51 pierre
|
|
|
|
|
|
+ Revision 1.35 1999-11-29 22:36:48 florian
|
|
|
|
+ * problem with taking the address of abstract procedures fixed
|
|
|
|
+
|
|
|
|
+ Revision 1.34 1999/11/18 15:34:51 pierre
|
|
* Notes/Hints for local syms changed to
|
|
* Notes/Hints for local syms changed to
|
|
Set_varstate function
|
|
Set_varstate function
|
|
|
|
|