na-ka-na

import java.sql.Connection;
import java.sql.DriverManager;
import java.sql.PreparedStatement;
import java.sql.ResultSet;
import java.sql.SQLException;
import java.sql.Statement;
import java.util.concurrent.Callable;
import java.util.concurrent.ExecutorService;
import java.util.concurrent.Executors;
import java.util.concurrent.Future;

na-ka-na

(ns tt)

(defn deduct-money-from-accnt
  [a1-ref a2-ref {:keys [ensure1 ensure2]}]
  (dosync
    (when ensure1 (ensure a1-ref))
    (when ensure2 (ensure a2-ref))
    (let [sum (- (+ @a1-ref @a2-ref) 200)]
      (when (>= sum 0)

na-ka-na

(dotimes [_ 10] 
  (let [a (ref -100)
        f1 (future (dosync (println "Trying T1") 
                     (if (= @a 10) 
                       (ref-set a @a)
                       (do (Thread/sleep 4000)
                           (println "Done T1")))))
        _ (Thread/sleep 1000)
        f2 (future (dosync (println "Trying T2") 
                     (ref-set a 15)))]

na-ka-na

(defn with-login-check
  [handler]
  (fn [request]
    (if (logged-in? request)
     (handler request)
     {:status 403
      :headers {"Content-Type" "text/xml"}
      :body "<forbidden/>"})))

(defn create-routes []

na-ka-na

(ns a)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(defn clj-mk-ref
  [data]
  (ref {:version 0
        :data data}))

(defn clj-sync-write

na-ka-na

/*
 * expression_evaluator.cpp
 *
 *  Created on: Mar 13, 2011
 *      Author: ka
 */

#define BOOST_SPIRIT_QI_DEBUG

#include <boost/config/warning_disable.hpp>

na-ka-na

import java.lang.reflect.InvocationTargetException;
import java.lang.reflect.Method;

class AProp implements Comparable<AProp>{
	private final int a;
	public AProp(int a){
		this.a = a;
	}
	@Override
	public int compareTo(AProp other) {

na-ka-na

(defn- print-map [m print-one w]
  (#'clojure.core/print-sequential 
   "{"
   (fn [e  ^java.io.Writer w] 
     (do (print-one (key e) w) (.append w " ") (print-one (val e) w)))
   ", "
   "}"
   (seq m) w))

na-ka-na

package com.mxgraph.examples.swing;

import javax.swing.JFrame;

import com.mxgraph.layout.mxGraphLayout;
import com.mxgraph.layout.mxOrganicLayout;
import com.mxgraph.swing.mxGraphComponent;
import com.mxgraph.view.mxGraph;

@SuppressWarnings("serial")

na-ka-na

import java.util.Random;
import java.util.concurrent.*;
import lombok.Memoize;

public class MemoizeTest {

    @Memoize
    public static int test(final int k){
        System.out.println("test " + k);
        return k+2;