From 279831cd5663f49afc0f72634e6e022b45cb9877 Mon Sep 17 00:00:00 2001
From: "Charles.Forsyth" <devnull@localhost>
Date: Wed, 30 Jan 2008 09:43:09 +0000
Subject: 20080130-0949

---
 appl/lib/json.b | 1 +
 appl/lib/ubfa.b | 1 +
 2 files changed, 2 insertions(+)

(limited to 'appl/lib')

diff --git a/appl/lib/json.b b/appl/lib/json.b
index 3e86fa4c..09947a7d 100644
--- a/appl/lib/json.b
+++ b/appl/lib/json.b
@@ -534,6 +534,7 @@ JValue.get(v: self ref JValue, mem: string): ref JValue
 		for(l := r.mem; l != nil; l = tl l)
 			if((hd l).t0 == mem)
 				return (hd l).t1;
+		return nil;
 	* =>
 		return nil;
 	}
diff --git a/appl/lib/ubfa.b b/appl/lib/ubfa.b
index bfbf21ca..8de0a8f3 100644
--- a/appl/lib/ubfa.b
+++ b/appl/lib/ubfa.b
@@ -349,6 +349,7 @@ UValue.eq(o: self ref UValue, v: ref UValue): int
 		Int =>
 			return r.value == s.value;
 		}
+		return 0;
 	Tuple =>
 		pick s := v {
 		Tuple =>
-- 
cgit v1.2.3