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
(def- opener "<?janet") | |
(def- closer "?>") | |
(def- file ~{:main (some (+ :code :text)) | |
:text '(to (+ ,opener -1)) | |
:code (/ :code* ,parse-all) | |
:code* (* ,opener '(to ,closer) ,closer)}) | |
(defn template-string | |
[s] | |
(def out @"") |
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
package collect | |
// Set represents a generic set of comparable elements. | |
type Set[T comparable] map[T]struct{} | |
// Has checks whether the set holds a given value. | |
func (s Set[T]) Has(v T) bool { | |
_, ok := s[v] | |
return ok | |
} |
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
#!/bin/sh | |
# this file is licensed under any of the following SPDX licenses | |
# to be chosen by the user: | |
# * 0BSD (https://spdx.org/licenses/0BSD.html) | |
# * BlueOak-1.0.0 (https://blueoakcouncil.org/license/1.0.0) | |
# * CC0-1.0 (https://creativecommons.org/publicdomain/zero/1.0/) | |
# * Unlicense (https://unlicense.org/) | |
## log.sh - Bunker Log | |
# This is the bunker logging system for POSIX sh. |
OlderNewer