zentrope

var activity: NSBackgroundActivityScheduler?

func runActivity() {
    activity = NSBackgroundActivityScheduler(identifier: "lkasjdlaksjdaslkjd")
    activity?.repeats = true
    activity?.interval = 15
    activity?.schedule { completion in
                        
        // This doesn't make sense: defer should be periodically checked in
        // the middle of a long job.

zentrope

func xmlDocument(url: String) -> Document? {
    var doc: Document?
    let semaphore = DispatchSemaphore(value: 0)

    AF.request(url).response { response in
        if let data = response.data, let xml = String(data: data, encoding: .utf8) {
            do {
                doc = try SwiftSoup.parse(xml, "", Parser.xmlParser())
            } catch {
                print("error: \(error.localizedDescription)")

zentrope

    override func loadView() {

        let view = NSView(frame: .zero)
        view.addSubview(vfxView)
        view.addSubview(webView)

        vfxView.translatesAutoresizingMaskIntoConstraints = false

        webView.configuration.preferences.javaScriptEnabled = true
        webView.setValue(false, forKey: "drawsBackground")

zentrope

var frustum = new THREE.Frustum();
var cameraViewProjectionMatrix = new THREE.Matrix4();

// every time the camera or objects change position (or every frame)

camera.updateMatrixWorld(); // make sure the camera matrix is updated
camera.matrixWorldInverse.getInverse( camera.matrixWorld );
cameraViewProjectionMatrix.multiplyMatrices( camera.projectionMatrix, camera.matrixWorldInverse );
frustum.setFromMatrix( cameraViewProjectionMatrix );

zentrope

// convert a byte into a list of ones and zeros

def bits(num: Int): List[Int] = (for (i <- Range(0,8)) yield (((num << i) & 0xff) >>> 7)).toList

// given a list, take the first N bits

def next(bits: List[Int], numBits: Int) = {

  val filler = List[Int](8 - numBits) map (_ => 0)
  val bitList = filler ++ bits.take(numBits)

zentrope

//
//  AppDelegate.swift
//

import Cocoa

@NSApplicationMain
class AppDelegate: NSObject, NSApplicationDelegate {

    private var preferencesWindow = NSWindowController()

zentrope

private func setMode(_ isDark: Bool) {
    let mode = isDark ? "add" : "remove"
    let script = "document.body.classList.\(mode)(\"dark\");"

    webView.evaluateJavaScript(script) { result, error in
        if let err = error {
            os_log("%{public}s", log: logger, type: .error, "js error: \(err).")
        }
    }
}

zentrope

Build emacs on macOS

Build from scratch because most of the packages you use have updated to the nearly-completed next version, so why not pull that?

An alternative is to use home brew HEAD, but this is more fun.

Xcode

Probably should have Xcode installed, but at least try:

zentrope

// Import the magic libraries

import scala.xml._
import scala.xml.transform._

// Source xml. In Scala, xml is literal.

val xml = 
  <user>
    <email>joe@example.com</email>

zentrope

(ns ls.core
  (:gen-class)
  (:refer-clojure :exclude [==])
  (:require [clojure.core.logic :refer :all]
            [clojure.core.logic.pldb :refer :all]))

;;-----------------------------------------------------------------------------
;; Interesting Links
;;
;; http://michaelrbernste.in/2013/05/12/featurec-and-maps.html