#! /usr/bin/bash

compile-elisp () {
    local fun=$1
    local f=$2
    emacs      \
        -q     \
        -batch \
        --eval '(push (file-name-concat ".")                                       load-path)' \
        --eval '(push (file-name-concat user-emacs-directory "emacs-init" "ll")    load-path)' \
        --eval '(push (file-name-concat user-emacs-directory "emacs-init" "gnus")  load-path)' \
        --eval '(push (file-name-concat user-emacs-directory "emacs-init" "progs") load-path)' \
        -f $fun $f 2>&1 | grep -v "Loading\|older"
}

export -f compile-elisp

parallel rm {} ::: *.elc
parallel compile-elisp batch-byte-compile   {} ::: *.el
parallel compile-elisp batch-byte-compile   {} ::: *.el
parallel compile-elisp batch-native-compile {} ::: *.el