Browse Source

Add a build target to compile the 'core' package

ep1
Sameer Rahmani 11 months ago
parent
commit
bc72fe47a4
  1. 20
      build.el

20
build.el

@ -1,4 +1,4 @@ @@ -1,4 +1,4 @@
:;exec emacs --no-site-file --no-site-lisp --batch -L ./ -l "$0" -f main "$(cd "$(dirname "$0")/." >/dev/null 2>&1 ; pwd -P)" "$@"
:;exec `echo $EMACS` --no-site-file --no-site-lisp --batch -L ./ -l "$0" -f main "$(cd "$(dirname "$0")/." >/dev/null 2>&1 ; pwd -P)" "$@"
;;; Buid --- The builder for FG42 -*- lexical-binding: t; -*-
;;
;; Copyright (c) 2010-2021 Sameer Rahmani & Contributors
@ -29,8 +29,10 @@ @@ -29,8 +29,10 @@
(setq debug-on-error t)
(defconst fg42/CORE_DIR (concat (getenv "HOME") "/.fg42/core"))
(setq user-emacs-directory (concat (getenv "HOME") "/.fg42/emacs.d"))
(add-to-list 'load-path (concat (getenv "HOME") "/.fg42/core"))
(add-to-list 'load-path fg42/CORE_DIR)
(require 'fg42/build/core)
@ -98,6 +100,20 @@ PARAMS: @@ -98,6 +100,20 @@ PARAMS:
(do-command
(require 'fg42/build/docs)
(fg42/build-docs build-dir)))
((string= command "compile")
(do-command
(native-compile-async fg42/CORE_DIR 'recursively)
(native-compile-async "~/.fg42.v3.el")
(print "Compiling FG42 files ...")
(while (or comp-files-queue
(> (comp-async-runnings) 0))
(print ".")
(sleep-for 1))
(message "Done")))
(t (print-help command)))))
(provide 'build)

Loading…
Cancel
Save