Retropikzel
/
compile-r7rs
1
0
Fork 0
Code Issues

Take the target option out of manpage and bash completion as it is not ready yet

This commit is contained in:
retropikzel 2025-11-07 20:27:36 +02:00
parent ff74ac9359
commit 41b4276caf
2 changed files with 36 additions and 33 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
bash_completion.sh
View File

@ -6,26 +6,26 @@ _compile_scheme()
prev="${COMP_WORDS[COMP_CWORD-1]}"
shortopts="-A -I"
longopts="--list-r6rs --list-r7rs --list-all --help --version"
targets="unix windows php"
targets="unix" # windows php"
outputfound=false
for i in "${COMP_WORDS[@]}"; do
if [[ "$i" == "-o" ]] ; then
outputfound=true
fi
done
targetfound=false
for i in "${COMP_WORDS[@]}"; do
if [[ "$i" == "-t" ]] ; then
targetfound=true
fi
#targetfound=false
#for i in "${COMP_WORDS[@]}"; do
#if [[ "$i" == "-t" ]] ; then
#targetfound=true
#fi
done
if [[ "$outputfound" == "false" ]]; then
shortopts="${shortopts} -o"
fi
if [[ "$targetfound" == "false" ]]; then
shortopts="${shortopts} -t"
fi
#if [[ "$targetfound" == "false" ]]; then
#shortopts="${shortopts} -t"
#fi
opts="${shortopts} ${longopts}"
@ -38,15 +38,15 @@ _compile_scheme()
elif [[ ${prev} == -A ]] ; then
COMPREPLY=()
return 0
elif [[ ${prev} == -t ]] ; then
COMPREPLY=( $(compgen -W "${targets}" -- ${cur}) )
return 0
#elif [[ ${prev} == -t ]] ; then
#COMPREPLY=( $(compgen -W "${targets}" -- ${cur}) )
#return 0
elif [[ ${cur} == -o ]] ; then
COMPREPLY=("")
return 0
elif [[ ${cur} == -t ]] ; then
COMPREPLY=("")
return 0
#elif [[ ${cur} == -t ]] ; then
#COMPREPLY=("")
#return 0
elif [[ ${prev} == *.sps ]] ; then
COMPREPLY=( $(compgen -W "${shortopts}" -- ${cur}) )
return 0

39
doc/compile-scheme.1
View File

@ -3,9 +3,11 @@
compile-scheme \- Compiling Scheme programs to executables
.SH SYNOPSIS
.P
\fBcompile-scheme\fR [\fB-A\fR \fIpath\fR] [\fB-I\fR \fIpath\fR] [\fB-o\fR \fIpath\fR] [\fB-t\fR \fItarget\fR] \fIinput-file.sps\fR
\fBcompile-scheme\fR [\fB-A\fR \fIpath\fR] [\fB-I\fR \fIpath\fR] [\fB-o\fR \fIpath\fR] \fIinput-file.sps\fR
\#\fBcompile-scheme\fR [\fB-A\fR \fIpath\fR] [\fB-I\fR \fIpath\fR] [\fB-o\fR \fIpath\fR] [\fB-t\fR \fItarget\fR] \fIinput-file.sps\fR
.P
\fBcompile-scheme\fR [\fB-A\fR \fIpath\fR] [\fB-I\fR \fIpath\fR] [\fB-o\fR \fIpath\fR] [\fB-t\fR \fItarget\fR] \fIinput-file.scm\fR
\fBcompile-scheme\fR [\fB-A\fR \fIpath\fR] [\fB-I\fR \fIpath\fR] [\fB-o\fR \fIpath\fR] \fIinput-file.scm\fR
\#\fBcompile-scheme\fR [\fB-A\fR \fIpath\fR] [\fB-I\fR \fIpath\fR] [\fB-o\fR \fIpath\fR] [\fB-t\fR \fItarget\fR] \fIinput-file.scm\fR
.P
\fBcompile-scheme\fR \fIlong-option\fR
.SH DESCRIPTION
@ -41,19 +43,20 @@ Prepend directory to the list of directories that are searched in order to locat
Use the \fIoutput-file\fR file, instead of the default deducted from input-file, for the executable file produced.
.P
Multiple instances of the -A, and -I options can be specified.
.P
\fB\-t\fR { \fIunix\fR | \fIwindows\fR | \fIphp\fR }
Set the compilation target.
This is not needed if you are compiling for the target OS you are running.
Cross compilation is only supported in following cases:
.IP
From \fIunix\fR host to \fIwindows\fR target when chosen implementation is interpreter.
.IP
From \fIwindows\fR host to \fIunix\fR target when chosen implementation is interpreter.
.IP
From \fIunix\fR host to \fIphp\fR target when chosen implementation is interpreter.
.IP
From \fIwindows\fR host to \fIphp\fR target when chosen implementation is interpreter.
\#.P
\#\fB\-t\fR { \fIunix\fR | \fIwindows\fR | \fIphp\fR }
\#\fB\-t\fR \fIunix\fR
\#Set the compilation target.
\#This is not needed if you are compiling for the target OS you are running.
\#Cross compilation is only supported in following cases:
\#.IP
\#From \fIunix\fR host to \fIwindows\fR target when chosen implementation is interpreter.
\#.IP
\#From \fIwindows\fR host to \fIunix\fR target when chosen implementation is interpreter.
\#.IP
\#From \fIunix\fR host to \fIphp\fR target when chosen implementation is interpreter.
\#.IP
\#From \fIwindows\fR host to \fIphp\fR target when chosen implementation is interpreter.
.P
.B \-\-list-r6rs
List supported R6RS implementations.
@ -63,9 +66,9 @@ List supported R7RS implementations.
.P
.B \-\-list-all
List all supported implementations.
.P
\fB\-\-list-targets\fR
List all supported compilation targets.
\#.P
\#\fB\-\-list-targets\fR
\#List all supported compilation targets.
.P
\fB\-\-version\fR
Show the software version.