From 905814760584d843409763d9f3c24b73b0780444 Mon Sep 17 00:00:00 2001
From: Pixel <>
Date: Mon, 2 Apr 2001 09:49:50 +0000
Subject: Assembleur

---
 include/assembler.h |  1 +
 lib/assembler.c     |  6 +++++
 po/ProjetArchi.pot  | 17 ++++++++++---
 po/cat-id-tbl.c     | 70 +++++++++++++++++++++++++++--------------------------
 src/compilo.c       |  3 +++
 5 files changed, 60 insertions(+), 37 deletions(-)

diff --git a/include/assembler.h b/include/assembler.h
index 0213f15..c68f499 100644
--- a/include/assembler.h
+++ b/include/assembler.h
@@ -3,5 +3,6 @@
 
 int assembler_init(void);
 void assembler_flush(void);
+void asm_eol(void);
 
 #endif
diff --git a/lib/assembler.c b/lib/assembler.c
index 3fd358c..28bd714 100644
--- a/lib/assembler.c
+++ b/lib/assembler.c
@@ -7,14 +7,20 @@
 
 
 void push_pile(char * a) {
+	fprintf(stderr, "Push_pile(\"%s\")\n", a);
 }
 
 void act_pile(int o) {
+	fprintf(stderr, "Act_pile(%i)\n", o);
 }
 
 int assembler_init(void) {
 	return 0;
 }
 
+void asm_eol(void) {
+	fprintf(stderr, "End of line\n");
+}
+
 void assembler_flush(void) {
 }
diff --git a/po/ProjetArchi.pot b/po/ProjetArchi.pot
index 9f909a4..29f9689 100644
--- a/po/ProjetArchi.pot
+++ b/po/ProjetArchi.pot
@@ -6,7 +6,7 @@
 msgid ""
 msgstr ""
 "Project-Id-Version: PACKAGE VERSION\n"
-"POT-Creation-Date: 2001-04-02 02:48+0200\n"
+"POT-Creation-Date: 2001-04-02 03:11+0200\n"
 "PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n"
 "Last-Translator: FULL NAME <EMAIL@ADDRESS>\n"
 "Language-Team: LANGUAGE <LL@li.org>\n"
@@ -14,6 +14,17 @@ msgstr ""
 "Content-Type: text/plain; charset=CHARSET\n"
 "Content-Transfer-Encoding: ENCODING\n"
 
+#: lib/meta.c:68
+#, c-format
+msgid "Read line '%s'"
+msgstr ""
+
+#: lib/meta.c:73 lib/meta.c:150 lib/meta.c:163 lib/meta.c:236 lib/meta.c:246
+#: lib/meta.c:271 lib/meta.c:278
+#, c-format
+msgid "Analysing word '%s'"
+msgstr ""
+
 #: lib/meta.c:77
 msgid "Missing operator ':'"
 msgstr ""
@@ -148,13 +159,13 @@ msgid ""
 "\n"
 msgstr ""
 
-#: src/compilo.c:48
+#: src/compilo.c:51
 msgid ""
 "\n"
 "Performing shutdown...\n"
 "\n"
 msgstr ""
 
-#: src/compilo.c:51
+#: src/compilo.c:54
 msgid "Exitting, bye!\n"
 msgstr ""
diff --git a/po/cat-id-tbl.c b/po/cat-id-tbl.c
index a94117f..64b3c92 100644
--- a/po/cat-id-tbl.c
+++ b/po/cat-id-tbl.c
@@ -8,51 +8,53 @@
 
 const struct _msg_ent _msg_tbl[] = {
   {"", 1},
-  {"Missing operator ':'", 2},
-  {"Invalid number.", 3},
-  {"Expecting ';' for field separator.", 4},
-  {"Expecting ',' for field separator.", 5},
-  {"Identifier incorrect.", 6},
-  {"Error: Expecting a . after a =", 7},
-  {"Extra parameters for field 'p'.", 8},
-  {"Unexpected char at end of line.", 9},
-  {"Expecting operator '=' for field 'p'.", 10},
-  {"Error: character . expected.", 11},
-  {"= expected after an implicit name", 12},
-  {"Identifier incorrect", 13},
-  {"expecting ; as field separator", 14},
-  {"Out of memory.", 15},
-  {"Meta parser init failed.", 16},
-  {"Too many nested operators in expression.\n", 17},
-  {"Too many nested functions calls in expression.\n", 18},
-  {"Invalid unary operator", 19},
-  {"Invalid binary operator", 20},
-  {"Parse error: too much left parenthesis", 21},
-  {"Parse error: too much right parenthesis", 22},
-  {"Parse error: enclosure mismatch", 23},
-  {"Invalid character", 24},
+  {"Read line '%s'", 2},
+  {"Analysing word '%s'", 3},
+  {"Missing operator ':'", 4},
+  {"Invalid number.", 5},
+  {"Expecting ';' for field separator.", 6},
+  {"Expecting ',' for field separator.", 7},
+  {"Identifier incorrect.", 8},
+  {"Error: Expecting a . after a =", 9},
+  {"Extra parameters for field 'p'.", 10},
+  {"Unexpected char at end of line.", 11},
+  {"Expecting operator '=' for field 'p'.", 12},
+  {"Error: character . expected.", 13},
+  {"= expected after an implicit name", 14},
+  {"Identifier incorrect", 15},
+  {"expecting ; as field separator", 16},
+  {"Out of memory.", 17},
+  {"Meta parser init failed.", 18},
+  {"Too many nested operators in expression.\n", 19},
+  {"Too many nested functions calls in expression.\n", 20},
+  {"Invalid unary operator", 21},
+  {"Invalid binary operator", 22},
+  {"Parse error: too much left parenthesis", 23},
+  {"Parse error: too much right parenthesis", 24},
+  {"Parse error: enclosure mismatch", 25},
+  {"Invalid character", 26},
   {"\
 Assembler\n\
-\n", 25},
-  {" o Initialising the meta engine...   ", 26},
+\n", 27},
+  {" o Initialising the meta engine...   ", 28},
   {"\
  Done!\n\
- o Meta language loading...          ", 27},
-  {"Meta language loading failed.", 28},
+ o Meta language loading...          ", 29},
+  {"Meta language loading failed.", 30},
   {"\
  Done!\n\
- o Initialising the assembler core...", 29},
-  {"Assembler core init failed.", 30},
-  {" Done!\n", 31},
+ o Initialising the assembler core...", 31},
+  {"Assembler core init failed.", 32},
+  {" Done!\n", 33},
   {"\
 \n\
 Performing initialisation...\n\
-\n", 32},
+\n", 34},
   {"\
 \n\
 Performing shutdown...\n\
-\n", 33},
-  {"Exitting, bye!\n", 34},
+\n", 35},
+  {"Exitting, bye!\n", 36},
 };
 
-int _msg_tbl_length = 34;
+int _msg_tbl_length = 36;
diff --git a/src/compilo.c b/src/compilo.c
index 161c70f..5f02e65 100644
--- a/src/compilo.c
+++ b/src/compilo.c
@@ -45,6 +45,9 @@ int main(void) {
 	fprintf(stderr, _("\nPerforming initialisation...\n\n"));
 	init_all();
 	
+	parse_line("MOV R12, R31");
+	asm_eol();
+	
 	fprintf(stderr, _("\nPerforming shutdown...\n\n"));
 	flush_all();
 	
-- 
cgit v1.2.3