godzil/ack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Delinted somewhat (did not work on 2/2 machines)

Browse Source
This commit is contained in:
ceriel
1991-02-18 11:11:04 +00:00
parent af7686cd66
commit cf0cd51810
6 changed files with 13 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lang/pc/comp/code.c
View File

@@ -32,7 +32,7 @@ routine_label(df)
{
df->prc_label = ++data_label;
C_df_dlb(df->prc_label);
C_rom_scon(df->df_idf->id_text, strlen(df->df_idf->id_text) + 1);
C_rom_scon(df->df_idf->id_text, (arith)(strlen(df->df_idf->id_text) + 1));
}
RomString(nd)
@@ -250,7 +250,7 @@ CodeEndBlock(df, StackAdjustment)
}
if( tp = ResultType(df->df_type) ) {
if( !options['R'] ) {
C_lin(LineNumber);
C_lin((arith)LineNumber);
C_lol(df->prc_bool);
C_cal("_nfa");
C_asp(word_size);