#!/bin/bash

# If this file has already been sourced, just return
test $(VARIABLES_ATOM_SH+true) && return
declare -g VARIABLES_ATOM_SH=true

source ${BASH_SOURCE%/*}/common.sh
source ${BASH_SOURCE%/*}/variables.sh

variable::type::define Nil
variable::type::define Identifier
variable::type::define Atom
variable::type::define Boolean Atom
variable::type::define String Atom
variable::type::define Number Atom
variable::type::define Integer Number
variable::type::define Real Number


proc variable::Atom::toSexp {
    variable::value $(1)
    setglobal RESULT = $(RESULT)
}

proc variable::Identifier::toSexp {
    variable::value $(1)
    setglobal RESULT = $(RESULT)
}

proc variable::Nil::toSexp {
    setglobal RESULT = '"Nil'"
}