diff options
author | peter <peter@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2006-11-03 00:30:30 +0000 |
---|---|---|
committer | peter <peter@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2006-11-03 00:30:30 +0000 |
commit | 1d1f956fbaa7686c0f8e6f04b332b0ae4201a73b (patch) | |
tree | 0aee882f4907b996609ff1ea2235b51247649e69 /compiler/i386/daopt386.pas | |
parent | a70169658701604bb86a8fe60b25ad96636b4803 (diff) | |
download | fpc-1d1f956fbaa7686c0f8e6f04b332b0ae4201a73b.tar.gz |
* remove tdictionary and tindexarray
* symtables based on TFPHashObjectList and TFPObjectList
* rename torddef.typ to torddef.ordtype
* rename tfloatdef.typ to tfloatdef.floattype
* rename tdef.deftype to tdef.typ
* remove obsolete browser code, browcol is kept so the ide
can still be compiled
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@5192 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/i386/daopt386.pas')
-rw-r--r-- | compiler/i386/daopt386.pas | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/compiler/i386/daopt386.pas b/compiler/i386/daopt386.pas index fcff4a20d7..ce2baf7ba5 100644 --- a/compiler/i386/daopt386.pas +++ b/compiler/i386/daopt386.pas @@ -300,7 +300,7 @@ var (TSearchDoubleIntItem(p).int2 = int2); end; - function TSearchLinkedList.searchByValue(p: PSearchLinkedListItem): boolean; + function TSearchLinkedList.FindByValue(p: PSearchLinkedListItem): boolean; var temp: PSearchLinkedListItem; begin temp := first; @@ -403,7 +403,7 @@ procedure RemoveLastDeallocForFuncRes(asml: TAsmList; p: tai); end; begin - case current_procinfo.procdef.returndef.deftype of + case current_procinfo.procdef.returndef.typ of arraydef,recorddef,pointerdef, stringdef,enumdef,procdef,objectdef,errordef, filedef,setdef,procvardef, @@ -425,7 +425,7 @@ var regCounter: TSuperRegister; begin regs := []; - case current_procinfo.procdef.returndef.deftype of + case current_procinfo.procdef.returndef.typ of arraydef,recorddef,pointerdef, stringdef,enumdef,procdef,objectdef,errordef, filedef,setdef,procvardef, |