C++ (Cpp) unit_chk示例

示例#1

文件： ftell_.c 项目： timburrow/ovj3

fseek_(integer *Unit, integer *offset, integer *whence)
#endif
{
	FILE *f;
	return	!(f = unit_chk(*Unit, "fseek"))
		|| fseek(f, *offset, (int)*whence) ? 1 : 0;
	}

示例#2

文件： nrnunit.c 项目： bhache/pkg-neuron

nrn_unit_chk() {
	Item *q;
	
	unit_chk("v", "millivolt");
	unit_chk("t", "ms");
	unit_chk("dt", "ms");
	unit_chk("celsius", "degC");
	unit_chk("diam", "micron");
	unit_chk("area", "micron2");

	ITERATE(q, current) {
		if (point_process) {
			unit_chk(SYM(q)->name, "nanoamp");
		}else{
			unit_chk(SYM(q)->name, "milliamp/cm2");
		}
	}
	ITERATE(q, concen) {
		unit_chk(SYM(q)->name, "milli/liter");
	}

示例#3

文件： ftell_.c 项目： Sciumo/f2c

int fseek_(integer *Unit, integer *offset, integer *whence)
{
	FILE *f;
	int w = (int)*whence;
#ifdef SEEK_SET
	static int wohin[3] = { SEEK_SET, SEEK_CUR, SEEK_END };
#endif
	if (w < 0 || w > 2)
		w = 0;
#ifdef SEEK_SET
	w = wohin[w];
#endif
	return	!(f = unit_chk(*Unit, "fseek"))
		|| fseek(f, *offset, w) ? 1 : 0;
}

示例#4

文件： ftell_.c 项目： aosm/gcc3

G77_fseek_0 (integer *Unit, integer *offset, integer *xwhence)
#endif
{
	FILE *f;
	int w = (int)*xwhence;
#ifdef SEEK_SET
	static int wohin[3] = { SEEK_SET, SEEK_CUR, SEEK_END };
#endif
	if (w < 0 || w > 2)
		w = 0;
#ifdef SEEK_SET
	w = wohin[w];
#endif
	return	!(f = unit_chk(*Unit, "fseek"))
		|| FSEEK(f, (off_t) *offset, w) ? 1 : 0;
	}

示例#5

文件： ftell_.c 项目： Sciumo/f2c

integer ftell_(integer *Unit)
{
	FILE *f;
	return (f = unit_chk(*Unit, "ftell")) ? ftell(f) : -1L;
}

示例#6

文件： ftell_.c 项目： aosm/gcc3

G77_ftell_0 (integer *Unit)
#endif
{
	FILE *f;
	return (f = unit_chk(*Unit, "ftell")) ? (integer) FTELL(f) : -1L;
	}

示例#7

文件： nrnunit.c 项目： bhache/pkg-neuron

	ITERATE(q, potential) {
		unit_chk(SYM(q)->name, "millivolt");
	}