github.com/rzzzwilson.pymlac
1
0
Fork 0
mirror of https://github.com/rzzzwilson/pymlac.git synced 2025-06-10 09:32:41 +00:00
Code Issues Releases Wiki Activity

Fixed strupper() of fields in line, issue #24

Browse Source
This commit is contained in:
rzzzwilson
2021-06-14 14:05:55 +07:00
parent f38611a5ae
commit 6275d94bca
3 changed files with 6 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
iasm/assemble.c
View File

@@ -404,6 +404,7 @@ delimfields(char *buffer,
++chptr;
if (*chptr)
*(chptr++) = '\0';
strupper(*label);
}
/* if not off end of buffer, look for opcode */
@@ -426,7 +427,7 @@ delimfields(char *buffer,
++chptr;
if (*chptr)
*(chptr++) = '\0';
strupper(*opcode);
}
}
}
@@ -451,19 +452,13 @@ delimfields(char *buffer,
++chptr;
if (*chptr)
*(chptr++) = '\0';
strupper(*field);
}
}
}
if (*chptr == ';')
*comment = chptr;
if (*label)
strupper(*label);
if (*opcode)
strupper(*opcode);
if (*field)
strupper(*field);
}

6
iasm/test.asm
View File

@@ -1,7 +1,7 @@
;-------------------------------
; Just loop in place - CPU speed test.
;-------------------------------
org 0100 ;
start jmp start ;
org 0100 ;
start jmp start ;
;-------------------------------
end start
end ;start

BIN
iasm/test.ptp
View File

Binary file not shown.