lokedhs

(function (doc) {
    return doc.type === 'user_notification' && !doc.read && doc.ping_timestamp != null ? emit(doc.ping_timestamp, [doc.user]) : null;
});

(function (key, values, rereduce) {
    var result = {  };
    for (var value = null, _js_idx1 = 0; _js_idx1 < values.length; _js_idx1 += 1) {
        value = values[_js_idx1];
        for (var uid = null, _js_idx2 = 0; _js_idx2 < value.length; _js_idx2 += 1) {
            uid = value[_js_idx2];

lokedhs

...patience...
...patience...
...found 6910 targets...
...updating 194 targets...
common.mkdir /home/emartenson/src/clasp/build/clasp/Contents/execs
common.mkdir ../../src/main/bin
common.mkdir ../../src/main/bin/clang-linux-linux
common.mkdir /home/emartenson/src/clasp/build/clasp/Contents/execs/boehm
common.mkdir ../../src/main/bin/clang-linux-linux/release
common.mkdir /home/emartenson/src/clasp/build/clasp/Contents/execs/boehm/release

lokedhs

make print-config
make[1]: Entering directory '/home/emartenson/src/clasp'
>> Makefile Configuration:
CLASP_HOME: /home/emartenson/src/clasp
EXTERNALS_CLASP_DIR: /home/emartenson/src/externals-clasp
LLVM_CONFIG: /home/emartenson/src/externals-clasp/build/release/bin/llvm-config
TARGET_OS: Linux
ADDRESS-MODEL: 64
LINK: shared
PJOBS: 16

lokedhs

interface Foo {
    fun bar(): Int
}

class KtTest {
    companion object {
        @JvmStatic
        fun main(args: Array<String>) {
            val result = testFunction(false)
            println("result = $result")

lokedhs

* (ql:quickload "qt")
To load "qt":
  Load 1 ASDF system:
    qt
; Loading "qt"
...........
debugger invoked on a ASDF/BACKWARD-INTERFACE:OPERATION-ERROR in thread
#<THREAD "main thread" RUNNING {1003994653}>:
  OPERATION-ERROR while invoking #<COMPILE-OP > on
  #<CPP->SO "qt" "so" "commonqt">

lokedhs

(defun fib (n)
           (declare (optimize (speed 3) (safety 1))
                    (type (integer 0) n))
           (cond ((<= n 1) 1)
                 (t (+ (fib (- n 1))
                       (fib (- n 2))))))

lokedhs

makefile:60: Could not find llvm-config (debug build) in externals-clasp.
make mps-all
make[1]: Entering directory '/home/emartenson/src/clasp'
make print-config
make[2]: Entering directory '/home/emartenson/src/clasp'
>> Makefile Configuration:
CLASP_HOME: /home/emartenson/src/clasp
EXTERNALS_CLASP_DIR: /home/emartenson/src/externals-clasp
LLVM_CONFIG: /home/emartenson/src/externals-clasp/build/release/bin/llvm-config
TARGET_OS: Linux

lokedhs

(in-package :potato-client-clim)

(defclass channel ()
  ((name :type string
         :initarg :name
         :reader channel/name)))

(clim:define-application-frame potato-frame ()
  ((channels :type list
             :initform (list (make-instance 'channel :name "Foo")

lokedhs

em-desktop$ build/clasp 
Starting Boehm cclasp b'0.4.0-1031-gc2af9df' ... loading image... it takes a few seconds
Top level.
> (ql:quickload "cl-markup")
To load "cl-markup":
  Load 1 ASDF system:
    cl-markup
; Loading "cl-markup"
[package html-encode]
Condition of type: SIMPLE-ERROR

lokedhs

;;; -*- mode: lisp -*-

(eval-when (:compile-toplevel :load-toplevel :execute)
  (unless (find-package "EM-CUSTOM")
    (defpackage :em-custom
      (:use :cl :stumpwm))))

(in-package :em-custom)

(defmacro select-group-or-create ((name &key (float nil)) &body body)