changeset 5: |
6538a100c792 |
parent 4: |
55e56793d888 |
child 6: |
f747ffac7f40 |
author: |
Richard Westhaver <ellis@rwest.io> |
date: |
Sun, 18 Aug 2024 22:16:12 -0400 |
files: |
babel.org business.org glossary.org ulang.org |
description: |
weekend warrior |
1.1--- a/babel.org Thu Aug 15 21:48:42 2024 -0400
1.2+++ b/babel.org Sun Aug 18 22:16:12 2024 -0400
1.3@@ -3,10 +3,15 @@
1.4 #+description: Core Library of Babel
1.5 #+setupfile: ../clean.theme
1.6 #+property: header-args :exports both
1.7-Welcome to the Core [[https://www.gnu.org/software/emacs/manual/html_node/org/Library-of-Babel.html][Library of Babel]]. This file contains a
1.8-collection of code blocks used throughout our Org documents.
1.9+Welcome to the CC [[https://www.gnu.org/software/emacs/manual/html_node/org/Library-of-Babel.html][Library of Babel]]. This file contains a collection of
1.10+code blocks which may be used by authors throughout our public
1.11+documentation.
1.12
1.13-To load the library use ~C-c C-v i~.
1.14+This library depends on the [[vc:comp/core][core]] being properly installed and the
1.15+=core/emacs= init system loaded in emacs. See [[vc:comp/home][home]] for details.
1.16+
1.17+To load the library itself use ~C-c C-v i~ while visiting this file in
1.18+an org-mode buffer or =org-babel-lob-ingest= from elisp.
1.19
1.20 * systemd-list-units :os:
1.21 :PROPERTIES:
1.22@@ -40,7 +45,7 @@
1.23 :ID: 670e9855-f8d2-43eb-86af-3ef7292f90b9
1.24 :END:
1.25 #+name: tokei-dir-lines
1.26-#+begin_src shell :var src=(org-sbe org-current-h1-title) :results output replace
1.27+#+begin_src shell :var src="" :results output replace
1.28 cd ~/comp/$src
1.29 input=`tokei -C -o json`
1.30 echo $input | jq -r '.["Total"] | .code, .comments, .blanks'
1.31@@ -51,7 +56,7 @@
1.32 :ID: ff9682f0-bb64-427f-a87d-e0c655f9fdc9
1.33 :END:
1.34 #+name: tokei-dir-langs
1.35-#+begin_src shell :var src=(org-sbe org-current-h1-title) :results output replace
1.36+#+begin_src shell :var src="org" :results output replace
1.37 cd ~/comp/$src
1.38 input=`tokei -C -o json`
1.39 echo $input | jq -r '.["Total"].children | keys[]'
1.40@@ -138,15 +143,15 @@
1.41 :END:
1.42 #+name: make-info-tbl
1.43 #+header: :var version="0.1.0"
1.44-#+header: :var name=(org-sbe org-current-h1-title)
1.45+#+header: :var name="org"
1.46 #+header: :var dir="/home/ellis/comp/"
1.47 #+begin_src emacs-lisp :results table replace
1.48 (let* ((src (concat dir name))
1.49- (age (org-sbe "hg-log-age" ''(dir src)))
1.50- (rev (org-sbe "hg-rev" ''(dir src)))
1.51- (num (org-sbe "hg-id-num" ''(dir src)))
1.52- (cc1 (org-sbe "tokei-dir-lines" ''((dir src))))
1.53- (cc2 (org-sbe "tokei-dir-langs" ''((dir src))))
1.54+ (age (org-sbe "hg-log-age" ''(src name)))
1.55+ (rev (org-sbe "hg-rev" ''(src name)))
1.56+ (num (org-sbe "hg-id-num" ''(src name)))
1.57+ (cc1 (org-sbe "tokei-dir-lines" ''(src name)))
1.58+ (cc2 (org-sbe "tokei-dir-langs" ''(src name)))
1.59 (nf (format "[[comp:docs/%s][%s]]" name name))
1.60 (rf (format "[[vc:comp/%s][%s:%s]]" name num rev))
1.61 ;; (gf (format "[[https://github.com/richardwesthaver/%s][github]]" name))
1.62@@ -169,9 +174,9 @@
1.63 |---------+----------------------------|
1.64 | name | [[https://compiler.company/docs/org][org]] |
1.65 | version | 0.1.0 |
1.66- | vc | [[https://vc.compiler.company/comp/org][41+:0f4d1a0415d5]] |
1.67- | updated | 3 hours ago |
1.68- | lines | 13143 = λ:12268 #:46 _:829 |
1.69+ | vc | [[https://vc.compiler.company/comp/org][44+:2b6f731f3684]] |
1.70+ | updated | nil |
1.71+ | lines | 14812 = λ:13917 #:45 _:850 |
1.72 | langs | (Html Org Svg) |
1.73 |---------+----------------------------|
1.74
1.75@@ -180,7 +185,7 @@
1.76 :ID: e2ff9dcf-8340-48b8-a1a6-e0036cbcc495
1.77 :END:
1.78 #+name: ls-files
1.79-#+begin_src sh :results silent :var dir=(expand-file-name "~/comp") name=(org-sbe org-current-h1-title)
1.80+#+begin_src sh :results silent :var dir=(expand-file-name "~/comp") name="org"
1.81 ls -lh $dir/$name --time-style=long-iso \
1.82 |awk '{if (NR!=1) print $8, $5, $6"-"$7}' \
1.83 |awk 'BEGIN{print "file size updated"}{print $0}'
1.84@@ -191,6 +196,29 @@
1.85 return tab
1.86 #+end_src
1.87
1.88+* env-table :os:
1.89+:PROPERTIES:
1.90+:ID: 4c824478-0eaa-49b9-905f-2c9a6d4220eb
1.91+:END:
1.92+#+begin_src sh :results table replace
1.93+ for i in $(env);
1.94+ do
1.95+ echo "$i|" | sed '0,/=/s//|/'
1.96+ done
1.97+#+end_src
1.98+
1.99+* get-env :os:
1.100+:PROPERTIES:
1.101+:ID: 8c1ecc68-ca25-4e72-81d8-415a43e59ae4
1.102+:END:
1.103+#+name: get-env
1.104+#+begin_src elisp :results output :var key="HOME"
1.105+(princ (getenv key))
1.106+#+end_src
1.107+
1.108+#+RESULTS: get-env
1.109+: /home/ellis
1.110+
1.111 * org-current-h1-title :org:
1.112 :PROPERTIES:
1.113 :ID: ae61e7ed-c9ed-414c-8a5f-12b1702f018e
1.114@@ -201,7 +229,7 @@
1.115 #+end_src
1.116
1.117 #+RESULTS: org-current-h1-title
1.118-: org
1.119+: org-current-h1-title
1.120
1.121 * get-emacs-version :emacs:
1.122 :PROPERTIES:
1.123@@ -218,19 +246,19 @@
1.124 :ID: 8119cf43-f2e7-4829-939c-fc4e8531ae6c
1.125 :END:
1.126 #+name: hg-rev
1.127-#+begin_src sh :var src=(org-sbe org-current-h1-title)
1.128+#+begin_src sh :var src="org"
1.129 cd ~/comp/$src && hg log -l 1 --template '{node|short}'
1.130 #+end_src
1.131
1.132 #+RESULTS: hg-rev
1.133-: 4de12ceca1c7
1.134+: 2b6f731f3684
1.135
1.136 * hg-id-num :vc:
1.137 :PROPERTIES:
1.138 :ID: 9602faee-5522-445b-a568-be603e20a978
1.139 :END:
1.140 #+name: hg-id-num
1.141-#+begin_src shell :var src=(org-sbe org-current-h1-title)
1.142+#+begin_src shell :var src="org"
1.143 cd ~/comp/$src && hg id -n
1.144 #+end_src
1.145
1.146@@ -242,12 +270,11 @@
1.147 :ID: 8492f4fb-51a6-4221-8705-a15eb5a50ed4
1.148 :END:
1.149 #+name: hg-log-age
1.150-#+begin_src shell :var src=(org-sbe org-current-h1-title)
1.151+#+begin_src shell :var src="."
1.152 cd ~/comp/$src && hg log -l1 --template "{date|age}"
1.153 #+end_src
1.154
1.155 #+RESULTS: hg-log-age
1.156-: 4 days ago
1.157
1.158 * sh-ob-tangle :org:
1.159 :PROPERTIES:
1.160@@ -289,6 +316,9 @@
1.161 }
1.162 #+end_src
1.163
1.164+#+RESULTS: gen-dot-tree
1.165+[[file:/tmp/tree.png]]
1.166+
1.167 * user-slime :lisp:
1.168 :PROPERTIES:
1.169 :ID: 9ffd1d10-ffad-486e-9d7d-82422342b9ff
1.170@@ -326,7 +356,7 @@
1.171
1.172 find "$dir/.." -name Cargo.toml -execdir cargo update \;
1.173 #+end_src
1.174-** rust-target-triple
1.175+* rust-target-triple :rust:
1.176 :PROPERTIES:
1.177 :ID: 02f96ff2-c607-4889-979c-943203b8ad65
1.178 :END:
2.1--- a/business.org Thu Aug 15 21:48:42 2024 -0400
2.2+++ b/business.org Sun Aug 18 22:16:12 2024 -0400
2.3@@ -2,7 +2,7 @@
2.4 #+author: Richard Westhaver
2.5 #+email: ellis@rwest.io
2.6 #+description: The Compiler Company Business Model
2.7-#+setupfile: ../../clean.theme
2.8+#+setupfile: ../clean.theme
2.9 #+glossary_sources: glossary.org
2.10 In short, this document describes the business aspects of The Compiler
2.11 Company LLC. We are designed to be small, fast, and agile. We
3.1--- a/glossary.org Thu Aug 15 21:48:42 2024 -0400
3.2+++ b/glossary.org Sun Aug 18 22:16:12 2024 -0400
3.3@@ -37,3 +37,4 @@
3.4 - TAOMOP :: The Art Of The Meta Object Protocol
3.5 - PCL :: Practical Common Lisp
3.6 - LOL :: Let Over Lambda
3.7+- LOB :: Library of Babel
4.1--- a/ulang.org Thu Aug 15 21:48:42 2024 -0400
4.2+++ b/ulang.org Sun Aug 18 22:16:12 2024 -0400
4.3@@ -71,9 +71,21 @@
4.4 Our *U-Language* is colloquially termed *ulang*. Each section of this
4.5 document describes a feature or property of our ulang.
4.6 ** Glossary
4.7+:PROPERTIES:
4.8+:ID: cf237775-6e69-4554-999d-7c9cc4445f77
4.9+:END:
4.10 *** Terms
4.11+:PROPERTIES:
4.12+:ID: e808e546-65fb-4470-a21f-27eb9a7b50ee
4.13+:END:
4.14 *** Acronyms
4.15+:PROPERTIES:
4.16+:ID: c04c4524-a3d6-495d-98be-8ca291c5db08
4.17+:END:
4.18 ** Dictionary
4.19+:PROPERTIES:
4.20+:ID: 689826b6-0df4-4f0e-944a-b96fa4f8599e
4.21+:END:
4.22 compiler.company:2628
4.23 ** Emphasis
4.24 :PROPERTIES: