kolwynia/utils.scm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

;;; Copyright © 2025 bdunahu <bdunahu@operationnull.com>
(define-module (kolwynia utils)
  #:export (garmr?
            hel?))

;;; Commentary:
;;; provides various utility functions
;;; Code:

(define garmr?
  (equal? (gethostname) "garmr"))

(define hel?
  (equal? (gethostname) "hel"))

;;; utils.scm ends here