From 2662c3984d139ab685ac568dfd6ae6ebb8cfa912 Mon Sep 17 00:00:00 2001 From: ceriel Date: Wed, 10 Nov 1993 12:35:33 +0000 Subject: [PATCH] Some small changes --- lang/basic/src/bem.h | 1 + lang/basic/src/compile.c | 2 +- lang/basic/src/parsepar.c | 2 +- lang/basic/src/symbols.c | 2 +- lang/basic/src/util.c | 2 +- 5 files changed, 5 insertions(+), 4 deletions(-) diff --git a/lang/basic/src/bem.h b/lang/basic/src/bem.h index 653b765a9..973b6125e 100644 --- a/lang/basic/src/bem.h +++ b/lang/basic/src/bem.h @@ -6,6 +6,7 @@ #include #include #include +#include #include #include diff --git a/lang/basic/src/compile.c b/lang/basic/src/compile.c index f008dffd1..71dd006f9 100644 --- a/lang/basic/src/compile.c +++ b/lang/basic/src/compile.c @@ -26,5 +26,5 @@ compileprogram() while( basicline = 0, getline()) (void) LLparse(); epilogcode(); - (void) sys_close(yyin); + sys_close(yyin); } diff --git a/lang/basic/src/parsepar.c b/lang/basic/src/parsepar.c index f27fb9ff9..4882ce105 100644 --- a/lang/basic/src/parsepar.c +++ b/lang/basic/src/parsepar.c @@ -42,7 +42,7 @@ char **argv; case 't': traceflag++; break; /* line tracing */ case 'h': /* split EM file */ - (void) fprint(STDERR, + fprint(STDERR, "h option not implemented\n"); break; case 'd': debug++; diff --git a/lang/basic/src/symbols.c b/lang/basic/src/symbols.c index ff19f0f5f..af54ecca1 100644 --- a/lang/basic/src/symbols.c +++ b/lang/basic/src/symbols.c @@ -256,7 +256,7 @@ heading( ) { char procname[50]; - sprint(procname,"_%s",fcn->symname); + (void) sprint(procname,"_%s",fcn->symname); C_pro_narg(procname); if ( fcn->symtype== DEFAULTTYPE) fcn->symtype= DOUBLETYPE; diff --git a/lang/basic/src/util.c b/lang/basic/src/util.c index 05254da1a..774ce8551 100644 --- a/lang/basic/src/util.c +++ b/lang/basic/src/util.c @@ -73,7 +73,7 @@ int i; { static char buf[30]; - (void) sprint(buf,"%d",i); + sprint(buf,"%d",i); return(buf); }