setcerr(203, NULL); /* SVC output - out of Comet II memory */
return;
}
- if((w = memory[GR[1]+i]) == '\0') {
- break;
- }
/* 「文字の組」の符号表に記載された文字と、改行(CR)/タブを表示 */
/* それ以外の文字は、「.」で表す */
- if((w >= 0x20 && w <= 0x7E) || w == 0xA || w == '\t') {
+ if(((w = memory[GR[1]+i]) >= 0x20 && w <= 0x7E) || w == 0xA || w == '\t') {
putchar((char)w);
} else {
putchar('.');
/* 算術演算なので、第15ビットは送り出されない */
WORD sla(WORD val0, WORD val1)
{
- WORD sign, res, last;
+ WORD sign, res, last = 0x0;
int i;
FR = 0x0;
/* 空いたビット位置には符号と同じものが入る */
WORD sra(WORD val0, WORD val1)
{
- WORD sign, res, last;
+ WORD sign, res, last = 0x0;
int i;
FR = 0x0;
/* 論理左シフト。フラグを設定して値を返す */
WORD sll(WORD val0, WORD val1)
{
- WORD res = val0, last;
+ WORD res = val0, last = 0x0;
int i;
FR = 0x0;
/* 論理右シフト。フラグを設定して値を返す */
WORD srl(WORD val0, WORD val1)
{
- WORD res = val0, last;
+ WORD res = val0, last = 0x0;
int i;
FR = 0x0;