|
9
|
1
|
{{{header(infra, |
|
|
2
|
Richard Westhaver, |
|
|
3
|
ellis@rwest.io, |
|
|
4
|
The Compiler Company Infrastructure)}}} |
|
|
5
|
#+EXPORT_FILE_NAME: index |
|
|
6
|
|
|
|
7
|
This project contains scripts, utils, and applications used to |
|
|
8
|
host and maintain The Compiler Company infrastructure. |
|
12
|
9
|
|
|
15
|
10
|
* Quickstart |
|
|
11
|
- Dependencies |
|
|
12
|
- Mercurial |
|
|
13
|
- Make |
|
12
|
14
|
#+begin_src shell |
|
15
|
15
|
sudo pacman -Sy make mercurial |
|
|
16
|
# make quick |
|
|
17
|
# make install |
|
|
18
|
#+end_src |
|
|
19
|
* Scripts |
|
|
20
|
** [[file:scripts/eval.sh][eval.sh]] |
|
|
21
|
Eval a lisp script using SBCL. |
|
|
22
|
** [[file:scripts/check.lisp][check.lisp]] |
|
|
23
|
Check the host for compatibility. |
|
|
24
|
#+begin_src shell :results pp replace :exports both |
|
|
25
|
./scripts/eval.sh ./scripts/check.lisp |
|
12
|
26
|
#+end_src |
|
15
|
27
|
|
|
|
28
|
#+RESULTS: |
|
|
29
|
#+begin_example |
|
|
30
|
|
|
|
31
|
#HOST-FEATURES{ |
|
|
32
|
(lisp . (SBCL 2.3.8 |
|
|
33
|
(CL-PPCRE NAMED-READTABLES ASDF3.3 ASDF3.2 ASDF3.1 ASDF3 ASDF2 ASDF |
|
|
34
|
OS-UNIX NON-BASE-CHARS-EXIST-P ASDF-UNICODE ARENA-ALLOCATOR X86-64 |
|
|
35
|
GENCGC 64-BIT ANSI-CL COMMON-LISP ELF IEEE-FLOATING-POINT LINUX |
|
|
36
|
LITTLE-ENDIAN PACKAGE-LOCAL-NICKNAMES SB-CORE-COMPRESSION SB-LDB |
|
|
37
|
SB-PACKAGE-LOCKS SB-THREAD SB-UNICODE SBCL UNIX))) |
|
|
38
|
(shell . /home/ellis/dev/comp/infra) |
|
|
39
|
(rocksdb . librocksdb.so) |
|
|
40
|
(uring . liburing.so) |
|
|
41
|
(btrfs . libbtrfs.so) |
|
|
42
|
(btrfsutil . libbtrfsutil.so) |
|
|
43
|
(tree-sitter . libtree-sitter.so) |
|
|
44
|
(gtk-4 . libgtk-4.so) |
|
|
45
|
(blake3 . libblake3.so) |
|
|
46
|
(k . libk.so) |
|
|
47
|
(cbqn . libcbqn.so)} |
|
|
48
|
#+end_example |
|
|
49
|
** [[file:scripts/autogen.lisp][autogen.lisp]] |
|
|
50
|
** get-* |
|
|
51
|
Pull and build dependencies. |
|
|
52
|
** [[file:scripts/git-vendor-pull.sh][git-vendor-pull.sh]] |
|
|
53
|
Pull an upstream vendored repository from Git and push it to our |
|
|
54
|
private mirror. |
|
|
55
|
|
|
|
56
|
#+begin_src shell :noeval t :exports code |
|
|
57
|
scripts/git-vendor-pull.sh git.savannah.gnu.org/git emacs master |
|
|
58
|
#+end_src |
|
|
59
|
** [[file:scripts/bundle-dir.sh][bundle-dir.sh]] |
|
|
60
|
Bundle a local directory of source-code repos. |
