-
Notifications
You must be signed in to change notification settings - Fork 13
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
Added src/deventry.scm, a script that greatly speeds up Black Hole de…
…velopment
- Loading branch information
Showing
2 changed files
with
42 additions
and
0 deletions.
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,28 @@ | ||
;; This is a script that I use when I am working on the Black Hole | ||
;; code base: Compiling the bh executable takes *loong* time, plus | ||
;; it's much nicer to debug interpreted code. This is a way to open up | ||
;; a Black Hole REPL with the Black Hole code interpreted. | ||
;; | ||
;; It is also possible to use this script to run Black Hole in | ||
;; compiled mode, simply by compiling this file with `gsc deventry` | ||
;; | ||
;; To actually use it: | ||
;; | ||
;; 1. Put a symlink named bsc in your path that points to the gsc | ||
;; binary | ||
;; | ||
;; 2. Set the BLACKHOLE_PATH environment variable to where your Black | ||
;; Hole directory is. | ||
;; | ||
;; 3. Add the following code to ~/.gambcini: | ||
;; | ||
;; (let ((blackhole-path (getenv "BLACKHOLE_PATH"))) | ||
;; (and (equal? (path-strip-directory (car (command-line))) "bsc") | ||
;; (load (path-expand "src/deventry" blackhole-path)) | ||
;; (begin | ||
;; (println "Loaded Black Hole.")))) | ||
;; | ||
;; 4. Fire up the Black Hole REPL with the terminal command `bsc` | ||
|
||
(##include "blackhole.scm") | ||
(apply-hooks!) |