bmaddy

(ns prov.core
  (:require [pallet.core]
            [pallet.utils :as utils]
            [pallet.phase :as phase]
            [pallet.action.package :as package]
            [pallet.compute :as compute]
            [pallet.crate.ssh :as ssh]
            [pallet.crate.automated-admin-user :as automated-admin-user]))

(def service

Gozala

// Lack of tail call optimization in JS
var sum = function(x, y) {
  return y > 0 ? sum(x + 1, y - 1) :
         y < 0 ? sum(x - 1, y + 1) :
         x
}

sum(20, 100000) // => RangeError: Maximum call stack size exceeded

// Using workaround

sritchie

(ns monad-explore.core
  (:use clojure.algo.monads))

(defmacro let?
  "Almost the same as let. If you add the :ensure keyword paired with
  some predicate as a var in the let form, let? will not continue
  unless the predicate evaluates to true. (The predicate will have
  access to all bindings above.)"
  [bindings & body]
  (let [[bind [kwd pred & more]] (split-with (complement #{:ensure}) bindings)]

mmcgrana

(ns http.server
  (:require [vertx.http :as http]))

(def server (http/server))

(defn vertx-start
  []
  (-> server
      (http/on-request
       (fn [req resp]

lynaghk

;;Using the Cassowary constraint solver from ClojureScript
;;This demo shows using multimethods for readable constraint syntax using +, -, and =.
;;Output is a row of circles with random radii spaced so that the space between their boundaries is uniform.

(ns c2.main
  ;;refer-clojure :exclude is currently broken in ClojureScript master
  ;;Ticket open: http://dev.clojure.org/jira/browse/CLJS-114
  ;;Fix applied here: https://github.com/lynaghk/clojurescript/tree/114-refer-clojure-exclude
  (:refer-clojure :exclude [+ - =])
  

tbatchelli

<configuration scan="true" scanPeriod="1 seconds" debug="true">
  <appender name="CONSOLE" class="ch.qos.logback.core.ConsoleAppender">
    <ImmediateFlush>true</ImmediateFlush>
    <!-- deny all events with a level below INFO, that is TRACE and DEBUG -->
    <filter class="ch.qos.logback.classic.filter.ThresholdFilter">
      <level>ERROR</level>
    </filter>
    <encoder>
      <pattern>%d{HH:mm:ss.SSS} %-5level - %msg%n</pattern>
    </encoder>

hugoduncan

(ns pallet.crate.crontab
  "crontab management"
  (:refer-clojure :exclude [alias])
  (:require
   [clojure.tools.logging :as logging]
   [pallet.action.exec-script :as exec-script]
   [pallet.action.file :as file]
   [pallet.action.remote-file :as remote-file]
   [pallet.action.user :as user]
   [pallet.script.lib :as lib]

tsabat

Prereq:

apt-get install zsh
apt-get install git-core

Getting zsh to work in ubuntu is weird, since sh does not understand the source command. So, you do this to install zsh

wget https://github.com/robbyrussell/oh-my-zsh/raw/master/tools/install.sh -O - | zsh

core.cljs

(ns simplebutton.core
    (:require  [goog.dom :as dom]))

;; -------------------------= Debug =-----------------------
(defn debug
  "Output goes to your web browser's console"
  [msg]
  (js/console.log msg))
;(defn debug [_]) ;; switch to this debug to turn off output

sritchie

(defpallet
  :services
  {:virtualbox {:provider "virtualbox"
                :model-path "/Users/sritchie/.vmfest/models"
                :node-path "/Users/sritchie/.vmfest/nodes"
                :default-local-interface "vboxnet0"
                :default-bridged-interface "en1: AirPort"
                :default-network-type :local
                :url "http://localhost:18083"
                :identity ""