Daniel Gregoire semperos

## gist:1430706
OSProcess thisOSProcess environment

## weighted_rand.clj
(ns weighted-rand
  (:import clojure.lang.PersistentQueue))

(defprotocol Rand
  (nextr [_ rng]))

;; Vose's alias method
;; http://www.keithschwarz.com/darts-dice-coins/

(deftype Vose [n ^ints alias ^doubles prob]

## css-parser.md

      
              1 file
            
          
              9 forks
            
          
              0 comments
            
          
              91 stars
            
          
                kachayev
                / css-parser.md
            
            
              Last active
              November 12, 2022 04:20
            
              
                Parsing CSS file with monadic parser in Clojure
              
          
    Parsing CSS file with monadic parser in Clojure

Inspired by "Parsing CSS with Parsec".
Just quick notes and code that you can play with in REPL.
By @kachayev
0. Intro


## entity-changes.clj
(require '[datomic.api :as d])

(defn entity-changes
  "Return transaction history for an entity and its components.
  Returns a sequence of maps, each is the transaction map (tx metadata) plus a
  key `:entity-changes`, which is a nested map of keys: entity id, attribute
  ident, `:db/add` or `:db/retract`, and the value added or retracted, e.g.:
      {12345678910 {:long-card-1-attr          {:db/retract 1
                                                :db/add     0}
                    :long-card-many-attr       {:db/add     #{0}}

## rich-already-answered-that.md

      
              1 file
            
          
              33 forks
            
          
              10 comments
            
          
              541 stars
            
          
                reborg
                / rich-already-answered-that.md
            
            
              Last active
              July 3, 2024 06:35
            
              
                A curated collection of answers that Rich gave throughout the history of Clojure
              
          
    Rich Already Answered That!

A list of commonly asked questions, design decisions, reasons why Clojure is the way it is as they were answered directly by Rich (even when from many years ago, those answers are pretty much valid today!).
Feel free to point friends and colleagues here next time they ask (again). Answers are pasted verbatim (I've made small adjustments for readibility, but never changed a sentence) from mailing lists, articles, chats.
How to use:

The link in the table of content jumps at the copy of the answer on this page.
The link on the answer itself points back at the original post.

Table of Content


## core.clj
(ns typehint.core)

;; A little type hint hint...

(set! *warn-on-reflection* true)

;; There are two ways to type hint the return value of a function, but one is
;; (technically) wrong:

(defn ^String as-string0

## ANSI.md

      
              1 file
            
          
              405 forks
            
          
              117 comments
            
          
              3082 stars
            
          
                fnky
                / ANSI.md
            
            
              Last active
              July 3, 2024 11:00
            
              
                ANSI Escape Codes
              
          
    ANSI Escape Sequences

Standard escape codes are prefixed with Escape:

Ctrl-Key: ^[
Octal: \033
Unicode: \u001b
Hexadecimal: \x1B
Decimal: 27


## idb-backup-and-restore.md

      
              2 files
            
          
              15 forks
            
          
              25 comments
            
          
              72 stars
            
          
                loilo
                / idb-backup-and-restore.md
            
            
              Last active
              June 5, 2024 14:40
            
              
                Back up and restore an IndexedDB database
              
          
    Back up and restore an IndexedDB database

This gist is an ES module which provides functions to import and export data from an IndexedDB database as JSON. It's based on Justin Emery's indexeddb-export-import package, but applies some adjustments that reflect better on the current browser landscape (i.e. better developer ergonomics but no support for Internet Explorer).
Usage

For each of the provided functionalities, you need a connected IDBDatabase instance.
Export Data

import { idb } from 'some-database'

  
## programming-as-theory-building.md

      
              1 file
            
          
              31 forks
            
          
              3 comments
            
          
              308 stars
            
          
                onlurking
                / programming-as-theory-building.md
            
            
              Last active
              June 5, 2024 04:46
            
              
                Programming as Theory Building - Peter Naur
              
          
    Programming as Theory Building

Peter Naur


Peter Naur's classic 1985 essay "Programming as Theory Building" argues that
a program is not its source code. A program is a shared mental
construct (he uses the word theory) that lives in the minds of the people who
work on it. If you lose the people, you lose the program. The code is merely a
written representation of the program, and it's lossy, so you can't reconstruct


## index.html
<!DOCTYPE html>
<html lang="en">
<head>
    <meta charset="utf-8" />
    <meta name="viewport" content="width=device-width, initial-scale=1" />
    <title>*scratch*</title>
    <style>
        body {
            font-family: Hack, Menlo, Monaco, 'Droid Sans Mono', 'Courier New', monospace;
            white-space: pre;
	(ns weighted-rand
	(:import clojure.lang.PersistentQueue))

	(defprotocol Rand
	(nextr [_ rng]))

	;; Vose's alias method
	;; http://www.keithschwarz.com/darts-dice-coins/

	(deftype Vose [n ^ints alias ^doubles prob]
	(require '[datomic.api :as d])

	(defn entity-changes
	"Return transaction history for an entity and its components.
	Returns a sequence of maps, each is the transaction map (tx metadata) plus a
	key `:entity-changes`, which is a nested map of keys: entity id, attribute
	ident, `:db/add` or `:db/retract`, and the value added or retracted, e.g.:
	{12345678910 {:long-card-1-attr {:db/retract 1
	:db/add 0}
	:long-card-many-attr {:db/add #{0}}
	(ns typehint.core)

	;; A little type hint hint...

	(set! warn-on-reflection true)

	;; There are two ways to type hint the return value of a function, but one is
	;; (technically) wrong:

	(defn ^String as-string0
	<!DOCTYPE html>
	<html lang="en">
	<head>
	<meta charset="utf-8" />
	<meta name="viewport" content="width=device-width, initial-scale=1" />
	<title>scratch</title>
	<style>
	body {
	font-family: Hack, Menlo, Monaco, 'Droid Sans Mono', 'Courier New', monospace;
	white-space: pre;