Initial revision
This commit is contained in:
11
mach/proto/fp/zrf4.c
Normal file
11
mach/proto/fp/zrf4.c
Normal file
@@ -0,0 +1,11 @@
|
||||
/*
|
||||
return a zero float
|
||||
*/
|
||||
|
||||
#include "FP_types.h"
|
||||
|
||||
zrf4(l)
|
||||
long *l;
|
||||
{
|
||||
*l = 0L;
|
||||
}
|
||||
Reference in New Issue
Block a user