working bash wrapper
This commit is contained in:
parent
79d25d0d73
commit
de1970dbc7
20
icecast-ssl-helper
Executable file
20
icecast-ssl-helper
Executable file
@ -0,0 +1,20 @@
|
|||||||
|
#!/bin/env bash
|
||||||
|
|
||||||
|
## guile_installed () {
|
||||||
|
## if $(which guile)
|
||||||
|
## then
|
||||||
|
## GUILE_BIN="guile"
|
||||||
|
## elif $(which guile3.0)
|
||||||
|
## then
|
||||||
|
## GUILE_BIN="guile3.0"
|
||||||
|
## else
|
||||||
|
## which apt && sudo apt install guile-3.0 || echo -e "\nERROR: apt Package Manager not found.\n\
|
||||||
|
## This script only supports Debian-based Linux Distributions which use the apt package manager, like Raspbian OS." && exit 127
|
||||||
|
## fi
|
||||||
|
## }
|
||||||
|
|
||||||
|
## guile_installed
|
||||||
|
|
||||||
|
GUILE_BIN="guile3.0"
|
||||||
|
|
||||||
|
$GUILE_BIN -s icecast-ssl-helper.scm
|
8
icecast-ssl-helper.scm
Normal file
8
icecast-ssl-helper.scm
Normal file
@ -0,0 +1,8 @@
|
|||||||
|
(use-modules (ssh session))
|
||||||
|
|
||||||
|
(display "Hello there.\n")
|
||||||
|
|
||||||
|
(define (myproc x y)
|
||||||
|
(string-append "x is " x "\nand y is " y "\n"))
|
||||||
|
|
||||||
|
(values (myproc "7" "9"))
|
Loading…
Reference in New Issue
Block a user