aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/symbols-extract.tes
diff options
context:
space:
mode:
Diffstat (limited to 'src/symbols-extract.tes')
-rwxr-xr-xsrc/symbols-extract.tes30
1 files changed, 17 insertions, 13 deletions
diff --git a/src/symbols-extract.tes b/src/symbols-extract.tes
index e81331a..a88731d 100755
--- a/src/symbols-extract.tes
+++ b/src/symbols-extract.tes
@@ -1,18 +1,24 @@
#!/usr/local/bin/sciteco -m
-! ./symbols-extract.tes <input file> <output file> <prefix pattern list> <array name> !
+!*
+ * ./symbols-extract.tes [-p <prefix pattern list>] -n <SymbolList object> [--] \
+ * <output file> <input header>
+ *!
+:EMQ[$SCITECOPATH]/getopt.tes
EMQ[$SCITECOPATH]/string.tes
-! read commandline arguments !
-LR 0X#in 2LR 0X#ou 2LR 0X#pa 2LR 0X#na HK
+!* read commandline arguments *!
+[getopt.p]
+[optstring]p:n: M[getopt]"F (0/0) '
+LR 0X#ou 2LR 0X#in HK
-! copy all defines in input file beginning with prefix !
-EBQ#in <S#defineS[Q#pa]; -SS :Xa> EF
+!* copy all defines in input file beginning with prefix *!
+EBN#in <S#defineS[Q[getopt.p]]; -SS :Xa> EF
-! sort all defines !
+!* sort all defines *!
Ga ZJB 0,.M[qsort] J
-! format as C/C++ array !
+!* format as C/C++ array *!
I/*
* AUTOGENERATED FROM Q#in
* DO NOT EDIT
@@ -29,20 +35,18 @@ I/*
namespace SciTECO {
-static const SymbolList::Entry entries[] = {
-
+static const SymbolList::Entry entries[] = {^J
<
.,W.Xa 0KK
I#ifdef Qa^J^I{"Qa", Qa},^J#endif^J
.-Z;>
I};
-SymbolList Symbols::Q#na(entries, G_N_ELEMENTS(entries));
+SymbolList Symbols::Q[getopt.n](entries, G_N_ELEMENTS(entries));
-} /* namespace SciTECO */
-
+} /* namespace SciTECO */^J
-! write output file !
+!* write output file *!
EWQ#ou
EX