6502
/
P65Utils
mirror of https://github.com/t-edson/P65Utils.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Add files via upload

This commit is contained in:
Tito Hinostroza 2019-06-12 23:13:35 -05:00 committed by GitHub
parent 40b50bae83
commit ee93649392
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
P6502utils.pas
View File

@ -1175,7 +1175,7 @@ begin
Result := false; //valor por defecto
if size=0 then exit;
maxRam := CPUMAXRAM;
for i:=0 to CPUMAXRAM-1 do begin //verifica 1 a 1, por seguridad
for i:=iRam to maxRam-1 do begin //verifica 1 a 1, por seguridad
if HaveConsecRAM(i, size, maxRam) then begin
//encontró del tamaño buscado
UseConsecRAM(i, size); //marca como usado