Skip to content

Instantly share code, notes, and snippets.

Arne Babenhauserheide ArneBab

Block or report user

Report or block ArneBab

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
ArneBab / geometric-slowdown.txt
Created Nov 8, 2018
Scheme benchmark geometric slowdown evaluation
View geometric-slowdown.txt
Evaluation of the geometric slowdown in the data from
The first number is the geometric mean of the slowdown against the fastest implementation in each test. The first number in parens is the number of successful tests.
1.9881572085609192 (38 / 38) stalin-unknown
2.1500822915753734 (57 / 57) chez-9.5.1-m64
2.738525957787122 (55 / 55) gambitc-v4.9.0
2.7694443820075634 (55 / 55) gerbil-v0.14-DEV
4.205151966183653 (50 / 50) bigloo-4.3a
5.442681840154815 (57 / 57) larceny-1.3
View strikethrough.el
(defun strikethrough (start end)
(interactive "r")
(goto-char (min start end))
(while (< (point) (+ (max start end) (abs (- start end))))
(insert "̶")))
ArneBab / jdee.gradle
Last active Sep 2, 2018 — forked from ivv-private/jdee.gradle
View jdee.gradle
// use by adding
// apply from:'jdee.gradle'
// to build.gradle
def prj = { project ->
"(jdee-project-file-version" (["1.0"])
"(jdee-set-variables" {
"'(jdee-compile-option-directory" ([project.sourceSets.main.output.classesDir])
"'(jdee-junit-working-directory" ([project.projectDir])
View freenet-heap-OOM
Jul 11, 2018 21:27:31:602 (freenet.client.async.SplitFileFetcherSegmentStorage$1, <noname>(5), ERROR): Failed to decode freenet.client.async.SplitFileFetcherSegmentStorage$1@a012067 because of internal error: java.lang.OutOfMemoryError: Java heap space
java.lang.OutOfMemoryError: Java heap space
at freenet.client.async.SplitFileFetcherSegmentStorage.innerDecode(
at freenet.client.async.SplitFileFetcherSegmentStorage.access$000(
at freenet.client.async.SplitFileFetcherSegmentStorage$1.start(
View string-replace.scm
(define* (string-replace-substring s substr replacement #:optional (start 0) (end (string-length s)))
"Replace every instance of substring in s by replacement."
(let ((substr-length (string-length substr)))
(if (zero? substr-length)
(error "string-replace-substring: empty substr")
(let loop
((start start)
(pieces (list (substring s 0 start))))
(let ((idx (string-contains s substr start end)))
(if idx

Keybase proof

I hereby claim:

  • I am ArneBab on github.
  • I am arnebab ( on keybase.
  • I have a public key whose fingerprint is 6B05 41F0 94FF 2163 6FBA 2433 3307 469B FE96 C404

To claim this, I am signing this object:

ArneBab /
Last active Oct 12, 2017 — forked from Smerity/
Go vs GCCGO vs Java vs Python vs PyPy for naive factorisation
import java.math.BigInteger;
class Factors {
public static void main (String [] args)
// 157 bit n = pq with p ~= 78 bits
BigInteger n = new BigInteger("273966616513101251352941655302036077733021013991");
// Set i to be p - 10e6
BigInteger i = new BigInteger("496968652506233112158689");
ArneBab / flymake-java.el
Created Feb 1, 2016 — forked from st63jun/flymake-java.el
Fix flymake+ant problem
View flymake-java.el
;; 素のFlymakeでAntを使うとエラー吐くので,いくつか関数を書き換える必要があるっぽい.
(require 'flymake)
(setq flymake-allowed-file-name-masks
'(("\\.\\(?:c\\(?:pp\\|xx\\|\\+\\+\\)?\\|CC\\)\\'" flymake-simple-make-init)
("\\.xml\\'" flymake-xml-init)
("\\.html?\\'" flymake-xml-init)
("\\.cs\\'" flymake-simple-make-init)
("\\.p[ml]\\'" flymake-perl-init)
ArneBab / .gitignore
Last active Oct 8, 2015 — forked from wedesoft/.gitignore
Python Scheme integration (libguile)
View .gitignore
View .hgsigs
8fb2e1d19eba11e40ffaa70425f1585aeef48fe5 0 iJwEAAEIAAYFAlUPNnMACgkQ3M8NswvBBUixLAP/dujl7lJDpdoR97e52NCmANPaNb3cXCVwoZ96RXyFKXMj4sFp/cN321AoVBcThfHTco2NV02rTRQD9ZzrWIlTC412qezijC8hqBle9w9G1w5JWCIaLUX18vz/MECLj5Y/UQU7mvh8Dd7okfJxvDIYKzw1A6IQxd9hB31SS1xgbbA=
You can’t perform that action at this time.