ack subdir for combined ack/gcc library build

This commit is contained in:
Ben Gras
2005-10-10 15:27:47 +00:00
parent 04822e9cc9
commit 8c53e4007e
322 changed files with 17865 additions and 0 deletions

28
lib/ack/float/cff8.fc Executable file
View File

@@ -0,0 +1,28 @@
/*
(c) copyright 1988 by the Vrije Universiteit, Amsterdam, The Netherlands.
See the copyright notice in the ACK home directory, in the file "Copyright".
*/
/* $Header$ */
/*
CONVERT SINGLE TO DOUBLE (CFF 4 8)
This routine works quite simply. A floating point
of size 04 is converted to extended format.
This extended variable is converted back to
a floating point of size 08.
*/
#include "FP_types.h"
void
cff8(src)
SINGLE src;
{
EXTEND buf;
extend(&src,&buf,sizeof(SINGLE)); /* no matter what */
compact(&buf, &src,sizeof(DOUBLE));
}