view lib/interp @ 12227:9cb638b68832 draft

<oerjan> t sled lib/interp//6iecho $ARGFILE
author HackEso <hackeso@esolangs.org>
date Wed, 04 Dec 2019 04:28:21 +0000
parents 7b17fe055014
children 6cb5704166cb
line wrap: on
line source

#!/bin/sh

export I_CMD="$0"
export I_ARG="$1"
export ARG_FILE="/tmp/input.$$"
echo $ARGFILE

get_arg() {
    #if expr "$I_ARG" : "http://" > /dev/null
    #then
    #    wget $WGET_OPTIONS "$I_ARG" -O "$ARG_FILE"
    #else
        printf '%s' "$I_ARG" > "$ARG_FILE"
    #fi
}

clean_arg() {
    rm -f "$ARG_FILE"
}

interp_stdin() {
    get_arg
    $1 < "$ARG_FILE" 2>&1
    clean_arg
}

interp_file() {
    get_arg
    $1 "$ARG_FILE" 2>&1
    clean_arg
}

interp_stdin_java() {
    get_arg
    cd $1
    java $2 < "$ARG_FILE" 2>&1
    clean_arg
}

interp_file_java() {
    get_arg
    cd $1
    java $2 "$ARG_FILE" 2>&1
    clean_arg
}