From f7198b170e541be099ff111b9b2c841da9a3b923 Mon Sep 17 00:00:00 2001
From: Alex Gartrell <alexgartrell@gmail.com>
Date: Sun, 17 Apr 2011 20:08:15 -0400
Subject: [PATCH] return :INVALID for bad numbers in load-int

---
 src/tnetstrings/core.clj | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/tnetstrings/core.clj b/src/tnetstrings/core.clj
index d8b6e08..abdf843 100644
--- a/src/tnetstrings/core.clj
+++ b/src/tnetstrings/core.clj
@@ -31,7 +31,9 @@
   data)
 
 (defn- load-int [data]
-  (Integer. data))
+  (try
+    (Integer. data)
+    (catch java.lang.NumberFormatException e :INVALID)))
 
 (defn- load-bool [data]
   (cond (= data "true") true