Browse Source

Replace C++ style comment with C style comment

pre-master-46
sjborley 21 years ago
parent
commit
358b5f829a
  1. 3
      src/frontend/numparam/nupatest.c
  2. 3
      src/frontend/parse.c
  3. 10
      src/frontend/resource.c
  4. 5
      src/frontend/runcoms.c
  5. 9
      src/frontend/variable.h
  6. 3
      src/maths/misc/test_accuracy.c
  7. 12
      src/maths/misc/test_erfc.c
  8. 3
      src/misc/missing_math.c

3
src/frontend/numparam/nupatest.c

@ -2,6 +2,7 @@
* *
* This file is part of Numparam, see: readme.txt * This file is part of Numparam, see: readme.txt
* Free software under the terms of the GNU Lesser General Public License * Free software under the terms of the GNU Lesser General Public License
* $Id$
*/ */
/**** test executable for the numparam library ****/ /**** test executable for the numparam library ****/
@ -141,7 +142,7 @@ Begin
Done Done
EndProc EndProc
#if 0 // sjb - this is in mystring.c
#if 0 /* sjb - this is in mystring.c */
Proc rs(Pchar s) /* 78 coumn limit */ Proc rs(Pchar s) /* 78 coumn limit */
Begin Begin
short i; short i;

3
src/frontend/parse.c

