From: simonm <unknown>
Date: Thu, 19 Feb 1998 13:55:52 +0000 (+0000)
Subject: [project @ 1998-02-19 13:55:52 by simonm]
X-Git-Tag: Approx_2487_patches~948
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=484b89a513a69f49f21d20b457e8ed6d0e0ba1bb;p=ghc-hetmet.git

[project @ 1998-02-19 13:55:52 by simonm]
header file for ByteOps.c.
---

diff --git a/ghc/lib/misc/cbits/ByteOps.h b/ghc/lib/misc/cbits/ByteOps.h
new file mode 100644
index 0000000..df76013
--- /dev/null
+++ b/ghc/lib/misc/cbits/ByteOps.h
@@ -0,0 +1,18 @@
+#ifndef BYTEOPS_H
+#define BYTEOPS_H
+
+/* "Native" support */
+/* sigh again: without these some (notably "float") willnae work */
+I_ long2bytes__	  PROTO((long,	unsigned char *));
+I_ int2bytes__	  PROTO((int,	unsigned char *));
+I_ short2bytes__  PROTO((short,	unsigned char *));
+I_ float2bytes__  PROTO((float,	unsigned char *));
+I_ double2bytes__ PROTO((double, unsigned char *));
+
+I_ bytes2long__	  PROTO((P_, I_ *));
+I_ bytes2int__	  PROTO((P_, I_ *));
+I_ bytes2short__  PROTO((P_, I_ *));
+I_ bytes2float__  PROTO((P_, StgFloat *));
+I_ bytes2double__ PROTO((P_, StgDouble *));
+
+#endif