Subversion Repositories Kolibri OS

Rev

Rev 1849 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1849 Rev 1850
Line 1... Line -...
1
#define STRING_ERROR	"string found in tree when trying to add to	it"
-
 
2
// ---- ‡ ­¥á¥­¨¥ ¯®¨¬¥­®¢ ­­®© ª®­áâ ­âë ¢ ᯨ᮪
1
// ---- ‡ ­¥á¥­¨¥ ¯®¨¬¥­®¢ ­­®© ª®­áâ ­âë ¢ ᯨ᮪
3
AddConstToTree(dword keystring,constvalue)
2
AddConstToTree(dword keystring,constvalue)
4
dword ptr,newptr; // idrec structure
3
dword ptr,newptr; // idrec structure
5
{
4
{
6
	newptr=LocalAlloc(0x40,recsize);
5
	newptr=LocalAlloc(0x40,recsize);
Line 31... Line 30...
31
					DSDWORD[ESI+right]=newptr;
30
					DSDWORD[ESI+right]=newptr;
32
					BREAK;
31
					BREAK;
33
				}
32
				}
34
				ptr=DSDWORD[ESI+right];
33
				ptr=DSDWORD[ESI+right];
35
			}
34
			}
36
			ELSE internalerror(STRING_ERROR);
35
			ELSE internalerror("string found in tree when trying to add to	it");
37
		}
36
		}
38
	}
37
	}
39
// ”®à¬¨à㥬 ­®¢ãî § ¯¨áì ¢ ᯨ᪥
38
// ”®à¬¨à㥬 ­®¢ãî § ¯¨áì ¢ ᯨ᪥
40
	ESI=newptr;
39
	ESI=newptr;
41
	DSDWORD[ESI+recid]=LocalAlloc(0x40,lstrlenA(keystring)+1);
40
	DSDWORD[ESI+recid]=LocalAlloc(0x40,lstrlenA(keystring)+1);
Line 109... Line 108...
109
					DSDWORD[ESI+right]=newptr;
108
					DSDWORD[ESI+right]=newptr;
110
					BREAK;
109
					BREAK;
111
				}
110
				}
112
				ptr=DSDWORD[ESI+right];
111
				ptr=DSDWORD[ESI+right];
113
			}
112
			}
114
			ELSE internalerror(STRING_ERROR);
113
			ELSE internalerror("string found in tree when trying to add to	it");
115
		}
114
		}
116
	}
115
	}
117
	ESI=newptr;
116
	ESI=newptr;
118
	DSDWORD[ESI+recid]=LocalAlloc(0x40,lstrlenA(keystring)+1);
117
	DSDWORD[ESI+recid]=LocalAlloc(0x40,lstrlenA(keystring)+1);
119
	lstrcpyA(EAX,keystring);
118
	lstrcpyA(EAX,keystring);