@ -1,6 +1,7 @@
/********** /**********
Copyright 1990 Regents of the University of California. All rights reserved. Copyright 1990 Regents of the University of California. All rights reserved.
Author: 1985 Wayne A. Christopher, U. C. Berkeley CAD Group Author: 1985 Wayne A. Christopher, U. C. Berkeley CAD Group
$Id$
**********/ **********/
/* /*
@ -428,7 +429,7 @@ parse(void)
fprintf(cp_err, "Error: in parse.c(parse) stack understep.\n"); fprintf(cp_err, "Error: in parse.c(parse) stack understep.\n");
return (NULL); return (NULL);
} }
//for (i=0; i<=sp; i++) print_elem(stack+i); printf("next: "); print_elem(next); printf("\n");
/*for (i=0; i<=sp; i++) print_elem(stack+i); printf("next: "); print_elem(next); printf("\n");*/
rel = prectable[top->e_token][next->e_token]; rel = prectable[top->e_token][next->e_token];
switch (rel) { switch (rel) {

10
src/frontend/resource.c

@ -59,14 +59,14 @@ char *enddata;
void void
init_rlimits(void) init_rlimits(void)
{ {
# ifdef HAVE__MEMAVL // hvogt
# ifdef HAVE__MEMAVL /* hvogt */
mem_avail = _memavl( ); mem_avail = _memavl( );
# else # else
startdata = (char *) baseaddr( ); startdata = (char *) baseaddr( );
enddata = sbrk(0); enddata = sbrk(0);
# endif # endif
// startdata = (char *) baseaddr( );
// enddata = sbrk(0);
/* startdata = (char *) baseaddr( );
enddata = sbrk(0); */
} }
@ -208,10 +208,10 @@ printres(char *name)
# else # else
# ifdef HAVE_FTIME # ifdef HAVE_FTIME
struct timeb timenow; struct timeb timenow;
// int sec, msec; sjb
/* int sec, msec; sjb */
ftime(&timenow); ftime(&timenow);
timediff(&timenow, &timebegin, &total, &totalu); timediff(&timenow, &timebegin, &total, &totalu);
// totalu /= 1000; hvogt
/* totalu /= 1000; hvogt */
cpu_elapsed = "elapsed"; cpu_elapsed = "elapsed";
# else # else
# define NO_RUDATA # define NO_RUDATA

5
src/frontend/runcoms.c

@ -2,6 +2,7 @@
Copyright 1990 Regents of the University of California. All rights reserved. Copyright 1990 Regents of the University of California. All rights reserved.
Author: 1985 Wayne A. Christopher, U. C. Berkeley CAD Group Author: 1985 Wayne A. Christopher, U. C. Berkeley CAD Group
Modified: 2000 AlansFixes Modified: 2000 AlansFixes
$Id$
**********/ **********/
/* /*
@ -224,7 +225,7 @@ dosim(char *what, wordlist *wl)
if (!*wl->wl_word) if (!*wl->wl_word)
rawfileFp = stdout; rawfileFp = stdout;
#ifdef __MINGW32__ #ifdef __MINGW32__
// ask if binary or ASCII, open file with w or wb hvogt 15.3.2000
/* ask if binary or ASCII, open file with w or wb hvogt 15.3.2000 */
else if (ascii) { else if (ascii) {
if(!(rawfileFp = fopen(wl->wl_word, "w"))) { if(!(rawfileFp = fopen(wl->wl_word, "w"))) {
perror(wl->wl_word); perror(wl->wl_word);
@ -241,7 +242,7 @@ dosim(char *what, wordlist *wl)
} }
fprintf(cp_out,"binary raw file\n"); fprintf(cp_out,"binary raw file\n");
} }
//-------------------------------------------------------------------------
/*---------------------------------------------------------------------------*/
#else #else
else if (!(rawfileFp = fopen(wl->wl_word, "w"))) { else if (!(rawfileFp = fopen(wl->wl_word, "w"))) {
setvbuf(rawfileFp, rawfileBuf, _IOFBF, RAWBUF_SIZE); setvbuf(rawfileFp, rawfileBuf, _IOFBF, RAWBUF_SIZE);

9
src/frontend/variable.h

@ -1,3 +1,8 @@
/*
variable.h
$Id$
*/
#ifndef _VARIABLE_H #ifndef _VARIABLE_H
#define _VARIABLE_H #define _VARIABLE_H
@ -44,7 +49,7 @@ extern bool cp_noclobber;
extern bool cp_ignoreeof; extern bool cp_ignoreeof;
extern bool cp_echo; extern bool cp_echo;
// extern struct variable *variables;
/* extern struct variable *variables; */
wordlist * cp_varwl(struct variable *var); wordlist * cp_varwl(struct variable *var);
void cp_vset(char *varname, char type, char *value); void cp_vset(char *varname, char type, char *value);
struct variable * cp_setparse(wordlist *wl); struct variable * cp_setparse(wordlist *wl);
@ -55,4 +60,4 @@ wordlist * vareval(char *string);
void cp_vprint(void); void cp_vprint(void);
#endif
#endif /* _VARIABLE_H */

3
src/maths/misc/test_accuracy.c

@ -1,5 +1,6 @@
/* Paolo Nenzi 2002 - This program tests some machine /* Paolo Nenzi 2002 - This program tests some machine
* dependent variables. * dependent variables.
* $Id$
*/ */
/* Nota: /* Nota:
@ -55,7 +56,7 @@ int main (void)
xhold = xh; xhold = xh;
} }
xh = 0.5 * (xl + xu); xh = 0.5 * (xl + xu);
// if (xhold == xh) break;
/* if (xhold == xh) break; */
} }
printf("xu-xl: %e \t cond: %e \t xh: %e\n", (xu-xl), (2.0 * acc * (xu + xl)), xh); printf("xu-xl: %e \t cond: %e \t xh: %e\n", (xu-xl), (2.0 * acc * (xu + xl)), xh);

12
src/maths/misc/test_erfc.c

@ -1,5 +1,6 @@
/* Paolo Nenzi 2002 - This program tests function /* Paolo Nenzi 2002 - This program tests function
* implementations. * implementations.
* $Id$
*/ */
@ -87,11 +88,12 @@ int main (void)
double x = -100.0; double x = -100.0;
double y1= 0.0, y2 = 0.0; double y1= 0.0, y2 = 0.0;
// _FPU_GETCW(prec);
// prec &= ~_FPU_EXTENDED;
// prec |= _FPU_DOUBLE;
// _FPU_SETCW(prec);
#if 0
_FPU_GETCW(prec);
prec &= ~_FPU_EXTENDED;
prec |= _FPU_DOUBLE;
_FPU_SETCW(prec);
#endif
for (;(x <= 100.0);) for (;(x <= 100.0);)
{ {

3
src/misc/missing_math.c

@ -1,5 +1,6 @@
/********** /**********
Copyright 1991 Regents of the University of California. All rights reserved. Copyright 1991 Regents of the University of California. All rights reserved.
$Id$
**********/ **********/
/* /*
@ -100,7 +101,7 @@ erfc(double x)
#ifndef HAVE_ISNAN #ifndef HAVE_ISNAN
// isnan (originally) for SOI devices in MINGW32 hvogt (dev.c)
/* isnan (originally) for SOI devices in MINGW32 hvogt (dev.c) */
union ieee754_double union ieee754_double
{ {

Loading…
Cancel
Save