Browse code

add tcl language support for the hinter (uses tcl hinter instead of C hinter if first line starts with # and has tclsh, wish or expect)

Dario Rodriguez authored on 21/02/2022 19:05:43
Showing 1 changed files
... ...
@@ -3,4 +3,4 @@ name=$(basename $1 | sed 's/\..*$//g' | tr -- '-A-Z' '_a-z')
3 3
 sizename=$( echo SIZE_${name} | tr a-z A-Z )
4 4
 sizeval=$( wc -l "$1" | expand | sed "s/^ *//g" | cut -d ' '  -f 1)
5 5
 ( echo "extern const char *index_${name};" ; echo "extern const char *values_${name};" ; echo "#define $sizename $sizeval" ) > ${name}.h
6
-( echo "const char *index_${name}[]={\"\\" ; cat $1 | cut -d '|'  -f 1 | sed 's/$/\\0\\/g' ; echo "\"};" ; echo "const char *values_${name}={\"\\" ; cat $1 | cut -d '|'  -f 2 | sed 's/$/\\0\\/g' ; echo "\"};" ) > ${name}.c
6
+( echo "const char *index_${name}[]={\"\\" ; cat $1 | cut -d '|'  -f 1 | sed 's/$/\\0\\/g' ; echo "\"};" ; echo "const char *values_${name}={\"\\" ; cat $1 | cut -d '|'  -f 2- | sed 's/$/\\0\\/g' ; echo "\"};" ) > ${name}.c
Browse code

Implement show hint of related prototype (for now only for common C/POSIX functions)

Dario Rodriguez authored on 31/10/2020 21:29:27
Showing 1 changed files
1 1
new file mode 100755
... ...
@@ -0,0 +1,6 @@
1
+#!/bin/bash
2
+name=$(basename $1 | sed 's/\..*$//g' | tr -- '-A-Z' '_a-z')
3
+sizename=$( echo SIZE_${name} | tr a-z A-Z )
4
+sizeval=$( wc -l "$1" | expand | sed "s/^ *//g" | cut -d ' '  -f 1)
5
+( echo "extern const char *index_${name};" ; echo "extern const char *values_${name};" ; echo "#define $sizename $sizeval" ) > ${name}.h
6
+( echo "const char *index_${name}[]={\"\\" ; cat $1 | cut -d '|'  -f 1 | sed 's/$/\\0\\/g' ; echo "\"};" ; echo "const char *values_${name}={\"\\" ; cat $1 | cut -d '|'  -f 2 | sed 's/$/\\0\\/g' ; echo "\"};" ) > ${name}.c