std/std_types.c

   1 /*
   2     std_init.c - MaLa standard module initialization table
   3
   4   Copyright (C) 2005, Christian Thaeter <chth@gmx.net>
   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_types[] =
  28   {
  29     MALA_PARSER_TYPE("WORD", "Just any word"),
  30     MALA_PARSER_TYPE("MACRO", "Any Action which will expand to one or more words"),
  31
  32     MALA_PARSER_TYPE("ACTION", "Name of an action"),
  33     MALA_PARSER_TYPE("SEQUENCE", "a Mala program sequence"),
  34     MALA_PARSER_TYPE("WORD-OR-BLOCK","Single word or block delimited by --BEGIN and --END"),
  35     MALA_PARSER_TYPE("DEFINED-ACTION","Name of an already defined action"),
  36     MALA_PARSER_TYPE("VOID","nothing"),
  37     MALA_PARSER_TYPE("TYPE","Some Datatype"),
  38
  39     MALA_PARSER_TYPE("BLOCK","TODO"),
  40
  41     MALA_PARSER_TYPE("WORDS","a sequence of words"),
  42     MALA_PARSER_TYPE("END","--END"),
  43
  44     MALA_PARSER_TYPE("ERROR","Will raise an error"),
  45
  46     MALA_PARSER_TYPE("FILE-EXISTING","File which already exists"),
  47     MALA_PARSER_TYPE("FILE-NEW","File which does not exist"),
  48     MALA_PARSER_TYPE("FILE","Some File"),
  49
  50     MALA_PARSER_TYPE("DIR-EXISTING","Directory wich already exists"),
  51     MALA_PARSER_TYPE("DIR-NEW","Directory which does not exist"),
  52     MALA_PARSER_TYPE("DIR","Directory"),
  53
  54     MALA_PARSER_TYPE("INTEGER","an integer Number"),
  55     MALA_PARSER_TYPE("STRING","a String"),
  56
  57     MALA_ACTIONS_END
  58   };
  59
  60 int
  61 mala_module_std_types_init (MalaEngine self)
  62 {
  63   return mala_engine_actions_register (self, std_types);
  64 }
  65
  66 /*
  67 // Local Variables:
  68 // mode: C
  69 // c-file-style: "gnu"
  70 // End:
  71 // arch-tag: 0069b6ab-8173-4cb0-98d3-92c621bdeac5
  72 // end_of_file
  73 */