From dd38d0d1dda2be42bf280aeca110542f2f2fef1b Mon Sep 17 00:00:00 2001
From: Calvin <calvin@EESI>
Date: Tue, 28 May 2013 10:47:11 -0400
Subject: removed files

---
 src/nbc/binary.sml | 26 --------------------------
 1 file changed, 26 deletions(-)
 delete mode 100644 src/nbc/binary.sml

(limited to 'src/nbc/binary.sml')

diff --git a/src/nbc/binary.sml b/src/nbc/binary.sml
deleted file mode 100644
index af5acd5..0000000
--- a/src/nbc/binary.sml
+++ /dev/null
@@ -1,26 +0,0 @@
-signature BINARY = sig
-	val fromInt32: int -> Word8Vector.vector
-	val fromInt16: int -> Word8Vector.vector
-	val fromReal: real -> Word8Vector.vector
-end
-
-structure Binary :> BINARY = struct
-	val word8VectorFromArray = Word8ArraySlice.vector o Word8ArraySlice.full
-	fun fromInt32 i =
-		let
-			val array = Word8Array.array (PackWord32Little.bytesPerElem, 0w0)
-			val word = LargeWord.fromInt i
-		in
-			PackWord32Little.update (array, 0, word)
-			; word8VectorFromArray array
-		end
-	fun fromInt16 i =
-		let
-			val array = Word8Array.array (PackWord16Little.bytesPerElem, 0w0)
-			val word = LargeWord.fromInt i
-		in
-			PackWord16Little.update (array, 0, word)
-			; word8VectorFromArray array
-		end
-	val fromReal = PackRealLittle.toBytes
-end
-- 
cgit v1.2.3