std/std_init.c

   1 /*
   2     std_init.c - MaLa standard module initialization table
   3
   4   Copyright (C) 2005, 2006, Christian Thaeter <ct@pipapo.org>
   5
   6   This program is free software; you can redistribute it and/or modify
   7   it under the terms of the GNU General Public License version 2 as
   8   published by the Free Software Foundation.
   9
  10   This program is distributed in the hope that it will be useful,
  11   but WITHOUT ANY WARRANTY; without even the implied warranty of
  12   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13   GNU General Public License for more details.
  14
  15   You should have received a copy of the GNU General Public License
  16   along with this program; if not, contact me.
  17
  18 */
  19 \f
  20 #include <stdio.h>
  21 #include <string.h>
  22
  23 #include "mala.h"
  24 #include "std.h"
  25
  26 static
  27 mala_actioninit std_actions[] =
  28   {
  29     /*
  30     MALA_PARSER("--", mala__parser, NULL, NULL, NULL),
  31     MALA_PARSER_BRIEF("--", ""),
  32     MALA_PARSER_HELP("--", ("TODO")),
  33     MALA_PARSER_SIGNATURE_TYPE("--", ("")),
  34     MALA_PARSER_SIGNATURE_USAGE("--", ("")),
  35     MALA_PARSER_RESULT_TYPE("--", ("")),
  36     MALA_PARSER_RESULT_USAGE("--", ("")),
  37
  38
  39     MALA_PARSER("--CHILDOF", mala__parser, NULL, NULL, NULL),
  40     MALA_PARSER_BRIEF("--", ""),
  41     MALA_PARSER_HELP("--", ("TODO")),
  42     MALA_PARSER_SIGNATURE_TYPE("--", ("")),
  43     MALA_PARSER_SIGNATURE_USAGE("--", ("")),
  44     MALA_PARSER_RESULT_TYPE("--", ("")),
  45     MALA_PARSER_RESULT_USAGE("--", ("")),
  46
  47     MALA_PARSER("--FOREACH-WORD", mala_foreach_word_parser, NULL, NULL, NULL),
  48     MALA_PARSER_BRIEF("--", ""),
  49     MALA_PARSER_HELP("--", ("TODO")),
  50     MALA_PARSER_SIGNATURE_TYPE("--", ("")),
  51     MALA_PARSER_SIGNATURE_USAGE("--", ("")),
  52     MALA_PARSER_RESULT_TYPE("--", ("")),
  53     MALA_PARSER_RESULT_USAGE("--", ("")),
  54     */
  55
  56     //MALA_SUBSTITUTE_PARSER("--MALA-VERSION","MaLa 0.2 ("__DATE__" "__TIME__")"),
  57     //MALA_PARSER_BRIEF("--MALA-VERSION", "Holds the version"),
  58
  59     //MALA_SUBSTITUTE_PARSER("--DEFAULT-PARSER","--LITERAL"),
  60     //MALA_PARSER_BRIEF("--DEFAULT-PARSER", "is used for any word which has no associated action"),
  61     // MALA_PARSER_HELP("--DEFAULT-PARSER", ("TODO")),
  62     // MALA_PARSER_SIGNATURE_TYPE("--", ("")),
  63     // MALA_PARSER_SIGNATURE_USAGE("--", ("")),
  64     // MALA_PARSER_RESULT_TYPE("--", ("")),
  65     // MALA_PARSER_RESULT_USAGE("--", ("")),
  66
  67     //MALA_TRUE_PARSER("--FLAG-NUMSPLIT-EXPANSION"),
  68     // MALA_PARSER_BRIEF("--FLAG-NUMSPLIT-EXPANSION", "TODO"),
  69     // MALA_PARSER_HELP("--FLAG-NUMSPLIT-EXPANSION", ("TODO")),
  70
  71     //MALA_TRUE_PARSER("--FLAG-LITERAL-EXPANSION"),
  72     //MALA_PARSER_BRIEF("--FLAG-LITERAL-EXPANSION",
  73     //                  "words beginning with a single backquote will be "
  74     //                  "preprocessed as '--LITERAL' 'theword'"),
  75     // MALA_PARSER_HELP("--FLAG-LITERAL-EXPANSION", ("TODO")),
  76
  77     //MALA_TRUE_PARSER("--FLAG-EXCLAM-EXPANSION"),
  78     //MALA_PARSER_BRIEF("--FLAG-EXCLAM-EXPANSION",
  79     //                  "a single ! will be preprocessed as --NOT"),
  80     // MALA_PARSER_HELP("--FLAG-EXCLAM-EXPANSION", ("TODO")),
  81
  82     //MALA_TRUE_PARSER("--FLAG-NO-EXPANSION"),
  83     // MALA_PARSER_BRIEF("--", ""),
  84     // MALA_PARSER_HELP("--", ("TODO")),
  85
  86     //MALA_TRUE_PARSER("--FLAG-ASSIGN-EXPANSION"),
  87     // MALA_PARSER_BRIEF("--", ""),
  88     // MALA_PARSER_HELP("--", ("TODO")),
  89
  90     //MALA_TRUE_PARSER("--FLAG-ENVVAR-EXPANSION"),
  91     // MALA_PARSER_BRIEF("--", ""),
  92     // MALA_PARSER_HELP("--", ("TODO")),
  93
  94     //MALA_TRUE_PARSER("--FLAG-CHAR-EXPANSION"),
  95     // MALA_PARSER_BRIEF("--", ""),
  96     // MALA_PARSER_HELP("--", ("TODO")),
  97
  98     //MALA_TRUE_PARSER("--FLAG-UNDERSCORE-EXPANSION"),
  99     // MALA_PARSER_BRIEF("--", ""),
 100     // MALA_PARSER_HELP("--", ("TODO")),
 101
 102     //MALA_TRUE_PARSER("--FLAG-SETENV-EXPANSION"),
 103     // MALA_PARSER_BRIEF("--", ""),
 104     // MALA_PARSER_HELP("--", ("TODO")),
 105
 106     //MALA_TRUE_PARSER("--FLAG-BRACKET-EXPANSION"),
 107     // MALA_PARSER_BRIEF("--", ""),
 108     // MALA_PARSER_HELP("--", ("TODO")),
 109
 110     //MALA_TRUE_PARSER("--FLAG-ASSIGN-CONTRACTION"),
 111     // MALA_PARSER_BRIEF("--", ""),
 112     // MALA_PARSER_HELP("--", ("TODO")),
 113
 114
 115
 116     // TODO remove this
 117     //MALA_EXPAND_PARSER("TESTLIST",("TEST","LIST")),
 118
 119
 120     MALA_ACTIONS_END
 121   };
 122
 123 int
 124 mala_module_std_init (MalaEngine self)
 125 {
 126   (void)(       // prevent 'warning: value computed is not used'
 127     mala_engine_actions_register (self, std_actions) == MALA_SUCCESS &&
 128     mala_module_std_io_init (self) == MALA_SUCCESS &&
 129     mala_module_std_strings_init (self) == MALA_SUCCESS &&
 130     mala_module_std_statements_init (self) == MALA_SUCCESS &&
 131     mala_module_std_macros_init (self) == MALA_SUCCESS
 132     );
 133
 134   return mala_engine_state_get (self);
 135 }
 136
 137 /*
 138 // Local Variables:
 139 // mode: C
 140 // c-file-style: "gnu"
 141 // End:
 142 // arch-tag: e6d43941-2533-4f28-863e-2dd3128e58bb
 143 // end_of_file
 144 */