diff --git a/icecast-ssl-helper b/icecast-ssl-helper new file mode 100755 index 0000000..60dfeae --- /dev/null +++ b/icecast-ssl-helper @@ -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 diff --git a/icecast-ssl-helper.scm b/icecast-ssl-helper.scm new file mode 100644 index 0000000..412b542 --- /dev/null +++ b/icecast-ssl-helper.scm @@ -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"))