Commit 1e0c6eb2 authored by Bruno Guillaume's avatar Bruno Guillaume
Browse files

Remove unused code (deprecated GUI)

parent fe7ec3a0
......@@ -5,7 +5,7 @@ DATADIR=$(PREFIX)/share/libgrew/
OCB_FLAGS = -use-ocamlfind -use-menhir -I src
OCB = ocamlbuild $(OCB_FLAGS)
LIB_FILES = libgrew.cma libgrew.cmxa libgrew.a libgrew.cmi libgrew_types.cmi libgrew.cmx libgrew.cmxs
LIB_FILES = libgrew.cma libgrew.cmxa libgrew.a libgrew.cmi libgrew.cmx libgrew.cmxs
INSTALL_FILES = $(LIB_FILES:%=_build/src/%)
VERSION = `cat VERSION`
......
......@@ -4,7 +4,6 @@ digraph grew {
grew_base [label="grew_base|String_set\nString_map\nInt_set\nInt_map\nLoc\nError\nString_\nFile\nArray_\nList_\nMassoc_make()\nId\nTimeout\nGlobal"]
grew_types [label="grew_types|Pid\nPid_set\nPid_map\nGid\nGid_map\nMassoc_gid\nMassoc_pid\nMassoc_string\nLexicon\nLexicons"]
grew_ast [label="grew_ast|Ast"]
grew_domain [label="grew_domain|Label_domain\nFeature_domain\nDomain"]
grew_loader [label="grew_loader|Loader\nParser"]
grew_fs [label="grew_fs|Feature_value\nG_fs\nP_fs|[P_feature]\n[G_feature]"]
grew_edge [label="grew_edge|G_edge\nLabel_cst\nP_edge"]
......@@ -15,21 +14,19 @@ digraph grew {
grew_grs [label="grew_grs|Grs"]
grew_corpus [label="grew_corpus|Corpus\nCorpus_desc"]
grew_domain -> grew_types -> grew_ast -> grew_base
grew_edge -> grew_domain
grew_fs -> grew_domain
grew_types -> grew_ast -> grew_base
grew_edge -> grew_types
grew_fs -> grew_types
grew_command -> grew_edge
grew_command -> grew_fs
grew_node -> grew_edge
grew_node -> grew_fs
grew_graph -> grew_node
grew_graph -> grew_command
libgrew_types -> grew_graph
grew_rule -> libgrew_types
grew_rule -> grew_command
grew_rule -> grew_graph
grew_grs -> grew_rule
grew_grs -> grew_loader -> grew_lexer -> grew_parser -> grew_ast
grew_grs -> grew_loader -> grew_lexer -> grew_parser -> grew_types
grew_corpus -> grew_grs
libgrew -> grew_corpus
libgrew -> libgrew_types [style=dotted]
}
\ No newline at end of file
(**********************************************************************************)
(* Libcaml-grew - a Graph Rewriting library dedicated to NLP applications *)
(* *)
(* Copyright 2011-2021 Inria, Université de Lorraine *)
(* *)
(* Webpage: https://grew.fr *)
(* License: CeCILL (see LICENSE folder or "http://cecill.info/") *)
(* Authors: see AUTHORS file *)
(**********************************************************************************)
open Grew_graph
type step_name = string
type rule_app = {
rule_name: string;
up: G_deco.t;
down: G_deco.t;
}
type big_step = {
first: rule_app;
small_step: (G_graph.t * rule_app) list;
}
let swap bs = {bs with small_step = List.rev bs.small_step}
(**********************************************************************************)
(* Libcaml-grew - a Graph Rewriting library dedicated to NLP applications *)
(* *)
(* Copyright 2011-2021 Inria, Université de Lorraine *)
(* *)
(* Webpage: https://grew.fr *)
(* License: CeCILL (see LICENSE folder or "http://cecill.info/") *)
(* Authors: see AUTHORS file *)
(**********************************************************************************)
(** {2 Types fo grew} *)
open Grew_graph
type step_name = string
type rule_app = {
rule_name: string;
up: G_deco.t;
down: G_deco.t;
}
type big_step = {
first: rule_app;
small_step: (G_graph.t * rule_app) list;
}
val swap : big_step -> big_step
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment