diff options
| author | Rich Hickey <richhickey@gmail.com> | 2008-12-11 14:28:00 +0000 |
|---|---|---|
| committer | Rich Hickey <richhickey@gmail.com> | 2008-12-11 14:28:00 +0000 |
| commit | c5e8c6f06292fab26d29cb951d8400394e0f8258 (patch) | |
| tree | bca2cef66acef4a4ef2b36433bcb884bfcddea48 /src/jvm/clojure | |
| parent | d49f0d32473d8387696049b8b10b8403d86e05e4 (diff) | |
added if-not, memoize, and io!
io! blocks will throw exceptions when run in transactions
made await and await-for use io!
Diffstat (limited to 'src/jvm/clojure')
| -rw-r--r-- | src/jvm/clojure/lang/LockingTransaction.java | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/jvm/clojure/lang/LockingTransaction.java b/src/jvm/clojure/lang/LockingTransaction.java index b71cf784..9ef38f1e 100644 --- a/src/jvm/clojure/lang/LockingTransaction.java +++ b/src/jvm/clojure/lang/LockingTransaction.java @@ -181,6 +181,10 @@ static LockingTransaction getEx(){ return t; } +static public boolean isRunning(){ + return getRunning() != null; +} + static LockingTransaction getRunning(){ LockingTransaction t = transaction.get(); if(t == null || t.info == null) |