vishapoberon/compiler
1
0
Fork 0
mirror of https://github.com/vishapoberon/compiler.git synced 2026-04-06 05:12:26 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix browser command following TypSize move.

Browse source
This commit is contained in:
David Brown 2016-09-23 19:34:18 +01:00
parent fb002de0dd
commit d683df3e72
6 changed files with 1 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

1
bootstrap/unix-44/OPM.c
View file

@ -223,7 +223,6 @@ static void OPM_ScanOptions (CHAR *s, LONGINT s__len, SET *opt)
OPM_AddressSize = (int16)s[__X(i + 1, s__len)] - 48;
OPM_Alignment = (int16)s[__X(i + 2, s__len)] - 48;
i += 2;
Files_SetSearchPath((CHAR*)"", 1);
}
break;
case 'B':

1
bootstrap/unix-48/OPM.c
View file

@ -223,7 +223,6 @@ static void OPM_ScanOptions (CHAR *s, LONGINT s__len, SET *opt)
OPM_AddressSize = (int16)s[__X(i + 1, s__len)] - 48;
OPM_Alignment = (int16)s[__X(i + 2, s__len)] - 48;
i += 2;
Files_SetSearchPath((CHAR*)"", 1);
}
break;
case 'B':

1
bootstrap/unix-88/OPM.c
View file

@ -223,7 +223,6 @@ static void OPM_ScanOptions (CHAR *s, LONGINT s__len, SET *opt)
OPM_AddressSize = (int16)s[__X(i + 1, s__len)] - 48;
OPM_Alignment = (int16)s[__X(i + 2, s__len)] - 48;
i += 2;
Files_SetSearchPath((CHAR*)"", 1);
}
break;
case 'B':

1
bootstrap/windows-48/OPM.c
View file

@ -223,7 +223,6 @@ static void OPM_ScanOptions (CHAR *s, LONGINT s__len, SET *opt)
OPM_AddressSize = (int16)s[__X(i + 1, s__len)] - 48;
OPM_Alignment = (int16)s[__X(i + 2, s__len)] - 48;
i += 2;
Files_SetSearchPath((CHAR*)"", 1);
}
break;
case 'B':

1
bootstrap/windows-88/OPM.c
View file

@ -223,7 +223,6 @@ static void OPM_ScanOptions (CHAR *s, LONGINT s__len, SET *opt)
OPM_AddressSize = (int16)s[__X(i + 1, s__len)] - 48;
OPM_Alignment = (int16)s[__X(i + 2, s__len)] - 48;
i += 2;
Files_SetSearchPath((CHAR*)"", 1);
}
break;
case 'B':

2
src/tools/browser/BrowserCmd.Mod
View file

@ -267,5 +267,5 @@ MODULE BrowserCmd; (* RC 29.10.93 *) (* object model 4.12.93, command line ver
END ShowDef;
BEGIN
OPT.typSize := OPV.TypSize; Texts.OpenWriter(W); ShowDef
Texts.OpenWriter(W); ShowDef
END BrowserCmd.