[GRAMP][COMMITTED] Consolidate style in module activations
Jose E. Marchesi
jemarch@gnu.org
Fri May 29 19:26:04 GMT 2026
---
libgramp/lg-alphabet.a68 | 3 +--
libgramp/lg-automata.a68 | 3 +--
libgramp/lg-grammar.a68 | 3 +--
libgramp/lg-gramvm.a68 | 3 +--
libgramp/lg-language.a68 | 6 ++++--
libgramp/lg-mgrammar.a68 | 3 +--
libgramp/lg-symbol.a68 | 3 +--
libgramp/lg-vwgrammar.a68 | 3 +--
libgramp/lg-word.a68 | 3 +--
libgramp/libgramp.a68 | 13 ++++++-------
10 files changed, 18 insertions(+), 25 deletions(-)
diff --git a/libgramp/lg-alphabet.a68 b/libgramp/lg-alphabet.a68
index 4599ac7..b020079 100644
--- a/libgramp/lg-alphabet.a68
+++ b/libgramp/lg-alphabet.a68
@@ -16,8 +16,7 @@
along with this program. If not, see
<https://www.gnu.org/licenses/>. }
-module GRAMP_Alphabet =
- access pub GRAMP_Word
+module GRAMP_Alphabet = access pub GRAMP_Word
def
{ An "alphabet" is an ordered set of symbols. Two given symbols
or words can therefore be ordered on the basis of some given
diff --git a/libgramp/lg-automata.a68 b/libgramp/lg-automata.a68
index 603fe9d..cb14393 100644
--- a/libgramp/lg-automata.a68
+++ b/libgramp/lg-automata.a68
@@ -16,8 +16,7 @@
along with this program. If not, see
<https://www.gnu.org/licenses/>. }
-module GRAMP_Automata =
- access GRAMP_Grammar
+module GRAMP_Automata = access GRAMP_Grammar
def
{ An automata is, at any time, in some "state". Each state is
characterized by a number, which must be unique in the automata,
diff --git a/libgramp/lg-grammar.a68 b/libgramp/lg-grammar.a68
index 31df80b..2a9ea33 100644
--- a/libgramp/lg-grammar.a68
+++ b/libgramp/lg-grammar.a68
@@ -16,8 +16,7 @@
along with this program. If not, see
<https://www.gnu.org/licenses/>. }
-module GRAMP_Grammar =
- access Trilean, pub GRAMP_Alphabet
+module GRAMP_Grammar = access Trilean, pub GRAMP_Alphabet
def
{ A Chomsky "grammar" is a G = {E, N, S, P}, where E is the
alphabet of terminals, N is the alphabet of non-terminals, S is
diff --git a/libgramp/lg-gramvm.a68 b/libgramp/lg-gramvm.a68
index 7e6b24b..1b156ef 100644
--- a/libgramp/lg-gramvm.a68
+++ b/libgramp/lg-gramvm.a68
@@ -16,8 +16,7 @@
along with this program. If not, see
<https://www.gnu.org/licenses/>. }
-module GRAMP_GramVM =
- access Utils, GRAMP_Error, GRAMP_Grammar
+module GRAMP_GramVM = access Utils, GRAMP_Error, GRAMP_Grammar
def
{ The GramVM executes the Graml bytecodes. It is a very simple
stack machine.
diff --git a/libgramp/lg-language.a68 b/libgramp/lg-language.a68
index 80ec34c..55daa5e 100644
--- a/libgramp/lg-language.a68
+++ b/libgramp/lg-language.a68
@@ -16,8 +16,10 @@
along with this program. If not, see
<https://www.gnu.org/licenses/>. }
-module GRAMP_Language =
- access Utils, Trilean, GRAMP_Grammar, GRAMP_MGrammar, GRAMP_VWGrammar
+module GRAMP_Language = access Utils, Trilean,
+ GRAMP_Grammar,
+ GRAMP_MGrammar,
+ GRAMP_VWGrammar
def
{ A "language" is a potentially infinite set of words, which are
the statements of the language. If finite, the language is
diff --git a/libgramp/lg-mgrammar.a68 b/libgramp/lg-mgrammar.a68
index 02bcb22..199ac6a 100644
--- a/libgramp/lg-mgrammar.a68
+++ b/libgramp/lg-mgrammar.a68
@@ -16,8 +16,7 @@
along with this program. If not, see
<https://www.gnu.org/licenses/>. }
-module GRAMP_MGrammar =
- access GRAMP_Grammar
+module GRAMP_MGrammar = access GRAMP_Grammar
def
{ A "matrix grammar" is a G = {E, N, S, M}, where E is the
alphabet of terminals, N is the alphabet of non-terminals, S is
diff --git a/libgramp/lg-symbol.a68 b/libgramp/lg-symbol.a68
index 6246a7a..3627ff9 100644
--- a/libgramp/lg-symbol.a68
+++ b/libgramp/lg-symbol.a68
@@ -16,8 +16,7 @@
along with this program. If not, see
<https://www.gnu.org/licenses/>. }
-module GRAMP_Symbol =
- access Utils
+module GRAMP_Symbol = access Utils
def
{ A "symbol" is the most fundamental component of a word. The
only property of a symbol is that it is different to any other
diff --git a/libgramp/lg-vwgrammar.a68 b/libgramp/lg-vwgrammar.a68
index 380756a..cc6e750 100644
--- a/libgramp/lg-vwgrammar.a68
+++ b/libgramp/lg-vwgrammar.a68
@@ -16,8 +16,7 @@
along with this program. If not, see
<https://www.gnu.org/licenses/>. }
-module GRAMP_VWGrammar =
- access GRAMP_Grammar
+module GRAMP_VWGrammar = access GRAMP_Grammar
def
{ A "Van Wijngaarden" grammar, also known as a two-level grammar,
is a VW = {E, N+M, MG, S, P} where E is the alphabet of
diff --git a/libgramp/lg-word.a68 b/libgramp/lg-word.a68
index de1ec01..71e444b 100644
--- a/libgramp/lg-word.a68
+++ b/libgramp/lg-word.a68
@@ -16,8 +16,7 @@
along with this program. If not, see
<https://www.gnu.org/licenses/>. }
-module GRAMP_Word =
- access Utils, pub GRAMP_Symbol
+module GRAMP_Word = access Utils, pub GRAMP_Symbol
def
{ A "word" is a sequence of symbols. An empty word contains no
symbols. Since it is implemented as a name to a multiple, it
diff --git a/libgramp/libgramp.a68 b/libgramp/libgramp.a68
index 92df9b8..207dd6f 100644
--- a/libgramp/libgramp.a68
+++ b/libgramp/libgramp.a68
@@ -16,13 +16,12 @@
along with this program. If not, see
<https://www.gnu.org/licenses/>. }
-module GRAMP =
- access pub GRAMP_Grammar,
- pub GRAMP_MGrammar,
- pub GRAMP_VWGrammar,
- pub GRAMP_Automata,
- pub GRAMP_GramVM,
- pub Trilean
+module GRAMP = access pub GRAMP_Grammar,
+ pub GRAMP_MGrammar,
+ pub GRAMP_VWGrammar,
+ pub GRAMP_Automata,
+ pub GRAMP_GramVM,
+ pub Trilean
def pub string libgramp_version = "1.0";
skip
fed
--
2.39.5
More information about the Algol68
mailing list