paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-21 22:39:36 +01:00
Code Issues Packages Projects Releases Wiki Activity

m68k: use std_regnum_search instead of prefixing the regname with % and calling gas_regnum_search

Browse Source 
git-svn-id: trunk@32656 -
This commit is contained in:
Károly Balogh 2015-12-13 18:04:30 +00:00
parent 9c12615f09
commit c47c6c0270
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
compiler/m68k/ra68kmot.pas
View File

@ -205,8 +205,7 @@ const
function tm68kmotreader.is_register(const s:string):boolean;
begin
result:=false;
// FIX ME!!! '%'+ is ugly, needs a proper fix (KB)
actasmregister:=gas_regnum_search('%'+lower(s));
actasmregister:=std_regnum_search(lower(s));
if actasmregister<>NR_NO then
begin
result:=true;